Arithmetic evaluation: Difference between revisions
m
→{{header|PicoLisp}}: minor syntax error
m (→{{header|REXX}}: used correct link symbol.) |
m (→{{header|PicoLisp}}: minor syntax error) |
||
Line 3,428:
((= "+" X) (term))
((= "-" X) (list '- (term)))
((= "(" X) (prog1 (aggregate) (pop '*L)))
Output:
<lang PicoLisp>: (ast "1+2+3*-4/(1+2)")
| |||