Leopold Toetsch wrote:
> $ perl6 -k examples/life-ar.p6 5
> Running generations
This problem is due to the fact that the argument strings are
created with the external flag set, which is not properly
supported by the string and GC modules. Steve posted
some patches recently that might well fix the problem,
but I have been leaving those for Mike to look at.
In the meantime, a temporary quick-fix patch is included below.
--
Peter Gibbs
EmKel Systems
Index: string.c
===================================================================
RCS file: /cvs/public/parrot/string.c,v
retrieving revision 1.90
diff -u -r1.90 string.c
--- string.c 23 Aug 2002 07:53:35 -0000 1.90
+++ string.c 30 Aug 2002 22:10:40 -0000
@@ -183,6 +183,7 @@
s = new_string_header(interpreter, flags);
Parrot_allocate_string(interpreter, s, buflen);
+ s->flags &= ~(UINTVAL)BUFFER_external_FLAG;
s->encoding = encoding;
s->type = type;
