LUA 栈实现

function STACK_EMPTY(S)

if S.top == 0then

return true

end

return false

end

function PUSH(S,x)

S.top = S.top + 1

S[S.top] = x

end

function POP(S)

if STACK_EMPTY(S)thenreturn('underflow')

else

S.top = S.top - 1

local v = S[S.top+1]

S[S.top+1] = nil

return v

end

end