Ooops. I originally did the /**/, but thought that was way too easy to be
C code, and so changed them to //. :)
Below is a proper patch.
Mike Lambert
Index: core.ops
===================================================================
RCS file: /cvs/public/parrot/core.ops,v
retrieving revision 1.111
diff -u -r1.111 core.ops
--- core.ops 21 Mar 2002 22:01:50 -0000 1.111
+++ core.ops 21 Mar 2002 22:48:58 -0000
@@ -567,6 +567,7 @@
=cut
inline op set_keyed (out PMC, in PMC, in PMC, in PMC) {
+/*
KEY_PAIR src_key_p, dest_key_p;
KEY src_key, dest_key;
@@ -575,6 +576,7 @@
$1->vtable->set_pmc_keyed(interpreter,
$1, $2 ? &src_key : NULL, $3, $4 ? &dest_key : NULL);
+*/
goto NEXT();
}
Index: classes/intqueue.pmc
===================================================================
RCS file: /cvs/public/parrot/classes/intqueue.pmc,v
retrieving revision 1.6
diff -u -r1.6 intqueue.pmc
--- classes/intqueue.pmc 10 Mar 2002 21:18:13 -0000 1.6
+++ classes/intqueue.pmc 21 Mar 2002 22:48:59 -0000
@@ -68,7 +68,7 @@
}
static INTVAL queue_length ( CONTAINER* container ) {
- INTVAL length;
+ INTVAL length = 0;
if(container->head != NULL) {
BUCKET* head = container->head;
while(head != NULL) {
