4 lines
124 B
Text
4 lines
124 B
Text
(defmethod {print point} RIGHT
|
|
(lambda (self)
|
|
(with ((point x y) self)
|
|
(printf "{ChangeMe x:~a y:~a}~n" x y))))
|