[PolyORB-users] PolyORB does not compile with x86_64

[Martin Krischik]

Hello,

I know it is probably not supportet. But still, I have patch ;-)

    POLYORB VERSION: 

snapshot 06.01.2005

    HOST MACHINE and OPERATING SYSTEM:

Linux linux2 2.6.8-24.10-default #1 Wed Dec 22 11:54:27 UTC 2004 x86_64 x86_64 
x86_64 GNU/Linux

    COMPILER VERSION

GNATLS 3.4.3 Copyright 1997-2004 Free Software Foundation, Inc.

Source Search Path:
   <Current_Directory>
   ./
   /work/ada/bc-20040319/
   /work/ada/charles/src/
   /opt/ada/include/xmlada/xmlada/
   /opt/ada/include/asis/
   /opt/ada/include/florist/
   /opt/ada/include/polyorb/
   /opt/ada/include/polyorb/corba/
   /opt/ada/include/polyorb/corba/cos/
   /opt/ada/include/polyorb/corba/messaging/
   /opt/ada/include/polyorb/corba/portableinterceptor/
   /opt/ada/include/polyorb/corba/rtcorba/
   /opt/ada/include/polyorb/dsa/
   /opt/ada/include/polyorb/moma/
   /opt/ada/include/polyorb/giop/
   /opt/ada/include/polyorb/giop/diop/
   /opt/ada/include/polyorb/giop/iiop/
   /opt/ada/include/polyorb/giop/miop/
   /opt/ada/include/polyorb/soap/
   /opt/ada/include/polyorb/web_common/
   /opt/ada/include/polyorb/srp/
   /opt/ada/lib/gcc/x86_64-unknown-linux-gnu/3.4.3/adainclude/


Object Search Path:
   <Current_Directory>
   ./
   /opt/ada/include/bc/Linux-Object/
   /opt/ada/include/xmlada/
   /opt/ada/include/asis/
   /opt/ada/include/florist/
   /opt/ada/lib/gcc/x86_64-unknown-linux-gnu/3.4.3/adalib/

autoconf (GNU Autoconf) 2.59
Written by David J. MacKenzie and Akim Demaille.

Copyright (C) 2003 Free Software Foundation, Inc.
This is free software; see the source for copying conditions.  There is NO
warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
automake (GNU automake) 1.9.1
Written by Tom Tromey <tromey at redhat.com>.

Copyright 2004 Free Software Foundation, Inc.
This is free software; see the source for copying conditions.  There is NO
warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.

    DESCRIPTION:

gcc -c -I./ -I. -I../../../../act/polyorb/compilers/idlac -g -O2 -gnatfy 
-gnatwae -gnatpn -gnatg -I- ../../../../act/polyorb/compilers/idlac/utils.adb
utils.adb:134:07: warning: types for unchecked conversion have different sizes
utils.adb:134:07: warning: size of "Address" is 64, size of "U_32" is 32
utils.adb:134:07: warning: 32 high order bits of source will be ignored
gnatmake: "../../../../act/polyorb/compilers/idlac/utils.adb" compilation 
error
make[3]: *** [idlac] Fehler 4
make[3]: Leaving directory 
`/work/act.x86_64-unknown-linux-gnu/polyorb/compilers/idlac'
make[2]: *** [all-recursive] Fehler 1
make[2]: Leaving directory 
`/work/act.x86_64-unknown-linux-gnu/polyorb/compilers/idlac'
make[1]: *** [all-recursive] Fehler 1
make[1]: Leaving directory 
`/work/act.x86_64-unknown-linux-gnu/polyorb/compilers'
make: *** [all-recursive] Fehler 1
/work/configure

    REPEAT BY:

Just by doing a base PolyORB compile.

    SAMPLE FIX/WORKAROUND:

Index: utils.adb
===================================================================
RCS file: /anoncvs/polyorb/compilers/idlac/utils.adb,v
retrieving revision 1.4
diff -u -3 -p -u -r1.4 utils.adb
--- utils.adb   17 Dec 2004 19:04:04 -0000      1.4
+++ utils.adb   7 Jan 2005 16:42:36 -0000
@@ -128,8 +128,8 @@ package body Utils is

    function Img (A : System.Address) return String is

-      type U_32 is mod 2 ** 32;
-      for U_32'Size use 32;
+      type U_32 is mod System.Memory_Size;
+      for U_32'Size use System.Word_Size;

       function To_U_32 is
          new Ada.Unchecked_Conversion (System.Address, U_32);

With Regards

Martin

-- 
Martin Krischik
mailto://krischik@users.sourceforge.net
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 189 bytes
Desc: not available
Url : /pipermail/polyorb-users/attachments/20050107/3733985f/attachment.bin