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

[email protected]
Newsgroups perl.cvs.parrot
Message-ID <[email protected]>
Author: kjs
Date: Sat Jan 17 05:19:14 2009
New Revision: 35680

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

Log:
[pirc] fix build for Linux. Somehow, there must be some kind of macro expansion that uses the name "interp" for the Interp * struct. Declare that as a local variable, so "interp" is around if needed.

Modified: trunk/compilers/pirc/src/bcgen.c
==============================================================================
--- trunk/compilers/pirc/src/bcgen.c	(original)
+++ trunk/compilers/pirc/src/bcgen.c	Sat Jan 17 05:19:14 2009
@@ -8,7 +8,7 @@
 
 #include "parrot/parrot.h"
 
-/* #include "parrot/interpreter.h" */
+#include "parrot/interpreter.h"
 
 /* #include "parrot/embed.h" */
 
@@ -731,6 +731,10 @@
     STRING       *cur_name;
     size_t        len;
     global_label *outersub;
+    /* we need a Interp called "interp", because of some macros.
+     * needed on Linux. 17-Jan-2009, kjs.
+     */
+    Interp       *interp = bc->interp;
 
 
     /* if sub has no :outer, leave */
@@ -887,6 +891,8 @@
     int                    subname_index;
     int                    i;              /* for loop iterator */
     PackFile_Constant     *subname_const;
+    /* need a Interp object called "interp", because of some macro expansions. */
+    Interp                *interp = bc->interp;
 
     sub_pmc               = create_sub_pmc(bc, info->iscoroutine, info->instanceof);
     sub                   = PMC_sub(sub_pmc);
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.