Author: kjs
Date: Sat Apr 5 06:10:11 2008
New Revision: 26771
Modified:
trunk/compilers/pirc/new/pasm.l
trunk/compilers/pirc/new/pasm.y
Log:
[pirc] update grammar spec for pasm: also allow .lex directives in PASM (but
this grammar is not used, it's meant to be a "clean reference"; maybe later it
can be used.)
Modified: trunk/compilers/pirc/new/pasm.l
==============================================================================
--- trunk/compilers/pirc/new/pasm.l (original)
+++ trunk/compilers/pirc/new/pasm.l Sat Apr 5 06:10:11 2008
@@ -89,6 +89,7 @@
"," { return ','; }
";" { return ';'; }
+".lex" { return TK_LEX; }
".pcc_sub" { return TK_PCC_SUB; }
".namespace" { return TK_NAMESPACE; }
Modified: trunk/compilers/pirc/new/pasm.y
==============================================================================
--- trunk/compilers/pirc/new/pasm.y (original)
+++ trunk/compilers/pirc/new/pasm.y Sat Apr 5 06:10:11 2008
@@ -41,6 +41,7 @@
%token TK_NAMESPACE ".namespace"
TK_PCC_SUB ".pcc_sub"
+ TK_LEX ".lex"
TK_NL "\n"
%token TK_FLAG_INIT ":init"
@@ -113,6 +114,7 @@
;
instruction: TK_PARROT_OP opt_arguments
+ | ".lex" TK_STRINGC ',' TK_PREG
;
opt_arguments: /* empty */
