Applies a translation to a given port for the duration of the macro.
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.