Anonymous user
Queue/Usage: Difference between revisions
→{{header|Ruby}}: Added REBOL example.
(Copied ghci session from the Fifo page) |
(→{{header|Ruby}}: Added REBOL example.) |
||
Line 465:
print my_queue.get() # bar
print my_queue.get() # baz</lang>
=={{header|REBOL}}==
See [[FIFO#REBOL]] for implementation. Example repeated here for completeness.
<lang REBOL>; Create and populate a FIFO:
q: make fifo []
q/push 'a
q/push 2
q/push USD$12.34 ; Did I mention that REBOL has 'money!' datatype?
q/push [Athos Porthos Aramis] ; List elements pushed on one by one.
q/push [[Huey Dewey Lewey]] ; This list is preserved as a list.
; Dump it out, with narrative:
print rejoin ["Queue is " either q/empty [""]["not "] "empty."]
while [not q/empty][print [" " q/pop]]
print rejoin ["Queue is " either q/empty [""]["not "] "empty."]
print ["Trying to pop an empty queue yields:" q/pop]</lang>
Output:
<pre>Queue is not empty.
a
2
USD$12.34
Athos
Porthos
Aramis
Huey Dewey Lewey
Queue is empty.
Trying to pop an empty queue yields: none</pre>
=={{header|Ruby}}==
| |||