RosettaCodeData/Task/Polymorphic-copy/PicoLisp/polymorphic-copy-2.l
Ingy döt Net b83f433714 tasks a-s
2013-04-10 23:57:08 -07:00

1 line
39 B
Common Lisp

(putl (setq B (new (val A))) (getl A))