a2p.y revision 7c478bd95313f5f23a4c958a745db2134aa03244
%{
/* $RCSfile: a2p.y,v $$Revision: 4.1 $$Date: 92/08/07 18:29:12 $
*
* Copyright (c) 1991-2001, Larry Wall
*
* You may distribute under the terms of either the GNU General Public
* License or the Artistic License, as specified in the README file.
*
* $Log: a2p.y,v $
*/
#include "INTERN.h"
#include "a2p.h"
int root;
%}
%right '?' ':'
%left '+' '-'
%left '*' '/' '%'
%right '^'
%%
;
$$ = Nullop; }
;
{ $$ = $1; }
;
| /* NULL */
{ $$ = Nullop; }
;
| begin
| end
;
{ $$ = rememberargs($$); }
;
;
| match
| rel
;
;
;
;
{ $$ = $1; }
lval_field = TRUE;
lval_field = TRUE;
}
;
| SPRINTF_OLD ;
{ $$ = $1; }
| NUMBER
| STRING
| GETLINE
| FUN1
| FUN1 '(' ')'
;
| FIELD
;
: expr
| clist
| /* NULL */
{ $$ = Nullop; }
;
{ $$ = $2; }
;
| /* NULL */
{ $$ = Nullop; }
;
hunksep : ';'
| SEMINEW
| NEWLINE
| COMMENT
;
| /* NULL */
{ $$ = Nullop; }
;
| COMMENT
;
: ';' maybe
;
| /* NULL */
{ $$ = Nullop; }
;
| ';' maybe
| compound
;
| /* NULL */
{ $$ = Nullop; }
;
: expr
}
}
| BREAK
| NEXT
| EXIT
| CONTINUE
| RET
;
| GRGR
| '|'
;
;
%%
int yyparse (void);
#include "a2py.c"