--- parrot/debug.c	Tue Aug 27 07:46:38 2002
+++ parrot-leo/debug.c	Sat Sep 14 14:07:28 2002
@@ -1539,7 +1539,8 @@

                 interpreter->code->const_table->constants[k]->type =PFC_STRING;
                 interpreter->code->const_table->constants[k]->string =
-                    string_make(interpreter, buf, (UINTVAL)l, NULL, 0, NULL);
+                    string_make(interpreter, buf, (UINTVAL)l,
+                            NULL, BUFFER_constant_FLAG, NULL);

                 /* Add it to the bytecode */
                 eval[j++] = (opcode_t)k;