February 2006 - Gpc

Question Re: predef.h
by Mirsad Todorovac 21 Feb '06

21 Feb '06

Hi, all! As for our last discussion re buffure overflows, I had to take time to think and do homework, after which I feel more sympathetic to what you have said - stack execution protection truly isn't all. NOW; I was asked from GCC team whether the RotateLeft/RotateRight bug is still present in their middle-end/back-end, and I am unable to tell without trying to recompile implementation attempt in PASCAL with newest backend (3.4.5, as it seem that GPC still does not support 4.0.2 :-( However, it appears that predef.h is missing from gpc-yyyymmdd/p subtree. On surface, it appears to be replaced by predef.def. I am not sure if the mechanism of definition of primitives is the same as the previous one in predef.h, so I am asking because you of course know more. Thank you very much in forward. Best regards, Mirsad "Tvrdim da bi se napetost izmedju znanosti i vjere trebala rijesiti njihovom sintezom, a ne odbacivanjem ili podvojenoscu." Pierre Teilhard de Chardin (1881-1955)

2 3

Development status & GNU Pascal on QNX
by Michael Müller 21 Feb '06

21 Feb '06

Hi, we are developing a console application under Delphi. The main task is to run it on Windows. But in some situations we need to run it on the realtime OS QNX. For this we currently use FreePascal. But several years ago (when they switched to version 2.x) the removed the QNX support but FPC 1.0.x lacks many interesting features like dynamic arrays. Searching for alternatives we found GNU Pascal. But going through the project pages I'm a little bit confused about the current development status. The download page which offers alpha test versions shows a version that is nearly one year old. The community is still active and from browsing through the mail archive I found some up-to-date but personal releases. So my main question is what the development status of GNU Pascal is. Before we would switch to it which would need some changes in the code I would like to know if the work on GNU Pascal is coordinated. Additionally I thought that GNU Pascal is bundled with GNU C so that with every GNU C release there is a GNU Pascal release. But this seems to be a big misunderstanding from my side. Only Fortan and Java seems to be bundled. And related to our real need: Does anybody here use GNU Pascal on QNX? Regards Michael

2 3

Re: New (20060215) snapshot
by cbfalconer＠att.net 20 Feb '06

20 Feb '06

<Maurice.Lombardi(a)ujf-grenoble.fr> wrote: > Waldek Hebisch a écrit: > >> I have put a new gpc snapshot at: >> >> http://www.math.uni.wroc.pl/~hebisch/gpc/gpc-20060215.tar.bz2 > > Compiled with DJGPP and gcc 3.4.4 > Only one failure for a new test (y2k has no meaning) When can we hope to see a gpc to go with gcc 4.0.1 under DJGPP, which seems to be the latest available. It is awkward not to be able to update gcc. -- Chuck F (cbfalconer@yahoo.com)(cbfalconer@maineline.net) Available for consulting/temporary embedded and systems. <http://cbfalconer.home.att.net> USE maineline address!

3 2

Changing access
by cbfalconer＠att.net 19 Feb '06

19 Feb '06

I sent the following message from my maineline address some time ago, and no change has been made to my access. Maybe it just disappeared? Darned if I know how to set this up. Please change my access so that mail is delivered to: cbfalconer(a)maineline.net and accepted from there and worldnet.att.net, att.net, or yahoo.com (all user cbfalconer). I would still like a reply-to gpc... to appear in the list messages sent to me. -- Chuck F (cbfalconer@yahoo.com)(cbfalconer@maineline.net) Available for consulting/temporary embedded and systems. <http://cbfalconer.home.att.net> USE maineline address!

1 0

Range checking for constants
by Adriaan van Os 15 Feb '06

15 Feb '06

> * 20060130: In ISO modes report out of range constants only at > runtime (range1.pas) > > {$W-} > {$classic-pascal} > program range(Output); > var v : 1..2; > begin > if true then > writeln('OK') > else > v := 0 > end. I welcome the change, but it implies that no checking is done when --range-checking is off (but currently it does). {$W-} {$classic-pascal} program range2(Output); var v : 1..2; begin {$local R-} v := 0; {$endlocal} writeln('OK') end. I suggest this behaviour for --mac-pascal (also). Regards, Adriaan van Os

