RosettaCodeData/Task/Queue-Usage/PicoLisp/queue-usage.l

6 lines
276 B
Text
Raw Permalink Normal View History

2013-04-10 23:57:08 -07:00
(println (fifo 'Queue)) # Retrieve the number '1'
(println (fifo 'Queue)) # Retrieve an internal symbol 'abc'
(println (fifo 'Queue)) # Retrieve a transient symbol "abc"
(println (fifo 'Queue)) # and a list (abc)
(println (fifo 'Queue)) # Queue is empty -> NIL