Applies a translation to a given port for the duration of the macro.
graphics-ports
with-graphics-translation ( port dx dy ) &body body => result
port
A graphics port.
dx
A real number.
dy
body
A body of Lisp code.
result
The return value of the last form executed in body .
The with-graphics-translation macro performs a call to
with-graphics-translation
(apply-translation transform dx dy )
on the port's transform for the duration of body of the macro.