2 2

ICE on unimplemented operators
by Adriaan van Os 14 Feb '06

14 Feb '06

The following testprogram causes an ICE in the compiler. [G5:~/gpc/testgpc/adriaan] adriaan% cat ice4.pas program ice4; type Str9 = record sLength: Byte; sChars: packed array[ 1.. 9] of char end; Str255 = record sLength: Byte; sChars: packed array[ 1..255] of char end; operator + ( const s1: Str9; const s2: Str255 ) = theResult : Str255; operator + ( const s1: Str9; const s2: Str255 ) = theResult : Str9; procedure P; var s1: Str9; s2: Str255; begin s1:= s1 + s2 end; begin end. [G5:~/gpc/testgpc/adriaan] adriaan% gpc ice4.pas ice4.pas: In operator `+ (Str9, Str255)': ice4.pas:19: error: syntax error before `.' ice4.pas:8: confused by earlier errors, bailing out Date/Time: 2006-02-14 17:52:23 +0100 OS Version: 10.3.9 (Build 7W98) Report Version: 2 Command: gpc1 Path: /Developer/Pascal/gpc345u2/libexec/gcc/powerpc-apple-darwin7/3.4.5/gpc1 Version: ??? (???) PID: 3239 Thread: 0 Exception: EXC_BAD_ACCESS (0x0001) Codes: KERN_PROTECTION_FAILURE (0x0002) at 0x00000010 Thread 0 Crashed: 0 gpc1 0x000a7724 all_blocks + 0x2c 1 gpc1 0x000a7758 all_blocks + 0x60 2 gpc1 0x000a7758 all_blocks + 0x60 3 gpc1 0x000a7758 all_blocks + 0x60 4 gpc1 0x000a77a8 get_block_vector + 0x20 5 gpc1 0x000a7818 identify_blocks + 0x3c 6 gpc1 0x000c05f0 rest_of_compilation + 0x2d0 7 gpc1 0x000ae950 output_inline_function + 0xa8 8 gpc1 0x00012680 poplevel + 0xd0 9 gpc1 0x001357f4 lhd_clear_binding_stack + 0x2c 10 gpc1 0x000c30d0 toplev_main + 0x84c 11 gpc1 0x00002468 _start + 0x188 12 dyld 0x8fe1a278 _dyld_start + 0x64 PPC Thread State: srr0: 0x000a7724 srr1: 0x0000f930 vrsave: 0x00000000 cr: 0x42002224 xer: 0x00000000 lr: 0x000a7758 ctr: 0x0013561c r0: 0x000a7758 r1: 0xbfffedc0 r2: 0x00000000 r3: 0x00000008 r4: 0x00000000 r5: 0x00000000 r6: 0x404e7530 r7: 0x00000001 r8: 0x0000001e r9: 0x405ec300 r10: 0x405ed000 r11: 0x00000001 r12: 0x42002224 r13: 0x00000000 r14: 0x00000000 r15: 0x00000000 r16: 0x00000000 r17: 0x00000000 r18: 0x00000000 r19: 0x00000000 r20: 0x00000000 r21: 0x00000000 r22: 0x404e72d4 r23: 0x404e7618 r24: 0x0045f0ec r25: 0x0048e8b0 r26: 0x0046714c r27: 0x00000000 r28: 0x00000000 r29: 0x00000000 r30: 0x00000008 r31: 0x000a77e4 Binary Images Description: 0x1000 - 0x457fff gpc1 /Developer/Pascal/gpc345u2/libexec/gcc/powerpc-apple-darwin7/3.4.5/ gpc1 0x8fe00000 - 0x8fe4ffff dyld /usr/lib/dyld 0x93a50000 - 0x93a54fff libmathCommon.A.dylib /usr/lib/system/libmathCommon.A.dylib 0x95f30000 - 0x9601efff libiconv.2.dylib /usr/lib/libiconv.2.dylib 0x98d8e000 - 0x98eddfff libSystem.B.dylib /usr/lib/libSystem.B.dylib [G5:~/gpc/testgpc/adriaan] adriaan% gpc -v Reading specs from /Developer/Pascal/gpc345u2/lib/gcc/powerpc-apple-darwin7/3.4.5/specs Configured with: ../gcc-3.4.5/configure --enable-languages=pascal,c --enable-threads=posix --target=powerpc-apple-darwin7 --host=powerpc-apple-darwin7 --build=powerpc-apple-darwin7 --prefix=/Developer/Pascal/gpc345u2 Thread model: posix gpc version 20051116, based on gcc-3.4.5 Regards, Adriaan van Os

