Queue/Definition: Difference between revisions
m
→{{header|EasyLang}}
(Added Easylang) |
|||
Line 2,735:
prefix qu_
global q[] head tail .
#
proc enq n . .
if tail = 0
Line 2,754:
old = head
head = q[head + 2]
prev = q[last - 1]
if prev <> 0
q[prev + 2] = old
.
next = q[
if next <> 0
q[next + 1] = old
Line 2,764 ⟶ 2,765:
tail = old
.
q[old] = q[last -
q[old + 1] = q[last -
q[old + 2] = q[
len q[] -3
if head = len q[] + 1
Line 2,782 ⟶ 2,783:
.
prefix
#
qu_enq 2
qu_enq 5
Line 2,790 ⟶ 2,791:
.
</syntaxhighlight>
=={{header|EchoLisp}}==
| |||