aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2026-02-01 16:33:20 -08:00
parent 5150844a7d
commit 4bb20c9b71
7735 changed files with 38060 additions and 199180 deletions
Download patch file Download diff file Expand all files Collapse all files

28
Task/Queue-Definition/Arturo/queue-definition.arturo
View file

@ -1,21 +1,21 @@
define :queue [][
init: [
define :queue [
init: method [][
this\items: []
]
]
empty?: function [this :queue][
zero? this\items
]
empty?: method [][
zero? this\items
]
push: function [this :queue, item][
this\items: this\items ++ item
]
push: method [item][
this\items: this\items ++ item
]
pop: function [this :queue][
ensure -> not? empty? this
pop: method [][
ensure -> [not? this\empty?]
result: this\items\0
this\items: remove.index this\items 0
return result
result: this\items\0
this\items: remove.index this\items 0
return result
]
]