Compiler/syntax analyzer: Difference between revisions
Content added Content deleted
m (J: bugfix -- remove dangling assert) |
(J: bugfix: no right associative operators (previous implementation: all binary operators were right associative)) |
||
| Line 3,444: | Line 3,444: | ||
end. |
end. |
||
while.(2=tok_valence)*y<:tok_precedence do. |
while.(2=tok_valence)*y<:tok_precedence do. |
||
q=. tok_precedence [ op=. node_display NB. no right associative operators |
q=. 1+tok_precedence [ op=. node_display NB. no right associative operators |
||
gettok'' |
gettok'' |
||
e=. op make_node e expr q |
e=. op make_node e expr q |
||