..
Daniel Grunblatt.
Index: core.ops
===================================================================
RCS file: /home/perlcvs/parrot/core.ops,v
retrieving revision 1.27
diff -u -r1.27 core.ops
--- core.ops 2001/11/15 22:10:31 1.27
+++ core.ops 2001/11/16 02:22:25
@@ -1935,7 +1935,7 @@
AUTO_OP runinterp(p, i|ic) {
struct PackFile local_file;
memcpy(&local_file, interpreter->code, sizeof(struct PackFile));
- local_file.byte_code = cur_opcode + $2;
+ local_file.byte_code = (char *)(cur_opcode + $2);
runops($1->data, &local_file);
}
Index: classes/intclass.c
===================================================================
RCS file: /home/perlcvs/parrot/classes/intclass.c,v
retrieving revision 1.4
diff -u -r1.4 intclass.c
--- classes/intclass.c 2001/11/02 12:11:16 1.4
+++ classes/intclass.c 2001/11/16 02:22:41
@@ -221,7 +221,7 @@
static void Parrot_int_concatenate_5 (struct Parrot_Interp *interpreter, PMC* pmc,
PMC* left, PMC* right) {
}
-static void Parrot_int_is_equal (struct Parrot_Interp *interpreter, PMC* pmc, PMC*
left) {
+static BOOLVAL Parrot_int_is_equal (struct Parrot_Interp *interpreter, PMC* pmc, PMC*
+left) {
}
static void Parrot_int_logical_or (struct Parrot_Interp *interpreter, PMC* pmc, PMC*
left, PMC* right) {