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

[bacek at svn.parrot.org]

Author: bacek
Date: Sun Nov  1 11:31:58 2009
New Revision: 42211
URL: https://trac.parrot.org/parrot/changeset/42211

Log:
[pirc] Fix call to PF_create_default_segs

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

Modified: trunk/compilers/pirc/src/pircapi.c
==============================================================================
--- trunk/compilers/pirc/src/pircapi.c	Sun Nov  1 11:31:31 2009	(r42210)
+++ trunk/compilers/pirc/src/pircapi.c	Sun Nov  1 11:31:58 2009	(r42211)
@@ -196,7 +196,7 @@
 
     snprintf(name, sizeof (name), "EVAL_" INTVAL_FMT, eval_number);
 
-    new_cs = PF_create_default_segs(interp, name, 0);
+    new_cs = PF_create_default_segs(interp, Parrot_str_new(interp, name, strlen(name)), 0);
     old_cs = Parrot_switch_to_cs(interp, new_cs, 0);
 
     /* create a yyscan_t object */