diff options
Diffstat (limited to 'lua.stx')
| -rw-r--r-- | lua.stx | 6 |
1 files changed, 3 insertions, 3 deletions
| @@ -1,6 +1,6 @@ | |||
| 1 | %{ | 1 | %{ |
| 2 | 2 | ||
| 3 | char *rcs_luastx = "$Id: lua.stx,v 3.49 1997/07/30 22:00:50 roberto Exp roberto $"; | 3 | char *rcs_luastx = "$Id: lua.stx,v 3.50 1997/07/31 20:46:59 roberto Exp roberto $"; |
| 4 | 4 | ||
| 5 | #include <stdlib.h> | 5 | #include <stdlib.h> |
| 6 | 6 | ||
| @@ -660,12 +660,12 @@ expr : '(' expr ')' { $$ = $2; } | |||
| 660 | | NIL {code_byte(PUSHNIL); $$ = 0; } | 660 | | NIL {code_byte(PUSHNIL); $$ = 0; } |
| 661 | | functioncall { $$ = $1; } | 661 | | functioncall { $$ = $1; } |
| 662 | | NOT expr1 { code_byte(NOTOP); $$ = 0;} | 662 | | NOT expr1 { code_byte(NOTOP); $$ = 0;} |
| 663 | | expr1 AND PrepJump {code_byte(POP); } expr1 | 663 | | expr1 AND PrepJump expr1 |
| 664 | { | 664 | { |
| 665 | code_shortcircuit($3, ONFJMP); | 665 | code_shortcircuit($3, ONFJMP); |
| 666 | $$ = 0; | 666 | $$ = 0; |
| 667 | } | 667 | } |
| 668 | | expr1 OR PrepJump {code_byte(POP); } expr1 | 668 | | expr1 OR PrepJump expr1 |
| 669 | { | 669 | { |
| 670 | code_shortcircuit($3, ONTJMP); | 670 | code_shortcircuit($3, ONTJMP); |
| 671 | $$ = 0; | 671 | $$ = 0; |
