[REBOL] Re: Moving an element...
From: ammoncooke::yahoo::com at: 27-Sep-2001 13:21
Here:
Push: func [
"Inserts a value into a series and returns the series head."
Stack [series! port! bitset!] "Series at point to insert."
Value [any-type!] /Only "The value to insert."
][
head either Only [
insert/only Stack :Value
][
insert Stack :Value
]
]
Pop: function [
"Returns the first value in a series and removes it from the series."
Stack [series! port! bitset!] "Series at point to pop from."
][
Value
][
Value: pick Stack 1
remove Stack
:Value
]
two functions created by Andrew. They are very useful. I think you can put
them in user.r to make them available to all scripts, or just put them in
the script you want to use them from. ;)
Enjoy!!
Ammon
