RosettaCodeData/Task/Stack/EasyLang/stack.easy

21 lines
255 B
Plaintext

stack[] = [ ]
proc push v .
stack[] &= v
.
func pop .
lng = len stack[]
if lng = 0 : return 0 / 0
r = stack[lng]
len stack[] -1
return r
.
func empty .
return if len stack[] = 0
.
push 2
push 11
push 34
while empty = 0
print pop
.