..

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) {

Reply via email to