3 2

ICE on bad forward declaration
by Adriaan van Os 14 Feb '06

14 Feb '06

The following testprogram causes an ICE in the compiler. [G5:~/gpc/testgpc/adriaan] adriaan% cat ice3.pas program ice3; type Str44 = record sLength: Byte; sChars: packed array[ 1..44] of char end; procedure P (s: str44); forward; procedure P (const s: str44); begin end; begin end. [G5:~/gpc/testgpc/adriaan] adriaan% gpc ice3.pas ice3.pas:9: internal compiler error: Bus error Please submit a full bug report, with preprocessed source if appropriate. See <URL:http://www.gnu-pascal.de/todo.html> for instructions. [G5:~/gpc/testgpc/adriaan] adriaan% gpc -v Reading specs from /Developer/Pascal/gpc345u2/lib/gcc/powerpc-apple-darwin7/3.4.5/specs Configured with: ../gcc-3.4.5/configure --enable-languages=pascal,c --enable-threads=posix --target=powerpc-apple-darwin7 --host=powerpc-apple-darwin7 --build=powerpc-apple-darwin7 --prefix=/Developer/Pascal/gpc345u2 Thread model: posix gpc version 20051116, based on gcc-3.4.5 Date/Time: 2006-02-14 15:06:50 +0100 OS Version: 10.3.9 (Build 7W98) Report Version: 2 Command: gpc1 Path: /Developer/Pascal/gpc345u2/libexec/gcc/powerpc-apple-darwin7/3.4.5/gpc1 Version: ??? (???) PID: 21604 Thread: 0 Exception: EXC_BAD_ACCESS (0x0001) Codes: KERN_PROTECTION_FAILURE (0x0002) at 0x00000008 Thread 0 Crashed: 0 gpc1 0x00017198 check_routine_decl + 0x1f8 1 gpc1 0x0001ac5c start_routine + 0x644 2 gpc1 0x0000ad84 yyuserAction + 0x7714 3 gpc1 0x00011560 main_yyparse + 0x888 4 gpc1 0x000c30c4 toplev_main + 0x840 5 gpc1 0x00002468 _start + 0x188 6 dyld 0x8fe1a278 _dyld_start + 0x64 PPC Thread State: srr0: 0x00017198 srr1: 0x0200f930 vrsave: 0x00000000 cr: 0x44022222 xer: 0x20000000 lr: 0x00017060 ctr: 0x000c3ccc r0: 0x0000000f r1: 0xbfffe7f0 r2: 0x14080000 r3: 0x405eb680 r4: 0x405eb180 r5: 0x00000000 r6: 0x00000000 r7: 0x00000000 r8: 0x00000000 r9: 0x405eb580 r10: 0x00000000 r11: 0x00000000 r12: 0x24024242 r13: 0x00000000 r14: 0x00000000 r15: 0x00000000 r16: 0x00000000 r17: 0x00000000 r18: 0x00000000 r19: 0x00000000 r20: 0x00000000 r21: 0x00000000 r22: 0x00000000 r23: 0x00000000 r24: 0x405e8840 r25: 0x405e8828 r26: 0x405ea1c0 r27: 0x00000000 r28: 0x405eb700 r29: 0x405eb380 r30: 0x405eb480 r31: 0x00016fb8 Binary Images Description: 0x1000 - 0x457fff gpc1 /Developer/Pascal/gpc345u2/libexec/gcc/powerpc-apple-darwin7/3.4.5/ gpc1 0x8fe00000 - 0x8fe4ffff dyld /usr/lib/dyld 0x93a50000 - 0x93a54fff libmathCommon.A.dylib /usr/lib/system/libmathCommon.A.dylib 0x95f30000 - 0x9601efff libiconv.2.dylib /usr/lib/libiconv.2.dylib 0x98d8e000 - 0x98eddfff libSystem.B.dylib /usr/lib/libSystem.B.dylib The same happens with the implicit forward declaration in a unit's interface. Regards, Adriaan van Os

