\' Gambas class file
Inherits Expresion
Public Sub interpreter(s As Float[]) As Variant[] \'indica si hay error...
Dim tmp As Float
tmp = s.Pop()
Try s.Push(s.Pop() - tmp)
If Error Then
Return [False, "(operador menos) " & Error.Text]
Endif
Return [True, ""]
End