RosettaCodeData/Task/Named-parameters/PicoLisp/named-parameters-1.l

7 lines
174 B
Text
Raw Permalink Normal View History

2013-04-10 23:57:08 -07:00
(de foo @
(bind (rest) # Bind symbols in CARs to values in CDRs
(println 'Bar 'is Bar)
(println 'Mumble 'is Mumble) ) )
(foo '(Bar . 123) '(Mumble . "def"))