3 2

Typo in manual
by Adriaan van Os 13 Feb '06

13 Feb '06

The GPC manual for PtrInt reads > PtrInt > (Under construction.) > Synopsis > type > PtrCard = Integer attribute (Size = BitSizeOf (Pointer)); > Description > A signed integer type of the same size as a pointer. > Conforming to > ‘PtrInt’ is a GNU Pascal extension. This should obviously be PtrInt = Integer attribute (Size = BitSizeOf (Pointer)); By the way, I didn't manage to build the html version of the manual, because the entry for 'Index' creates an index.html file, which conflicts with the usual index.html file. Regards, Adriaan van Os

3 6

traceback
by willett 12 Feb '06

12 Feb '06

I'm using gpc version 20051116, based on gcc-3.4.5. Impressive update! It is very nice to have the runtime error detection. But of course it means some new errors have to be dealt with, one way or another. An old program of mine is now getting... out of range (error #300 at 2c57) Trace/BPT trap Trying to get a less cryptic error report, maybe one with the procedure stack at point of error, I compile as: gp -mtraceback=full progname But this does not add anything to the information in the out of range error. Also, it would be nice to have a list of error messages, so that error #300 could be looked up. Any thought on how to access more information for runtime errors? (like a simple traceback of procedure calls).. Thanks, Willett Kempton

5 12

Re: Getting an error while compiling GPC-20051116 on HP-UX11i v2
by prasad svr 11 Feb '06

11 Feb '06

