[svn:parrot] r35512 - trunk/compilers/pirc/src

Author: kjs
Date: Tue Jan 13 14:45:24 2009
New Revision: 35512

Modified:
   trunk/compilers/pirc/src/bcgen.c

Log:
[pirc] fix a bit in create_lexinfo. Unfortunately, doesn't work still. How are .lex statements handled?

Modified: trunk/compilers/pirc/src/bcgen.c
==============================================================================
--- trunk/compilers/pirc/src/bcgen.c	(original)
+++ trunk/compilers/pirc/src/bcgen.c	Tue Jan 13 14:45:24 2009
@@ -664,12 +664,12 @@
         STRING *lexname = string_from_cstring(bc->interp, lexiter->name, strlen(lexiter->name));
 
         /* declare the .lex as such */
-        /*
+
         fprintf(stderr, "Create lexinfo: color of .lex '%s' is: %d\n", lexiter->name,
-                lexiter->info->color);
-        */
+                *lexiter->color);
+
 
-        Parrot_PCCINVOKE(bc->interp, lex_info, method, "SI->", lexname, lexiter->color);
+        Parrot_PCCINVOKE(bc->interp, lex_info, method, "SI->", lexname, *lexiter->color);
 
         lexiter = lexiter->next;
     }

• [svn:parrot] r35512 - trunk/compilers/pirc/src by kjs