with-gl-context in canvas%

Passes the given thunk to call-as-current of the result of get-gl-context for this canvas's DC as returned by get-dc.

• (send a-canvas with-gl-context thunk) -> return value of thunk
   thunk : procedure of no arguments