Hi, After igave `-mlp64' flag iam getting an error like this make[2]: Entering directory `/gcc/gpcbuild/gcc/p/rts' /gcc/gpcbuild/gcc/xgcc -B/gcc/gpcbuild/gcc/ -B/usr/local/ia64-hp-hpux11.23/bin/ -B/usr/local/ia64-hp-hpux11.23/lib/ -isystem /usr/local/ia64-hp-hpux11.23/includ e -isystem /usr/local/ia64-hp-hpux11.23/sys-include -c -I. -W -Wall -Wmissing-p rototypes -Wmissing-declarations -mlp64 -Wpointer-arith -Wwrite-strings "/gcc/ gcc-3.4.3/gcc/p/rts/rts.c" /gcc/gcc-3.4.3/gcc/p/rts/rts.c: In function `_p_CStringStrSignal': /gcc/gcc-3.4.3/gcc/p/rts/rts.c:2446: warning: empty body in an if-statement ../.././xgpc -B../.././ -c -g -I. -W -Wall -Wmissing-prototypes -Wmissing-decla rations -mlp64 --unit-path=/gcc/gcc-3.4.3/gcc/p/rts --automake `cat needed-opt ions` -DRTS_RELEASE_STRING="'`cat /gcc/gcc-3.4.3/gcc/p/rts/rts-version`'" -DGCC_ VERSION="'3.4.3'" "/gcc/gcc-3.4.3/gcc/p/rts/rtsc.pas" ../.././xgpc -B../.././ -c -I. -W -Wall -Wmissing-prototypes -Wmissing-declarat ions -mlp64 --unit-path=/gcc/gcc-3.4.3/gcc/p/rts --automake `cat needed-option s` -DRTS_RELEASE_STRING="'`cat /gcc/gcc-3.4.3/gcc/p/rts/rts-version`'" -DGCC_VER SION="'3.4.3'" "/gcc/gcc-3.4.3/gcc/p/rts/string1.pas" ../.././xgpc -B../.././ -c -I. -W -Wall -Wmissing-prototypes -Wmissing-declarat ions -mlp64 --unit-path=/gcc/gcc-3.4.3/gcc/p/rts --automake `cat needed-option s` -DRTS_RELEASE_STRING="'`cat /gcc/gcc-3.4.3/gcc/p/rts/rts-version`'" -DGCC_VER SION="'3.4.3'" --interface-only "/gcc/gcc-3.4.3/gcc/p/rts/error.pas" /gcc/gcc-3.4.3/gcc/p/rts/error.pas:267: error: module/unit interface `Heap' coul d not be imported make[2]: *** [stamp-error-gpi] Error 1 make[2]: Leaving directory `/gcc/gpcbuild/gcc/p/rts' make[1]: *** [pascal.rts] Error 2 make[1]: Leaving directory `/gcc/gpcbuild/gcc' make: *** [all-gcc] Error 2 # can any one help on this. Regards Prasad > ----- Original Message ----- > From: "Waldek Hebisch" <hebisch(a)math.uni.wroc.pl> > To: gpc(a)gnu.de > Subject: Re: Getting an error while compiling GPC-20051116 on HP-UX11i v2 > Date: Wed, 8 Feb 2006 01:57:55 +0100 (CET) > > > Russell Whitaker wrote: > > On Tue, 7 Feb 2006, Waldek Hebisch wrote: > > > > > prasad svr wrote: > <snip> > > >> /gcc/gpcbuild/gcc/xgcc -B/gcc/gpcbuild/gcc/ > > -B/usr/local/ia64-hp-hpux11.23/bin/ > > >> -B/usr/local/ia64-hp-hpux11.23/lib/ -isystem > > /usr/local/ia64-hp-hpux11.23/includ > > >> e -isystem /usr/local/ia64-hp-hpux11.23/sys-include -c -I. -W > > -Wall -Wmissing-p > > >> rototypes -Wmissing-declarations -g -O2 -Wpointer-arith > > -Wwrite-strings "/gcc/ > > >> gcc-3.4.3/gcc/p/rts/rts.c" > > >> /gcc/gcc-3.4.3/gcc/p/rts/rts.c:663:1: warning: "open" redefined > > >> In file included from /usr/include/fcntl.h:9, > > >> from /gcc/gcc-3.4.3/gcc/p/rts/rts.c:89: > > >> /usr/include/sys/fcntl.h:259:1: warning: this is the location > > of the previous de > > >> finition > > >> /gcc/gcc-3.4.3/gcc/p/rts/rts.c: In function `_p_CStringStrSignal': > > >> /gcc/gcc-3.4.3/gcc/p/rts/rts.c:2446: warning: empty body in an > > if-statement > > >> /gcc/gcc-3.4.3/gcc/p/rts/rts.c: In function `_p_SqRt': > > >> /gcc/gcc-3.4.3/gcc/p/rts/rts.c:831: internal compiler error: > > in emit_move_insn, > > >> at expr.c:2812 > > >> Please submit a full bug report, > > >> with preprocessed source if appropriate. > > >> See <URL:http://gcc.gnu.org/bugs.html> for instructions. > > >> make[2]: *** [rts.o] Error 1 > > >> make[2]: Leaving directory `/gcc/gpcbuild/gcc/p/rts' > > >> make[1]: *** [pascal.rts] Error 2 > > >> make[1]: Leaving directory `/gcc/gpcbuild/gcc' > > >> make: *** [all-gcc] Error 2 > > >> # > > >> > > >> > > >> can any one help on this. > > >> > > > > <snip> > > > It looks that the problem is fixed in gcc-4.0, but ATM gpc do not work > > > with this version of gcc. > > > > tried it with gcc-3.4.5 -c and got a .o result > > > > linux i686 > > > > The problem affects ia64 (Itanium) running HPUX. In fact, it seems that > only 32-bit mode is affected. Unfortunatly, 32-bit mode is a default on > HPUX. > > To Prasad: it seems that you have succesfully built the compiler proper. > The problem is with building the 32-bit runtime. You may try building > 64-bit runtime. > > Some hints how to do this are in a message by Peter Keenan: > > http://www.gnu-pascal.de/crystal/gpc/en/mail11264.html > > (however, to get 64-bit mode use `-mlp64' flag). > > -- > Waldek Hebisch > hebisch(a)math.uni.wroc.pl > -- _______________________________________________ Search for businesses by name, location, or phone number. -Lycos Yellow Pages http://r.lycos.com/r/yp_emailfooter/http://yellowpages.lycos.com/default.as…

2 1