12 lines
258 B
Text
12 lines
258 B
Text
local :stack [] #lists used to be stacks in DV
|
|
|
|
push-to stack 1
|
|
push-to stack 2
|
|
push-to stack 3
|
|
|
|
!. pop-from stack #prints 3
|
|
!. pop-from stack #prints 2
|
|
!. pop-from stack #prints 1
|
|
|
|
if stack: #empty lists are falsy
|
|
error #this stack should be empty now!
|