diff options
| author |  Greg Hudson <ghudson@mit.edu> | 1997-09-14 18:12:16 +0000 |
|---|---|---|
| committer | Greg Hudson <ghudson@mit.edu> | 1997-09-14 18:12:16 +0000 |
| commit | ce6018836c422c86a729ba39fe5433ec11b87b02 (patch) | |
| tree | cc2e6601489384fcf41e0565e8906822897b46c8 /zwgc/parser.y | |
| parent | ac16f380e349fa39ec7e26bccb5456cb300006a5 (diff) | |
Pull in sources from zephyr locker. See /mit/zephyr/repository for
detailed change information.
Diffstat (limited to 'zwgc/parser.y')
| -rw-r--r-- | zwgc/parser.y | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/zwgc/parser.y b/zwgc/parser.y index 31d21db..22b8a47 100644 --- a/zwgc/parser.y +++ b/zwgc/parser.y @@ -13,8 +13,10 @@ * "mit-copyright.h". */ +#include <sysdep.h> + #if (!defined(lint) && !defined(SABER)) -static char rcsid_parser_y[] = "$Id$"; +static const char rcsid_parser_y[] = "$Id$"; #endif #include <zephyr/mit-copyright.h> @@ -56,7 +58,7 @@ static Node *the_program; %token ELSE ELSEIF ENDCASE ENDIF ENDWHILE EXEC EXECPORT EXIT %token FIELDS GET GETENV IF INPUTPORT LANY LBREAK LSPAN %token MATCH NOOP NOT OUTPUTPORT PRINT PROTECT VERBATIM PUT RANY RBREAK -%token RSPAN SET SHOW SUBSTITUTE THEN UPCASE WHILE ZVAR +%token RSPAN SET SUBSTITUTE THEN UPCASE WHILE ZVAR STYLESTRIP %type <node> expr varname string %type <node> exprlist comma_exprlist varnamelist @@ -132,6 +134,8 @@ expr : '(' expr ')' { $$ = node_create_unary(ZVAR_OPCODE, $3); } | GET '(' expr ')' { $$ = node_create_unary(GET_OPCODE, $3); } + | STYLESTRIP '(' expr ')' + { $$ = node_create_unary(STYLESTRIP_OPCODE, $3); } | LANY '(' expr ',' expr ')' { $$ = node_create_binary(LANY_OPCODE, $3, $5 ); } |