Package: goo
Severity: normal
Tags: patch

When building 'goo' on amd64 with gcc-4.0,
I get the following error:

goo/boot.c: In function 'YPPcheck_call_types':
goo/boot.c:7205: error: invalid lvalue in assignment
goo/boot.c:7211: warning: cast to pointer from integer of different size
goo/boot.c:7219: warning: cast to pointer from integer of different size
goo/boot.c:7226: warning: cast to pointer from integer of different size
goo/boot.c:7247: warning: cast to pointer from integer of different size
goo/boot.c:7263: warning: cast to pointer from integer of different size
goo/boot.c:7269: warning: cast from pointer to integer of different size
goo/boot.c:7291: warning: cast to pointer from integer of different size
goo/boot.c:7301: warning: cast to pointer from integer of different size
goo/boot.c:7311: warning: cast to pointer from integer of different size
goo/boot.c: In function 'Y___main_8___':
goo/boot.c:7763: warning: cast to pointer from integer of different size
make[3]: *** [goo/boot.o] Error 1
make[3]: Leaving directory `/goo-0.155/c/g2c'

With the attached patch 'goo' can be compiled
on amd64 using gcc-4.0.

Regards
Andreas Jochens

diff -urN ../tmp-orig/goo-0.155/c/g2c/goo/boot.c ./c/g2c/goo/boot.c
--- ../tmp-orig/goo-0.155/c/g2c/goo/boot.c      2003-11-19 20:49:58.000000000 
+0100
+++ ./c/g2c/goo/boot.c  2005-03-17 17:36:51.000000000 +0100
@@ -986,7 +986,7 @@
   P retF1;
   P T0,T1,T2,T3;
 DEFCREGS();
-  (P)YPdef_regs();
+  YPdef_regs();
   T3 = (P)YPsp_reg();
   retF1 = T3;
   T1 = (P)YPsp_reg();
@@ -6761,7 +6761,7 @@
   P nF692;
   P T0,T1,T2,T3,T4,T5,T6,T7,T8,T9;
 DEFCREGS();
-  (P)YPdef_regs();
+  YPdef_regs();
   T9 = (P)YPsp_elt((P)-2);
   nF692 = T9;
   T8 = (P)YPi_((P)-2,nF692);
@@ -6961,7 +6961,7 @@
   P T0,T1,T2,T3,T4,T5,T6,T7,T8,T9,T10,T11,T12,T13,T14,T15;
   P T16,T17,T18,T19,T20,T21,T22,T23,T24,T25,T26,T27,T28;
 DEFCREGS();
-  (P)YPset_regs(regs_);
+  YPset_regs(regs_);
   xF724 = fn_;
   T28 = (P)YPprop_elt(xF724,(P)1);
   xF725 = T28;
@@ -7061,7 +7061,7 @@
   P T0,T1,T2,T3,T4,T5,T6,T7,T8,T9,T10,T11,T12,T13,T14,T15;
   P T16,T17,T18,T19,T20,T21,T22,T23,T24,T25;
 DEFCREGS();
-  (P)YPset_regs(regs_);
+  YPset_regs(regs_);
   if (VARREF(YPclasses_readyQ) != YPfalse) {
     oF747 = res_;
     tF748 = type_;
@@ -7134,7 +7134,7 @@
 INLINE P YPstack_check(P regs_) {
   P T0,T1,T2,T3,T4,T5,T6,T7,T8,T9,T10,T11,T12,T13,T14,T15;
 DEFCREGS();
-  (P)YPset_regs(regs_);
+  YPset_regs(regs_);
   T4 = (P)YPmax_stack_len();
   T3 = (P)YPi_(T4,(P)1000);
   T6 = (P)YPsp_reg();
@@ -7202,7 +7202,7 @@
   P T16,T17,T18,T19,T20,T21,T22,T23,T24,T25,T26,T27,T28,T29,T30,T31;
   P T32,T33,T34,T35,T36,T37,T38,T39,T40,T41,T42,T43;
 DEFCREGS();
-  (P)YPset_regs(regs_);
+  YPset_regs(regs_);
   T43 = (P)YPsp_elt((P)-1);
   fnF767 = T43;
   xF768 = fnF767;


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Reply via email to