Anonymous user
Queue/Usage: Difference between revisions
clojure impl
(→{{header|Clojure}}: moved to FIFO) |
(clojure impl) |
||
Line 169:
}
}</lang>
=={{header|Clojure}}==
Using the implementation from [[FIFO]]:
<lang clojure>
(def q (make-queue))
(push-queue q 1)
(push-queue q 2)
(push-queue q 3)
(pop-queue q) ; 1
(pop-queue q) ; 2
(pop-queue q) ; 3
(queue-empty? q) ; true
</lang>
Or use a java implementation:
<lang clojure>
(def q (java.util.LinkedList.))
(.add q 1)
(.add q 2)
(.add q 3)
(.remove q) ; 1
(.remove q) ; 2
(.remove q) ; 3
(.isEmpty q) ; true
</lang>
=={{header|Common Lisp}}==
| |||