Macro With-Use-Program

Part of:

package opengl
( with-use-program &rest < args > )
Executes forms using the shader program named. And cleanly use no-program afterwards.