Queue/Definition: Difference between revisions
Added Quackery.
(Added "when isMainModule". Moved "try" before the first "pop".) |
(Added Quackery.) |
||
Line 4,304:
not fifo # empty
fifo.pop() # raises IndexError when empty</lang>
=={{header|Quackery}}==
<lang Quackery> [ [] ] is queue ( --> [ )
[ [] = ] is empty? ( --> b )
[ nested join ] is push ( [ x --> [ )
[ dup empty? if
[ $ "Queue unexpectedly empty."
fail ]
behead ] is pop ( [ --> [ x )</lang>
{{out}}
Testing in the Quackery shell.
<pre>/O> queue
... 1111 push
... 2222 push
... 3333 push
... pop echo cr
... pop echo cr
... pop echo cr
... dup empty? if [ say "queue is enpty" cr ]
... pop echo cr
...
1111
2222
3333
queue is enpty
Problem: Queue unexpectedly empty.
Quackery Stack: [ ]
Return stack: {[...] 0} {quackery 1} {[...] 11} {shell 5} {quackery 1} {[...] 20} {pop 3}</pre>
=={{header|R}}==
| |||