Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ' 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 dividir) " & Error.Text]
- Endif
- Return [True, ""]
- End
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement