RosettaCodeData/Task/Polymorphic-copy/PicoLisp/polymorphic-copy-2.l

2 lines
39 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
(putl (setq B (new (val A))) (getl A))