- Gpc - gnu.de

FreeBSD gpc status?
by Frank Jahnke 09 Mar '04

09 Mar '04

I am writing you all to inquire about the status of the GNU Pascal compiler on FreeBSD. It is mentioned quite prominently on the gpc homepage as a supported platform, yet it is not in the FreeBSD ports collection. Browsing the archives on gnu-pascal.de shows some intermittent interest, but no real success stories, at least for recent OS versions. I have quite some old pascal code that I would like to use with the rest of the GNU compiler family. gpc would seem to be the way to go, if that would be possible. Could anyone share with me what the status of gpc is on FreeBSD? For what it's worth, I'm running FreeBSD 5.2.1 with gcc 3.3.3. Frank Jahnke

2 7

bug (?) in Time Format
by Toby Ewing 07 Mar '04

07 Mar '04

Hi, all There have been some recent improvements to the Mersenne Twister (the random number generator that is used in the GPC unit), and I've been translating them into Pascal for eventual submission to the programming team. As part of this, I wanted to check the execution time, so I wrote a timer (I thought!) into a test program: program testMT; uses GPC, MTrand; {MTrand is the name of the unit I'm working on} const big = 10000000; TimeFormat = ' %Q'; var t1, t2, i, j : medCard; CurrentTime : TimeStamp; begin SeedRand(1234567890); GetTimeStamp (CurrentTime); WriteStr(FormatTime(CurrentTime, TimeFormat), t1); { line 17 } for i := 1 to big do j := randInt; GetTimeStamp (CurrentTime); WriteStr(FormatTime(CurrentTime, TimeFormat), t2); Writeln('Elapsed time: ', (t2 - t1):1); end. The compiler hangs with the following error: testmt.pas(17): Error: reference expected, value given testmt.pas(17): Error: reference expected, value given testmt.pas(17): Error: tree check: expected class 't', have 'x' (error_mark) in require_complete_type, at p/typecheck.c:63 Please submit a full bug report I'm guessing that it's not about my unit, but rather what I'm trying to do with capturing a string into an int... anyway, here is a bug report. Toby

5 11

About GPC's support of func/proc overloading
by Neil Santos 07 Mar '04

07 Mar '04

How does GPC support function/procedure overloading when it allows the declaration of parameters to be skipped when it comes to the implementation of a function/procedure? I read somewhere that a function/procedure declaration in an interface need not be duplicated for the implementation. UIM, the text referred to Extended Pascal. Say function foo is declared like this in the interface section of a module: function foo(bar : integer) : some_return_type; In the implementation, one could just do: function foo; begin {do interesting stuff here} end; Is it possible to overload foo (i.e., to accept a baz parameter, aside from bar) without resorting to having two code blocks with slightly different parameter declarations? And on a slightly related question: Does GPC support, as an extension to Pascal, optional paramaters the way Ada supposedly does? If so, could someone please point me towards the direction I should go in order to find out how? If not, does anyone else think that this would be a useful extension? Thanks for your time. -- - Neil Santos Freelance Programmer & Web Designer - - http://nsantos.f2o.org/ Free Software advocate - -----BEGIN GEEK CODE BLOCK----- Version: 3.12 GAT d+@ s+:+ a? C++++ UL*++++ P++ L++ E--- W+++(--) N-- !o !K w(++) !O M-- V? PS++ PE-- Y++ PGP+ t* 5-- X- R++ tv+ b++>+++ DI+++ D--- G e>+++++ h r++ y? ------END GEEK CODE BLOCK------ Please avoid sending me attachments created with proprietary software. See http://www.fsf.org/philosophy/no-word-attachments.html

4 14

Problem with 20030830 alpha install
by Armsdon, Phil 06 Mar '04

06 Mar '04

Hi all, I have GPC 2.1 20020510 installed from source on a Sun solaris 2.8 machine with all the associated pre-requisites with gcc 2.95.3 I am now trying to install the alpha version of GPC 2.1 20030830 on the same machine. I am using all the same pre-requisites and the same copy of gcc 2.95.3 I am getting a problem with this compilation at teh configure stage. When I run configure --prefix=/opt/ACMLgpc --enable-languages=pascal with the alpha version, I get an error message just after I confirm the action to patch the source: *** *** Detected GCC version 2.95.3. *** GPC 2.1 requires a patch to GCC to build with version 2.95.3. *** This patch will now be applied. *** Press ENTER to continue, Ctrl-C to abort. *** *** Creating dummy ./p/Makefile.in ./configure: syntax error at line 8403: `fi' unexpected Configure in /opt/ACMLgpc/src/gcc-2.95.3/gcc failed, exiting. Has anyone seen this error message? Any idea how to fix it? Regards, Phil ----------------------------------------- The information contained in this transmission may contain privileged and confidential information and is intended only for the use of the person(s) named above. If you are not the intended recipient, or an employee or agent responsible for delivering this message to the intended recipient, any review, dissemination, distribution or duplication of this communication is strictly prohibited. If you are not the intended recipient, please contact the sender immediately by reply e-mail and destroy all copies of the original message. Please note that we do not accept account orders and/or instructions by e-mail, and therefore will not be responsible for carrying out such orders and/or instructions. If you, as the intended recipient of this message, the purpose of which is to inform and update our clients, prospects and consultants of developments relating to our services and products, would not like to receive further e-mail correspondence from the sender, please "reply" to the sender indicating your wishes. In the U.S.: 1345 Avenue of the Americas, New York, NY 10105.

2 1

Dereferencing variables of type Pointer
by Neil Santos 06 Mar '04

06 Mar '04

Isn't there any (presumably non-standard) way of dereferencing Pointer variables? The reason I ask is because I need information on the type of variable whose address a Pointer variable contains. Said type will vary, and cannot be known until runtime. If that can't be done, then could somebody please give me tips on writing generalized subroutines for reading and writing typed files? Or should I just skip both of these and just write an interface object, and implement read/write mechanisms for each structure I intend on keeping in a stream? I'd rather avoid this (for it beats the whole point of OO, IMO), but I'd do it if it can't be avoided. TIA. [Hrm... Or maybe I'll do it in Ada, with generics. But, aside from knowing Pascal which is from the same family, I know nothing of Ada.] -- - Neil Santos Freelance Programmer & Web Designer - - http://nsantos.f2o.org/ Free Software advocate - -----BEGIN GEEK CODE BLOCK----- Version: 3.12 GAT d+@ s+:+ a? C++++ UL*++++ P++ L++ E--- W+++(--) N-- !o !K w(++) !O M-- V? PS++ PE-- Y++ PGP+ t* 5-- X- R++ tv+ b++>+++ DI+++ D--- G e>+++++ h r++ y? ------END GEEK CODE BLOCK------ Please avoid sending me attachments encoded in secret formatting. See http://www.fsf.org/philosophy/no-word-attachments.html

3 2

Compiling error GPC 21 for Sun solaries 2.6
by Doan Ngoc San 05 Mar '04

05 Mar '04

Hi, My OS is Sun Solaries2.6. I'd downloaded correct version (with gcc). When compiling error message are: ld: elf error: file /usr/local/lib/gcc-lib/sparc-sun-solaries2.6/2.95.2/libgpc.a: unknown type unable to process using elf(3E) library. ld:fatal:library - lgpc: not found. Please, help me Thanks. --------------------------------- Do you Yahoo!? Yahoo! Search - Find what youre looking for faster.

2 1

Re: bug (?) in Time Format
by david＠tcs01.demon.co.uk 04 Mar '04

04 Mar '04

In message <40476955.1000807(a)iastate.edu> Toby Ewing writes: > > > > I suppose it's in the unit the OP was developing, so you'd have to > > take it out here. > > Correct (but what's an "OP"?). "Original Poster"? -- David James mailto:david@tcs01.demon.co.uk or mailto:david@djames.org.uk Special Stage Rally results archive <URL:http://www.tcs01.demon.co.uk/>

1 0

detect terminal window resizing
by Doan Ngoc San 04 Mar '04

04 Mar '04

Hi, Please, help me, how to detect when terminal window resizes ? My OS is REDHAT. Thanks --------------------------------- Do you Yahoo!? Yahoo! Search - Find what youre looking for faster.

3 2

How to start ?
by Prof. Harley Flanders 03 Mar '04

03 Mar '04

Hello O/S: Windows XP I would like to get started with GNU PAscal. What must I download to have a Pascal compiler, and possibly an IDE? The download instruction on the GNU site are not too clear. Must I download the source code for the Pascal complier, and then download a C (or other compiler) to compile the Pascal compiler? Or can I (hopefully) get the latest Pascal compiler ready to run? Thanks, HF =========================================== Prof. Harley Flanders 3533 Windemere Court Ann Arbor, MI 48105-2867 Home: 734 668 1546 harley(a)umich.edu Visiting Professor University of Michigan Dept. of Mathematics, East Hall Ann Arbor, MI 48109 734 764 6451 Secretary: 734 764 6485 FAX: 734 763 0937 ===========================================

2 1

GPC, Mingw and gcc-3.3.3
by Prof A Olowofoyeku (The African Chief) 02 Mar '04

02 Mar '04

Hiya I built gpc-20030830 on gcc-3.3.3 under Mingw. It built okay, but there are problems with (inter alia) "FExpand". For example, this program: PROGRAM bug1; USES gpc; BEGIN Writeln (FExpand ('.')); Writeln ('Ok'); END. produces this result (gdb output): "Starting program: D:\gpc\test/bug1.exe Program received signal SIGSEGV, Segmentation fault. $0041f369 in Internalrealpath ()" Everything works fine when gpc is built on gcc-3.2.3. Anything later than that, and you get problems in Internalrealpath() as above. I am not sure why ... Best regards, The Chief -------- Prof. Abimbola A. Olowofoyeku (The African Chief) web: http://www.bigfoot.com/~african_chief/

1 0

Re: CPU timer
by Toby Ewing 02 Mar '04

02 Mar '04

Hi, all Frank suggested using the CPU timer, and I agree that it's a much better benchmark than the clock timer (I keep discovering gems in gpc.pas!). But I'm getting identical results from the two timers: var time1, time2 : longCard; dummy, cpu1, cpu2 : integer; ... time1 := GetMicroSecondTime; dummy := 0; cpu1 := GetCPUTime(dummy); for i := 1 to big do j := randNorm(0.0, 1.0); dummy := 0; cpu2 := GetCPUTime(dummy); time2 := GetMicroSecondTime; writeln('Time for ', big:1, ' randNorms: ', ((time2-time1)*0.000001):7:2, ' seconds, ', (cpu2-cpu1):5, ' cpu seconds.'); ... A note in gpc.pas says that the argument to GetCPUTime can be null and is then ignored. When the computer is idle except for this program, I get: Time for 100000000 randNorms: 171.03 seconds, 171 cpu seconds. When I'm checking email, opening files, etc., I get: Time for 100000000 randNorms: 202.29 seconds, 202 cpu seconds. What am I doing wrong here - or is GetCPUTime not working? Toby

4 4

OT: Losing mail [WAS Spam?]
by Neil Santos 02 Mar '04

02 Mar '04

Accidentally sent to Thorsten, instead of the list. Resending. By the way, why doesn't the list put the list's address in Reply-To? Thorsten Glaser wrote: >> I think CBFalconer's reply to my post was caught as spam by my ISP, > > > I actually got a mail with the word spam and nothing else, but > my spam filter is bmf and only bmf. So it must be not your ISP, > but rather something in between. Called up my ISP after my last message (something I think I should've done first); the tech support I got a hold of told me that whenever they detect a piece of mail as spam, they send me a notification. I'm not fully convinced of this, as the said tech support asked me what a spam filter is, but yeah... that's what I have to work with. I sure wish Mozilla SeaMonkey has provisions for verbose debug logs; or if it has, I found out and activated it sooner. But my Junk folder is empty. And I didn't tell SeaMonkey to automatically delete spam. -- - Neil Santos Freelance Programmer & Web Designer - - http://nsantos.f2o.org/ Free Software advocate - -----BEGIN GEEK CODE BLOCK----- Version: 3.12 GAT d+@ s+:+ a? C++++ UL*++++ P++ L++ E--- W+++(--) N-- !o !K w(++) !O M-- V? PS++ PE-- Y++ PGP+ t* 5-- X- R++ tv+ b++>+++ DI+++ D--- G e>+++++ h r++ y? ------END GEEK CODE BLOCK------ Please avoid sending me attachments encoded in secret formatting. See http://www.fsf.org/philosophy/no-word-attachments.html

2 1

Re: CPU timer
by Tom Verhoeff 02 Mar '04

02 Mar '04

>On Mon, 1 Mar 2004, Toby Ewing wrote: > >> Hi, all >> >> Frank suggested using the CPU timer, and I agree that it's a much better >> benchmark than the clock timer (I keep discovering gems in gpc.pas!). But I'm >> getting identical results from the two timers: >> >> var >> time1, time2 : longCard; >> dummy, >> cpu1, cpu2 : integer; >> .. >> time1 := GetMicroSecondTime; >> dummy := 0; >> cpu1 := GetCPUTime(dummy); >> >> for i := 1 to big do j := randNorm(0.0, 1.0); >> >> dummy := 0; >> cpu2 := GetCPUTime(dummy); >> time2 := GetMicroSecondTime; >> writeln('Time for ', big:1, ' randNorms: ', ((time2-time1)*0.000001):7:2, >> ' seconds, ', (cpu2-cpu1):5, ' cpu seconds.'); >> .. >> >> >> When the computer is idle except for this program, I get: >> Time for 100000000 randNorms: 171.03 seconds, 171 cpu seconds. Why not try a program that does user input, say through a readln. When testing, you can delay the input as long as you wish. The net cpu time should be minimal, but the wall clock time obviously increases as you wait. Tom

1 0

Re: gpc-20030830 for MSYS released
by Gerrit P. Haase 29 Feb '04

29 Feb '04

Hallo Prof, I'm about to build the Cygwin version right now and as with the previous version I also distribute the MinGW components from mingw.org via the Cygwin mirrors (I don't build the MinGW parts myself). Unfortunately the MinGW GCC maintainer Danny Smith doesn't include GPC in his distribution yet. What about a new release of your MinGW pascal compiler? Gerrit -- =^..^=

2 1

Re: bug (?) in Time Format
by Silvio a Beccara 28 Feb '04

28 Feb '04

Hi, I don't know which precision you need for time, but the following unit does all right for me; it can be modified for going down to millisecond resolution. Silvio a Beccara ------------------------------------------------------------------------------------ unit times; interface function times ( tend: boolean; var tinit: double ): double; implementation uses SysUtils, types; function times ( tend: boolean; var tinit: double ): double; var seconds: double; TS : TTimeStamp; DT : TDateTime; begin if tend = false then begin TS:=DateTimeToTimeStamp(Now); tinit := TimeStampToMSecs ( TS ); end else begin TS:=DateTimeToTimeStamp(Now); seconds := ( TimeStampToMSecs ( TS ) - tinit ) / 1000; result := seconds; end; end; end. ------------------------------------------------------------------------------------ | Hi, all | | There have been some recent improvements to the Mersenne Twister (the | random number generator that is used in the GPC unit), and I've been | translating them into Pascal for eventual submission to the programming | team. As part of this, I wanted to check the execution time, so I wrote a | timer (I thought!) into a test program: | | program testMT; | uses GPC, MTrand; {MTrand is the name of the unit I'm working on} | const | big = 10000000; | TimeFormat = ' %Q'; | var | t1, t2, i, j : medCard; | CurrentTime : TimeStamp; | | begin | SeedRand(1234567890); | GetTimeStamp (CurrentTime); | WriteStr(FormatTime(CurrentTime, TimeFormat), t1); { line 17 } | for i := 1 to big do j := randInt; | GetTimeStamp (CurrentTime); | WriteStr(FormatTime(CurrentTime, TimeFormat), t2); | Writeln('Elapsed time: ', (t2 - t1):1); | end. | | The compiler hangs with the following error: | testmt.pas(17): Error: reference expected, value given | testmt.pas(17): Error: reference expected, value given | testmt.pas(17): Error: tree check: expected class 't', have 'x' | (error_mark) in require_complete_type, at p/typecheck.c:63 | Please submit a full bug report | | I'm guessing that it's not about my unit, but rather what I'm trying to do | with capturing a string into an int... anyway, here is a bug report. | | Toby

3 2

None
by None 24 Feb '04

24 Feb '04

+(CET) Received: from adele.gerwinski.de (adele.gerwinski.de [217.69.76.193]) by matsrv.math.cas.cz (8.12.8/8.12.8) with ESMTP id i1O685RC031413 for <jerabek(a)math.cas.cz>; Tue, 24 Feb 2004 07:08:05 +0100 Received: from localhost ([127.0.0.1] helo=gnu.de) by adele.gerwinski.de with smtp (Exim 3.35 #1 (Debian)) id 1AvVcA-0007lD-00; Tue, 24 Feb 2004 07:00:18 +0100 Received: from mtiwmhc11.worldnet.att.net ([204.127.131.115]) by adele.gerwinski.de with esmtp (Exim 3.35 #1 (Debian)) id 1AvVc6-0007kl-00 for <gpc(a)gnu.de>; Tue, 24 Feb 2004 07:00:14 +0100 Received: from yahoo.com +(25.hartford-02rh16rt-03rh15rt.ct.dial-access.att.net[12.76.130.25]) by worldnet.att.net (mtiwmhc11) with SMTP id <200402240558151110000st6e>; Tue, 24 Feb 2004 05:58:15 +0000 Message-ID: <403ADCF2.6EC260D7(a)yahoo.com> Date: Tue, 24 Feb 2004 00:11:14 -0500 From: CBFalconer <cbfalconer(a)yahoo.com> Reply-To: cbfalconer(a)worldnet.att.net Organization: Ched Research X-Mailer: Mozilla 4.75 [en] (Win98; U) X-Accept-Language: en MIME-Version: 1.0 To: gpc(a)gnu.de Subject: [SPAM] Re: About GPC's support of func/proc overloading References: <403A5EED.3030905(a)sexmagnet.com> Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Precedence: bulk Sender: gpc-owner(a)gnu.de X-Spam-Flag: YES X-Spam-Status: Yes, hits=5.3 required=5.0 tests=FAKE_HELO_YAHOO, FORGED_YAHOO_RCVD,RCVD_FAKE_HELO_DOTCOM,RCVD_IN_NJABL,RCVD_IN_SORBS autolearn=no version=2.63 X-Spam-Report: * 1.6 RCVD_FAKE_HELO_DOTCOM Received contains a faked HELO hostname * 2.6 FAKE_HELO_YAHOO Host HELO did not match rDNS: yahoo.com * 0.9 FORGED_YAHOO_RCVD 'From' yahoo.com does not match 'Received' +headers * 0.1 RCVD_IN_SORBS RBL: SORBS: sender is listed in SORBS * [12.76.130.25 listed in dnsbl.sorbs.net] * 0.1 RCVD_IN_NJABL RBL: Received via a relay in dnsbl.njabl.org * [12.76.130.25 listed in dnsbl.njabl.org] X-Spam-Level: ***** X-Spam-Checker-Version: SpamAssassin 2.63 (2004-01-11) on matsrv.math.cas.cz Status: RO Content-Length: 1397 Lines: 43

1 0

Bug#232028: Support for a common place for additional units? (forwarded from Torsten Knodt)
by Matthias Klose 23 Feb '04

23 Feb '04

This report was submitted to the Debian bug tracking system. Is this something generally useful?

2 1

Re: Dos unit on Unix
by Peter Norton 21 Feb '04

21 Feb '04

Thanks to Prof. Abimbola and Frank for their quick and professional help. You helped me to find the right solution ( even two ;-) Best regards, Peter __________________________________ Do you Yahoo!? Yahoo! Mail SpamGuard - Read only the mail you want. http://antispam.yahoo.com/tools

1 0

Dos unit on Unix
by Peter Norton 21 Feb '04

21 Feb '04

Hi, I use FSplit, FindFirst, FindNext procedures from the Dos unit in program I'm trying to port for Linux. This procedures cut off the long filenames to 8 characters (DOS standard) and the program doesn't works under Linux correctly. What is possible solutions? What alternative to the Dos unit? Thanks in advance, Peter __________________________________ Do you Yahoo!? Yahoo! Mail SpamGuard - Read only the mail you want. http://antispam.yahoo.com/tools

4 7

Re: Help with blockread/blockwrite
by Peter Norton 19 Feb '04

19 Feb '04

The Chief wrote: > Please send an example of such code. <code snippet> bmpinfo = record (*BMP header*) b1, b2 : char; size : integer; reserved : integer; offset : integer; headersize : integer; width : integer; height : integer; planes : shortword; bpp : shortword; compression : integer; comprsize : integer; horresolution : integer; verresolution : integer; usedcolors : integer; importantcol : integer; end; ... var info : bmpinfo; source : file of bmpinfo; ... begin ... assign(source, dir+fname+ext); reset(source); read(source, info); close(source); </code snippet> This code reads first two bytes ok (magic BM), then skips two byes (?) and from info.size all values are shifted two bytes. I have tried to use b1, b2 : byte or b1b2 : shortword or b1b2 : shortint - no way. Also I have changed source : file of byte and used blockread(source, info, 54) - no way, the same story. The only solution I found with GPC (this code works fine with FPC, VP) is to remove first two bytes out from the record, then open source as file of bytes and: blockread(image, magic, 2); blockread(image, info, 52); Peter. __________________________________ Do you Yahoo!? Yahoo! Finance: Get your refund fast by filing online. http://taxes.yahoo.com/filing.html

4 5

GPC on Linux
by Peter Norton 19 Feb '04

19 Feb '04

I have installed GPC (v.20030830) on my RedHat 7.1 running box. GCC is v.2.96 20000731, binutils v. 2.10.91.0.2-3. It works mainly fine until I want to use the key -g for further gdb work. With this key it breaks with next message: Assembler messages: Warning: Unrecognized .section attribute: want a,w,x ... Error: Rest of line ignored. First ignored character is ',' Guess it because of versions incompatibility. But my Linux-GPC experience not allows me to find exact reason of the error. That's why I'm asking more experienced users - what I need to change in my congiguration? Thanks in advance, Peter. __________________________________ Do you Yahoo!? Yahoo! Finance: Get your refund fast by filing online. http://taxes.yahoo.com/filing.html

4 3

Problems building GPC-20030830
by Daniel Rudy 19 Feb '04

19 Feb '04

Hello, I'm having much difficulty in building GPC 2003-08-30 on a FreeBSD system. This is the error that I'm getting: gcc -g -O2 -o makeinfo makeinfo.o multi.o ../lib/libtxi.a ../intl/libintl.a gmake[3]: Leaving directory `/usr/tmp/gpcbuild/texinfo/makeinfo' gmake[2]: Leaving directory `/usr/tmp/gpcbuild/texinfo' gmake[1]: Leaving directory `/usr/tmp/gpcbuild/texinfo' gmake[1]: Entering directory `/usr/tmp/gpcbuild/etc' gmake[1]: Nothing to be done for `all'. gmake[1]: Leaving directory `/usr/tmp/gpcbuild/etc' gmake[1]: Entering directory `/usr/tmp/gpcbuild/gcc' cd ../../gcc-2.95.4cvs/gcc && autoheader autoheader: not found gmake[1]: *** [../../gcc-2.95.4cvs/gcc/cstamp-h.in] Error 127 gmake[1]: Leaving directory `/usr/tmp/gpcbuild/gcc' gmake: *** [all-gcc] Error 2 What is autoheader? I think that this problem may be related to the tools that I have installed on the machine. I have the GNU sed installed, as well as autoconf 2.13. Now here's the problem: For my platform, bision is only available in 1.75. The textinfo and flex tools are *NOT* available at all through the ports collection. Unfortunately, this is the best that I can do because I don't know C very well. Help is appriciated. -- Daniel Rudy

2 1

Re: GPC on Linux
by Peter Norton 18 Feb '04

18 Feb '04

Emil wrote: >Did you try -gstabs as well? It might work better than >Dwarf with old binutils. No luck if I compile with -gstabs instead of -g. No errors during compilation but gdb refuses to load program - "Dwart Error: Cannot handle DW_FORM_strp in DWARF reader". :-( Peter. __________________________________ Do you Yahoo!? Yahoo! Finance: Get your refund fast by filing online. http://taxes.yahoo.com/filing.html

2 1

Stdin & Stdout
by Daniel Rudy 17 Feb '04

17 Feb '04

Hello, I'm trying to build a program under Unix, and I'm trying to use stdin and stdout to do this, but it keeps telling me that the symbols are not defined. I've tried stdin, stdout, standardinput, standardoutput, and used filenames such as 'stdin' and 'stdout'. How does one transfer information between stdin and stdout on unix systems through GPC? -- Daniel Rudy

4 3

Release Information
by Daniel Rudy 17 Feb '04

17 Feb '04

Hello, What is the latest release of GPC? So far from what I can see from the website, the latest release is still 2.1. -- Daniel Rudy

1 0

Please help me
by B.Gayathri 16 Feb '04

16 Feb '04

Sir, I am working in Pascal in HP-UX envirmoment. The application was developed in HP Pascal 3000 in MPE/iX enviroment. We want to port the application in HP-UX. So using PC command I compiled the files and object files are created successfully. Now I want to link the programs and make the application executable. How do I link the files? How do I know which file to link? How can I make a file executable? I request you to help me in this regard. Thanks and regards, B.Gayathri

2 1

gcc-3.3.3
by Russell Whitaker 15 Feb '04

15 Feb '04

hi gcc-3.3.3 was released today, Feb 14th. built with gpc-20030830: patch ok, usual complaints about offsets. skipped the varasm.c hunk. test results # of GPC tests 3794 # of GPC tests passed 3791 # of GPC tests skipped 3 # of GPC tests failed 0 Yea! Russ

1 0

temporary spamcop listing
by Anja Gerwinski 10 Feb '04

10 Feb '04

Hi all, an automated response from the majordomo list software got our mailing list server in spamcop's blacklist for one day. They removed us quickly upon request. From the list mail bounces I see that some of you missed out on three mails that went via the gpc list on that day. I am attaching them below. To those of you using spamcops blacklist, be warned. Servers get in too quickly in my opinion. Best wishes, Anja

1 0

Re: Help with blockread/blockwrite
by Peter Norton 08 Feb '04

08 Feb '04

Chuck F wrote: > An integer requires 4 bytes, and must be aligned at a multiple of 4. Fairly say I never heard about it must be aligned in record. I use Pascal some years now (not GNU) and always mixed different types in records without problems. Thanks for explanation. I take my words (buggy GPC) back ;-) Peter. __________________________________ Do you Yahoo!? Yahoo! Finance: Get your refund fast by filing online. http://taxes.yahoo.com/filing.html

2 1

Re: Help with blockread/blockwrite
by Peter Norton 07 Feb '04

07 Feb '04

Frank wrote: > That's the GCC version. Run `gpc -v'. Oh yes. GPC is version 20030830. BTW it seems realy buggy on windows ( or windows is buggy itself ;-) Today I found that my program can't read BMP (image) header with GPC. The record I use for this is started from two bytes ( I tried also two char, shortword, shortint ) followed by integer, integer ... It reads first two bytes OK, then skips two bytes more and starts to read first integer from offset 4 ??? Magic. Peter. __________________________________ Do you Yahoo!? Yahoo! Finance: Get your refund fast by filing online. http://taxes.yahoo.com/filing.html

2 1

Re: Help with blockread/blockwrite
by Peter Norton 07 Feb '04

07 Feb '04

Frank wrote: >BTW, which OS and which GPC version? Windows 98SE, MinGW/GPC 3.2.3 Peter __________________________________ Do you Yahoo!? Yahoo! Finance: Get your refund fast by filing online. http://taxes.yahoo.com/filing.html

2 1

Re: Help with blockread/blockwrite
by Peter Norton 06 Feb '04

06 Feb '04

Frank, >I cannot reproduce it, but I suppose it's just a misunderstanding of >the `BlockRead' semantics. If the 4th parameter is given, it doesn't >have to read the whole buffer because the 4th parameter tells how >many were read. I always thought that forth parameter in 'BlockRead' contains information how much units was read. How much to read is controlled by the third parameter. Newertheless your code works fine - it just make one more loop on the eof. I'm still interest what prevent to fill the full buffer (512 bytes) on this magic poiner 16384. I've debugged this sample and found that with big files the second magic spot appears somewhere about 100773 filepos. But it's may vary. Thanks, Peter __________________________________ Do you Yahoo!? Yahoo! Finance: Get your refund fast by filing online. http://taxes.yahoo.com/filing.html

2 1

GDB Debugging Nightmare!
by Bryan Meredith 06 Feb '04

06 Feb '04

Hello chaps, I have looked through the list but cant find anything definitive on this one... I am using -gstabs to compile as -g on its own gives "internal error - unimplemented function unk_lang_create_fundamental_type called." (as per an earlier post). I can get things to display by casting them to their type Type(Var) with initial letters capitalised. Where I get really stuck is trying to use this technique on a thingy (its a union in C - I dont know much pascal so I dont know what its called - sorry). This isnt real code - its so I can try to explain a little better... TYPE header = RECORD item1 : WORD; item2 : WORD; item3 : LONGWORD; END; type1 = PACKED RECORD hdr ; header; custom1 : BYTE; END; { you get the idea...} thingy = RECORD CASE INTEGER OF 1: (member1 : type1); 2: (member2 : type2); 3: (member3 : type3); END; VAR dummy1 : header; dummy2 : type1; dummy3 : thingy; >From within GDB when the program is running, I can inspect the contents of dummy1 by doing p Header(Dummy1) ( I would expect a simple p dummy1 to work but any debug is better than none). How do I get it to display member2 (assuming that member2 is the relevent member). I can tell which structure to use as there is a variable that has been set. Out of interest, is there a way of telling which member is the relevent one just by looking at dummy3? Sorry if this is really amateurish - I am a C programmer that has suddenly inherited a whole load of Pascal and I must admit that I am struggling with the debugger. It works fine for me in C - I am hoping that it is my ignorance that is the cause of the problem. If there are any publications, online or in print (I have the GPC documentation but it didnt help on this one) that you recommend, please post away. Thanks for any insight, Bryan "Brain Murders" Meredith

3 8

Help with blockread/blockwrite
by Peter Norton 05 Feb '04

05 Feb '04

I have simple file copy example: var infile,outfile: file; buff: array[1..512] of byte; copied: integer; begin assign(infile, 'input'); reset(infile, SizeOf(byte)); assign(outfile, 'output'); rewrite(outfile, SizeOf(byte)); repeat blockread(infile, buff, 512, copied); blockwrite(outfile, buff, copied); until copied < 512; close(infile); close(outfile); end. It works fine. But if before repeat loop I placed: blockread(infile, buff, 1); blockwrite(outfile, buff, 1); it copy only 16384 (2^14) bytes of input. Always. If input file is smaller than 2^14 bytes then it copied all bytes. If larger then it cutted down to 2^14 bytes. I have this behaviour with GPC only. No problems with FPC, VP... What is wrong? Thanks in advance, Peter __________________________________ Do you Yahoo!? Yahoo! Finance: Get your refund fast by filing online. http://taxes.yahoo.com/filing.html

2 1

packed records' address again
by Francesco Bonomi 05 Feb '04

05 Feb '04

Dear friends, It turns out I have been too optimistic. I had two thoughts: 1) I can unpack/repack the structures and work on them. FALSE! Here I have records, not arrays! 2) I cannot assign the array of chars in a single instruction, but I can assign a single char: all I need is a loop. FALSE! My situation is in effects more problematic, probably because also some of the sub-structures are packed... See below These are the declarations I have (stripped down) TYPE ITEN = packed RECORD KEY :PACKED ARRAY [1..MAX] OF CHAR; PUNT:integer; END; ND = packed RECORD POS : integer; IDX : packed ARRAY [1..ONDM2] OF ITEN; END; VAR DATA : ND; This assignment fails: DATA.IDX[H1].KEY:= <array of char>; I thought I could loop through this assignment: DATA.IDX[H1].KEY[x] := <char>; But it still fails. The compiler says: Error: cannot take address of packed record field `IDX' BUT if the problem is with IDX, why this assignment is ok??? DATA.IDX[H1].PUNT := <integer>; At the moment, the workaround I have found is: VAR DATA : ND; TMP : ITEN; TMP:=DATA.IDX[H1]; TMP.KEY:=<array of char>; DATA.IDX[H1]:=TMP; I cannot really understand why (and if) this should be safer (from the compiler's poin of view) than doing DATA.IDX[H1].KEY:= <array of char>; Any thought? Ciao Francesco Bonomi Francesco Bonomi Si.lab s.r.l. Via Citille 13 50022 Greve in Chianti FI- Italy Tel +39 - 055 8544805 Fax +39 - 055 8547418 http//:www.silab.it

2 1

TLIST, STRINGLIST, etc
by Paul Davidson 03 Feb '04

03 Feb '04

Not sure if this is proper forum for this. Flame if appropriate :) Are there ports of TSTRINGLIST object and its friends, TLIST, TOBJECTLIST, et al? Thank you p davidson

2 1

Re: label used before containing beinding
by Tom Verhoeff 03 Feb '04

03 Feb '04

>Nick Ioffe wrote: > >> I've encountered the message in the subject trying to compile >> the following: >> >> program x(input, output); >> label >> x_label; >> var >> z:integer; >> w:string; >> function f:string >> begin >> f:='f'; >> end; >> >> begin >> if z = 1 >> then >> begin >> writeln('to x_label'); >> goto x_label; >> end; >> >> w:= 'z:'+f; >> >> x_label:; >> >> end. >> >> Compilation fails and I get: >> x.pas:3: label 'x_label' used before containing binding contour. Have you tried it with numeric labels (which at least the original Pascal definition required)? program ...; label 99; begin ... ... goto 99 ... 99: end. An alternative is to put the code in a separate procedure, and use Exit to leave it early. Exit is basically a jump to the end of the procedure. You can also use Exit in the main program to terminate execution (jump to the end). See documentation for details on Exit. Tom

1 0

label used before containing beinding contour problem
by "Nick Ioffe 02 Feb '04

02 Feb '04

Hi! I've encountered the message in the subject trying to compile the following: program x(input, output); label x_label; var z:integer; w:string; function f:string begin f:='f'; end; begin if z = 1 then begin writeln('to x_label'); goto x_label; end; w:= 'z:'+f; x_label:; end. Compilation fails and I get: x.pas:3: label 'x_label' used before containing binding contour. If I surround w:= 'z:'+f; with 'begin/end' then everything compiles. also if summation is not on string everything compiles. I use "gpc version 20030507, based on gcc-3.2.1" I've found in the archive message #2535 descring the same problem. However the message seems to be unanswered, at least the answer was not on the archive.... Thank you in advance, Nick Ioffe ===================================================== message #2535 From: Berend de Boer Subject: label used before containingn binding contour Date: 29 Jan 1999, 21:01:21 Since about 5 years I try to compile lex for extended pascal with gpc. However, I still don't succeed. This program is a real test case I assume :-) Here the latest error, boiled down to the most minimal code: ------------------------ program Test; type string255=string(255); function Test(filename, ext : String): string255; label 1,2; begin Test := ''; goto 1; goto 2; 2: Test := filename+'.'; 1: ; end; begin end. ------------------------ Groetjes, Berend. =======================================

2 1

Please help me
by B.Gayathri 31 Jan '04

31 Jan '04

Sir, I have an application running in HP pascal in MPE/iX platform. Now I port the same application in HP-UX and compiled. Many files got compiled, but one file is giving the following compilation error. FILE: /BRW/brwsrc/sub/rcchecki 281 420.000 1 $INCLUDE 'sub/rcchecki' $ ^ **** ERROR # 1 $INCLUDE NOT ALLOWED HERE WHEN SYMBOLIC DEBUG IS ENABLED (294) I dont know what the error is, but I found the cause given in HP pascal manual which is as follows: $INCLUDE of a file in executable code must be on a Pascal statement boundary if symbolic debug is enabled. I dont understand what it is, so I request you to give the solution to correct this error. Awaiting your reply. Thanks and regards, B.Gayathri

2 1

PExecute and arguments
by Peter Norton 29 Jan '04

29 Jan '04

Sorry, again me :-) As I understand from the docs there are no EXEC command in the GNU Pascal. Instead PExecute exists. >From the pexecutedemo.pas I understand how to call external program but I also need to pass parameters to. I have a mess in my head with all those TString,CString and PCStrings. Could someone drop a line-two of sample code how to call the program with passing parameters. Thanks in advance, Peter __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/

4 3

OsX Terminal Sounds
by Nathan Schneider 28 Jan '04

28 Jan '04

Hello! I'm trying to write a simple musical program for macosx terminal (haven't yet graduated to GUI) and not sure how to work the sounds out, especially since the included crt unit's "sound" doesn't seem to work. Basically, I'm trying to get some pitches specified as notes. Should I be approaching this by writing directly to the sound card somehow, or else maybe using sound files, or somewhere in between? any help or nudges in one direction or another would be greatly appreciated. thanks. nathan

3 3

Re: PExecute and arguments
by Peter Norton 28 Jan '04

28 Jan '04

>Exec ('notepad.exe', 'c:\temp\foo.txt'); Thanks Professor. Actually I tried to replace Exec with PExecute. I'm adapting my old Pascal programs ( they're ok with FPC, VP ) to the GNU Pascal standards and found that Exec doesn't fires the program while your simple code works fine. Peter __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/

1 0

Re: Danger!
by J. David Bryan 27 Jan '04

27 Jan '04

I wrote: > I've searched the changelog for binutils 2.14 and did not find any > mention of such a patch. I spoke too soon. The FSF binutils does not mention a fix for this problem; however, the 20030807 Mingw binutils snapshot does appear to contain a patch. See: ftp://ftp2.sourceforge.net/pub/sourceforge/mingw/binutils-2.14.90-20030807-… which says, in part: The 2.14.90-20030807-1 snapshot incorporates modifications to official binutils CVS since last update. It also fixes a bug (again) with w9x fseek, where file contents are not zero'd out if you seek past the end and then write. This patch has not been in recent binutils releases. So perhaps the OP can use that binutils snapshot (available at the same FTP location, or via http://www.mingw.org/ ) to work around the problem on Win9x. -- Dave

5 7

Danger!
by Peter Norton 27 Jan '04

27 Jan '04

Just whant to confirm - binutils 2.14.90 (20030807) fixed the problem with MinGW. And "-mno-cygwin" is ok with Cygwin. Thanks to all for the help ;-) Peter __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/

1 0

Danger!
by Peter Norton 24 Jan '04

24 Jan '04

Info: To explore the content of exe file produced by gpc I compiled foo.pas - just "begin end.". It gave me 349.322 bytes exe file. Open it with hex editor I was wondered with content - there are a small manual how to use RTS (?), alot of zeros ... and a few web addresses I visited a few days ago! I have compiled one more time with -s switch. Again the visited addresses from the history of my Opera 6.05 I used hour before. Exploring it closer I found that some random memory dump is embeding in to exe. Who knows what will be there the next time - may be an accout's passwords or credit card detail you entered some days ago in browser. It placed after second 'msvcrt.dll' followed by two zeros and always is 328 bytes. I saved a few samples if someone will be interest. I use GPC under MinGW on Windows 98SE. Is it known issue? Question: Is there a program for Windows to analyze the content of PE executables and cleaning out the rubbish? Thanks, Peter __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/

4 5

Re: huge exe size
by Peter Norton 23 Jan '04

23 Jan '04

Thanks all who answered on my question. But now a new question appears - does speed affected by this rubbish in exe? Does all those died links works like a brake? All "big" is associates in my brain with "slow". Peter. __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/

2 1

huge exe size
by Peter Norton 22 Jan '04

22 Jan '04

Hi all, I'm new in GNU Pascal and wonder the exe size compiler produces. Three lines Hello World source was blowed up to the 349 KB (!) exe. Stripped down (with -s) the executable is still big - 247 KB. The same source compiled with VirtualPascal's compiler is 11 KB exe. 20 times smaller! Am I doing something wrong? Thank in advance, Peter __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free web site building tool. Try it! http://webhosting.yahoo.com/ps/sb/

5 5

Re: [RESEND] gcc 3.3.3/3.4 compatibility
by Waldek Hebisch 21 Jan '04

21 Jan '04

Thorsten Glaser wrote: > > Now I retrieved a recent tarball and find gcc 3.3 "not production > quality" - the tarball's fairly old though. > > I'd like to ask whether, when gcc 3.3.3 or even 3.4 comes out > (does anybody know approximate dates?), it's likely or not to > be fully supported? > Mostly, the issue is: we have an i386 and a sparc port, and gcc 3.2.3 > at the moment. I don't want to write a gcc 3.2 configuration for sparc, > as the 3.3 format is different (eg. with CPP_PREDEFINES), and can't > take one from somewhere else and just modify it, because the gcc config > still assumes it's a.out on openbsd; the openbsd people itself just started > work on integrating gcc 3.3.2 into their tree (however not, unless us, as > the system compiler - they still use gcc 2.95, which is just a fallback > compiler for us). > The most recent gpc (alpha) relase is gpc-20030830. ATM gpc based on gcc-3.3.x is still less tested then other gpc versions. Also, there are known problems: a) in 3.3 CPP_PREDEFINES are no present. gpc has own preprocessor which on given platform is supposed to have the same set of predefined symbols as C preprocessor -- with 3.3 this is broken. b) `gpc' program contains a spec parser. This parser does not accept some constructs accepted by gcc-3.3 c) recently, there are misterious build failures on ia64 and alpha Concerning 3.4: I have patches needed to build gpc with gcc-3.4 (december 15 version). Resulting gpc passed all its regression tests. However, besides a) and b) above there are problems with command line handling. Also, the build process requires manual corrections. It is hard to give any specific date when the problems will be resolved. AFAIK Frank Heckenbach is in the process of rewriting preprecessor, to integrate it into the back-end, which will solve a). Note that the impact of a) and b) depend on target platform, it can be almost harmless (on Linux) or disastrous (if platform dependent predefines are needed to choose correct code). -- Waldek Hebisch hebisch(a)math.uni.wroc.pl

2 1

Re: [RESEND] gcc 3.3.3/3.4 compatibility
by J. David Bryan 16 Jan '04

16 Jan '04

On 15 Jan 2004 at 19:11, Thorsten Glaser wrote: > Now I retrieved a recent tarball and find gcc 3.3 "not production > quality" - the tarball's fairly old though. I don't know the specific reason for the inclusion of that statement, but I have been using gpc-20030830 built with gcc-3.3.2 (ix86-mingw) without problems. I don't use gpc extensively, but this configuration passes 99.5% of the test suite, and the few failures appear to be platform-related, rather than code generation problems. -- Dave

1 0

Mac 10.3 Project Builder question
by Russell McGaha 15 Jan '04

15 Jan '04

How's the integration coming; if it's working, are there any doc.s on how to use it; if it's not working, how may I help (if I can). Russell --- [This E-mail scanned for viruses by Declude Virus]

2 1

auto dependency generation
by Bryan Meredith 14 Jan '04

14 Jan '04

Is there an equivalent to the gcc -MM command? For those that haven't come across it, it produces a dependency list for the given file that you can then use in make. I am aware of the --autobuild option but the source that I have inherited needs dependencies in the makefile itself due to having to calculate targets on the fly depending upon what data is supplied, There is no way around it :/ I can force a complete rebuild each time (which isnt too time consuming really) but I would rather know that stuff gets built when it is needed, just in case... Thanks in advance, Bryan "Brain Murders" Meredith

2 1

GPC on ARM7tdmi problems: libos-hack, ncurses
by Igor Marnat 13 Jan '04

13 Jan '04

Hi dear All. I'm trying to build some pascal program for ARM7TDMI using GPC as a cross compiler for ARM (host - i686, RedHat9; target - uclinux, ARM7TDMI, gcc - 2.95.3, gpc - 20010315). I've got some problems, could you please help me with those: 1. When I include unit CRT in my program, GPC asks for libos-hack library that I don't have on my machine. After some investigation I found that I can change file rts-config.inc (i.e. write there string #UNDEF HAVE_LIBOS_HACKS) to avoid this issue. Is it any bug in GPC configuration script? Is it just enough to change this string for system to work correctly? I didn't manage to find any notes about libos-hack in Google. 2. After I have removed this issue about libos-hack, arm-elf-gpc asked for libpanel library from ncurses but cannot find it. How should I correct this problem? I read configuration scripts for ncurses and found that they use only usual gcc, there is nothing like $(target)-gcc in the scripts. Is it possible to build and install ncurses for ARM? I think I cannot use library /usr/lib/libpanel.a for ARM if it is compiled using usual gcc for Intel. Is it possible to install ncurses so that only source files will be used (i.e. without libraries)? Or is it possible to build ncurses for arm using arm-elf-gcc? Thanks a lot, Igor Marnat. mailto:marny@rambler.ru

2 3

Problem with gpc-20030830 unter MinGW
by Markus Gerwinski 11 Jan '04

11 Jan '04

Hi folks, I'm trying to build the gpc-20030830 alpha version on my MinGW system. In my current attempt I'm directly compiling from within the gcc-3.2.1 core directory. I start building with the command ./configure --prefix=C:/MinGW --enable-languages=pascal Then `make' always aborts with the following message: make[2]: Entering directory `/mysoftware/gcc-3.2.1/gcc/p/rts' make[2]: Nothing to be done for `generated-files'. make[2]: Leaving directory `/mysoftware/gcc-3.2.1/gcc/p/rts' cd ./p/rts && make -f Makefile.in srcdir=. GCC_VERSION="3.2.1" SHELL="/bin/sh" CFLAGS="-g -O2" PFLAGS="" AR="ar" AR_FLAGS="rc" RANLIB="ranlib" RANLIB_TEST="[ -f ranlib ] || ( [ "i686-pc-mingw32" = "i686-pc-mingw32" ] && [ -f /usr/bin/ranlib -o -f /bin/ranlib ] )" RTSFLAGS="" DESTDIR="../.." generated-files make[2]: Entering directory `/mysoftware/gcc-3.2.1/gcc/p/rts' make[2]: Nothing to be done for `generated-files'. make[2]: Leaving directory `/mysoftware/gcc-3.2.1/gcc/p/rts' cd ./p/rts && make CC="`echo /mysoftware/gcc-3.2.1/gcc/xgcc -B/mysoftware/gcc-3.2.1/gcc/ -BC:/MinGW/i686-pc-mingw32/bin/ -BC:/MinGW/i686-pc-mingw32/lib/ -isystem C:/MinGW/i686-pc-mingw32/include' ' | sed -e 's,$-[BI]$$[^/][^:]$,\1../../\2,g;s,^$[^/][^:]*/$,../../\1,'`" PC="`echo ./xgpc -B./' ' | sed -e 's,$-[BI]$$[^/][^:]$,\1../../\2,g;s,^$[^/][^:]*/$,../../\1,'`" GCC_VERSION="3.2.1" SHELL="/bin/sh" CFLAGS="-g -O2" PFLAGS="" AR="ar" AR_FLAGS="rc" RANLIB="ranlib" RANLIB_TEST="[ -f ranlib ] || ( [ "i686-pc-mingw32" = "i686-pc-mingw32" ] && [ -f /usr/bin/ranlib -o -f /bin/ranlib ] )" RTSFLAGS="" DESTDIR="../.." all make[2]: Entering directory `/mysoftware/gcc-3.2.1/gcc/p/rts' ../.././xgpc -B../.././ -I. -W -Wall -Wpointer-arith -Wwrite-strings -Wmissing-prototypes -Wmissing-declarations -g -O2 --unit-path=/mysoftware/gcc-3.2.1/gcc/p/rts --automake --print-needed-options "endian.pas" 2> "needed-options" || true if grep -v '^--' "needed-options" > /dev/null; then echo "needed-options: `cat "needed-options"`" >&2; rm -f "needed-options"; false; else true; fi make[2]: Leaving directory `/mysoftware/gcc-3.2.1/gcc/p/rts' make[1]: Leaving directory `/mysoftware/gcc-3.2.1/gcc' make[1]: Circular libgcc.a <- pascal dependency dropped. needed-options: 0 [main] sh 2240 open_stackdumpfile: Dumping stack trace to sh.exe.stackdump make[2]: *** [needed-options] Error 1 make[1]: *** [pascal.rts] Error 2 make: *** [all-gcc] Error 2 The file "needed-options" doesn't exist at all. If I `touch' it, `make' aborts with make[2]: Entering directory `/mysoftware/gcc-3.2.1/gcc/p/rts' make[2]: Nothing to be done for `generated-files'. make[2]: Leaving directory `/mysoftware/gcc-3.2.1/gcc/p/rts' cd ./p/rts && make -f Makefile.in srcdir=. GCC_VERSION="3.2.1" SHELL="/bin/sh" CFLAGS="-g -O2" PFLAGS="" AR="ar" AR_FLAGS="rc" RANLIB="ranlib" RANLIB_TEST="[ -f ranlib ] || ( [ "i686-pc-mingw32" = "i686-pc-mingw32" ] && [ -f /usr/bin/ranlib -o -f /bin/ranlib ] )" RTSFLAGS="" DESTDIR="../.." generated-files make[2]: Entering directory `/mysoftware/gcc-3.2.1/gcc/p/rts' make[2]: Nothing to be done for `generated-files'. make[2]: Leaving directory `/mysoftware/gcc-3.2.1/gcc/p/rts' cd ./p/rts && make CC="`echo /mysoftware/gcc-3.2.1/gcc/xgcc -B/mysoftware/gcc-3.2.1/gcc/ -BC:/MinGW/i686-pc-mingw32/bin/ -BC:/MinGW/i686-pc-mingw32/lib/ -isystem C:/MinGW/i686-pc-mingw32/include' ' | sed -e 's,$-[BI]$$[^/][^:]$,\1../../\2,g;s,^$[^/][^:]*/$,../../\1,'`" PC="`echo ./xgpc -B./' ' | sed -e 's,$-[BI]$$[^/][^:]$,\1../../\2,g;s,^$[^/][^:]*/$,../../\1,'`" GCC_VERSION="3.2.1" SHELL="/bin/sh" CFLAGS="-g -O2" PFLAGS="" AR="ar" AR_FLAGS="rc" RANLIB="ranlib" RANLIB_TEST="[ -f ranlib ] || ( [ "i686-pc-mingw32" = "i686-pc-mingw32" ] && [ -f /usr/bin/ranlib -o -f /bin/ranlib ] )" RTSFLAGS="" DESTDIR="../.." all make[2]: Entering directory `/mysoftware/gcc-3.2.1/gcc/p/rts' /mysoftware/gcc-3.2.1/gcc/xgcc -B/mysoftware/gcc-3.2.1/gcc/ -BC:/MinGW/i686-pc-mingw32/bin/ -BC:/MinGW/i686-pc-mingw32/lib/ -isystem C:/MinGW/i686-pc-mingw32/include -c -I. -W -Wall -Wpointer-arith -Wwrite-strings -Wmissing-prototypes -Wmissing-declarations -g -O2 rts.c make[2]: Leaving directory `/mysoftware/gcc-3.2.1/gcc/p/rts' make[1]: Leaving directory `/mysoftware/gcc-3.2.1/gcc' make[1]: Circular libgcc.a <- pascal dependency dropped. 0 [main] sh 1268 open_stackdumpfile: Dumping stack trace to sh.exe.stackdump make[2]: *** [rts.o] Segmentation fault (core dumped) make[1]: *** [pascal.rts] Error 2 make: *** [all-gcc] Error 2 Any idea what I'm doing wrong here? Thanks, Markus

3 4

Thanks for your timely help!!
by B.Gayathri 09 Jan '04

09 Jan '04

Sir, Thank you very much for your mail about patching GCC. I downloaded Patch from http://www.gnu.org/directory/patch.html site. (patch-2.5.4.tar.gz). I unpacked the same in my GNU work folder (gnu/gcc-3.2.2/gcc). But when I tried configuring GCC, it gives same message (You can try to patch GCC manually by typing a command like *** `patch -p1 < p/diffs/gcc-2.95.diff' and patching possible rejects *** by hand before you run `./configure' again.) When I tried patch command it didnt work for me. How to install Patch command..? In the README file aslo nothing is given about patch. Is it necessary to install patch? If so what I have to do? The following error occurs: [root@EXE-INDIA2 gcc]# patch -p1 < p/diffs/gcc-2.95.diff bash: patch: command not found But when I try the same configure command under /gnu/gcc-3.2.2/gcc/patch-2.5.4, then it worked.Few lines of output as follows: [root@EXE-INDIA2 patch-2.5.4]# configure --enable-languages=pascal loading cache ./config.cache checking host system type... i686-pc-linux-gnu checking for gcc... (cached) gcc checking whether the C compiler (gcc ) works... yes checking whether the C compiler (gcc ) is a cross-compiler... no checking whether we are using GNU C... (cached) yes checking whether gcc accepts -g... (cached) yes [root@EXE-INDIA2 patch-2.5.4]# make install /bin/sh ./mkinstalldirs /usr/local/bin /usr/local/man/man1 /usr/bin/install -c patch /usr/local/bin/`echo patch | sed 's,x,x,'` /usr/bin/install -c -m 644 ./patch.man /usr/local/man/man1/`echo patch | sed 's,x,x,'`.1 Is this correct? To my knowledge the above commands should work in the gnu work folder.. Sorry for disturbing you again ana again. Thanks and regards, B.Gayathri

2 3

Status of pthread support
by Bryan Meredith 08 Jan '04

08 Jan '04

I notice in the Planned Features - Misc page the comment: multithreading support ?? ??? Am I to take it that there are problems with thread support in gpc or is this an old comment? For my task, I would need support under Linux on intel/amd. Thanks in advance, Bryan "Brain Murders" Meredith

2 1

Help!!
by B.Gayathri 06 Jan '04

06 Jan '04

Sir, I downloaded the GNU latest version gpc-20030830 and followed the installation instructions given in your web site. But when I configure the GCC, it asks to do patching, as follows: *** ./configure detected GCC version 3.2.2. *** GPC 2.1 requires one of the following versions of GCC sources to build: *** *** 2.8.1 *** 2.95.1 *** 2.95.2 *** 2.95.3-5 *** 2.95.3-6 *** 2.95.3 *** 2.95.4 *** 2.95 *** *** (You can try to patch GCC manually by typing a command like *** `patch -p1 < p/diffs/gcc-2.95.diff' and patching possible rejects *** by hand before you run `./configure' again.) When I tried patch command it didnt work for me. How to install Patch command..? < p/diffs/gcc-2.95.diff - this file is available in my working directory (/gnu/gcc-3.2.2/gcc/) under the same path [root@EXE-INDIA2 gcc]# patch -p1 < p/diffs/gcc-2.95.diff bash: patch: command not found So please help me how to do patching and successful configuration of GCC. Since there are many pascal types like Turbo, Borland, Standard, let know whether the HP pascal code can be successfully converted to C and get compiled in Linux using GCC. Please advice me. Thanks and regards, B.Gayathri

2 1

Help me!!
by B.Gayathri 05 Jan '04

05 Jan '04

Sir, I received your reply and thank you very much. You wrote: Which one exactly did you try? 20020510 is a bit old, 20030830 is the msot recent release. gpc-20030830.i686-pc-linux-gnu.tar is a binary for Linux (you can just unpack it and don't have to compile it; but if you can compile the sources, it's generally better). Actually I dont know which tar file I have to take to compile Pascal source in Linux platform, as there are many tar files available in the web site. So please advice me in doing so. As per your advice I gave the configure command in /gnu/gpc-3.2.2/gcc/, but still the following same error occurred. *** ./configure detected GCC version 3.2.2. *** GPC 2.1 requires one of the following versions of GCC sources to build: *** *** 2.8.1 *** 2.95.1 *** 2.95.2 *** 2.95.3-5 *** 2.95.3-6 *** 2.95.3 *** 2.95.4 *** 2.95 *** *** (You can try to patch GCC manually by typing a command like *** `patch -p1 < p/diffs/gcc-2.95.diff' and patching possible rejects *** by hand before you run `./configure' again.) Sorry, I forgot to attach the source in my earlier mail and now I have attached. I did compilation of the pascal source, and the results as follows: [root@EXE-INDIA2 gpc-build]# gpc -c uttrace.p uttrace.p:1: numeric constant contains digits beyond the radix uttrace.p:1: warning: missing program header uttrace.p:1: parse error before `control' I agian tried with other command: [root@EXE-INDIA2 gpc-build]# gcc -c braccess.p gcc: braccess.p: Pascal compiler not installed on this system Still I am not clear whether I have installed and configured the GNU properly. I have attached a pascal source to get compiled in Linux. I want that simple file to be compiled successfully in Linux. I request you to help me in solving the installation problems. Awaiting your reply. Thanks and reagrds, B.Gayathri

1 0

Please help me
by B.Gayathri 03 Jan '04

03 Jan '04

Sir, I am working in HP Pascal (3000) application running in mainframe. I want to make the application run in Linux platform. For this I have to translate the pascal code to C and compile in Linux or use a direct Pascal compiler and compile in Linux. So I installed GNU and tried compilation of a pascal code. But I came across problems in installation and compilation. I need your valuable suggestion or advice to proceed my work. Please help me. Following are the information YOU need : GCC version - GCC 3.2.2 GNU Make version 3.79.1, by Richard Stallman and Roland McGrath. Built for i386-redhat-linux-gnu System type i386-redhat-linux-gnu GCC Configure Option ../gnu/gcc-3.2.2/configure --enable-languages=pascal Command Passed to GCC prog ../gnu/gcc-3.2.2/configure --enable-languages=pascal I took gpc-20020510.tar, gpc-20030830.i686-pc-linux-gnu.tar,gpc-20020510.tar,gpc-20030830.tar files from web site. I followed the installation instructions given in the site. After unpacking the zip file I did configuration of GCC by following command: BUG reported after configure: [root@EXE-INDIA2 gpc-build]# ../gnu/gcc-3.2.2/configure --enable-languages=pascal Configuring for a i686-pc-linux-gnu host. First few lines *** This configuration is not supported in the following subdirectories: target-libstdc++-v3 target-libf2c target-libffi target-boehm-gc target-zlib target-libjava zlib fastjar target-libobjc (Any other directories should still work fine.) Created "Makefile" in /gpc-build using "mt-frag" Configuring libiberty... Last few lines *** ../../gnu/gcc-3.2.2/gcc/configure detected GCC version 3.2.2. *** GPC 2.1 requires one of the following versions of GCC sources to build: *** *** 2.8.1 *** 2.95.1 *** 2.95.2 *** 2.95.3-5 *** 2.95.3-6 *** 2.95.3 *** 2.95.4 *** 2.95 *** *** (You can try to patch GCC manually by typing a command like *** `patch -p1 < p/diffs/gcc-2.95.diff' and patching possible rejects *** by hand before you run `../../gnu/gcc-3.2.2/gcc/configure' again.) *** Configure in /gpc-build/gcc failed, exiting. I tried I don't know what Patch command will do, but I tried and failed. [root@EXE-INDIA2 gpc-build]# patch -p1 < p/diffs/gcc-2.95.diff bash: p/diffs/gcc-2.95.diff: No such file or directory Then I installed GNU by command "make install" I have given only few lines, not all. [root@EXE-INDIA2 gpc-build]# make install /bin/sh /gnu/gcc-3.2.2/mkinstalldirs /usr/local /usr/local make[1]: Entering directory `/gpc-build/libiberty' if [ x"" != x ] && [ ! -d pic ]; then \ mkdir pic; \ else true; fi touch stamp-picdir if [ x"" != x ]; then \ gcc -c -DHAVE_CONFIG_H -g -O2 -I. -I/gnu/gcc-3.2.2/libiberty/../include -W -Wall -Wtraditional -pedantic /gnu/gcc-3.2.2/libiberty/regex.c -o pic/regex.o; \ else true; fi I assumed that GNU had been installed and I tried compilation and I encountered the following:[root@EXE-INDIA2 gpc-build]# gpc -c uttrace.p uttrace.p:1: numeric constant contains digits beyond the radix uttrace.p:1: warning: missing program header uttrace.p:1: parse error before `control' I agian tried with other command: [root@EXE-INDIA2 gpc-build]# gcc -c braccess.p gcc: braccess.p: Pascal compiler not installed on this system Still I am not clear whether I have installed and configured the GNU properly. I have attached a pascal source to get compiled in Linux. I want that simple file to be compiled successfully in Linux. I request you to help me in solving the installation problems. Awaiting your reply. Happy New Year! Thanks and regards, B.Gayathri

2 1

--delphi bug?
by Prof A Olowofoyeku (The African Chief) 31 Dec '03

31 Dec '03

Hi This program fails to compile under '--borland-pascal' and '--delphi': program delphibug; {$delphi} { fails } {$borland-pascal} { so does this } CONST foo = 'PK'#5#6; { this is the offending line } begin Writeln ('OK'); end. This is the error I get (with gpc-20030830): "delphibug.pas:4: error: string concatenation without `Concat' or `+' is an extension delphibug.pas:4: error: of GNU Pascal" This error should not happen. If you remove the embedded condititionals, the program compiles fine both under BP and all versions of Delphi. Best regards, The Chief -------- Prof. Abimbola A. Olowofoyeku (The African Chief) web: http://www.bigfoot.com/~african_chief/

6 18

Object type as function result?
by Markus Gerwinski 31 Dec '03

31 Dec '03

Hi folks, when declaring something like type tFoo = object ... end; Function bar ( ... ) = result: tFoo; ... is there a way to suppress this warning: optest.pas:53: warning: object type declared as function result type Resp. is there a good reason not to do so? (I've got a case here where it could indeed yield a more readable statement to return an object instead of a pointer to the object; but I don't know if it could cause compiler-internal problems.) Thanks, Markus

3 4

Installation on Cygwin
by Paul.Igodt 28 Dec '03

28 Dec '03

Dear GPC-colleagues I am new to this list, and maybe putting a question already answered several times. On my Win32 XP, I installed a fresh Cygwin (1.5.5-1), and downloaded GPC - binaries for it (gpc-2.1-i686-pc-cygwin.tar.gz) . Those were installed as found in http://www.gnu-pascal.de/gpc/Binary-Distributions.html#Binary%20Distributio… (basically unzippen and untarring...) Now I find a /cygnus directory in my cygwin root. However, gpc seems not to be found as executable, nor does it work. Can somebody help me? My aim is to move certain Sun Pascal files (now in Solaris) to cygwin. Are there hints which I should take account of once my compiler is up and running? Thanks a lot Paul

3 2

Gnu Pascal / Environment variables
by Paul.Igodt 26 Dec '03

26 Dec '03

Thanks for the help in installing GPC for my new CYGWIN configuration. It seems to work now. I want to transfer several pascal programs from a Sun machine (Solaris 7, compiled with Sun Pascal), to GPC. Could anybody help me e.g. by showing the code to catch some of my cygwin (bash) environment-variables: e.g. 'PWD', 'HOME', 'TERM', ... How do I ask a 'system call' to be executed from within a GPC program? E.g. assume I want to make a 'ls' of some directory, and to see if there is a file called 'testfile'. Thanks for your help. Paul

4 4

GPC for ARM7tdmi (MMU-less)
by Ingvar Marny 19 Dec '03

19 Dec '03

Hi All! Could anyone please help me to gain an understanding on subject. The situation is as follows: I built from the sources GCC 3.2.3, 3.3.2, 2.95.2 and 2.95.3 with GPC (I tried versions of GPC 20020510 and 20030830). As it is written in documentation, to make program work on ARM without MMU, it's necessary to use compiler switch -mno-got (ot mno-gotplt) but this option is available only for CRIS architecture, not for ARM. AFAIK the sequence of steps to build some Pascal program for ARM without MMU is (at least, I acted in this way): 1. configure GCC sources together with GPC with switches --enable-languages=all --target=arm-elf 2. build the whole toolchain 3. build target program for ARM (using option -mno-gotplt (or -mno-got)) 3. make flat executable file for ARM using elf2flt utility Anyway, the compiler tells me that 'no-got' is an unknown option. Is anyone experienced in the subject? Another problem which I was having during building cross compiler GPC for ARM (GCC of version 3.2.3, GPC of version 20030830, Red Hat Linux 9, kernel 2.4.20, binutils of version 2.14, host i686): I didn't manage to build it all together for the first time. It showed me some error (unfortunatly, don't remember now) I was forced to do like this: 1. configure, build and install gcc with configuration --target=arm-elf 2. configure, build and install gcc with configuration --enable-languages=pascal --target=arm-elf 3. configure, build and install gcc with configuration --enable-languages=all --target=arm-elf I'll be very grateful for any ideas. Best regards, Igor Marnat. mailto:marny@rambler.ru

2 1

spam on gpc list :-(
by Anja Gerwinski 15 Dec '03

15 Dec '03

Hello, the spammers have eventually found out how to post to the gpc list. As far as I can see, two spams made it here: Subject "Would Like to Advertise on Your Site" (12/03) Subject "NEEDED YOUR KIND ATTENTION" (12/04) Currently, non-subscribers can post to the gpc list if they reply "accept" to an automated message. Apparently, the spammers have found out how to use this. I see no other option than allowing only postings from list members in the future (*). Any other opinions? I am going to leave the separate gpc-announce list in its current mode, i.e. nobody can post directly to gpc-announce, but everybody can confirm their own posting. If spammers start misusing that, we will have to change those settings, too, so that only members of gpc-announce will be allowed to confirm their posting. (*) People with multiple addresses can still subscribe their extra addresses in "nomail" mode, so postings from those addresses will be accepted as members': If your spare address is foo@bar, email <majordomo(a)gnu.de> with the following message body: subscribe-set gpc nomail foo@bar Best wishes, Anja (who wonders how long it will take until spammers start automated subscriptions to various mailing lists)

3 3

gpc-20030830 and packed records
by Prof A Olowofoyeku (The African Chief) 14 Dec '03

14 Dec '03

Hi Frank I thought the problem with packed records was fixed in 20030830 - but this program: program packer; uses strings; Type foo = packed record sig : array [ 0..3 ] OF char; end; Var f : foo; Begin strcopy (f.sig, 'OK'); End. produces this compiler error: packer.pas: In main program: packer.pas:10: cannot take address of packed record field `sig' Best regards, The Chief -------- Prof. Abimbola A. Olowofoyeku (The African Chief) web: http://www.bigfoot.com/~african_chief/

4 9

string in modules
by mehdi 12 Dec '03

12 Dec '03

Hi, I put a string in a module's interface. When I assign it in my main program, the string is always empty. I use this string to share information within some files. I've already read such a bug in the mailing list. But I'd like to know if this "bug" is fixed. -------------------------------My module : module m interface; export m =all; type String80 = string(80); Var myString : String80; End; ------------------------------ ---------------------------------My main program: program p; begin myString := 'allo'; writeln('myString = ', myString); end; ---------------------------------------And the result is : myString = '' My gpc version is : gpc version 20030209, based on gcc-2.95.2 19991024 (release) thanks

1 0

module without implementation
by mkhaldi＠gosympatico.ca 12 Dec '03

12 Dec '03

Hi, I apply the patch you have made. So now, the init_XXX symbol appears only for modules which have implementation part. For the modules which don't have implementation part, the init_XXX symbole doesn't appear. Actually, when import clause is called, the init_XXX symbol is generated. Is it possible to generate the init_XXX symbol for all the types of modules(with or without implementation part)? thanks

1 0

link problem
by mkhaldi＠gosympatico.ca 12 Dec '03

12 Dec '03

When I compile my module. First of all, I generate the interface with --interface-only flag. Then I generate implementation with --implementation-only flag. This way seems to be wrong. Actually, When I use this way, no Init_ModuleName symbol appears. "gpc -c --implementation-only testModule.p; nm -A testModule.o" gives : ----------------------------------------------------- testModule.o: [2] | 0| 0|SECT |LOCL |0 |3 | testModule.o: [3] | 0| 0|SECT |LOCL |0 |2 | testModule.o: [4] | 0| 0|SECT |LOCL |0 |4 | testModule.o: [5] | 0| 96|FUNC |GLOB |0 |4 |F testModule.o: [6] | 0| 20|OBJT |GLOB |0 |2 |S testModule.o: [7] | 0| 0|NOTY |GLOB |0 |UNDEF |_p_CheckInOutRes testModule.o: [10] | 0| 0|NOTY |GLOB |0 |UNDEF |_p_InOutRes testModule.o: [9] | 0| 0|NOTY |GLOB |0 |UNDEF |_p_Internal_Write testModule.o: [8] | 0| 0|NOTY |GLOB |0 |UNDEF |_p_Output testModule.o: [1] | 0| 0|FILE |LOCL |0 |ABS |testModule.p ---------------------------------------------------- We can see that I have declared 2 symbols (one variable and one procedure). But When I use the normal compilation command line, I get this : "gpc -c testModule.p" gives : -------------------------------------------------------- testModule.o: [3] | 0| 0|SECT |LOCL |0 |3 | testModule.o: [4] | 0| 0|SECT |LOCL |0 |2 | testModule.o: [5] | 0| 0|SECT |LOCL |0 |5 | testModule.o: [6] | 0| 0|SECT |LOCL |0 |4 | testModule.o: [7] | 0| 96|FUNC |GLOB |0 |4 |F testModule.o: [8] | 0| 20|OBJT |GLOB |0 |2 |S testModule.o: [9] | 0| 0|NOTY |GLOB |0 |UNDEF |_p_CheckInOutRes testModule.o: [13] | 0| 0|NOTY |GLOB |0 |UNDEF |_p_InOutRes testModule.o: [12] | 0| 0|NOTY |GLOB |0 |UNDEF |_p_Internal_Write testModule.o: [10] | 0| 0|NOTY |GLOB |0 |UNDEF |_p_Output testModule.o: [2] | 0| 1|OBJT |LOCL |0 |5 |ctor_run_condition_0.0 testModule.o: [11] | 96| 76|FUNC |GLOB |0 |4 |init_M testModule.o: [1] | 0| 0|FILE |LOCL |0 |ABS |testModule.p ------------------------------------------------------ Another symbol appears : init_M This is my testModule.p code : ------------------------------- module m interface; export m =all; Var s: String(10); procedure f; end. module m implementation; procedure f; begin writeln('procedure'); end; end. --------------------------------------------------------- I have to generate first my interface, because the project has lots of cycling reference. How to do to get this init_XXX symbol? I need it in my object file being my main program. Is there another way to bypass this problem? Thanks

2 1

PDCurses for Cygwin
by Paul.Igodt 10 Dec '03

10 Dec '03

Referring to my earlier messages, and the help from Frank, who was telling: > The CRT unit needs a curses library (ncurses oder PDCurses). I > suppose you haven't installed one, or there's an installation > problem with it (probably one of the first errors is something like > "curses.h not found" -- unfortunately GCC outputs a lot of IMHO > rather useless following messages resulting from the missing file). > > If you have installed curses, perhaps another Cygwin user can help > you better. I tried to install PDCurses for my Cygwin set-up. I think compilation of PDCurses sources was succesful. At least, after compilation, I am getting a whole list of *.o files in my installation directory, which I named PDCurses, inside my $HOME However, upon including uses CRT; in a Pascal program, and running gpc --automake ... I still get the same long list of error messages, starting in the beginning with a message that a file 'curses.h' is not found. In fact, I was looking for this file in my newly built PDCurses folder, but there it isn't neither. I find however a file called pdcurses.a in there (besides many others). Can anyone help me in telling where I should put things up, so that gpc will find what is needed to work with CRT? Greatly grateful! Paul

3 3

NEEDED YOUR KIND ATTENTION.
by mooooolight＠tiscali.co.uk 09 Dec '03

09 Dec '03

DESK OF HAJIA MARIAM ABACHA (MON)(HONS) MA. DIPL. STRICTLY CONFIDENTIAL. DEAR MY NAME IS MRS. MARIAM ABACHA AND WIFE OF LATE MILITARY HEAD OF STATE OF MY COUNTRY FEDERAL REPUBLIC OF NIGERIA. MY HUSBAND LATE GENERAL SANNI ABACHA MADE A LOT OF MONEY THROUGH OIL PROCEEDS DURING HIS TENURE IN OFFICE. INFACT THE GOVERNMENT, DISCOVERED AFTER HIS DEATH THAT HE WAS WORTH WELL OVER $4.5 BILLION UNITED STATES DOLLARS AND SOME OF THIS MONEY WAS RETRIEVED AFTER HE DIED WHILE SOME WAS RECOVERED FROM OFFICIALS THAT SERVED UNDER HIM DURING HIS REIGN AS PRESIDENT OF THE FEDERAL REPUBLIC OF NIGERIA. THE TRUTH OF THIS CASE IS THAT DESPITE OF THE PROBLEM I AM GOING THROUGH NOW WITH THE PRESENT REGIME, I STILL HAS A LOT OF MONEY WHICH WAS DEPOSITED WITH THE DIPLOMATIC COURIERS AND SECURITIES IN THE HOLLAND BY MY HUSBAND THE LATE HEAD OF STATE AND COMMANDER-IN-CHIEF OF THE ARMED FORCES OF THE FEDERAL REPUBLIC OF NIGERIA WHICH IS UNKNOWN TO THIS PRESENT GOVERNMENT OF NIGERIA.AND I INTENDS TO INVEST THIS FUNDS OUTSIDE OUR COUNTRY. WHAT I NEEDS FROM YOU NOW IS FOR YOU TO GO TO HOLLAND AND CLAIM THIS FUNDS FROM THE DIPLOMATIC COURIERS AND SECURITIES ON MY BEHALF FOR THE POSSIBLE INVESTMENT OF THE FUNDS WITH YOUR EXPERTISE HENCE I WAS BANNED FROM TRAVELLING OUTSIDE THE COUNTRY.BUT MIND YOU, ALL THE MONEY IN MY POSSESSION CAN NOT LEAVE AT ONCE BECAUSE I NEEDS TO BUILD CONFIDENCE AND TRUST IN SOMEONE WHO WOULD NOT EXPOSE MY PLAN TO REMIT AND POSSIBLY INVEST IN YOUR COMPANY. SO I HAVE AGREED TO MAKE ARRANGEMENT FOR THE TRANSFER OF $25 MILLION UNITED STATES DOLLARS AND YOU ARE FREE TO NEGOTIATE YOUR MODE OF COMPENSATION EVEN IF I INTENDS TO INVEST THE MONEY IN YOUR COUNTRY. PLEASE, DO NOT HESITATE TO INDICATE YOUR VIEW OF THIS REQUEST BY CONTACTING ME IMMEDIATELY AS YOU RECEIVE THIS MAIL, SO THAT THE NECESSARY ARRANGEMENTS CAN BE MADE FOR THE MONEY TO LEAVE IMMEDIATELY. DUE TO MY PRESENT SITUATION, I WOULD BE HAPPY IF THIS REQUEST CAN BE KEPT SECRET. I WOULD ALSO LIKE TO NOTE THAT THERE IS NO RISK INVOLVED AS ALL NECESSARY ARRANGMENT TOWARDS THE SUCCESSFUL CLAIMING OF MY FUNDS HAVE BEEN CONCLUDED. I HOPE TO BE HAPPY INVESTING WITH YOU. PLEASE KINDLY SEND DOWN YOUR REPLY STRICTLY TO THIS VERY E-MAIL ADDRESS. THANKS, HAJIA MARIAM ABACHA

1 0

Thanks
by John Ollason 07 Dec '03

07 Dec '03

I have been using Gnu-Pascal for some time, and having just completed a piece of work that included a simulation written in Gnu-Pascal as part of an EC contract. I thought that it was about time to say thank you, in public, to everybody who has contributed to Gnu-Pascal. Thank you, everybody, for not only keeping the Algol/Pascal tradition alive, but for extending the power and expressiveness of the language. Best wishes, John O.

1 0

Re: Gnu Pascal / Environment variables
by Frank Heckenbach 07 Dec '03

07 Dec '03

> Thanks a lot. > However when I have a > uses GPC; > or > uses CRT; > > line in a file, file.pas > > then > > calling "gpc file.pas" > > produces > -module/unit interface 'GPC' could not be imported > -module/unit interface 'CRT' could not be imported > > Probably my installation is not fine-tuned? - reply to the list - don't use HTML in mails - use `gpc --automake' Frank -- Frank Heckenbach, frank(a)g-n-u.de http://fjf.gnu.de/ GnuPG and PGP keys: http://fjf.gnu.de/plan (7977168E)

2 2

64-bit GPC?
by Toby Ewing 05 Dec '03

05 Dec '03

Hi, all There was a thread in early October about compilers on 64-bit machines that I'd like to return to. If all goes well, I'll soon buy a 64-bit machine, so as to have access to more memory than I have now. And of course, I'd like to be able to use my existing programs on it, recompiled to take advantage of the 64-bit memory address space. Will GPC be up and running on itanium/opteron chips in a few months? Or should I be looking elsewhere for a 64-bit Pascal compiler? Or (way different track) should I get a Macintosh G5, which I believe now has a working GPC binary? suggestions welcome Toby

2 1

Trouble compiling/installing gpc-20030830 on a Sun
by Hartmut Schmider 04 Dec '03

04 Dec '03

Hi everyone; Just recently I tried to compile and install the latest revision of gpc on our Solaris 9 systems. When I follow the instructions, all seems to go well, but I suspect it doesn't. No gpc executable is produced at all, instead it seems that the "configure" script is not properly acting on the --enable-languages=pascal directive, and produces just the default compilers. Does anyone have experiences with this type of glitch? Thanks in advance, Hartmut ------------------------------------- | Hartmut Schmider | | Scientific Computing Specialist | | HPCVL, Queen's University | | Kingston, Ontario, CANADA K7L 3N6 | | hs7(a)post.queensu.ca | | phone (613) 533 6000 ext 78252 | | FAX (613) 533 2015 | -------------------------------------

2 2

Would Like to Advertise on Your Site
by Josh Carlton 03 Dec '03

03 Dec '03

1 0

Re: Taking addresses of packed fields
by Frank Heckenbach 03 Dec '03

03 Dec '03

(General GPC questions should be address to the list <gpc(a)gnu.de>, where I'm forwarding this.) > please forgive my intrusion. > > I am a complete noob to pascal but have been programming in other languages > for over 20 years. > > When I compile the following program with gpc (GNU Pascal version 20030507, > based on gcc-3.3.1 (Mandrake Linux 9.2 3.3.1-2mdk), I get an error: > > PROGRAM FOO; > CONST > IDLNGTH = 12; > TYPE > ALPHA = ARRAY [1..IDLNGTH] OF CHAR; > ERIC = PACKED RECORD > FRED1 : ALPHA; > FRED2 : ALPHA; > END; > IDENTIFIER = PACKED RECORD > NAME : ALPHA; > NAME2 : ERIC; > END; > VAR > FILID : IDENTIFIER ; > I, J : INTEGER; > > BEGIN > J := 0 ; > WITH FILID DO > BEGIN > WITH NAME2 DO > BEGIN > WRITELN('OK') > END; > END; > END > . > > $ gpc FOO.pas > FOO.pas: In main program: > FOO.pas:22: error: cannot take address of packed record field `NAME2' > > I read through the mail archive and came across this post: > http://gnu-pascal.de/crystal/gpc/en/mail8737.html > > Is this the same thing or am I missing something? Yes, it's the one. The bug was fixed in gpc-20030830: : 20030609: bug with arrays as fields of `packed' records (waldek6.pas) > I know that under 'C', you cannot take the address of a bitfield member but > this seems a little excessive as all of the component parts are at least 1 > byte and therefore should be addressable. This isn't actually the reason. In Pascal, var parameter passing (and in GPC, by extension, also taking the address) of any packed fields is forbidden. But `with' isn't the same as taking the address (that's what was done incorrectly). > If this is the same thing, would you like me to forward the patch to Mandrake > and try and persuade them to apply it? I'd rather suggest to persuade them to upgrade to gpc-20030830 -- also for license issues (see http://gnu-pascal.de/crystal/gpc/en/mail9211.html). Frank -- Frank Heckenbach, frank(a)g-n-u.de http://fjf.gnu.de/ GnuPG and PGP keys: http://fjf.gnu.de/plan (7977168E)

1 0

Re: installation problem
by Adriaan van Os 01 Dec '03

01 Dec '03

Nathan Schneider wrote: > thanks so much! It's working! > now i've got to get down and learn this language...

1 0

libgpc.a (file.o)
by Adriaan van Os 01 Dec '03

01 Dec '03

When I look at libgpc.a with the "size" tool, I see that the file.o section has a rather large DATA section. [G4:gcc-lib/powerpc-apple-darwin/3.3.2] adriaan% size libgpc.a __TEXT __DATA __OBJC others dec hex 14949 2992 0 0 17941 4615 libgpc.a(rts.o) 34176 49780 0 0 83956 147f4 libgpc.a(file.o) 5668 128 0 0 5796 16a4 libgpc.a(rts-va.o) 440 37 0 0 477 1dd libgpc.a(rtsc.o) 10368 93 0 0 10461 28dd libgpc.a(string.o) 21299 4074 0 0 25373 631d libgpc.a(error.o) 6457 109 0 0 6566 19a6 libgpc.a(string2.o) 21039 385 0 0 21424 53b0 libgpc.a(time.o) 2880 5106 0 0 7986 1f32 libgpc.a(random.o) 31866 6454 0 0 38320 95b0 libgpc.a(filename.o) 4929 141 0 0 5070 13ce libgpc.a(files.o) 5848 2149 0 0 7997 1f3d libgpc.a(getopt.o) 2216 37 0 0 2253 8cd libgpc.a(numtodec.o) 4560 281 0 0 4841 12e9 libgpc.a(sets.o) 2272 69 0 0 2341 925 libgpc.a(heap.o) 4928 81 0 0 5009 1391 libgpc.a(math.o) 1568 33 0 0 1601 641 libgpc.a(endian.o) 580 5 0 0 585 249 libgpc.a(move.o) 7470 430 0 0 7900 1edc libgpc.a(init.o) 64 33 0 0 97 61 libgpc.a(gpc.o) Disassembly shows a 50 KB data chunk in file.o filled with (mainly) zero's. Looks to me like a waste of space. Regards, Adriaan van Os

2 1

installation problem
by Nathan Schneider 01 Dec '03

01 Dec '03

Can anyone help me? I am new at this GPC thing, and the whole compiler thing in general. On OSX, I did the package installation, which seemed pretty simple, and no problems were reported. But when I try to compile something on the command line using gpc <filename>, I get back the following error (or some variant of it): gpc: installation problem, cannot exec `c++filt3': No such file or directory /usr/bin/ld: /usr/lib/libSystem.dylib load command 9 unknown cmd field collect2: ld returned 1 exit status Interestingly, when there are problems in the code, gpc seems to have no problem pointing them out. It seems the problem only comes when the code is good and about to be compiled. Sorry if my terminology is wrong, I'm still learning how to talk like this. Thanks in advance for any suggestions!

3 3

GUI Toolkits
by Adriaan van Os 27 Nov '03

27 Nov '03

Recently, I surfed the web looking for multi-platform GUI toolkits, available for GNU/Linux and being ported to Mac OS X/Darwin. I welcome comments from developers more experienced in these respective technologies. 1. the Gnome desktop environment with the Gtk+ toolkit. GPC bindings are available in the gpc contrib directory, but they are based on Gtk 1.2 rather than 2.x. I believe, I saw Gtk 2.x bindings for Free Pascal somewhere on the web, but I may be wrong. 2. the KDE desktop environment with the Qt toolkit, which is C++ based. So, in the Gnome versus KDE war, Gnome seems to be the natural choice. Also, you have to pay for Qt, unless you write GPL licensed software. 3. in the sources of KDevelop, I found references to GNU Pascal. However, KDevelop is not mentioned on the GNU Pascal website. 4. GLUT ... 5. Open Motif ... 6. LessTif ... 7. TkInter ... 8. Perl/Tk ... 9. Tcl/Tk ... 10. WxWindows ... 11. XForms ... 12. Mowitz ... Regards, Adriaan van Os

2 2

GUI Toolkits
by Dr Christian Hicks 27 Nov '03

27 Nov '03

From: Eike Lange Subject: GUI Toolkits Date: 26 Nov 2003, 20:04:16 Hi! On Wed, Nov 26, 2003 at 04:29:03PM +0000, Dr Christian Hicks wrote: > This is something I am very interested in too. I have > a large (legacy) Pascal program which has the interface > written in Xview via C. XView also seems to be in the > legacy category. I am wanting an interface that will > run on Linux, Cygwin and Solaris. - How about GTK or X-Lib? The GTK link on Cygwin is dead. However I have found a link http://xlang.sourceforge.net/gtk+-win32.html that has a download link. I'll have a look when I get a chance. >From memory XView is written using XLib. I think Xlib would involve lots of low level programming which I am hoping to avoid. Chris Dr Christian Hicks Senior Lecturer, School of Mechanical & Systems Engineering, Stephenson Building, University of Newcastle upon Tyne, NE1 7RU. Phone: +44 191 222 6238 Mobile 0795 8317804 Fax: + 44 191 222 8600 Homepage: http://www.staff.ncl.ac.uk/chris.hicks

1 0

GUI Toolkits
by Dr Christian Hicks 26 Nov '03

26 Nov '03

This is something I am very interested in too. I have a large (legacy) Pascal program which has the interface written in Xview via C. XView also seems to be in the legacy category. I am wanting an interface that will run on Linux, Cygwin and Solaris. I am currently looking at tk-tcl which I have used before. I have so far got to the stage of learning how to link from GNU Pascal to GNU C (and vis versa). Tk-tcl can also be linked to C and is quite portable. There are some free GUI builders that I am going to look at (e.g. TkBuilder). I have posted some examples on the web. See: http://www.staff.ncl.ac.uk/chris.hicks/programming.htm http://www.staff.ncl.ac.uk/chris.hicks/tktcl.htm I do not know whether I am pursuing the best option - rather I am going in a direction that I am relatively familiar with. I will post some examples when I have had time to do them. I also have tried looking at GNOME (but the Cygwin link is dead). I would welcome any advice as to which GUI builder / language is best to use. I want something that is free and portable accross Linux, Cygwin and Solaris. Many thanks, Chris Dr Christian Hicks Senior Lecturer, School of Mechanical & Systems Engineering, Stephenson Building, University of Newcastle upon Tyne, NE1 7RU. Phone: +44 191 222 6238 Mobile 0795 8317804 Fax: + 44 191 222 8600 Homepage: http://www.staff.ncl.ac.uk/chris.hicks

2 1

Re: memory offset problem?
by Frank Heckenbach 26 Nov '03

26 Nov '03

Toby Ewing wrote: > > Alternatively, you could perhaps do without a schema: > > > > var > > Buffy: array [0 .. wid - 1] of ByteCard; > > Can't do that: the program has to adjust to different sized images. Wid is > determined by a combination of input file and user input, so there's no way to > know it at compile time. As I tried to explain, it doesn't have to be known at compile time. Of course, it has to be known at runtime when the declaration is made. If you need it in a routine which determines the size during its execution, you could either put the declaration in the statement part (non-standard) or move it to a subroutine. > > GPC allows such non-constant sized declarations according to EP. > > > > > And why > > > isn't the program complaining? > > > > Because GPC doesn't (yet) implement runtime range-checking. One of > > the next versions will. > > I thought that I'd get a memory violation, or GPF, or something like that. This depends on what's there in memory. In this case, it's the discriminant, so you will clobber it (which might to subsequent problems later when you do some things with the schema). In other cases, there may be other variables which get clobbered. You can't expect to always get memory violations. Tools like efence will help somewhat (i.e., produce more segfaults on invalid accesses), but not 100% (see the doc). That's why we need compiler generated runtime range-checking at all. Frank -- Frank Heckenbach, frank(a)g-n-u.de http://fjf.gnu.de/ GnuPG and PGP keys: http://fjf.gnu.de/plan (7977168E)

1 0

memory offset problem?
by Toby Ewing 26 Nov '03

26 Nov '03

Hi, all I've been writing a program that draws an image (based on file input), then outputs the image as a tiff file. During debugging, I just wrote out the image one pixel at a time: for h := 1 to ht do for w := 1 to wid do write(Iout, Image^[w,h]); It works fine, but of course it's slow. So once the rest of the program was working, I decided to speed it up. Now I allocate memory for one line of the image, dump the image one line at a time into it, and blockwrite that line: type PBufary = ^Bufary; Bufary(mX : shortCard) = array[0..mX] of byteCard; [...] var Buffy : PBufary; [...] New(Buffy,wid-1); Extend(Iout,OutFileName,wid); for h := 1 to ht do begin for w := 1 to wid do Buffy^[w-1] := Image^[w,h]; BlockWrite(Iout,Buffy^,1); end; Close(Iout); Dispose(Buffy); It's way faster, as I expected. (The Extend is because I write the fileheader to a file of shortCard, close it, then re-open it with Extend so I can use the BlockWrite.) BUT the image has a 2-pixel-wide black line down the left side. To get rid of it, I had to do: for h := 1 to ht do begin for w := 1 to wid do Buffy^[w-3] := Image^[w,h]; { <== *** -3!?!?} BlockWrite(Iout,Buffy^,1); end; This makes no sense, but it works. What's with this 2 byte offset? And why isn't the program complaining? thanks, Toby

2 1

Lots of examples including Pascal calls C and C calls Pascal
by Dr Christian Hicks 26 Nov '03

26 Nov '03

I have been learning to program in C over the last few weeks and have put some examples together. These include how to call Pascal from C and how to call C from Pascal. I am grateful to other people for their help, particularly The African Chief. Please see: http://www.staff.ncl.ac.uk/chris.hicks/programming.htm Please bear in mind that I am not an expert. I would welcome any constructive comments. Best regards, Chris Dr Christian Hicks Senior Lecturer, School of Mechanical & Systems Engineering, Stephenson Building, University of Newcastle upon Tyne, NE1 7RU. Phone: +44 191 222 6238 Mobile 0795 8317804 Fax: + 44 191 222 8600 Homepage: http://www.staff.ncl.ac.uk/chris.hicks

5 7

Re: gpc-20030830, Cygwin and "Stat"
by Prof A Olowofoyeku (The African Chief) 23 Nov '03

23 Nov '03

I wrote: > With your gpc binaries, based on gcc-3.3.1-3, it works correctly. With > your gpc sources, my sources, and the pristine sources, built, on a > freshly installed Cygwin, and based on gcc-3.2.3, it gives the result > shown above. This is the first time that this error has shown up. I have > traced down to the _p_Stat() function in rts.c, and I have ascertained > that the error happens here, with respect to FileExists: The call: > " if (Special) *Special = S_ISCHR (st.st_mode) || S_ISBLK (st.st_mode) > || S_ISFIFO (st.st_mode) || S_ISSOCK (st.st_mode);" > > returns 1. I don't know what "Special" means and why it is returning > true here. But I doubt that that attribute has any significant meaning > under Windows. > > The DirectoryExists call fails here: > " if (Dir) *Dir = S_ISDIR (st.st_mode);" > This returns 0 if you pass any directory other than "/". > > Is this a gcc-3.2.3 problem? I don't know - and I would doubt it. On the > other hand, it obviously doesn't exist with your gcc-3.3.1-3 based > binary. I have just built gpc-20030830 on gcc-3.3.1-3 sources, and this problem does not exist with the new gpc binaries. So it seems that the problem is related to gcc-3.2.3. This is all mysterious to me ... Best regards, The Chief -------- Prof. Abimbola A. Olowofoyeku (The African Chief) web: http://www.bigfoot.com/~african_chief/

1 0

gpc-20030830, Cygwin and "Stat"
by Prof A Olowofoyeku (The African Chief) 23 Nov '03

23 Nov '03

Hi There is a problem with Cygwin and gpc-20030830, which is illustrated in this program: program fbug; uses gpc; begin Writeln (FileExists ('fbug.pas')); Writeln (DirectoryExists ('.')); end. In both cases, it prints "False", when indeed both the file and directory do exist. Checking filename.pas shows that both functions call "Stat", and I presume that this is where the problem lies - but I have no idea what do do about it. Best regards, The Chief -------- Prof. Abimbola A. Olowofoyeku (The African Chief) web: http://www.bigfoot.com/~african_chief/

2 2

Simple GNU P calls GNU C works on Redhat but not Cygwin!
by Dr Christian Hicks 22 Nov '03

22 Nov '03

I have gone back to basics and tried simple.p [ program test(input,output); begin writeln("hello world"); end. ] I am getting the same error messages: /usr/lib/gcc-lib/i686-pc-cygwin/3.2.3/libgpc.a(rts.o)(.text+0x18ef):rts.c: undefined reference to `_ftruncate64' /usr/lib/gcc-lib/i686-pc-cygwin/3.2.3/libgpc.a(rts.o)(.text+0x18b4):rts.c: undefined reference to `_lseek64' collect2: ld returned 1 exit status This is the same error message that I got from my Pascal calls C program. There is clearly something not right with my binary distribution. I will try and do a reinstallation and then run the test suite. gpc -v gives: Reading specs from /usr/lib/gcc-lib/i686-pc-cygwin/3.2.3/specs Configured with: ../configure --enable-languages=pascal --enable-threads=posix --with-system-zlib --enable-nls --without-included-gettext --enable-interpreter --disable-sjlj-exceptions --enable-shared --build=i686-pc-cygwin --host=i686-pc-cygwin --target=i686-pc-cygwin --enable-haifa --prefix=/usr Thread model: posix gpc version 20030830, based on gcc-3.2.3 Best regards, Chris Dr Christian Hicks Senior Lecturer, School of Mechanical & Systems Engineering, Stephenson Building, University of Newcastle upon Tyne, NE1 7RU. Phone: +44 191 222 6238 Mobile 0795 8317804 Fax: + 44 191 222 8600 Homepage: http://www.staff.ncl.ac.uk/chris.hicks

4 7

Another Pascal / C problem
by Dr Christian Hicks 22 Nov '03

22 Nov '03

I am now trying to pass a string as well as an integer between C and Pascal. I am getting a segmentation fault. I would be grateful if tell me what I have done wrong. I attach the files pcallc.p, ccall.c ccall.h and Makefile and show the output at the end. Many thanks, Chris pcallc.p: [ program pascalcallsC(input,output); procedure world; external name 'world'; procedure w1(var i : integer; var s : cstring); external name 'c_w1'; var i : integer; s : cstring; begin writeln("Hello world from Pascal"); world; writeln("Returned from C to Pascal\n"); i := 96; w1(i,s); writeln("Returned from C again I = ",i); writeln("Return from C cstring = ",s); {segmentation fault on this line} s := "This is a CString"; writeln("Trying out pascal ",s); end. ] ccall.c: [ #include <stdio.h> #include <string.h> #include "ccall.h" void world (void) { printf("\nHello World from C\n"); } void c_w1 (int *i, char *s) { printf("Now in function c_w1\n"); strcpy(s,"Mary had a little lamb\n"); printf("Hello again from C i = %i\n%sXXX\n",(*i),s); (*i) = 56; printf("Leaving C\n"); } ] ccall.h: [ extern void world(void); extern void w1(int *i, char *s); ] Makefile: [ pcallc : pcallc.p ccall.o gpc -o pcallc pcallc.p ccall.o --cstrings-as-strings ccall.o : ccall.c gcc -c ccall.c clean: rm *.o pcallc ccall.o ] output: [nmansys@mmme1 pcallsc2]$ pcallc Hello world from Pascal Hello World from C Returned from C to Pascal Now in function c_w1 Hello again from C i = 96 Mary had a little lamb XXX Leaving C Returned from C again I = 56 Segmentation fault Dr Christian Hicks Senior Lecturer, School of Mechanical & Systems Engineering, Stephenson Building, University of Newcastle upon Tyne, NE1 7RU. Phone: +44 191 222 6238 Mobile 0795 8317804 Fax: + 44 191 222 8600 Homepage: http://www.staff.ncl.ac.uk/chris.hicks

3 2

Good C programming tutorial site
by Dr Christian Hicks 21 Nov '03

21 Nov '03

You will gather from my recent posts that I have been interested in linking gpc to C. I have found a good site which contains very clear tutorials on C programming together with examples. See: http://www.iota-six.co.uk/c/ Chris Dr Christian Hicks Senior Lecturer, School of Mechanical & Systems Engineering, Stephenson Building, University of Newcastle upon Tyne, NE1 7RU. Phone: +44 191 222 6238 Mobile 0795 8317804 Fax: + 44 191 222 8600 Homepage: http://www.staff.ncl.ac.uk/chris.hicks

1 0

Can we remove junk from the list?
by Dr Christian Hicks 19 Nov '03

19 Nov '03

We seem to be getting quite a bit of spam on our list lately i.e. messages from mohamismael@netscape, Mr. Tony Shinomanet and mohammad ahmend. Is it possible for somebody to remove this junk and perhaps bar the culprits from posting more junk? Chris Dr Christian Hicks Senior Lecturer, School of Mechanical & Systems Engineering, Stephenson Building, University of Newcastle upon Tyne, NE1 7RU. Phone: +44 191 222 6238 Mobile 0795 8317804 Fax: + 44 191 222 8600 Homepage: http://www.staff.ncl.ac.uk/chris.hicks

2 1

GNU Pascal in-line assembler
by Silvio a Beccara 18 Nov '03

18 Nov '03

I have some very nice units written for Turbo Pascal / Delphi. They make use of the in-line assembler, whose syntax is different from GPC's. Could anyone tell me how I could translate them in order for them to be compilable by GPC? Thanks very much Silvio a Beccara Cornell University

3 2

Re: gpc-20030830 released (testsuite)
by Adriaan van Os 18 Nov '03

18 Nov '03

> <snip> > TEST fproc.pas: /var/tmp//ccdFaUpQ.s:unknown:Can't emit reloc > {- symbol "LSJR11"} @ file address 800. > /var/tmp//ccdFaUpQ.s:unknown:Can't emit reloc {- symbol "LSJR11"} @ > file address 796. > /var/tmp//ccdFaUpQ.s:unknown:Undefined local symbol L3$pb > failed > <snip> > TEST nlgpp2.pas: /var/tmp//cc4oD0DK.s:unknown:Can't emit reloc > {- symbol "LSJR11"} @ file address 1056. > /var/tmp//cc4oD0DK.s:unknown:Can't emit reloc {- symbol "LSJR11"} @ > file address 1052. > /var/tmp//cc4oD0DK.s:unknown:Undefined local symbol L3$pb > failed Same problem on powerpc-apple-darwin with Ada, see <http://gcc.gnu.org/bugzilla/show_bug.cgi?id=10129>. To be solved (...) in gcc-3.4, see <http://gcc.gnu.org/bugzilla/show_bug.cgi?id=13093>. Regards, Adriaan van Os

1 0

Returning multiple variables to Pascal
by Dr Christian Hicks 17 Nov '03

17 Nov '03

Thanks Eike. It works fine now. Chris Dr Christian Hicks Senior Lecturer, School of Mechanical & Systems Engineering, Stephenson Building, University of Newcastle upon Tyne, NE1 7RU. Phone: +44 191 222 6238 Mobile 0795 8317804 Fax: + 44 191 222 8600 Homepage: http://www.staff.ncl.ac.uk/chris.hicks

1 0

Returning multiple variables to Pascal
by Dr Christian Hicks 16 Nov '03

16 Nov '03

I seem to be making some sort of basic mistake. I can't get the variables to come back again. I attach the files pcallc.p, ccall.c, ccall.h and Makefile. The Pascal program does not get the value 56 back (nor would I expect it to, because it has been passed by value). I have tried various permutations of the use of pointers, but none of them seem to work. How can I change my simple program to get the value 56 back from the C function? I'll again be grateful for your advice. Thanks, Chris pcallc.p [ program pascalcallsC(input,output); procedure world; external name 'world'; procedure w1(i : integer); external name 'w1'; var i : integer; begin writeln("Hello world from Pascal"); world; writeln("Returned from C to Pascal\n"); i := 96; w1(i); writeln("Returned from C again I = ",i); end. ] ccall.c: [ #include <stdio.h> #include "ccall.h" void world (void) { printf("\nHello World from C\n"); } void w1 (int i) { printf("Hello again from C i = %i\n",i); i = 56; } ] ccall.h: [ extern void world(void); extern void w1(int i); ] Makefile: [ pcallc : pcallc.p ccall.o gpc -o pcallc pcallc.p ccall.o ccall.o : ccall.c gcc -c ccall.c clean: rm *.o pcallc ccall.o ] Dr Christian Hicks Senior Lecturer, School of Mechanical & Systems Engineering, Stephenson Building, University of Newcastle upon Tyne, NE1 7RU. Phone: +44 191 222 6238 Mobile 0795 8317804 Fax: + 44 191 222 8600 Homepage: http://www.staff.ncl.ac.uk/chris.hicks

2 1

Returning multiple variable to Pascal from a C function.
by Dr Christian Hicks 16 Nov '03

16 Nov '03

I have a lot of code which I am wanting to port from Sun's Sparcworks. The main algorithms are in Pascal, but the user interface was written in XView which was linked in via C. In Sparcworks, linking from Pascal to C involves statements of the following form: PROCEDURE X_SelAlgorithmn(VAR select_no : integer; VAR smess: string); external c; This is calling a C function which is returning values for select_no and smess. Some of my calls included a lot of variables which were set by a complicated form e.g. procedure x_rscinput_form(mc_code: string; var mc_name: string; var efficiency, d_rule_a, avail_ops, shifts, children, dist_rule_b: integer; var x_pos, y_pos, x_size, y_size: real; var tr_dev, audit_p, update_p: integer; var opt_mc_code: string; var hour_rate, ohead_rate: real; var minsu, minmc, mintr, batchsize, transfer, optmcrule: integer; var dist: boolean; var co_name: string); external c; Thus returning lots of variables with different types from C to Pascal. With GNU Pascal (thanks to the African Cheif and Kevan) I can pass variables from Pascal to C and I can get single variables back again. Is there a way that I can pass multiple variables into C and back into Pascal without resorting to global variable or using files? Any help would be very gratefully received. Many thanks, Chris Dr Christian Hicks Senior Lecturer, School of Mechanical & Systems Engineering, Stephenson Building, University of Newcastle upon Tyne, NE1 7RU. Phone: +44 191 222 6238 Mobile 0795 8317804 Fax: + 44 191 222 8600 Homepage: http://www.staff.ncl.ac.uk/chris.hicks

3 2

Simple GNU P calls GNU C works on Redhat but not Cygwin!
by Dr Christian Hicks 15 Nov '03

15 Nov '03

Thanks Chief. Your binaries seem to work fine. Chris Dr Christian Hicks Senior Lecturer, School of Mechanical & Systems Engineering, Stephenson Building, University of Newcastle upon Tyne, NE1 7RU. Phone: +44 191 222 6238 Mobile 0795 8317804 Fax: + 44 191 222 8600 Homepage: http://www.staff.ncl.ac.uk/chris.hicks

1 0

(no subject)
by Simone Giuliani 15 Nov '03

15 Nov '03

subscribe gpc simone.giuliani(a)tin.it

1 0

Simple GNU P calls GNU C works on Redhat but not Cygwin!
by Dr Christian Hicks 14 Nov '03

14 Nov '03

My installation of Pascal was very recent (and I think that I got the recent version). It was a binary distribution this time which came from the file gpc-20030830-with-gcc.i686-pc-cygwin.tar gpc -v gives: Reading specs from /usr/lib/gcc-lib/i686-pc-cygwin/3.2.3/specs Configured with: ../configure --enable-languages=pascal --enable-threads=posix --with-system-zlib --enable-nls --without-included-gettext --enable-interpreter --disable-sjlj-exceptions --enable-shared --build=i686-pc-cygwin --host=i686-pc-cygwin --target=i686-pc-cygwin --enable-haifa --prefix=/usr Thread model: posix gpc version 20030830, based on gcc-3.2.3 Having read the bash manual (thanks Russel) I now realise that my pipes weren't working because the output was going to stderr rather than stdout and the pipe needs to be &> to redirect both. Thanks again to Chief and Russel for their help. Chris Dr Christian Hicks Senior Lecturer, School of Mechanical & Systems Engineering, Stephenson Building, University of Newcastle upon Tyne, NE1 7RU. Phone: +44 191 222 6238 Mobile 0795 8317804 Fax: + 44 191 222 8600 Homepage: http://www.staff.ncl.ac.uk/chris.hicks

1 0

Simple GNU P calls GNU C works on Redhat but not Cygwin!
by Dr Christian Hicks 14 Nov '03

14 Nov '03

I just got home and received African Chief's advice and thought I would try African Chief's fix out with Cygwin (I haven't got Linux at home yet). I first tried the version that worked on Linux, but got error messages with Cygwin. My files are pcallc.p, ccall.c, ccall.h and Makefile. The error messages are at the bottom. I would be grateful for any ideas. Thanks, Chris pcallc.p: [ program pascalcallsC(input,output); procedure world; external name 'world'; begin writeln("Hello world from Pascal"); world; end. ] ccall.c: [ #include <stdio.h> #include "ccall.h" void world (void) { printf("\nHello World from C\n"); } ] ccall.h: [ extern void world(void); ] Makefile: [ pcallc : pcallc.p ccall.o gpc -o pcallc pcallc.p ccall.o ccall.o : ccall.c gcc -c ccall.c clean: rm *.o pcallc ] Error messages (typed manually - don't know how to cut and paste from a bash X console!): [ /usr/lib/gcc-lib/i686-cygwin/3.2.3/libgpc.a(rts.o)(.text+0x18ef):rts.c: undefined reference to `_ftruncate64' /usr/lib/gcc-lib/i686-cygwin/3.2.3/libgpc.a(rts.o)(.text+0x18b4):rts.c: undefined reference to `_lseek64' collect2: ld returned 1 exit status make: *** [pcallc] Error1 ] Dr Christian Hicks Senior Lecturer, School of Mechanical & Systems Engineering, Stephenson Building, University of Newcastle upon Tyne, NE1 7RU. Phone: +44 191 222 6238 Mobile 0795 8317804 Fax: + 44 191 222 8600 Homepage: http://www.staff.ncl.ac.uk/chris.hicks

3 2

GNU Pascal calls GNU C
by Dr Christian Hicks 14 Nov '03

14 Nov '03

Hi, I am trying to write some examples to demonstrate calling C functions from Pascal. I can call void functions with no parameters, but I am wanting to be able to pass variables. My efforts so far include pcallc.p, ccall.c, ccall.h and Makefile. If function w1 and references to it are removed, it works fine. I am just wanting to learn how to pass variables. Any help would be gratefully received. Many thanks, Chris pcallc.p: [ program pascalcallsC(input,output); procedure world; external name 'world'; procedure w1(i : integer); external name 'w1'; var i : integer; external name 'i'; begin writeln("Hello world from Pascal"); world; writeln("Returned from C to Pascal\n"); i := 96; w1(i); writeln("Returned again from C\n"); end. ] ccall.c [ #include <stdio.h> #include "ccall.h" void world (void) { printf("\nHello World from C\n"); } void w1 (int i) { printf("Hello again from C i = %i\n",i); } ] ccall.h: [ extern void world(void); extern void w1(int i); ] Makefile: [ pcallc : pcallc.p ccall.o gpc -o pcallc pcallc.p ccall.o ccall.o : ccall.c gcc -c ccall.c clean: rm *.o pcallc ccall.o ] Dr Christian Hicks Senior Lecturer, School of Mechanical & Systems Engineering, Stephenson Building, University of Newcastle upon Tyne, NE1 7RU. Phone: +44 191 222 6238 Mobile 0795 8317804 Fax: + 44 191 222 8600 Homepage: http://www.staff.ncl.ac.uk/chris.hicks

2 1

installation problem, cannot exec `gpcpp'
by Ian Miller 13 Nov '03

13 Nov '03

Hi, I realise this is probably more of a MinGW problem than a GNU Pascal problem, but I thought someone here might know the solution. I've seen a few similar reports in the mailing list archives, but I cannot seem to find one that is identical. First off, I'll tell you how I went about installing Gnu Pascal to run under (networked) Windows XP:- 1. Run MinGW-3.1.0-1.exe 2. Run MSYS-1.0.9.exe and point it at the MinGW installation. 3. Install gpc-mingw-gcc-2.95.3-6-depends.tar.gz 4. Run gpc-2.1-mingw-1.exe 5. Add c:\mingw\bin to the (Windows XP) command path. So far so good, everything works, and I'm able to compile hello.pas from MSYS with no problems! The problem occurs after I change directory from C: (where everything is installed) to another drive. Then when I try to compile hello.pas, I get:- $ cd /s/ $ gpc hello.pas c:\mingw\bin\gpc.exe: installation problem, cannot exec `gpcpp': No such file or directory Can someone please advise? Is this to do with mounting? My mounts look something like this (if it helps):- C:\msys\1.0\bin on /usr/bin type user (binmode,cygexec,noumount) C:\msys\1.0\bin on /bin type user (binmode,cygexec,noumount) C:\msys\1.0 on / type user (binmode,noumount) C:\msys\1.0 on /usr type user (binmode,noumount) c:\mingw on /mingw type user (binmode) a: on /a type user (binmode,noumount) c: on /c type user (binmode,noumount) d: on /d type user (binmode,noumount) p: on /p type user (binmode,noumount) s: on /s type user (binmode,noumount) t: on /t type user (binmode,noumount) Any help greatly appreciated! cheers, Ian

4 5

bug missing gpcpp
by James Alan Sellers 10 Nov '03

10 Nov '03

I am running windows XP and I am getting an error when trying to compile a pacal program. The error reads: gpc: installation problem, connot exec 'gpcpp': No such file or directory. I have downloaded and installed the patch from the MinGW website and a few others as well and all give the same error. This error, according to the patches documentation, shouldn't be happening on XP but it is and the patch fails to fix the bug. I'd apreciate and help, advice, or what ever can be done to help. Thanks Alan

2 1

PDCurses and msys
by Prof. A Olowofoyeku (The African Chief) 08 Nov '03

08 Nov '03

Hi I have seen a funny thing when running a crt program in the msys environment, using pdcurses-2.6. This is the program: program Foo; uses crt; var i: Integer; begin clrscr; for i := 1 to ParamCount do WriteLn (ParamStr (i)) end. This is the weird error I get when I run the program: "LINES value must be >= 2 and <= 1: got 1 initscr(): LINES=1 COLS=1: too small." If I do "export LINES=25" and run the program again, I get: "LINES value must be >= 2 and <= 1: got 25 initscr(): LINES=25 COLS=1: too small." If I do "export COLS=80" and run the program again, I get: "LINES value must be >= 2 and <= 1: got 25" Obviously there is a problem somewhere. How can a value be ">=2" while being "<=1" at the same time? This is a new mathematical experience for me! Any clues? Thanks. Best regards, The Chief --------- Prof. Abimbola Olowofoyeku (The African Chief) Web: http://www.bigfoot.com/~african_chief/

5 5

A question to intialization of objects
by ThomasM 02 Nov '03

02 Nov '03

Hello ! I didn't have found a satisfying answer in the archives to the following problem: In BP the constructor of TObject resets all datafields to 0 by assuming a simple type to the SELF-pointer with the length SIZEOF(SELF). This allowes all further derived objects to reset their datafields just by calling INHERITED TOBJECT.INIT(...); in their constructors. Creating Objects in Delphi resolves also zero-initialized datafields. GPC does not so when creating a simple Object by NEW (OBJECTPOINTER, INIT(...)); Is there a way in GPC to do something similar to the TObject-Constructor from BP within the constructor of a basic object or could it be implemented in GPC that creating a new Object with NEW will zero the memory allocated for the new object ? Greetings, Thomas

3 2

A Question to RHIDE ...
by ThomasM 01 Nov '03

01 Nov '03

Hello ! I've got one problem with RHIDE: I need some conditional defines according to the programs destiny. Say these are COND_A and COND_B. Calling GPC from a commandline I need to add --CIDEFINE=COND_A and --CIDEFINE=COND_B to do so. In RHIDE a can give additional compiler options. This works well as I add only one of both defines, like --cidefine=COND_A but when I enter --CIDEFINE=COND_A --CIDEFINE=COND_B the compiler-call won't work... Does anyone here nows a solution ? Greetings, Thomas

1 0

Bison
by Frank Heckenbach 01 Nov '03

01 Nov '03

There's a new Bison test release: http://www.lrde.epita.fr/people/akim/download/bison-1.875c.tar.gz While not all Bison problems are solved yet, it might be possible to build the last GPC release with it. Frank -- Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/, 7977168E GPC To-Do list, latest features, fixed bugs: http://www.gnu-pascal.de/todo.html GPC download signing key: 51FF C1F0 1A77 C6C2 4482 4DDC 117A 9773 7F88 1707

1 0

Re: Solver for Linear Equations
by Kevan Hashemi 28 Oct '03

28 Oct '03

Dear Eike, You are welcome to my matrix inverter. It compiles on GPC, and is simple to use. The inverter uses a cut-down version of Gausse-Jordan elimination. I have not yet implemented the routine with GPC's schemata types. When I do, it will be much neater. Until then, it uses pointers. If you are interested, let me know and I'll e-mail it to you directly. Yours, Kevan Hashemi, Brandeis University Physics Department.

2 1

Solver for Linear Equations
by Eike Lange 27 Oct '03

27 Oct '03

Hi Folks! I'm searching for a solver unit for linear equations. This should run under GPC/MinGW. Is there something available? Eike -- http://www.gnushi.de

3 2

Cygwin GPC problems
by Gerrit P. Haase 26 Oct '03

26 Oct '03

Hallo, I've a problem with GPC now: 1. /usr/bin/gpc foobar.pas -o foobar foobar.pas:3: error: module/unit interface `GPC' could not be imported 2. /usr/bin/gpc --unit-path=/usr/lib/gcc-lib/i686-pc-cygwin/3.3.1/units foobar.pas -o foobar foobar.pas:3: error: module/unit interface `GPC' could not be imported Since I'm new to the GPC world, I have no idea where to look no, any hint is appreciated. $ gpc -v Reading specs from /bin/../lib/gcc-lib/i686-pc-cygwin/3.3.1/specs Configured with: /GCC/gcc-3.3.1-3/configure --with-gcc --with-gnu-ld --with-gnu-as --prefix=/usr --exec-prefix=/usr --sysconfdir=/etc --libdir=/usr/lib --libexecdir=/usr/sbin --mandir=/usr/share/man --infodir=/usr/share/info --enable-languages=c,ada,c++,f77,pascal,java,objc --enable-libgcj --enable-threads=posix --with-system-zlib --enable-nls --without-included-gettext --enable-interpreter --enable-sjlj-exceptions --disable-version-specific-runtime-libs --enable-shared --disable-win32-registry --enable-java-gc=boehm --disable-hash-synchronization --verbose --target=i686-pc-cygwin --host=i686-pc-cygwin --build=i686-pc-cygwin Thread model: posix gpc version 20030830, based on gcc-3.3.1 (cygming special) Gerrit -- =^..^=

2 2

gcc compiling
by Oliver Aruväli 23 Oct '03

23 Oct '03

Hi again, This one might go a bit out of the boundarys of this list but here I go. After running ./configure --prefix=/usr/local --enable-shared --with-gnu-as --with-gnu-ld --enable-threads=posix --disable-checking --enable-languages=c,c++,ada,f77,objc,java,pascal --with-system-zlib --enable-__cxa_atexit (gcc 3.3.2 and gpc-20030830.tar.gz) and then make bootstrap I get after some time something like this: gcc -c -g -gnatpg -gnata -I- -I. -Iada -I/home/chaser/gcc/gcc-3.3.2/gcc/ada /home/chaser/gcc/gcc-3.3.2/gcc/ada/treepr.adb -o ada/treepr.o treeprs.ads:1:01: compilation unit expected make[2]: *** [ada/treepr.o] Error 1 make[2]: Leaving directory `/home/chaser/gcc/gcc-build/gcc' make[1]: *** [stage1_build] Error 2 make[1]: Leaving directory `/home/chaser/gcc/gcc-build/gcc' make: *** [bootstrap] Error 2 [root@serenity gcc-build]# I have the gnat which cam with the redhat installation. On http://gcc.gnu.org/install/build.html there was were some words about Building the Ada compiler and I think I did the things mentioned here. Am I missing something here or does the problem go somewhat deeper? My machine is Linux serenity 2.4.20-8 #1 Thu Mar 13 16:42:56 EST 2003 i586 i586 i386 GNU/Linux (300mhz AMD K6-2) and currently my gcc is 3.2.2 Thank You in advance, Oliver

2 1

Two sites to exchange links with
by Bryan Dowse 23 Oct '03

23 Oct '03

Hi, my name is Bryan Dowse. I would like to exchange links with your web site. We are willing to add a link to your web site, with a description, from both www.email-marketing-software-resource.com and http://www.search-engines-guide.com. Sites to link to: http://www.email-marketing-software-resource.com http://www.search-engines-guide.com Where your link will be: http://www.email-marketing-software-resource.com/resource/ http://www.search-engines-guide.com/resource/ Each of the above links pages is directly accessible from the respective site's home page as well as all in-site pages. If you would link to the above two sites and send me an email letting me know where, we will have a link to your site up on both, with your description, within 24 hours. With your email please send me a 5-30 word description of your site to follow your link. If you wish to use a description for our sites, you may use: ---------------------------------- Search-engines-guide.com Provides information on search engine optimization and the best selling search engine book Obtaining a #1 Ranking in the Search Engines. Email-marketing-software-resource.com A resource for anyone wanting to learn about permission-based email marketing, sending out a newsletter, managing an email list, and the different email list management programs. ---------------------------------- If you wish to use graphics for your links, you can pick them up at http://www.email-marketing-software-resource.com/linkpartners.html. I thank you for your consideration. My very best regards, Bryan Dowse, Director Email Marketing Resource Center http://www.email-marketing-software-resource.com

1 0

Gnu Pascal running on 64-bit Linux or Windows?
by Dennis Landi 22 Oct '03

22 Oct '03

Hello, Evidently, although Borland has ported Delphi to .Net, they have no plans to create a 64-bit native compiler. In fact, they have licensed the .Net compiler from MS. They seem to be getting out of the native compiler biz altogether. So, I bet you can guess my next question (Ok, well it was in the msg title). Does Gnu Pascal run on 64-bit Linux (SuSe or Redhat, etc.) or 64-bit Windows on either the Itanium 64 or AMD 64 chips? Thanks! -dennis

8 16

gcc patching
by Oliver Aruväli 22 Oct '03

22 Oct '03

Hi, Its my first time to write to this list, but I hope I can describe my problem clearly. I am currently supposed to program "things" (university stuff) in pascal and the teachers recommended GNU-pascal. So I tried to install it on my linux machine (specs later) - no luck. Then I decided to build the gcc from scratch (first I used the compiling tutorial on the gnu-pascal.de) and when I reached a point in ./configure where I got an error: *** *** Detected GCC version 3.3.2. *** GPC 2.1 requires one of the following versions of the GCC sources to build: *** *** 2.8.1 *** 2.95.1 *** 2.95.2 *** 2.95.3-5 *** 2.95.3-6 *** 2.95.3-8 *** 2.95.3 *** 2.95.4 *** 2.95 *** 3.2.1 *** 3.2.2 *** 3.2.3 *** 3.3.1 *** 3.3 *** *** (You can try to patch GCC manually by typing a command like *** `patch -p1 < p/diffs/gcc-<version>.diff' and patching possible *** rejects by hand before you run configure again.) *** So I downloaded the .diff files from gcc ftp -rw-r--r-- 1 root root 7916747 Oct 22 22:14 gcc-3.2.2-3.2.3.diff -rw-r--r-- 1 root root 84108856 Oct 22 22:10 gcc-3.2.3-3.3.diff -rw-r--r-- 1 root root 1222880 Oct 22 22:01 gcc-3.3.1-3.3.2.diff -rw-r--r-- 1 root root 16818189 Oct 22 22:04 gcc-3.3-3.3.1.diff so here are four of them. And no the things that started to puzzle me: Currently my gcc is 3.2.2 and the gcc I am trying to compile is 3.3.2. The last supported gcc (by ./configure) is 3.3 so do I need to start applying the patches from the 3.2.2-3.2.3 and so on (all those 4 patches in logical order) or is it done somehow differently? Doesn't applying the patches break my current gcc as it is needed later with the same compiling? the ./configure line is ./configure --prefix=/usr/local --enable-shared --with-gnu-as --with-gnu-ld --enable-threads=posix --disable-checking --enable-languages=c,c++,ada,f77,objc,java, pascal --with-system-zlib --enable-__cxa_atexit My machine is Linux serenity 2.4.20-8 #1 Thu Mar 13 16:42:56 EST 2003 i586 i586 i386 GNU/Linux (300mhz AMD K6-2) I am using gpc-20030830.tar.gz <http://www.gnu-pascal.de/alpha/gpc-20030830.tar.gz> (downloaded 22.10.03 from gnu-pascal.de) All ideas and links appreciated. Thank You in advance, Oliver

3 2

GPC, MSYS and Paths
by Prof. A Olowofoyeku (The African Chief) 22 Oct '03

22 Oct '03

On 17 October 2003, Frank wrote: [...] >program Bar; > >uses GPC, Pipe; > >var > Arguments: array [0 .. 2] of CString = ('foo', 'bar', '"bar"'); > Status: Integer = 0; > ErrMsg: TString = ''; > >begin > PWait (PExecute ('foo', PCStrings (@Arguments), ErrMsg, >PExecute_One), Status, 0); > WriteLn (Status, ' ', ErrMsg) >end. > >The output should be: > >bar >"bar" >0 I have just discovered that there is a problem under Mingw as well. I compiled and ran the programs under Mingw, and the output was this: bar "bar 0 Best regards, The Chief --------- Prof. Abimbola Olowofoyeku (The African Chief) Web: http://www.bigfoot.com/~african_chief/

4 5

Update for Mac OS X
by Adriaan van Os 22 Oct '03

22 Oct '03

(repost) I have updated the sources, binaries and patches at <www.microbizz.nl/gpc.html> to use gpc-20030830 with gcc-3.3.2. Regards, Adriaan van Os

1 0

--executable-file-name
by Prof. A Olowofoyeku (The African Chief) 22 Oct '03

22 Oct '03

Hi Frank At present, "gpc foo.pas" produces "a.exe" on Windows, and perhaps just "a" or "a.out" on other platforms. If you want "foo.exe" or "foo" or whatever, you have to use "--executable-file-name" or use "-o foo[.extension]". Would it be sensible to have situations where "--executable-file-name" is supplied automatically? I am not wishing to create more work - but I have always wondered whether anyone ever actually wants "gpc foo.pas" to produce "a.[whatever]". This seems to be a relic from the past (and perhaps from gcc), and I wonder whether "--executable-file-name" should not actually be the standard behaviour (with people still being free to use "-o foo" if they want). I am not sure what you think about this, or how trivial or otherwise it would be to do this, even if it were thought desirable (and there might be reasons why it would not be good to go down this route). Finally, under BP and Delphi, "gpc foo.pas" will always produce "foo[.whatever]". Perhaps "--executable-file-name" should always be implied when in BP or Delphi mode? Of course it is a trivial thing to supply this at the command line, so if it would be too much trouble, then please junk the idea. Best regards, The Chief --------- Prof. Abimbola Olowofoyeku (The African Chief) Web: http://www.bigfoot.com/~african_chief/

2 1

Update for Mac OS X
by Adriaan van Os 22 Oct '03

22 Oct '03

I have updated the sources, binaries and patches at <www.microbizz.nl/gpc.html> to use gpc-20030830 with gcc-3.3.2. Regards, Adriaan van Os

1 0

Range Checking and Speed
by Kevan Hashemi 22 Oct '03

22 Oct '03

Dear GPC Users, The GPC manual says I can turn off range checking with {$R-} or with the command-line option --no-range-checking. I tried both, but the compiler gives me an error: unrecognised directive. I'm using GPC for MacOSX compiled with GCC 3.3. Can I turn off range checking? I translated a few thousand lines of Code Warrior Pascal into GPC Pascal. As I did so, I took the opportunity to make use of GPC's wonderful dynamic schemata types, so I removed all my ugly pointer arithmatic, which I had previously used to access dynamically allocated blocks of memory. My translated code runs at half the speed of my original code. I don't think it is the dynamic schemata, but I thought I would turn off the range checking just to see. What other default compiler options might slow down the code? Should I turn off debugging information? Yours, Kevan Hashemi

5 16

Status of GPC?
by Gerrit P. Haase 20 Oct '03

20 Oct '03

Hallo, what is the status of GPC? Is it possible to build it with GCC 3.3.1? i would like to provide a precompiled version of GPC for Cygwin with the latest GCC. Are there still some patches which I need to apply (i.e. regarding the use on Cygwin)? Gerrit -- =^..^=

10 54

gcc-3.3.2 & gpc-20030830
by Russell Whitaker 20 Oct '03

20 Oct '03

Hi gcc-3.3.2 was released today. with gpc-20030830: 1. varsam patch wasn't needed 2. "make bootstrap" I got to here: parse.y:100: unrecognized: %glr-parser parse.y:100: Skipping to next % parse.y:744: type clash (`' `itype') on default action parse.y:2861: type clash (`' `ttype') on default action make[2]: *** [../../gcc-3.3.2/gcc/p/parse.h] Error 1 make[1]: *** [stage2_build] Error 2 make: *** [bootstrap] Error 2 Should I try 3.3.2 with gpc-20030507 or wait for a patch/new release ? Russ

4 8

Problems upgrading
by John Ollason 19 Oct '03

19 Oct '03

On my home machine I am running Red Hat Linux release 6.1 (Cartman) Kernel 2.2.12-20 on an i686 I was running the version of gpc expanded from gpc-20000727.i686-pc-linux-gnu.tar.gz everything was fine until I wanted to use the the regex unit. I downloaded rx and installed it apparently without problems. I had downloaded it on my machine at work using Red Hat Linux release 7.3 (Valhalla) Kernel 2.4.18-3 on an i686 and everything worked beautifully. It didn't work on my home machine so I thought that perhaps it would be sensible to upgrade gpc and see if that made the difference. I downloaded gpc-2.1-with-gcc.i686-pc-linux-gnu.tar.gz because I thought that would be the sensible version, following the advice on the webpage (or so I thought). I expanded the tarball and tried to compile hellow.p with the following result: $ gpc ~/pas/hellow.p /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.3/gpc1: /lib/libc.so.6: version `GLIBC_2.2' not found (required by /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.3/gpc1) I have messed about with wrecking shared libraries before (Thank providence for sash, I say) so I took a copy of libc-2.2.5.so and symbolic-linked it to /lib/libc.so.6 and gave it a try (with sash running in a separate terminal so I could put the pieces back if things went wrong, as they did, giving another error message implying the need for further upgrades.) So I replaced the symbolic link /lib/libc.so.6 to libc-2.1.2.so and revived the system. It will be evident that I am not a systems programmer. I would like to be able to upgrade gpc on my home machine and get everything working, but only if that won't break the touchier software such as vmware. If I can't do this I would like to put the old version of gpc back and do without the regex unit at home, but I don't know how to do this. Could I just expand the old tarball and get the old gpc back? Is there a way to uninstall gpc? Advice, welcome, derision tolerated, John O.

2 1

gpc-20030830 for MSYS released
by Prof A Olowofoyeku (The African Chief) 19 Oct '03

19 Oct '03

Hi all I have just released gpc-20030830 for the Win32 MSYS posix environment. Have a look here: http://www.gnu-pascal.de/contrib/chief/win32/msys/ This release is based on a patched gcc-3.2.3. Best regards, The Chief -------- Prof. Abimbola A. Olowofoyeku (The African Chief) web: http://www.bigfoot.com/~african_chief/

2 1

GPC, MSYS and Paths
by Prof A Olowofoyeku (The African Chief) 18 Oct '03

18 Oct '03

Hi Frank Attached is a patch for filename.pas to cater for MSYS. Since MSYS is a fork of the Cygwin project, many things that apply to Cygwin apply to MSYS as well. You can ignore my previous post about front slashes, FileExists, et. al. This patch fixes all those issues. Thanks. Best regards, The Chief -------- Prof. Abimbola A. Olowofoyeku (The African Chief) web: http://www.bigfoot.com/~african_chief/ *** ./p/rts/filename.pas.org Thu Jul 10 04:19:36 2003 --- ./p/rts/filename.pas Wed Oct 15 16:46:24 2003 *************** const *** 106,115 **** {$ifdef __OS_DOS__} const OSDosFlag = True; QuotingCharacter = #0; ! PathSeparator = {$ifdef __CYGWIN__} ':' {$else} ';' {$endif}; DirSeparator = '\'; DirSeparators = [':', '\', '/']; ExtSeparator = '.'; --- 106,119 ---- {$ifdef __OS_DOS__} + {$if defined (__CYGWIN__) or defined(__MSYS__)} + {$define __POSIX_WIN32__} + {$endif} + const OSDosFlag = True; QuotingCharacter = #0; ! PathSeparator = {$ifdef __POSIX_WIN32__} ':' {$else} ';' {$endif}; DirSeparator = '\'; DirSeparators = [':', '\', '/']; ExtSeparator = '.'; *************** function Slash2OSDirSeparator (const s: *** 514,520 **** var i: Integer; begin Result := s; ! {$ifndef __CYGWIN__} if DirSeparator <> '/' then for i := 1 to Length (Result) do if Result[i] = '/' then Result[i] := DirSeparator --- 518,524 ---- var i: Integer; begin Result := s; ! {$ifndef __POSIX_WIN32__} if DirSeparator <> '/' then for i := 1 to Length (Result) do if Result[i] = '/' then Result[i] := DirSeparator *************** end; *** 533,539 **** function Slash2OSDirSeparator_CString (s: CString): CString; var Temp: CString; begin ! {$ifndef __CYGWIN__} if DirSeparator <> '/' then begin Temp := s; --- 537,543 ---- function Slash2OSDirSeparator_CString (s: CString): CString; var Temp: CString; begin ! {$ifndef __POSIX_WIN32__} if DirSeparator <> '/' then begin Temp := s; *************** begin *** 1372,1377 **** --- 1376,1385 ---- and ((Length (Path) = 9) or (Path[10] in ['/', '\'])) then Result := '/cygdrive' {$endif} + {$ifdef __MSYS__} + else if (Path[1] in ['/', '\']) then + Result := Path [1] + {$endif} else if Path[2] = ':' then Result := Copy (Path, 1, 2) else

4 7

Extended Pascal question
by Frank Heckenbach 17 Oct '03

17 Oct '03

A question to the EP experts. Are these things allowed? a) module m; export m = (a => a); const a = 1; end; end. b) module m; export m = (a => b, a => c); const a = 1; end; end. c) module m; export m = (a => b, a); const a = 1; end; end. Likewise for import (assuming m exports a): a) program p; import m (a => a); begin end. b) program p; import m (a => b, a => c); begin end. c) program p; import m (a => b, a); begin end. Frank -- Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/, 7977168E GPC To-Do list, latest features, fixed bugs: http://www.gnu-pascal.de/todo.html GPC download signing key: 51FF C1F0 1A77 C6C2 4482 4DDC 117A 9773 7F88 1707

1 0

Re: GPC 20030830 and Mingw MSYS
by Frank Heckenbach 16 Oct '03

16 Oct '03

> Hiya Frank > > 2. I get this error: > parse.c:368: conflicting types for `bool' > /usr/lib/gcc-lib/i686-pc-msys/2.95.3-1/include/stdbool.h:11: previous > declaration of `bool' Probably also the bison version. > 3. I have to pass "--cstrings-as-strings" and "--pointer-arithmetic" in > RTSFLAGS to build string.pas - else it complains about things not being > arrays, etc. That's strange since these are there as compiler options (line 178). Which errors do you get otherwise? Unless they're before that line (i.e., in the interface which would be strange), compiler options seem to be broken. Can you reduce it to a small failing test case? > 4. This code (in rts.c) causes problems: > #ifdef HAVE_TM_GMTOFF > if (TimeZone) *TimeZone = t->tm_gmtoff; > #else > if (TimeZone) *TimeZone = -timezone; > #endif > > It doesn't like the "-timezone" so I changed it to 0. That compiles for > now, but I am not sure what problems this will cause in the future. On 19 Aug I wrote: : Waldek Hebisch wrote: : : > Right. I see were the problem is: Cygwin defines `timezone' as a function. : > Configure uses the following test: : > : > #include "confdefs.h" : > : > #define _GNU_SOURCE : > #define _LARGEFILE64_SOURCE : > #define _FILE_OFFSET_BITS 64 : > #include <time.h> : > volatile long int tmp; : > int main() { : > tmp = timezone; : > ; return 0; } : > : > Appearently, the test succeeds (only gives warning) if `timezone' is : > a function (maybe use '-timezone' in integer tests)?. : : Have you tried it and does it work? If so, I'll change it. Since the thread died after my mail, I haven't changed anything. You might want to try that now. That's the last occurrence of `timezone' in rts/configure. Also, in the test with the first occurrence of `timezone' you might have to insert: #include <time.h> Then remove everything in <build>/gcc/p/rts and rebuild. `HAVE_TIMEZONE' and `TIMEZONE_DECLARED' should be unset. If that works, I'll have to do the respective changes in configure.in. Frank -- Frank Heckenbach, frank(a)g-n-u.de http://fjf.gnu.de/ GnuPG and PGP keys: http://fjf.gnu.de/plan (7977168E)

2 5

GPC & gcc-3.3.1 on Cygwin test results
by Gerrit P. Haase 16 Oct '03

16 Oct '03

Hallo, It seems that there is one test failing: TEST params.pas: failed: ./a And three tests are skipped. All the ncurses tests are passing well! So please include the change for cygwin, we can use the ncurses library. The compiler/linker output on cygwin seems to be unusual so there are some tests reported as failed which are actual not failing. Running the GPC Test Suite. This may take a while ... rm -f *.dat *.o *.s *.i *.gpi *.gpd *.gpc core a.out stderr.out *.exe testmake.tmp dummy.c dummy.pas dummy.out diff_cr*.tmp fixcr fixcr.exe rm -f todo/a.out todo/*.exe todo/*.o todo/*.s todo/*.i todo/*.gpi todo/*.gpd todo/core { /gcc/obj/gcc/xgpc -B/gcc/obj/gcc/ --version | head -1; /gcc/obj/gcc/xgpc -B/gcc/obj/gcc/ --print-search-dirs | grep install | head -1; hostname || echo "unknown host"; date "+%Y-%m-%d %H:%M:%S"; } | \ sed -e 's,^,Testing ,;N;s,\n.*gcc-lib[/\], (,;s,[/\].*,),;N;s,\n, (,;s,$,),;N;s/\n/, /' Testing xgpc 20030830, based on gcc-3.3.1 (cygming special) (i686-pc-cygwin) (loreley), 2003-10-13 09:19:48 echo "/gcc/obj/gcc/xgpc -B/gcc/obj/gcc/ -g -O3 -W -Wall -Wundef -Wpointer-arith -Wno-unused " /gcc/obj/gcc/xgpc -B/gcc/obj/gcc/ -g -O3 -W -Wall -Wundef -Wpointer-arith -Wno-unused PC="/gcc/obj/gcc/xgpc -B/gcc/obj/gcc/" PFLAGS="--autobuild -g -O3 -W -Wall -Wundef -Wpointer-arith -Wno-unused -I ../rts --unit-path=/gcc/obj/gcc/p/units " SRCDIR="/gcc/gcc-3.3.1-3/gcc/p/test" TEST_MAKE_FLAG=test-make-flag "/gcc/gcc-3.3.1-3/gcc/p/test/test_run" | tee test_log | "/gcc/gcc-3.3.1-3/gcc/p/test/test_sum" | tee test_summary TEST agettext2test.pas: SKIPPED: could not set locale `de_DE' TEST aturbo3test.pas: Info: resolving _newscr by linking to __imp__newscr (auto-import) Info: resolving _stdscr by linking to __imp__stdscr (auto-import) Info: resolving _ESCDELAY by linking to __imp__ESCDELAY (auto-import) Info: resolving _cur_term by linking to __imp__cur_term (auto-import) Info: resolving _curscr by linking to __imp__curscr (auto-import) OK TEST crttest.pas: Info: resolving _newscr by linking to __imp__newscr (auto-import) Info: resolving _stdscr by linking to __imp__stdscr (auto-import) Info: resolving _ESCDELAY by linking to __imp__ESCDELAY (auto-import) Info: resolving _cur_term by linking to __imp__cur_term (auto-import) Info: resolving _curscr by linking to __imp__curscr (auto-import) OK TEST daj13.pas: TEST dialec3.pas: Info: resolving _newscr by linking to __imp__newscr (auto-import) Info: resolving _stdscr by linking to __imp__stdscr (auto-import) Info: resolving _ESCDELAY by linking to __imp__ESCDELAY (auto-import) Info: resolving _cur_term by linking to __imp__cur_term (auto-import) Info: resolving _curscr by linking to __imp__curscr (auto-import) OK TEST dialec5.pas: Info: resolving _newscr by linking to __imp__newscr (auto-import) Info: resolving _stdscr by linking to __imp__stdscr (auto-import) Info: resolving _ESCDELAY by linking to __imp__ESCDELAY (auto-import) Info: resolving _cur_term by linking to __imp__cur_term (auto-import) Info: resolving _curscr by linking to __imp__curscr (auto-import) OK TEST dialec6.pas: Info: resolving _newscr by linking to __imp__newscr (auto-import) Info: resolving _stdscr by linking to __imp__stdscr (auto-import) Info: resolving _ESCDELAY by linking to __imp__ESCDELAY (auto-import) Info: resolving _cur_term by linking to __imp__cur_term (auto-import) Info: resolving _curscr by linking to __imp__curscr (auto-import) OK TEST dialec7.pas: Info: resolving _newscr by linking to __imp__newscr (auto-import) Info: resolving _stdscr by linking to __imp__stdscr (auto-import) Info: resolving _ESCDELAY by linking to __imp__ESCDELAY (auto-import) Info: resolving _cur_term by linking to __imp__cur_term (auto-import) Info: resolving _curscr by linking to __imp__curscr (auto-import) OK TEST fjf165a.pas: SKIPPED: German locale not installed TEST longr2.pas: SKIPPED: no LongReal math routines available TEST params.pas: failed: ./a # of GPC tests 3794 # of GPC tests passed 3783 # of GPC tests skipped 3 # of GPC tests failed 8 Gerrit -- =^..^=

2 2

Record initialisers
by Andrew Gregory 16 Oct '03

16 Oct '03

FYI, After a bit of fiddlling I've got record initialisers (initializers) to work. HP Pascal, DEC VMS Pascal and gpc all use different syntax. I don't suppose that it matters much as the code works, but gpc 20030323 (MinGW) gives warning: "GPC currently ignores indices and field names in initializers" Here is a demo program. program test(input, output); type tX = record a : integer; b : double; end; type tAX = array[0..1] of tX; var AX : tAX value [ 0: [a:5; b:6.00]; 1: [a:3; b:-8.0] ]; begin writeln(AX[0].a); writeln(AX[1].b); writeln("Finished"); end. ------------------------------------------------------------------- This e-mail and any attachments may contain confidential and/or privileged material; it is for the intended addressee(s) only. If you are not a named addressee, you must not use, retain or disclose such information. NPL Management Ltd cannot guarantee that the e-mail or any attachments are free from viruses. NPL Management Ltd. Registered in England and Wales. No: 2937881 Registered Office: Teddington, Middlesex, United Kingdom TW11 0LW. -------------------------------------------------------------------

2 1

Re: Compiler bugs or missunderstanding GPC
by Frank Heckenbach 14 Oct '03

14 Oct '03

> I've managed to give you an example of reproducing my "most > trouble" making problem and I really need your help: > > Giving four units: > > This causes the "routine definition does not match previous declaration" error in > the "TListbox"-GetTextString method. But why and how I can avoid this ??? This was a known bug in 20030507 which was fixed in the latest release. (Search for nick2.pas in the archives if you need more information.) If you can't or don't want to upgrade, a work-around is not use `String' to mean `String (255)', but declare an explicit type for it (which I'd generally recommend, anyway). The bug occurs only with that type. > Another silly problem is that in the unit aTest the type of MyInt depends on the order > of the units ua and ub in the uses-part. AFAIK, that's BP compatible, since both units declare the same identifier with different meanings. Since units are a BP (and UCSD Pascal) feature, we try to emulate this behaviour in general. (Extended Pascal modules don't allow this.) IMHO the most we could do is an (optional) warning when importing the same identifier from several units. I think it could be useful -- the default should be off, of course, but perhaps `-Wall' should turn it on. Waldek, since you're working in that area, would this be easy to add? Frank -- Frank Heckenbach, frank(a)g-n-u.de http://fjf.gnu.de/ GnuPG and PGP keys: http://fjf.gnu.de/plan (7977168E)

2 2

bison, poisoned stuff, etc
by Prof. A Olowofoyeku (The African Chief) 14 Oct '03

14 Oct '03

Hi Frank Resetting the timestamps of parse.[ch] did nothing to solve the "poisoned malloc/realloc" problem. I eventually reverted to bison 1.75 (from 1.875, which seems to be more hassle than I care for) and the poison issues went away. Now, I get another problem. Just after the RTS configure, when trying to build the RTS, somehow, "-lgpc" gets passed to xgpc. Of course libgpc.a does not exist at this stage, since it is precisely what "make" is trying to build. So the RTS build falls flat with a "cannot find -lgpc" error. This is a new one to me, and I am not sure whether it has anything to do with poisoned bisons or anything else. Something seems to have gone seriously awry here. Any ideas of how "-lgpc" can happen to be passed at this point? The interesting thing is that the new gcc can bootstrap itself without any problem. Perhaps the MSYS environment (or my hacks of the sources) are introducing some new problems that only show up with GPC? It seems obvious that the root cause of these problems lies in the gcc-3.2.3 on which I am building. If I try building GPC with the gcc- 2.95.3 MSYS compiler (with just "make"), I succeed without any complaints about poison or any other problem. If I try "make bootstrap", it doesn't succeed, obviously because the intermediate gcc is not able to build GPC, even though it is able to build the core gcc, and it is also able to bootstrap itself if I configure with "--enable-languages=c". The gcc-3.2.3 that is produced by this bootstrap process is also not able to build GPC successfully (at least, it fails at the RTS build) as seen above. Have I given sufficient information for what might be the problem to be discernible? Thanks. Best regards, The Chief --------- Prof. Abimbola Olowofoyeku (The African Chief) Web: http://www.bigfoot.com/~african_chief/

2 1

GPC and poisoned malloc/realloc
by Prof A Olowofoyeku (The African Chief) 12 Oct '03

12 Oct '03

Hi Frank/Waldeck I am trying to build GPC for the MSYS platform. After configuring, "make" is fine in building gcc and gpc. But if I run "make bootstrap" instead, when getting to the parse.y/parse.c stage of gpc, I get errors about attempting to use "poisoned malloc" and "poisoned realloc". I am not sure what any of this is about, or how to solve this problem. Please advise. Thanks. Best regards, The Chief -------- Prof. Abimbola A. Olowofoyeku (The African Chief) web: http://www.bigfoot.com/~african_chief/

3 5

C style directives
by Frank Heckenbach 11 Oct '03

11 Oct '03

Since the preprocessor problems have become more urgent with gcc-3.3, the next release of GPC might already contain the new, integrated preprocessor. Since it will be mostly written from scratch, I don't plan to duplicate obsolete features, in particular C style directives. To help your conversion if you still use them, I've written the attached script. It requires *GNU* sed and a Unix-compatible shell. (However, the real work is done by sed, so it can probably be easily "ported" to any other shell, perhaps even to Dos command.com if anyone cares.) GPC supports Pascal directives already for some time, so you can do the conversion now and find out if there are any problems, before you may be forced to do it in a hurry when the next release comes out. The script it a bit simplistic and may not cover every exotic case, but most normal cases. It's recommended to look at the differences of the changed file and the original to be sure. In particular, the script does the following conversions: - One-line: `#foo' to `{$foo}' - Multi-line: #define foo(X) \ X \ Y To: {$define foo(X) X Y} - Include files: `#include "foo.pas"' and `#include <foo.pas>' both to `{$include "foo.pas"}'. (There will be no support for `<>' includes anymore since there are no "system headers" in Pascal. If you've relied on the system header directories, it shouldn't take more than an `-I' option to solve it.) - C operators in conditionals: `&&' to `and', `!' to `not', etc. - Special cases: `#if 0' to `{$if False}' and `#if 1' to `{$if True}'. This does not replace every 0 and 1 in a conditional since it would be much more complicated to decide if they're used as numbers or Booleans (which is the same in C). Since probably almost all Booleans uses of 0 and 1 in conditionals are of the simple form (otherwise they don't make much sense), this shouldn't cause many problems. Please report any problems on this list. Frank -- Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/, 7977168E GPC To-Do list, latest features, fixed bugs: http://www.gnu-pascal.de/todo.html GPC download signing key: 51FF C1F0 1A77 C6C2 4482 4DDC 117A 9773 7F88 1707

1 0

gcc/p/units/crtc.c TEST failings
by Gerrit P. Haase 11 Oct '03

11 Oct '03

Hallo, I'm running make check right now and I'm getting a problem with crtc.c. Several hundred lines warnings and errors, in several tests. E.g. the last lines: ... .../gcc/p/units/crtc.c: In function `crt_GetShiftState': .../gcc/p/units/crtc.c:894: warning: implicit declaration of function `PDC_get_key_modifiers' .../gcc/p/units/crtc.c:895: error: `PDC_KEY_MODIFIER_SHIFT' undeclared (first use in this function) .../gcc/p/units/crtc.c:895: error: (Each undeclared identifier is reported only once .../gcc/p/units/crtc.c:895: error: for each function it appears in.) .../gcc/p/units/crtc.c:896: error: `PDC_KEY_MODIFIER_CONTROL' undeclared (first use in this function) .../gcc/p/units/crtc.c:897: error: `PDC_KEY_MODIFIER_ALT' undeclared (first use in this function) .../gcc/p/units/crtc.c:902: error: `PDC_KEY_MODIFIER_NUMLOCK' undeclared (first use in this function) .../gcc/p/units/crtc.c: In function `crt_RawOut': .../gcc/p/units/crtc.c:1571: warning: implicit declaration of function `raw_output' .../gcc/p/units/crtc.c: In function `crt_Init': .../gcc/p/units/crtc.c:1649: warning: implicit declaration of function `PDC_save_key_modifiers' .../gcc/p/units/crtc.c: In function `adjust_panel': .../gcc/p/units/crtc.c:1846: warning: implicit declaration of function `resize_window' .../gcc/p/units/crtc.c:1846: warning: assignment makes pointer from integer without a cast .../gcc/p/units/crtc.c: In function `crt_Check_WinChanged': .../gcc/p/units/crtc.c:1866: warning: implicit declaration of function `is_termresized' .../gcc/p/units/crtc.c:1881: error: structure has no member named `wendy' .../gcc/p/units/crtc.c:1882: error: structure has no member named `wendx' The failing tests (all because of crtc.c) so far are: TEST aturbo3test.pas: TEST crttest.pas: TEST dialec3.pas: TEST dialec5.pas: TEST dialec6.pas: TEST dialec7.pas: Is there something known to do about this? Thanks, Gerrit -- =^..^=

3 9

LSEEK64/FTRUNCATE64 PROBLEM WITH GPC ON CYGWIN
by Pascal Pottier 10 Oct '03

10 Oct '03

Hello All! I'm trying to use gpc under cygwin and have a trouble when compiling/linking even a simple example such as: program test; begin writeln("Hello World") end. gpc test.pas returns the following message: /usr/lib/gcc-lib/i686-pc-cygwin/3.2.3/libgpc.a(rts.o)(.text+0x18ef):rts.c: undef ined reference to `_ftruncate64' /usr/lib/gcc-lib/i686-pc-cygwin/3.2.3/libgpc.a(rts.o)(.text+0x18b4):rts.c: undef ined reference to `_lseek64' collect2: ld returned 1 exit status I have the same message with examples from /usr/doc/gpc/demos. It's seems something is missing in the install for the linker. I'm using (just installed this week): gpc binary: gpc-20030830-with-gcc.i686-pc-cygwin.tar.gz from www.gnu-pascal.de and cygwin: ftp%3a%2f%2fftp.funet.fi%2fpub%2fmirrors%2fcygwin.com%2fpub%2fcygwin latest presently available said as 1.5.5-1 downloaded from ftp.funet.fi after setup.exe 2.415 got from cygwin.com "Install Cygwin now" If you have any idea or know any contact who could help please advice. Thanks for your help!

3 2

Problem with functions in EP modules
by J. David Bryan 07 Oct '03

07 Oct '03

Using: gpc version 20030507, based on gcc-3.2.3 (mingw special 20030504-1) configured as "i486-pc-mingw32" and running under Windows NT 4.0, the "widget_module" example from section 6.4.2.5 of the EP manual fails to compile, as follows: D:\test>gpc --extended-pascal -c widget.pas widget.pas:37: result types in forward declared functions are an extension widget.pas:37: of UCSD Pascal, Borland Pascal, traditional Macintosh widget.pas:37: Pascal The following simplified example exhibits the same behavior: module modbug; export i = (e); function e (v : integer) : integer; end; function e; begin e := 1 end; end. Compiling produces: D:\test>gpc --extended-pascal -c modbug.pas modbug.pas:12: result types in forward declared functions are an extension modbug.pas:12: of UCSD Pascal, Borland Pascal, traditional Macintosh modbug.pas:12: Pascal I do not have a gpc-20030930 implementation to check this against. -- Dave

3 4

Re: reply-to field missing. --> subscribing extra addresses versus alias
by Tom Verhoeff 06 Oct '03

06 Oct '03

Frank Heckenbach wrote: >Each mail from a non-subscribed address needs to be confirmed. If >you use another address regularly, you can subscribe it without >getting the mails as well: > >subscribe-set gpc nomail your(a)second.address > >This command, of course, needs to be confirmed like any other >subscription, but only once. I just played around with the web interface that Majordomo offers. It cannot be found from the gnu-pascal web pages, but you do get the webaddress via help to majordomo(a)gnu.de: <http://adele.gerwinski.de/majordomo/mj_wwwusr/domain=gnu.de> It seems to me that it is more appropriate to set an alias for your extra address, then to subscribe another address, if you want to post from several e-mail address without receiving multiple copies. Aliases can also be set via the mail interface (see help message). Tom

1 0

reply-to field missing.
by CBFalconer 05 Oct '03

05 Oct '03

With the various SWEN viruses and other things, the automatic reply-to: gpc(a)gnu.de field seems to be missing on anything delivered here (cbfalconer(a)worldnet.att.net). Way back when I recall there was some way to set this option on the list, but it is long forgotten. I think there was also a problem because my from: address did not agree with the address to which the mail is delivered. Some items are arriving with that field set here, but so far it is only replies to my own articles. See the "Status of GPC" thread. -- Chuck F (cbfalconer(a)yahoo.com) (cbfalconer(a)worldnet.att.net) Available for consulting/temporary embedded and systems. <http://cbfalconer.home.att.net> USE worldnet address!

2 1

Re: Compiler bugs or missunderstanding GPC
by Frank Heckenbach 05 Oct '03

05 Oct '03

ThomasM wrote: > Perhabs it is possible to "output" qualified messages during > compilation like "Type of ... is ..." or "Size of ... is ..." ? It probably possible -- it's just a matter of effort ... But the size shouldn't actually matter -- the type must match exactly. E.g., this is not valid (but also not in BP): unit Baz; interface type Foo = String[10]; procedure a (b: Foo); implementation type Bar = String[10]; procedure a (b: Bar); begin end; end. Frank -- Frank Heckenbach, frank(a)g-n-u.de http://fjf.gnu.de/ GnuPG and PGP keys: http://fjf.gnu.de/plan (7977168E)

1 0

Compiler bugs or missunderstanding GPC ?
by ThomasM 05 Oct '03

05 Oct '03

Hi ! I've installed mingw32 with gcc 3.2.3 and gpc 20030507 and I am in serious trouble while translating bp-projects to gpc. While compiling I get several "previos declaration does not match" errors within the same unit or across different ones, although the syntax is allright. (An asm-free translation of objects.pas successful compiled only after moving "uses dos" from the "implementation" to the "interface" part) Then there are several "type mismatch" errors in functions with one var-parameter, which I cannot mark as protected. (Someone mentioned this allready, but still noone has replied to it) To get progress in translation I start to compile only single units without linking and then I was fooled sometimes by this error message "--amtmpfile not given". Some units will being compiled and other not like ------------------------------ Unit tv_spr; Interface Const spOk = 1; spAbbruch = 2; spJa = 3; spNein = 4; implementation end. ----------------------------------------- the commandline I used is gpc -c -s --no-typed-address --extended-syntax --ignore-function-results --io-checking --no-stack-checking -march=i486 -mcpu=i486 --unit-path=g: \status\entwicklung\mdmprot\gpc\mdtv_may;g:\status\entwicklung\mdmprot\gpc\md_may;g:\status\entwicklung\mdmprot\gpc\source -Ig:\status\entwicklung \mdmprot\gpc\mdtv_may --cidefine=GPC_USE --cidefine=DPMI --cidefine=NOASM --cidefine=test --cidefine=USE_PDCURSES -- cidefine=LINODATA --cidefine=HARDDUMMY --executable-file-name unit.pas Greetings, Thomas

4 3

[churchgrowthideas] woldview
by Dave Anderson 29 Sep '03

29 Sep '03

Learning to Think Christianly Taking Time to Study Pollster George Barna, one of the most astute observers of the evangelical scene today, is in the midst of a nationwide tour conducting seminars for ministers and church leaders. One of the things he discovered that disturbed him most, he said, was that so few born-again Christians have a biblical worldview. According to one study, 91 percent do not have a worldview. And this, Barna concluded, is one of the reasons the Church is so weak. At BreakPoint and the Wilberforce Forum, we're trying hard to do something about that. Daily broadcasts on < HYPERLINK "http://www.ambassadoradvertising.com/StationLogs/PF Log.htm" http://www.ambassadoradvertising.com/StationLogs/PF Log.htm>radio stations nationwide tell you how to apply biblical truths to current issues. We also provide < HYPERLINK "http://www.pfmonline.net/products.taf?Site=BPT&Category=BPT" http://www.pfmonline.net/products.taf?Site=BPT&Category=BPT>resources through our call center and websites for people who are serious about putting their faith to work in all of life. And we regularly hear from people who are using our materials to do just that. One lawyer told me that he has started a discussion group, studying worldview with non-believers in his firm. A college professor said that he uses BreakPoints to start discussions in his secular college classroom. A businessman in Minneapolis leads a group of businessmen in worldview discussions and sends them out to teach others. And my friend Nancy Fitzgerald in Indianapolis teaches worldview lessons to teenagers in her home. Last year, two groups of one hundred arrived each Sunday, listened to an hour-long lecture, and then camped out all over her house in small groups to talk about what they had learned. Many of them keep up with her after they get to college. I suspect there are many of you listening who would like to do something like this. Well, we have some ways to help you. One is an online worldview course. We're now in our third session, and I've seen a tremendous response in my online chats with students eager to learn. And today we're announcing a new program for those who want to go even deeper: a one-year intensive worldview study program called "The Centurions." Our goal is to teach one hundred Christian men and women to understand, articulate, and live out a biblical worldview-and then, to teach it to others. Participants will learn through a self-paced study and through seminars in Washington, which I will help teach. We'll cover everything from politics to education to the arts. Since we're limited to one hundred, there is an application process that includes a pledge for each applicant to use this training to help their churches and communities learn how to think Christianly and live out a biblical worldview. We're praying that God will raise up Centurions from every part of the country, from every church affiliation, and from many different career fields. George Barna is right: A major weakness of the Church is that we don't think outside of the sanctuary, and we haven't cultivated a Christian mind. If we're going to succeed in restoring a moral influence in American culture, we need to change that. The next section of the online course begins on October 20, and we're now considering applicants for the Centurions program. For more information about either program, call us here at 1-877-3-CALLBP (1-877-322-5527). Today it is vital for us to prepare ourselves to become God's agents in shaping this culture and bringing biblical truth to bear on all of life. Anybody out there listening? Are you ready to go to war to defend what we believe? Call us. For printer-friendly version, simply visit < HYPERLINK "http://www.breakpoint.org" http://www.breakpoint.org>www.breakpoint.org and click on Today's Commentary. The printer-friendly link is on the left-hand column. Copyright (c) 2003 Prison Fellowship Ministries THIS IS A RUSH TRANSCRIPT. THIS COPY MAY NOT BE IN FINAL FORM AND MAY BE UPDATED. "BreakPoint with Chuck Colson" is a daily commentary on news and trends from a Christian perspective. Heard on more than 1000 radio outlets nationwide, BreakPoint transcripts are also available on the Internet. BreakPoint is a production of The Wilberforce Forum, a division of Prison Fellowship Ministries. NOTE: Referral to websites not produced by Prison Fellowship, the Wilberforce Forum, and BreakPoint is for informational purposes only and does not necessarily constitute an endorsement of the sites' content. Learn more about the Wilberforce Forum's Centurions Program by calling 1-877-322-5527. Learn more about the Wilberforce Forum's < HYPERLINK "http://www.pfm.org/Content/NavigationMenu/BreakPoint1/Learn_More2/Onlin e_Certificate_Program/Online_Certificate_Program.htm" http://www.pfm.org/Content/NavigationMenu/BreakPoint1/Learn_More2/Online _Certificate_Program/Online_Certificate_Program.htm>Certificate Program in Christian Worldview Studies. The second session begins October 20. Courses may be taken individually and/or out of order; the first course will repeat next year. < HYPERLINK "https://www.pfmonline.net/coursereg.taf?site=CWVCE" https://www.pfmonline.net/coursereg.taf?site=CWVCE>Register online or call 1-877-478-0100. Visit all of our websites: < HYPERLINK "http://www.breakpoint.org/" http://www.breakpoint.org/>BreakPoint, < HYPERLINK "http://www.wilberforce.org/" http://www.wilberforce.org/>Wilberforce Forum, < HYPERLINK "http://www.justicefellowship.org/" http://www.justicefellowship.org/>Justice Fellowship, and the < HYPERLINK "http://www.biotechpolicy.org/" http://www.biotechpolicy.org/>Council for Biotechnology Policy. Find out when the < HYPERLINK "http://www.barna.org/cgi-bin/PageSeminar.asp" http://www.barna.org/cgi-bin/PageSeminar.asp>Barna 2003 Seminar will be in your area. "< HYPERLINK "http://www.barna.org/cgi-bin/PagePressRelease.asp?PressReleaseID=76&Ref erence=E&Key=worldview" http://www.barna.org/cgi-bin/PagePressRelease.asp?PressReleaseID=76&Refe rence=E&Key=worldview>Discipleship Insights Revealed in New Book by George Barna," Barna Research Online, 28 November 2000. George Barna and Mark Hatch, < HYPERLINK "https://www.pfmonline.net/str_donation.taf?Site=BP_Item&Item_Code=BKBPT" https://www.pfmonline.net/str_donation.taf?Site=BP_Item&Item_Code=BKBPT> Boiling Point (Regal Books, 2001). BreakPoint Commentary No. 030131, "< HYPERLINK "http://www.pfm.org/Content/ContentGroups/BreakPoint/BreakPoint_Commenta ries/20031/January_2003/Bringing_God_s_Truth_to_Bear.htm" http://www.pfm.org/Content/ContentGroups/BreakPoint/BreakPoint_Commentar ies/20031/January_2003/Bringing_God_s_Truth_to_Bear.htm>Bringing God's Truth to Bear." BreakPoint Commentary No. 030108, "< HYPERLINK "http://www.pfm.org/Content/ContentGroups/BreakPoint/BreakPoint_Commenta ries/20031/January_2003/A_Turning_of_the_Tide.htm" http://www.pfm.org/Co ntent/ContentGroups/BreakPoint/BreakPoint_Commentaries/20031/January_200 3/A_Turning_of_the_Tide.htm>ATurning of the Tide." Harry Blamires, < HYPERLINK "http://www.servantpub.com/1569550441.html" http://www.servantpub.com/1569550441.html>The Christian Mind (Vine Books, 1997). David K. Naugle, < HYPERLINK "https://www.pfmonline.net/str_donation.taf?Site=BP_Item&Item_Code=BKWOR" https://www.pfmonline.net/str_donation.taf?Site=BP_Item&Item_Code=BKWOR> Worldview: The History of a Concept (Eerdmans, 2002). ________________________________________________________________________ ________________________________________________________________________ WANNA SEE OUR BEAGLES? HYPERLINK http://www.animalfrequency.org/breeder_page.php?email=daveandand@cs.com http://www.animalfrequency.org/breeder/539 HYPERLINK http://beaubasin.dogbreedersdirectory.com/ http://beaubasin.dogbreedersdirectory.com/ TAKE A PEEK. THEY SURE ARE CUTE ________________________________________________________________ WHERE ARE THE FISH BITING? COME JOIN OUR GROUP AND SEE ITS FREEEEEEEEE! HYPERLINK http://www.yahoogroups.com/subscribe/southlafishreport http://www.yahoogroups.com/subscribe/southlafishreport HYPERLINK mailto:southlafishreport-subscribe@yahoogroups.com southlafishreport-subscribe(a)yahoogroups.com __________________________________________________________ LOVE A GOOD JOKE? JOIN FUNNYBOZ AND GET A NEW ONE EVERY DAY SEND AN EMAIL TO HYPERLINK mailto:funnybonz-subscribe@yahoogroups.com funnybonz-subscribe(a)yahoogroups.com HYPERLINK http://www.yahoogroups.com/subscribe/funnybonz http://www.yahoogroups.com/subscribe/funnybonz _____________________________________________________ WANNA HELP YOUR CHURCH GROW? COMPARE NOTES WITH OTHER CHRISTIANS/PASTORS? HYPERLINK http://www.yahoogroups.com/subscribe/churchgrowthideas http://www.yahoogroups.com/subscribe/churchgrowthideas churchgrowthlist HYPERLINK mailto:churchgrowthideas-subscribe@yahoogroups.com churchgrowthideas-subscribe(a)yahoogroups.com ITS FREEEEEEEEEE TRY THE DIGESTED VERSION __________________________________________________________ REV. DAVID ANDERSON 506 SECOND ST. RAYNE, LA 70578 337 334 4432 HYPERLINK mailto:DAVEANDAND@COX-INTERNET.COM DAVEANDAND(a)COX-INTERNET.COM 775 822 0377 FAX IM DAVEANDAND MSN MESSENGER HYPERLINK mailto:DAVEANDAND@CS.COM DAVEANDAND(a)CS.COM YAHOO MESSENGER HYPERLINK mailto:DAVEANDAND@YAHOO.COM DAVEANDAND(a)YAHOO.COM --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.521 / Virus Database: 319 - Release Date: 9/23/2003 ------------------------ Yahoo! Groups Sponsor ---------------------~--> Buy Ink Cartridges or Refill Kits for your HP, Epson, Canon or Lexmark Printer at MyInks.com. Free s/h on orders $50 or more to the US & Canada. http://www.c1tracking.com/l.asp?cid=5511 http://us.click.yahoo.com/mOAaAA/3exGAA/qnsNAA/8QUslB/TM ---------------------------------------------------------------------~-> The Church Growth Ideas list is intended to help members churches grow in attendance. Pastors and lay leaders are welcome to contribute. To subscribe send an e-mail to: churchgrowthideas-subscribe(a)yahoogroups.com or go to http://www.yahoogroups.com/subscribe.cgi/churchgrowthideas To Unsubscribe send an e-mail to: churchgrowthideas-unsubscribe(a)yahoogroups.com Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/

1 0

[churchgrowthideas] pomo probs
by Dave Anderson 29 Sep '03

29 Sep '03

It is from another list Im on. It was a great thought I thought might spur some discussion on our list. I have often felt this way as well in my ministry. Thought it might strike a chord with others too. WANNA SEE OUR BEAGLES? HYPERLINK http://www.animalfrequency.org/breeder_page.php?email=daveandand@cs.com http://www.animalfrequency.org/breeder/539 HYPERLINK http://beaubasin.dogbreedersdirectory.com/ http://beaubasin.dogbreedersdirectory.com/ TAKE A PEEK. THEY SURE ARE CUTE ________________________________________________________________ WHERE ARE THE FISH BITING? COME JOIN OUR GROUP AND SEE ITS FREEEEEEEEE! HYPERLINK http://www.yahoogroups.com/subscribe/southlafishreport http://www.yahoogroups.com/subscribe/southlafishreport HYPERLINK mailto:southlafishreport-subscribe@yahoogroups.com southlafishreport-subscribe(a)yahoogroups.com __________________________________________________________ LOVE A GOOD JOKE? JOIN FUNNYBOZ AND GET A NEW ONE EVERY DAY SEND AN EMAIL TO HYPERLINK mailto:funnybonz-subscribe@yahoogroups.com funnybonz-subscribe(a)yahoogroups.com HYPERLINK http://www.yahoogroups.com/subscribe/funnybonz http://www.yahoogroups.com/subscribe/funnybonz _____________________________________________________ WANNA HELP YOUR CHURCH GROW? COMPARE NOTES WITH OTHER CHRISTIANS/PASTORS? HYPERLINK http://www.yahoogroups.com/subscribe/churchgrowthideas http://www.yahoogroups.com/subscribe/churchgrowthideas churchgrowthlist HYPERLINK mailto:churchgrowthideas-subscribe@yahoogroups.com churchgrowthideas-subscribe(a)yahoogroups.com ITS FREEEEEEEEEE TRY THE DIGESTED VERSION __________________________________________________________ REV. DAVID ANDERSON 506 SECOND ST. RAYNE, LA 70578 337 334 4432 HYPERLINK mailto:DAVEANDAND@COX-INTERNET.COM DAVEANDAND(a)COX-INTERNET.COM 775 822 0377 FAX IM DAVEANDAND MSN MESSENGER HYPERLINK mailto:DAVEANDAND@CS.COM DAVEANDAND(a)CS.COM YAHOO MESSENGER HYPERLINK mailto:DAVEANDAND@YAHOO.COM DAVEANDAND(a)YAHOO.COM --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.521 / Virus Database: 319 - Release Date: 9/23/2003 ------------------------ Yahoo! Groups Sponsor ---------------------~--> Buy Ink Cartridges or Refill Kits for your HP, Epson, Canon or Lexmark Printer at MyInks.com. Free s/h on orders $50 or more to the US & Canada. http://www.c1tracking.com/l.asp?cid=5511 http://us.click.yahoo.com/mOAaAA/3exGAA/qnsNAA/8QUslB/TM ---------------------------------------------------------------------~-> The Church Growth Ideas list is intended to help members churches grow in attendance. Pastors and lay leaders are welcome to contribute. To subscribe send an e-mail to: churchgrowthideas-subscribe(a)yahoogroups.com or go to http://www.yahoogroups.com/subscribe.cgi/churchgrowthideas To Unsubscribe send an e-mail to: churchgrowthideas-unsubscribe(a)yahoogroups.com Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/

1 0

Re: [churchgrowthideas] pomo probs
by Angelo Giovas 28 Sep '03

28 Sep '03

Just for clarification: Is this email from Dave Anderson or someone else? Angelo Giovas (Rev.) North Shore Baptist, Church Queensland, Australia ----- Original Message ----- From: "Dave Anderson" <daveandand(a)cox-internet.com> To: "Churchgrowthideas@Yahoogroups. Com (E-mail)" <Churchgrowthideas(a)Yahoogroups.Com> Sent: Monday, September 29, 2003 7:28 AM Subject: [churchgrowthideas] pomo probs > My problem right now is that I do not feel called to any particular > expression of an institutional church, but I feel called by God to preach and teach and > minister to God's gospel. I feel a definite prophetic leaning in my calling, > but I have come to realize that prophets can make very unsuccessful pastors > in churches that are rooted/rutted/embedded/comfortably sleeping in their own > traditions without any connection to its purpose in the gospel scheme of > things. Sometimes I feel like most of my friends are on the fringes of the church > (or not in it) and all my enemies are. I'm not afraid of speaking out to a > post modern world; I am afraid the modern remnant will castrate me before I can. > > WANNA SEE OUR BEAGLES? > HYPERLINK http://www.animalfrequency.org/breeder_page.php?email=daveandand@cs.com http://www.animalfrequency.org/breeder/539 > HYPERLINK http://beaubasin.dogbreedersdirectory.com/ http://beaubasin.dogbreedersdirectory.com/ > TAKE A PEEK. THEY SURE ARE CUTE > ________________________________________________________________ > > WHERE ARE THE FISH BITING? > COME JOIN OUR GROUP AND SEE > ITS FREEEEEEEEE! > HYPERLINK http://www.yahoogroups.com/subscribe/southlafishreport http://www.yahoogroups.com/subscribe/southlafishreport > HYPERLINK mailto:southlafishreport-subscribe@yahoogroups.com southlafishreport-subscribe(a)yahoogroups.com > __________________________________________________________ > > LOVE A GOOD JOKE? > JOIN FUNNYBOZ AND GET A NEW ONE EVERY DAY > SEND AN EMAIL TO > HYPERLINK mailto:funnybonz-subscribe@yahoogroups.com funnybonz-subscribe(a)yahoogroups.com > HYPERLINK http://www.yahoogroups.com/subscribe/funnybonz http://www.yahoogroups.com/subscribe/funnybonz > _____________________________________________________ > > WANNA HELP YOUR CHURCH GROW? > COMPARE NOTES WITH OTHER CHRISTIANS/PASTORS? > HYPERLINK http://www.yahoogroups.com/subscribe/churchgrowthideas http://www.yahoogroups.com/subscribe/churchgrowthideas > churchgrowthlist > HYPERLINK mailto:churchgrowthideas-subscribe@yahoogroups.com churchgrowthideas-subscribe(a)yahoogroups.com > ITS FREEEEEEEEEE > TRY THE DIGESTED VERSION > __________________________________________________________ > > REV. DAVID ANDERSON 506 SECOND ST. > RAYNE, LA 70578 > 337 334 4432 > HYPERLINK mailto:DAVEANDAND@COX-INTERNET.COM DAVEANDAND(a)COX-INTERNET.COM > 775 822 0377 FAX > IM DAVEANDAND > MSN MESSENGER HYPERLINK mailto:DAVEANDAND@CS.COM DAVEANDAND(a)CS.COM > YAHOO MESSENGER HYPERLINK mailto:DAVEANDAND@YAHOO.COM DAVEANDAND(a)YAHOO.COM > > --- > Outgoing mail is certified Virus Free. > Checked by AVG anti-virus system (http://www.grisoft.com). > Version: 6.0.520 / Virus Database: 318 - Release Date: 9/18/2003 > > > > > The Church Growth Ideas list is intended to help members churches grow in attendance. Pastors and lay leaders are welcome to contribute. To subscribe send an e-mail to: churchgrowthideas-subscribe(a)yahoogroups.com or go to > http://www.yahoogroups.com/subscribe.cgi/churchgrowthideas > > To Unsubscribe send an e-mail to: churchgrowthideas-unsubscribe(a)yahoogroups.com > > Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/ > > ------------------------ Yahoo! Groups Sponsor ---------------------~--> Buy Ink Cartridges or Refill Kits for your HP, Epson, Canon or Lexmark Printer at MyInks.com. Free s/h on orders $50 or more to the US & Canada. http://www.c1tracking.com/l.asp?cid=5511 http://us.click.yahoo.com/mOAaAA/3exGAA/qnsNAA/8QUslB/TM ---------------------------------------------------------------------~-> The Church Growth Ideas list is intended to help members churches grow in attendance. Pastors and lay leaders are welcome to contribute. To subscribe send an e-mail to: churchgrowthideas-subscribe(a)yahoogroups.com or go to http://www.yahoogroups.com/subscribe.cgi/churchgrowthideas To Unsubscribe send an e-mail to: churchgrowthideas-unsubscribe(a)yahoogroups.com Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/

1 0

two (small) bugs and one strange behavior
by Jean-Pierre Vial 28 Sep '03

28 Sep '03

I upgraded yesterday my gpc to the latest release. Compilation of the full gcc.3.3.1 and gpc together was OK (linux, Suse 8.1) The strange behavior: when I build a pascal project with my own units, and the crt, dos ... units with automake, I get dos.gpi, dos.o, crt.gpi etc... in the local directory. These files are not the same as in the /usr/local....../units directory (very different sizes) If I delete the dos.gpi etc... in the local directory and do not use automake I get the error message dos.gpi must be recompiled. The (small) bugs: when I compile the units in /usr/local/..../3.3.1/units I get two errors a missing header file rxposix.h in regexc.c so regexp.pas is not built (I don't care) in ports.pas there is a test {$ifndef __i386__} this test fails on my machine (identified as i686 by the configure script) replacing the test by __i686__ does not help if I suppress the test, the compilation is OK -- Jean-Pierre Vial

2 1

Best Way to Link With GCC
by Kevan Hashemi 19 Sep '03

19 Sep '03

Dear GPC Users, I have pascal code that reads and writes from standard io. I would like to compile it into a library that someone who has only GCC can link to. With the help of the GPC demo programs, I have arrived at the solution I give below. What is the standard way of solving this problem? Yours, Kevan Hashemi ----------- My Solution ----------- We arrange our pascal code as a program (as in gcc_c_pas.pas demo): program example; procedure pascal_procedure; attribute (name='Pascal_Procedure'); begin WriteLn('Here we are in the Pascal Procedure.'); Flush(Output) end; begin end. We compile this program as a dynamic library: gpc -o example.o -dynamiclib example.pas --gpc-main=dummy We can look inside with UNIX command "otool -T -v example.o" and see the _p_initialize routine is there for us to link to. In our C program we have: extern int _p_initialize (int argc, char **argv, char **envp); and in the main loop or init routine we put: _p_initialize (0,NULL,NULL); Now we link with GCC: gcc -o lwdaq lwdaq.o example.o We can call Pascal_Procedure from the C program and get output to the terminal.

2 1

128-bit keys
by Prof A Olowofoyeku (The African Chief) 19 Sep '03

19 Sep '03

All gpc gurus and mathematicians Does anyone have some code to generate impossible-to-crack-in-500-years 128-bit encryption keys? Thanks. Best regards, The Chief -------- Prof. Abimbola A. Olowofoyeku (The African Chief) web: http://www.bigfoot.com/~african_chief/

4 3

Re: 128-bit keys
by Prof A Olowofoyeku (The African Chief) 19 Sep '03

19 Sep '03

I wrote earlier ... > All gpc gurus and mathematicians > > Does anyone have some code to generate impossible-to-crack-in-500-years > 128-bit encryption keys? One addition. I also need to have the keys in hexadecimal format, thanks. Best regards, The Chief -------- Prof. Abimbola A. Olowofoyeku (The African Chief) web: http://www.bigfoot.com/~african_chief/

1 0

Patent demonstration
by Eike Lange 18 Sep '03

18 Sep '03

Hi Folks! (Sorry for the cross post) Tomorrow starts the second netwide demonstration against software patents. (http://swpat.ffii.org/index.en.html) I'd like to replace the index page at http://grx.gnu.de and http://www.gnu-pascal.{de,org} with a page similar to http://www.gnu.org. This time, the page should last until 24th of september. Any objections? It would be nice, if you could contribute with your own pages. Eike -- http://www.gnushi.de

3 3

Re: Module global string bug
by Wood David 18 Sep '03

18 Sep '03

Thanks Waldek, That's a really big help. Having migrated from DEC Pascal which had very different MODULE integration syntax I had never picked up on the importance of the IMPORT clause, especially as the code has always compiled without a hitch. I wonder if there is any way gpc can pick up on the use of declarations which haven't been properly initialised, either at compile time or run-time? Regards, David Wood. > -----Original Message----- > From: Waldek Hebisch [mailto:hebisch@math.uni.wroc.pl] > Sent: Tuesday, September 16, 2003 12:44 PM > To: Wood David > Cc: gpc(a)gnu.de > Subject: Re: Module global string bug > > > David Wood wrote: > > Frank, > > > > I don't know if there is a bug number for this but I am > attaching two really > > small bits of code which show it up. It's the only > 'genuine' bug I have > > ever really come across in gpc. Basically, the globally > defined string > > doesn't seem to get any length so whenever something is > assigned to it, the > > contents vanish. > > Your program is buggy: you forgot to 'import' your module. Even if > you want to access objects in the module via external name you still > need to 'import' it so its inititializer is run automatically. If you > want main program to be in other language, then you need to call > 'init_With_string' explicitly. > > -- > Waldek Hebisch > hebisch(a)math.uni.wroc.pl or hebisch(a)hera.math.uni.wroc.pl > The Information contained in this E-Mail and any subsequent correspondence is private and is intended solely for the intended recipient(s). For those other than the recipient any disclosure, copying, distribution, or any action taken or omitted to be taken in reliance on such information is prohibited and may be unlawful. Emails and other electronic communication with QinetiQ may be monitored. Calls to QinetiQ may be recorded for quality control, regulatory and monitoring purposes.

5 7

Bugfix
by Frank Heckenbach 17 Sep '03

17 Sep '03

Another memory management bugfix, thanks to Waldek Hebisch. (I've updated the archives on the server again.) Those who've seen memory problems with the new GPC, please try again with this and the other patches applied. Frank -- Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/, 7977168E GPC To-Do list, latest features, fixed bugs: http://www.gnu-pascal.de/todo.html GPC download signing key: 51FF C1F0 1A77 C6C2 4482 4DDC 117A 9773 7F88 1707

4 10

automake gpi
by Mehdi Khaldi 17 Sep '03

17 Sep '03

How to make gpi files automatically without generating object files? I'd like to generate only gpi files. I'll use --interface-only option. But, an error occurs when I use automake option. Is there another option to (re)generate automatically gpi files?

1 0

Re: GPC on Mac OS X/G5
by Adriaan van Os 17 Sep '03

17 Sep '03

Private email from Boris Herman: > Hi Adriaan, > > I just wanted to know if you think that GPC can be used on Mac OS X > that is configured for G5. Especially I am interested in processing > huge arrays and the new G5, supporting 8 Gb, could do the trick. Note > that I am not talking about G5 optimization, I couldn't care less > about that. I just want to create oversized arrays and have them all > in memory. As of now I cannot have an array 1000x1000x1000 with 8byte > floating point in each cell but with a new G5 I could. > > Regards, > Boris Frankly, I don't know, nor do I have a G5 Mac to test. Apple is very vague about it, mostly marketing talk, even the latest "tech note" on G5 optimization at <http://developer.apple.com/performance/g5optimization.html>. Also, Apple's claims that Darwin is 64-bit are non-convincing to me. Thus, this is an interesting question to post on both the gcc mailing list and on Apple's darwin-development list. Generally, I think that GPC can address 8 GB if the gcc back-end can do so -- correct me Frank/Waldek if I am wrong. Regards, Adriaan van Os

1 0

Module global string bug
by Wood David 16 Sep '03

16 Sep '03

Frank, I don't know if there is a bug number for this but I am attaching two really small bits of code which show it up. It's the only 'genuine' bug I have ever really come across in gpc. Basically, the globally defined string doesn't seem to get any length so whenever something is assigned to it, the contents vanish. Regards David Wood QinetiQ Farnborough The Information contained in this E-Mail and any subsequent correspondence is private and is intended solely for the intended recipient(s). For those other than the recipient any disclosure, copying, distribution, or any action taken or omitted to be taken in reliance on such information is prohibited and may be unlawful. Emails and other electronic communication with QinetiQ may be monitored. Calls to our Customer Contact Centre may be recorded for quality control, regulatory and monitoring purposes.

2 2

Linking On OSX
by Kevan Hashemi 16 Sep '03

16 Sep '03

Dear GPC Users, I have installed gpc on my MacOS 10.2.6 computer. I have the following makefile, which makes executable glue out of main.c and foobar.p. I compile main.c as a library so I can look inside it with otool -v -t -V and see the symbolic stub references. glue: main.o foobar.o gpc main.o foobar.o -o glue main.o: main.c gpc -c main.c -o main.o foobar.o: foobar.p gpc -c foobar.p -o foobar.o rm foobar.p clean: rm foobar.o foobar_unit.gpi main.o glue Foobar.p looks like: unit Foobar_Unit; interface function Foobar(x:longint):longint; implementation function Foobar(x:longint):longint; begin Foobar:=x*x*x; end; end. and main.c looks like: #include <stdio.h> extern int Foobar(int x); int main() { printf("The Foobar of %d is %d \n",5,Foobar(5)); return 0; } I get no compiler warnings, but when I run glue from the terminal command line my output is: The Foobar of 5 is -1985538999 I have been trying for a couple of days, and I cannot get the main.o object to link correctly to foobar.o. I think I need to add some gpc command-line options, but none that I have tried seem to work. Thy symbols in the objects are correct, and I get an unresolved symbol error if I remove foobar.o from the makefile directory. Can you help? Yours, Kevan Hashemi, Brandeis University Physics Department

2 2

Re: Linking On OSX
by Kevan Hashemi 16 Sep '03

16 Sep '03

Dear Peter, > In GPC, Integer is equivalent to int in C. > > Have you tried it that way? > Peter. I thought I had, but I tried again by using integer in Pascal and int in C, and now it works perfectly. I am so pleased, I won't even bother to be ashamed. Thank you for your help. Yours, Kevan Hashemi

1 0

Just a little gripe about syntax changes
by Wood David 15 Sep '03

15 Sep '03

Hi, A while back, when Frank released gpc-20030507, he noted that there were a few changes that we wouldn't like, especially regarding external function references. Well ok, the first release forced me to add 'name' to all my external Pascal routines since the default was now all lowercase (even though Pascal routines are defined with an initial uppercase letter - a strange mismatch it seems). Although a nuisance, I accepted this was just a case of getting over the bit I wouldn't like. Of course, 'name' isn't in gpc-2.1, so everyone else running our software had to upgrade to 20030507 too. Having now done the upgrade to 20030830, I started getting errors due to duplicated unit declarations in the INTERFACE and IMPLEMENTATION blocks (for what reason?). Anyway, I deleted the duplication, only to discover that 20030507 required the duplication, so again, all of our machines had to be upgraded to 20030830. Whilst I'm getting very good at rebuilding gpc, I would hope future gpc releases will focus on bug-fixes and ensuring backward compiler compatibility, thus removing the need to match our software to a precise compiler version. Sorry for the moan, we're all always busy - keep up the good work (especially if you can fix the module global string declaration bug!!). Regards David Wood QinetiQ Farnborough The Information contained in this E-Mail and any subsequent correspondence is private and is intended solely for the intended recipient(s). For those other than the recipient any disclosure, copying, distribution, or any action taken or omitted to be taken in reliance on such information is prohibited and may be unlawful. Emails and other electronic communication with QinetiQ may be monitored. Calls to our Customer Contact Centre may be recorded for quality control, regulatory and monitoring purposes.

3 2

Demo program for elusive error in GPC
by Frank D. Engel, Jr. 15 Sep '03

15 Sep '03

Several weeks (perhaps even a month?) ago, I posted a note about a problem I was having with GPC, under MacOS X, and repeatable under IRIX. The compiled program was incorrectly giving me a bus error, but inserting an extra WRITELN somewhere would sometimes solve the problem. I have finaly put together an archive which consistantly demonstrates the problem. Since I have not yet decided firmly on a license for the program, I am requesting that it be used only for helping to find the bug in GPC at this time. If you are interested in doing this, and wish to have access to my archive, please eMail me offlist (fde101(a)yahoo.com) for a copy. Note that I do not consistantly check my mail on certain days of the week, so it may take me a few days to reply. To see the problem: $ gunzip opas.tar.gz $ tar xf opas.tar $ cd opas $ make When the compile fails with a bus error, open 'debug.pas' in a text editor, change the line: {$DEFINE TRACE} to: {$UNDEF TRACE} Save it, then: $ make After getting the same error (more quickly this time), change the line back to {$DEFINE TRACE}, save it, and once more: $ make Now it goes through correctly, and my program actually works, too! Strange. ===== ======= Frank D. Engel, Jr. Modify the equilibrium of the vertically-oriented particle decelerator to result in the reestablishment of its resistance to counterproductive atmospheric penetration. __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free, easy-to-use web site design software http://sitebuilder.yahoo.com

2 1

Re: gpc-20030830 released (testsuite)
by Adriaan van Os 14 Sep '03

14 Sep '03

The testsuite results for the latest gpc-20030830 compiler with gcc-3.3.1 are the same as for gpc-20030507 with gcc-3.3.x. For the record, I listed the results below. Regards, Adriaan van Os ----- G4:~] adriaan% gpc -v Reading specs from /Developer/Pascal/gpc331d4/lib/gcc-lib/powerpc-apple-darwin/3.3.1/specs Configured with: ../gpc-331d4/configure --enable-languages=pascal,c --prefix=/Developer/Pascal/gpc331d4 --enable-threads=posix --target=powerpc-apple-darwin Thread model: posix gpc version 20030830, based on gcc-3.3.1 [G4:~/gnu/testgpc/test-20030830] adriaan% make EXTRA_PFLAGS=--longjmp-all-nonlocal-labels Running the GPC Test Suite. This may take a while ... rm -f *.dat *.o *.s *.i *.gpi *.gpd *.gpc core a.out stderr.out *.exe testmake.tmp dummy.c dummy.pas dummy.out diff_cr*.tmp fixcr fixcr.exe rm -f todo/a.out todo/*.exe todo/*.o todo/*.s todo/*.i todo/*.gpi todo/*.gpd todo/core { gpc --version | head -1; gpc --print-search-dirs | grep install | head -1; hostname || echo "unknown host"; date "+%Y-%m-%d %H:%M:%S"; } | \ sed -e 's,^,Testing ,;N;s,\n.*gcc-lib[/\], (,;s,[/\].*,),;N;s,\n, (,;s,$,),;N;s/\n/, /' Testing gpc 20030830, based on gcc-3.3.1 (powerpc-apple-darwin) (G4.local.), 2003-09-14 17:45:03 echo "gpc -g -O3 -W -Wall -Wundef -Wpointer-arith -Wno-unused --longjmp-all-nonlocal-labels " gpc -g -O3 -W -Wall -Wundef -Wpointer-arith -Wno-unused --longjmp-all-nonlocal-labels PC="gpc" PFLAGS="--autobuild -g -O3 -W -Wall -Wundef -Wpointer-arith -Wno-unused --longjmp-all-nonlocal-labels " SRCDIR="." TEST_MAKE_FLAG=test-make-flag "./test_run" "*.pas" | tee test_log | "./test_sum" | tee test_summary TEST agettext2test.pas: SKIPPED: libintl not installed TEST asmtest.pas: SKIPPED: only for IA32 TEST asmtest2.pas: SKIPPED: only for IA32 TEST asmtest3.pas: SKIPPED: only for IA32 TEST bill5.pas: SKIPPED: `attribute( section(".ltext") )' not available TEST dario.pas: SKIPPED: only for IA32 TEST fjf105a.pas: SKIPPED: librx not installed TEST fjf105b.pas: SKIPPED: librx not installed TEST fjf165a.pas: SKIPPED: German locale not installed TEST fjf77.pas: SKIPPED: range of LongReal not sufficient for test TEST fproc.pas: /var/tmp//ccdFaUpQ.s:unknown:Can't emit reloc {- symbol "LSJR11"} @ file address 800. /var/tmp//ccdFaUpQ.s:unknown:Can't emit reloc {- symbol "LSJR11"} @ file address 796. /var/tmp//ccdFaUpQ.s:unknown:Undefined local symbol L3$pb failed TEST gettexttest.pas: SKIPPED: libintl not installed TEST gmptest.pas: SKIPPED: libgmp not installed TEST jj5.pas: SKIPPED: `attribute (stdcall)' not available TEST longr2.pas: SKIPPED: no LongReal math routines available TEST nlgpp2.pas: /var/tmp//cc4oD0DK.s:unknown:Can't emit reloc {- symbol "LSJR11"} @ file address 1056. /var/tmp//cc4oD0DK.s:unknown:Can't emit reloc {- symbol "LSJR11"} @ file address 1052. /var/tmp//cc4oD0DK.s:unknown:Undefined local symbol L3$pb failed TEST regextest.pas: SKIPPED: librx not installed TEST systemtest.pas: *** malloc: vm_allocate(size=2147483648) failed with 3 *** malloc[9324]: error: Can't allocate region *** malloc: vm_allocate(size=2147483648) failed with 3 *** malloc[9324]: error: Can't allocate region OK # of GPC tests 3794 # of GPC tests passed 3776 # of GPC tests skipped 15 # of GPC tests failed 3 [G4:~/gnu/testgpc/test-20030830] adriaan% make MASK="fproc.pas nlgpp2.pas" EXTRA_PFLAGS="--longjmp-all-nonlocal-labels -O2" Running the GPC Test Suite. This may take a while ... rm -f *.dat *.o *.s *.i *.gpi *.gpd *.gpc core a.out stderr.out *.exe testmake.tmp dummy.c dummy.pas dummy.out diff_cr*.tmp fixcr fixcr.exe rm -f todo/a.out todo/*.exe todo/*.o todo/*.s todo/*.i todo/*.gpi todo/*.gpd todo/core { gpc --version | head -1; gpc --print-search-dirs | grep install | head -1; hostname || echo "unknown host"; date "+%Y-%m-%d %H:%M:%S"; } | \ sed -e 's,^,Testing ,;N;s,\n.*gcc-lib[/\], (,;s,[/\].*,),;N;s,\n, (,;s,$,),;N;s/\n/, /' Testing gpc 20030830, based on gcc-3.3.1 (powerpc-apple-darwin) (G4.local.), 2003-09-14 18:49:23 echo "gpc -g -O3 -W -Wall -Wundef -Wpointer-arith -Wno-unused --longjmp-all-nonlocal-labels -O2 " gpc -g -O3 -W -Wall -Wundef -Wpointer-arith -Wno-unused --longjmp-all-nonlocal-labels -O2 PC="gpc" PFLAGS="--autobuild -g -O3 -W -Wall -Wundef -Wpointer-arith -Wno-unused --longjmp-all-nonlocal-labels -O2 " SRCDIR="." TEST_MAKE_FLAG=test-make-flag "./test_run" fproc.pas nlgpp2.pas | tee test_log | "./test_sum" | tee test_summary # of GPC tests 2 # of GPC tests passed 2 # of GPC tests skipped 0 # of GPC tests failed 0

1 0

Dwarf debugging
by Waldek Hebisch 14 Sep '03

14 Sep '03

I have experimental patches that enable Dwarf debugging of Pascal programs with gdb-5.2.1 and gdb-5.3. The patch adds code to tell Dwarf reader in gdb that the language is Pascal (otherwise it treats language as unknown) and code to read info about sets. Known problems: -- sametimes (mostly?) names are case sensitive -- schema shows some wild info (stabs give me similar problem) You can fetch the patches at: http://www.math.uni.wroc.pl/~hebisch/gpc -- Waldek Hebisch hebisch(a)math.uni.wroc.pl or hebisch(a)hera.math.uni.wroc.pl

1 0

Trim routine
by Mehdi Khaldi 12 Sep '03

12 Sep '03

Hi, I get this error : ./src/test.p: In main program: ./src/test.p:11: label `goal' used before containing binding contour ------------------------------------------------------------ program t; label goal; var s: string(80); begin if s <>'' then goto goal; s:=trim(s); goto goal; goal: end. -------------------------------------------------------------- I suspect trim routine to be the cause. If I remove trim call, my program compile right. Thanks

3 2

some problems
by DOMINIQUE THILLAUD 10 Sep '03

10 Sep '03

Thanks to Tom and Adriaan, my compiler in in order on Mac OSX (but before trying to load the Developper Tools CD from USA1 and not from Europa, I was desesperate). Yet, other problems are coming... 1) PATH problems 1a) I'm unable to execute the a.out (nor the hello if using -o) directly but must use the stupid ./a.out (or ./hello). Even if I redefine the variable PATH in ~/.tcshrc (adding to it the current directory .). Where lies the file who defines PATH ? 1b) I construct some modules for toolboxes (like timer.p) or for abstract types (like lists.p) and I would like to put them in a genuine directory such that the compiler could find them from any other directory : how do it ? 2) export problem If I construct a module to implement an abstract type such that rational numbers, how export operators ? Writing : export rationals = (rational, +, -, *, /) ; give me a parse error before '+' (trying to enclose + between ' ' or " " is useless) Thanks in advance, Dominique

7 7

Low and High
by Dominique Thillaud 10 Sep '03

10 Sep '03

Thanks to all ! The variable GPC_UNIT_PATH works very well and, despite the wise advice of Frank, I've included the current directory in my PATH (I'm strictly and for ever a single-user). The statement "export all" is convenient to export operators, the only joke is that we must use the full header of the operator (params and return name) in the implementation part, unlike the forward style of other routines. Now, I was puzzled by the comportment of the Borland functions Low and High. Writing the small test : program testarraypar ; procedure writeRange (T : array of integer) ; begin WriteLn('param range : ', Low(T), '..', High(T)) ; end ; var T : array [1..10] of integer ; begin WriteLn('arg range : ', Low(T), '..', High(T)) ; writeRange(T) ; WriteLn('arg range : ', Low(T[2..9]), '..', High(T[2..9])) ; writeRange(T[2..9]) ; end. the running gives : arg range : 1..10 param range : 0..9 arg range : 2..9 param range : 0..7 That's not fair ! And with such a comportment, the parameter type "array of integer" becomes almost useless : iterative sorting routines do their job but not the linear search nor the binary one (except with stupid things like "return index + Low(T)" that I refuse to teach with beginners). Knows someone an other way to access the bounds of an "array of integer" ? Thanks in advance, Dominique

2 2

building gpi
by Mehdi Khaldi 10 Sep '03

10 Sep '03

I'd like to build only gpi files without .o files. I use --interface-only flag. Is there another flag like automake to (re)build gpi files without linking or generating .o files?

3 2

Execute external commands
by Miklos Cserzo 09 Sep '03

09 Sep '03

Hi Folks, what is the way to execute an external Unix command from GPC? (Like 'sort -k6f xxx') According to the documentation the function 'execute' is defined in the RTS and it looks like the one I just need. However, I can not access it, I get the 'undefined identifier' error. While the 'pos' function is fine and it is defined on the same place. Cheers, miklos

3 4

[churchgrowthideas] Fusion / A Postcard from Hollywood
by info_euphoria 09 Sep '03

09 Sep '03

Hey, how are you? Have you seen the movie "Swimming Pool" (2003) it's have the hidden meaning and revolves around a swimming pool (a crime scene) about mystery writer, a woman from Britain visits her Publisher's house in France, where her interaction with his unusual daughter sets off inspirations for the writing a novel. This movie was a remake of the French movie with Alain Delon (do you know this actor?) and Romy Schneider (Julia Roberts of Austria) they played in the movies "The Swimming Pool" (1970) an award-winning film tells of (Delon) and his mistress, (Schneider), who spend an idyllic holiday together at a luxurious villa on the French Riviera. Their holiday weekend is disturbed by a visit from a mutual friend, and his teenage daughter...yah..we never so the original... Parents of our Staff are big fans of actor Alain Delon, one of our team member's mom said when Delon was young he was cute..he remind her the American actor Rob Lowe, she says "Rob have Alain's eyes, whatever it means..lol"...that actor was well known in East Europe. Do your parents familiar with Alain Delon? Can you ask them? Although, we never heard of the well know actress Romy Schneider, till now, she became famous in Hollywood in late 70's. Yesterday, we did a research about her life and career...her daughter still alive and work as model/ actress of independent movies. Did you know that film "Vice Versa" (1988) is original for "Freaky Friday" (2003) Vice Versa - an 80s comedy http://centerstage.net/stumped/reviews/vice-versa.shtml ..we don't remember how do they switch, but it's not a fortune cookie..In America, in late 80's there were not so many Chinese Cousin Restaurants...may be that's why? This film about a workaholic father and his 11-year-old son who switch bodies, the son plays most of our staff's favorite actor Fred Savage (he was popular by his awesome TV series "Wonder Years" set in 60's America..and viewer could hear what main character thinks, only the "thinking voice" of a boy was an adult man's voice..) Fred Savage site: http://www.imdb.com/name/nm0000625/ the fun fact that he's filming new films, that we never heard of...cause right now, you won't find any publication or media coverage of Fred, as any popular celebrity..may be, but he's not that popular after all..we don't know why....the last movie we saw, was "Austin Powers: The Goldmember"...What was the latest movie you seen with Fred Savage? In "Swimming Pool"(2003) the writer plays, the actress Charlotte Rampling. She's from Britain, can also speak French, and now well known in US. The first movie our staff saw with her was 'Tis a Pity... ( Italy; 1972) it's a thriller set in old times about a brother in love with his sister, taboo for any time & also a fresh movie-puzzle Under the Sand (2000) by abstract film director François Ozon ( ^ o ^ ) drama about a woman who believes that her husband is still living with her after he mysteriously disappears from a beach in France. Happy holidays & Labor Day week, - from Fusion Team ~{:> What is success? To laugh often and much; To win the respect of intelligent people and the affection of children; To earn the appreciation of honest film critics and to appreciate beauty of all arts and media; To find the best in others; To leave the world a bit better, whether by a healthy child, a garden patch or a redeemed social condition; To know even one life has breathed easier because you have lived; This is to have succeeded. <<<>>> <<<>>> <<<>>> <<<>>> <<<>>> <<<>>> <<<>>> <<<>>> <<<>>> What movies have you seen that inspire you? Would you like to share with Fusion? presented by DMG dedicated to help your appetite succeed. <<<>>> <<<>>> <<<>>> <<<>>> <<<>>> <<<>>> <<<>>> <<<>>> <<<>>> "..Cut. Print. Beautiful guys!" - Joey, character from TV's Full House ------------------------ Yahoo! Groups Sponsor ---------------------~--> Buy Ink Cartridges or Refill Kits for Your HP, Epson, Canon or Lexmark Printer at Myinks.com. Free s/h on orders $50 or more to the US & Canada. http://www.c1tracking.com/l.asp?cid=5511 http://us.click.yahoo.com/l.m7sD/LIdGAA/qnsNAA/8QUslB/TM ---------------------------------------------------------------------~-> The Church Growth Ideas list is intended to help members churches grow in attendance. Pastors and lay leaders are welcome to contribute. To subscribe send an e-mail to: churchgrowthideas-subscribe(a)yahoogroups.com or go to http://www.yahoogroups.com/subscribe.cgi/churchgrowthideas To Unsubscribe send an e-mail to: churchgrowthideas-unsubscribe(a)yahoogroups.com Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/

1 0

Pascal Compiler Help
by Tony Crouch 09 Sep '03

09 Sep '03

Hi all, I'm a beginner to Pascal and also to the linux operating system, i've done some C++ programming before and am not wanting to discover my roots by relearning some pascal stuff ... just for something different. My question is in regards to compiling pascal programs, i'm guessing that pascal programs can be made with an ordinary plain-text editor with the extension .pas. I'm using Linux Red Hat 8 and i'm guessing that there'd be some among you who've had some exposure to C++ (or C) and you'll know that to compile a C++ program in Linux you go to terminal (or within your text editor ... i.e. emacs or xemacs) and type in g++ example.cpp -Wall -o example, where example.cpp is the text file and example is the executable file that results from compiling. Could someone please inform me as to what the command line is to compile a pascal program on linux red hat 8. Cheers, Tony Crouch

3 2

about gpi files
by Mehdi Khaldi 08 Sep '03

08 Sep '03

I get this warning message : warning: duplicate implementation flag in GPI file in 'pass.gpi' Why does it occur?

2 1

Re: MacOS X Update Request due to strange
by Tom Verhoeff 08 Sep '03

08 Sep '03

>Frank D. Engel, Jr. wrote: > >> The strange thing is that sometimes the problem can be fixed by >> sticking extra WRITELNs in between various lines of code. So for >> example, if I am having trouble and think the following code is at >> fault: >> >> x := SomeFunction(y, z); >> DoSomethingTo(x); >> >> I might change it to: >> >> WRITELN('1'); >> x := SomeFunction(y, z); >> WRITELN('2'); >> DoSomethingTo(x); >> WRITELN('3'); >> >> >> and sometimes this fixes the problem (but of course, I don't want that >> extra output...) >> >> >> Any ideas/fixes/patches? My father had this same problem. I seems that the compiler misbehaves (buffer-length/line-length interaction problem?) when the source text itself contains Mac-style end-of-lines (carriage returns only). Possibly the problem only occurs when the source file contains MIXED Mac-style and Unix-style end-of-lines. This can happen when you switch editor, or when you modify a program taken from elsewhere. I have not investigated it deeply. The problem disappeared when the source files where fully converted to Unix-style end-of-lines (Line feeds only). A decent text editor like BBEdit will make this change in two clicks. Tom

7 18

Re: Sqrt problem
by Silvio a Beccara 03 Sep '03

03 Sep '03

Hi Frank, after some time, I spotted the error. It doesn't have anything to do with arrays, but really with a negative sqrt argument in another place of the code, which I hadn't seen before. I now have another problem: I need to extend the size of a dynamic vector, passed as VAR (i.e. by reference) to a procedure. I need to preserve the elements of the vector to be resized. I use NEW each time inside the procedure, and it works, but this fills up the stack very quickly, and I run out of memory. Do you have any suggestion? Thanks, bye Silvio On Tue, 2 Sep 2003, Frank Heckenbach wrote: | Hi, | | > unifortunately I cannot reproduce the error any longer. | | With the new GPC release, or after changes in your code? | | > Maybe it has to do | > with dynamic arrays: I was directly taking the square root of the element | > of a dynamic array. Can this cause problems? | | I can't think of any connection between the two. Perhaps an | out-of-range array access? But I can only guess unless you can show | at least some relevant portion of the code. | | Frank | | -- | Frank Heckenbach, frank(a)g-n-u.de | http://fjf.gnu.de/ | GnuPG and PGP keys: http://fjf.gnu.de/plan (7977168E) |

4 10

Re: [churchgrowthideas] How to Spark the Older Members
by Larry Dodge 01 Sep '03

01 Sep '03

I'd go very slowly. And you could use the Hybel's curriculum on Being a Contagious Christian and Being a Contagious Church. One of the things I have learned in ministry is that each church has an 'esteem'. If it is low, they won't invite anyone. If it is high, they will knock themselves out. Some things that increase esteem are making the building look good. This can be done with paint and some new carpet, etc. And you will begin to see them shine. I know that inviting to church is not witnessing, but it is a start. Maybe someone else will have some more ideas. Larry Dodge - South Street Church of God - Mountain Grove, MO univ_ofjesuschrist2 wrote: > My name is Kenneth Green a minister at Greater Mt. Carmel Church of > God Inc.We have about 11 memebers who are at least in their 50's.The > Apostle is 87 and the church has been opened for 20 plus years. I > have been rehearsing and directing a choir and doing some > preaching.But when it comes to witnessing no one has any idea where > to start or how. > > > The Church Growth Ideas list is intended to help members churches grow in attendance. Pastors and lay leaders are welcome to contribute. To subscribe send an e-mail to: churchgrowthideas-subscribe(a)yahoogroups.com or go to > http://www.yahoogroups.com/subscribe.cgi/churchgrowthideas > > To Unsubscribe send an e-mail to: churchgrowthideas-unsubscribe(a)yahoogroups.com > > Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/ ------------------------ Yahoo! Groups Sponsor ---------------------~--> Buy Ink Cartridges or Refill Kits for Your HP, Epson, Canon or Lexmark Printer at Myinks.com. Free s/h on orders $50 or more to the US & Canada. http://www.c1tracking.com/l.asp?cid=5511 http://us.click.yahoo.com/l.m7sD/LIdGAA/qnsNAA/8QUslB/TM ---------------------------------------------------------------------~-> The Church Growth Ideas list is intended to help members churches grow in attendance. Pastors and lay leaders are welcome to contribute. To subscribe send an e-mail to: churchgrowthideas-subscribe(a)yahoogroups.com or go to http://www.yahoogroups.com/subscribe.cgi/churchgrowthideas To Unsubscribe send an e-mail to: churchgrowthideas-unsubscribe(a)yahoogroups.com Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/

1 0

gpc --version confusion and "external name"
by Anders Lindén 01 Sep '03

01 Sep '03

gpc --version is not coherent among different versions of gpc, i.e. they do not provide me with output that is comparable to each other. I have access to one gpc installation that is on a sparc system. It gives me the output: gpc --version 2.8.1 This is a very laconic output compared to the one I get on my cygwin version (I was installing a binary distribution): gpc --version gpc 20030323, based on gcc-3.2.2 Copyright (C) 1987-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. This output also reveals that gpc is based on gcc. However, I thought gpc was a freestanding compiler that did not precompile anything (according to "The GNU Pascal Manual", which is something I was able to get in PDF). Is it based on gcc or not? Now on the 2.8.1 system, I have problems compiling source that uses the extension "external" in combination with a "name" directive like this: procedure foo; external name 'foo'; I have to keep it like this instead: procedure foo; external; However, this means that I come in trouble when I want to compile source that some people have made. My questions are: How is the version system working with gpc? Which is the latest stable gpc and does it use the "extern name 'foo'" extension? Which is the latest unstable gpc? How unstable is it? Is there a switch to actually enable "extern name 'foo' in all versions? Thanks a lot for your attention, and I also want to thank the people that already have helped me on this list. /Anders

2 1

Re: [churchgrowthideas] Marian McQuade Nat. Grandparents Day
by toms＠ncifcrf.gov 31 Aug '03

31 Aug '03

Could someone on the gpc admins please remove the gpc mailing list from this irrelevant yahoo group? | The Church Growth Ideas list is intended to help members churches | grow in attendance. Pastors and lay leaders are welcome to | contribute. To subscribe send an e-mail to: | churchgrowthideas-subscribe(a)yahoogroups.com or go to | http://www.yahoogroups.com/subscribe.cgi/churchgrowthideas I suspect that the Sobig worm got into someone's computer and signed the gpc up ... Tom Dr. Thomas D. Schneider National Cancer Institute Laboratory of Experimental and Computational Biology Frederick, Maryland 21702-1201 toms(a)ncifcrf.gov permanent email: toms(a)alum.mit.edu (use only if first address fails) http://www.lecb.ncifcrf.gov/~toms/

2 1

gpc-20030830+gcc-3.3.1
by Russell Whitaker 31 Aug '03

31 Aug '03

Hi Build fails at: ... /p/rts/filename.pas:518: internal compiler error: Seg. fault Hope this info is helpful Russ

1 0

x-window programming
by Anders Lindén 31 Aug '03

31 Aug '03

Thanks for the answer of my earlier question. (By Maurice). I would like to know if there is an easy way to make a x-window application using gpc. Do I have to use "external" and in that way use the C generated libraries? Then I also need to create a lot of records that resembles the structs normally used when doing this in C? Or is there a "header file" usable from gpc, so I dont have to rewrite all that is in Xlib.h? best regards /Anders

3 6

Sqrt problem
by Silvio a Beccara 31 Aug '03

31 Aug '03

Hi everybody, I get a 'argument to `SqRt' is < 0' error. I have checked that the argument is never < 0, so I don't understand why I should get this error (if I comment the sqrt instruction, though, the error goes away!). Also by using the -g option and gdb, I don't get any more information. Can anybody help me, possibly by suggesting some other debug option/method? Thanks Silvio a Beccara - Cornell University - USA

3 3

external name problems
by Anders Lindén 30 Aug '03

30 Aug '03

Hello! My compiler revokes the following line: procedure Sov(i: integer); external name 'Sov'; with: crttest.pas:12: parse error before `Name' I have tried different switches to the gpc command without success! Output from gpc --version: 20020910, based on gcc-2.95.4 20011002 (Debian prerelease) Output from another computer with a different version, having the same result: 2.8.1 best regards /Anders LindÃ©n

2 1

Re: [churchgrowthideas] Marian McQuade Nat. Grandparents Day
by Rick Hake 29 Aug '03

29 Aug '03

Jorge, your suggestion is a great one. A few years back I worked in a nursing home, and in ours we had a ministry group that came in on Sunday morning, however the home would have permitted more groups to come in as long as times didn't conflict with other groups or meal times. The nursing home down the road from us couldn't find someone to conduct Sunday services. Our home also permitted room to room visits by visting minister(s). You will find a very receptive audience in nursing homes. You need to be sensitive enough to realize that these folks come from a variety of different faiths, and yet not to sensitive so you aren't offended when one tells you to get out. Some of these folks harbor deep seated resentment towards God for allowing them to finish up life in a nursing home. You will not run into this often, but be prepared. If you do run into one graciously leave, add them to your prayer list, and by all means try to see them next week. After they see you enough they may just open their heart to you. All in all, my advice would be let the Holy Spirit lead you, and go love these precious souls who are sitting on the doorstep to eternity. One final tip offering - There are those who are alive, but don't appear to be on the same planet. Mentally they are gone. Minister to them anyway remembering that Gods Word never returns void. May God go with you & Bless you who would minister love to the unlovely. Rick Hake _________________________________________________________________ MSN 8: Get 6 months for $9.95/month http://join.msn.com/?page=dept/dialup ------------------------ Yahoo! Groups Sponsor ---------------------~--> Buy Ink Cartridges or Refill Kits for Your HP, Epson, Canon or Lexmark Printer at Myinks.com. Free s/h on orders $50 or more to the US & Canada. http://www.c1tracking.com/l.asp?cid=5511 http://us.click.yahoo.com/l.m7sD/LIdGAA/qnsNAA/8QUslB/TM ---------------------------------------------------------------------~-> The Church Growth Ideas list is intended to help members churches grow in attendance. Pastors and lay leaders are welcome to contribute. To subscribe send an e-mail to: churchgrowthideas-subscribe(a)yahoogroups.com or go to http://www.yahoogroups.com/subscribe.cgi/churchgrowthideas To Unsubscribe send an e-mail to: churchgrowthideas-unsubscribe(a)yahoogroups.com Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/

1 0

[churchgrowthideas] Reminder - Explore our features
by churchgrowthideas＠yahoogroups.com 28 Aug '03

28 Aug '03

------------------------ Yahoo! Groups Sponsor ---------------------~--> Buy Ink Cartridges or Refill Kits for Your HP, Epson, Canon or Lexmark Printer at Myinks.com. Free s/h on orders $50 or more to the US & Canada. http://www.c1tracking.com/l.asp?cid=5511 http://us.click.yahoo.com/l.m7sD/LIdGAA/qnsNAA/8QUslB/TM ---------------------------------------------------------------------~-> We would like to remind you of this upcoming event. Explore our features Date: Thursday, August 28, 2003 Time: All Day This is not just an email list. It also has a web site component. Some of you may wish to contribute. Here are some ideas. You may search the archives by thread or topic. Go to messages and use the search engine. If you are interested in finances type it in and boom it saves looking thru all the archives. What a great tool. I just found it. There is a links section where you can add a link for all the members of the list. You may have a favorite site that you check regularly or you would like to recommend to our group. There is also a calendar feature. You may want to add a favorite conference you attend and plan to meet some of your fellow forumites there. There is a photo section where you can add photos of you or your ch or some aspect of your ministry you wish to showcase. Feel free to make use of it. There is also a section for shared files. If you have a long attachment youd like to send to the list but dont want to burden everyone with it this is a perfect place to put it. Then post a message to the list that it is there so interested parties may access it. There is even a poll section where you can design a poll and poll your fellow forumites. Just let em know it is there and invite them to participate. There is even a chat room and place for databases to be added. Hope youll take advantage of all these functions to make our community more vibrant. To access all these features go to yahoo then select my groups and then churchgrowhtideas. Youll see the various options listed on the left hand margin. Enjoy. Your moderator. WANNA HELP YOUR CHURCH GROW? COMPARE NOTES WITH OTHER CHRISTIANS/PASTORS? http://www.yahoogroups.com/subscribe/churchgrowthideas churchgrowthlist churchgrowthideas-subscribe(a)yahoogroups.com ITS FREEEEEEEEEE TRY THE DIGESTED VERSION __________________________________________________________ WANNA SEE OUR BEAGLES? http://www.louisiana.com/newlook/webpage.cfm?content=featurepage&id=1000882… my webs The Church Growth Ideas list is intended to help members churches grow in attendance. Pastors and lay leaders are welcome to contribute. To subscribe send an e-mail to: churchgrowthideas-subscribe(a)yahoogroups.com or go to http://www.yahoogroups.com/subscribe.cgi/churchgrowthideas To Unsubscribe send an e-mail to: churchgrowthideas-unsubscribe(a)yahoogroups.com Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/

1 0

newcomer, first problem
by DOMINIQUE THILLAUD 27 Aug '03

27 Aug '03

Hello, I'm teacher at the Université de Nice and intend to use Pascal as a supporting language in the course of basic algorithmic (first semester, first year, introduction to computer science, about 700 students). Last year I used Java in this course, a language too difficult for beginners and I've won a small war to obtain the return of Pascal. Some technicians are working to install the language on the student's PC, but I'm not a PC-user nor a true specialist in OS and I need to have a version of Pascal at home to prepare examples and problems. I own a portable PowerMac G4 running with the version 10.2.6 of MacOSX, I have imported the installer gpc-33d6.pkg from your page and runned it. Apparently, no problem. With TextEdit (I don't have any other) I've written the famous hello.pas and tried to compile it : [hermes:~/Documents/Fac/Pascal] dominiqu% cat hello.pas program Hello (Output) ; begin WriteLn('Hello, world !') end. [hermes:~/Documents/Fac/Pascal] dominiqu% gpc hello.pas /var/tmp//ccZQLUHj.s:56:Parameter error: expression out of range (parameter 4) And I'm strictly unable to understand what is hapening. 1) could someone gives any help ? 2) I would need a syntactically adapted text editor, the simplest as possible (to install and use it) because I'm not a developper and I've a very few knowledge of the Unix system (strictly speaking, I'm not a computer scientist but a teacher firstly specialized in mathematics and linguistics) : what would be the better choice ? Best regards, Dominique PS : sorry for my bad use of English language.

3 2

Re: newcomer, first problem
by Tom Verhoeff 27 Aug '03

27 Aug '03

> I'm teacher at the Université de Nice and intend to use Pascal as a >supporting language in the course of basic algorithmic (first semester, >first year, introduction to computer science, about 700 students). Last >year I used Java in this course, a language too difficult for beginners >and I've won a small war to obtain the return of Pascal. Congratulations. We never switched to Java, and still do Pascal in the first year (mostly using Delphi; but on our evaluation server we compile programs with FreePascal on a Linux box). > Some technicians are working to install the language on the student's >PC, but I'm not a PC-user nor a true specialist in OS and I need to >have a version of Pascal at home to prepare examples and problems. > I own a portable PowerMac G4 running with the version 10.2.6 of >MacOSX, I have imported the installer gpc-33d6.pkg from your page and >runned it. Apparently, no problem. > With TextEdit (I don't have any other) I've written the famous >hello.pas and tried to compile it : > >[hermes:~/Documents/Fac/Pascal] dominiqu% cat hello.pas >program Hello (Output) ; > >begin > WriteLn('Hello, world !') >end. >[hermes:~/Documents/Fac/Pascal] dominiqu% gpc hello.pas >/var/tmp//ccZQLUHj.s:56:Parameter error: expression out of range >(parameter 4) > > And I'm strictly unable to understand what is hapening. > >1) could someone gives any help ? A similar program works fine on my PowerBook G4 (OS X 10.2.6 w/ gpc-33d6; I also have the developer tools (December 2002 version) installed). I named it hello.p and compiled it with `gpc -o hello hello.p' and it prints 'Hello, Tom!'; otherwise exactly the same. >From the error message it appears that the assembly output of the compiler (the *.s file) is wrong and fails to assemble (error in line 56). What if you leave out `(Output)' in the header? >2) I would need a syntactically adapted text editor, the simplest as >possible (to install and use it) because I'm not a developper and I've >a very few knowledge of the Unix system (strictly speaking, I'm not a >computer scientist but a teacher firstly specialized in mathematics and >linguistics) : what would be the better choice ? I use BBEdit; it does syntax highlighting for Pascal; you can also use the less expensive TextWrangler (both from Bare Bones Software); they easily let you switch between line-ending conventions (Unix, DOS, Mac): <http://www.barebones.com/> or I use `vi' on the commandline (in a Terminal window); `vi' is part of the standard distribution under OS X. Tom

1 0

Online Demo against Software Patents
by Eike Lange 27 Aug '03

27 Aug '03

Hi Folks! I'd like to replace the index page of GRX and GPC with a small notice about the online demo. Please see http://www.ffii.org for an example. This page should last until thursday or friday of this week. Please feel free to contribute to this demo with your own websites. Are there any objections? Eike -- "Freie Software braucht Freie Dokumentation." Das GNU-Pascal Buch! http://www.gnu-pascal.de/~eike/

3 3

gpc-20030507 and cross-cygwin
by David Kredba 19 Aug '03

19 Aug '03

Hello, I am trying to build cross linux -> cygwin compiler with pascal language enabled. I am able to build complete gcc-3.3.1 with c,c++,objc,ada,f77,java and pascal-20030507 (the three patches to get gpc-20030507 working with gcc-3.3 applied) languages enabled. The cross compiler fails under rts : .... cd ../../gcc-3.3.1/gcc/p/rts && make -f Makefile.in srcdir=. GCC_VERSION="3.3.1" SHELL="/bin/sh" CFLAGS="-g -O2" PFLAGS="" AR="i686-pc-cygwin-ar" AR_FLAGS="rc" RANLIB="i686-pc-cygwin-ranlib" RANLIB_TEST="[ -f i686-pc-cygwin-ranlib ] || ( [ "i686-pc-linux-gnu" = "i686-pc-cygwin" ] && [ -f /usr/bin/ranlib -o -f /bin/ranlib ] )" RTSFLAGS="" DESTDIR="../.." generated-files make[2]: Entering directory `/home/dave/cygwin/gcc-3.3.1/gcc/p/rts' make[2]: Nothing to be done for `generated-files'. make[2]: Leaving directory `/home/dave/cygwin/gcc-3.3.1/gcc/p/rts' cd ../../gcc-3.3.1/gcc/p/rts && make -f Makefile.in srcdir=. GCC_VERSION="3.3.1" SHELL="/bin/sh" CFLAGS="-g -O2" PFLAGS="" AR="i686-pc-cygwin-ar" AR_FLAGS="rc" RANLIB="i686-pc-cygwin-ranlib" RANLIB_TEST="[ -f i686-pc-cygwin-ranlib ] || ( [ "i686-pc-linux-gnu" = "i686-pc-cygwin" ] && [ -f /usr/bin/ranlib -o -f /bin/ranlib ] )" RTSFLAGS="" DESTDIR="../.." generated-files make[2]: Entering directory `/home/dave/cygwin/gcc-3.3.1/gcc/p/rts' make[2]: Nothing to be done for `generated-files'. make[2]: Leaving directory `/home/dave/cygwin/gcc-3.3.1/gcc/p/rts' ../../gcc-3.3.1/gcc/p/script/mkdir-p p/rts src=`cd ../../gcc-3.3.1/gcc && pwd` && \ cd ./p/rts && \ CC="`echo /home/dave/cygwin/gcc-3.3.1-build/gcc/xgcc -B/home/dave/cygwin/gcc-3.3.1-build/gcc/ -B/home/dave/xcygwin-gcc-3.3.1-bin-2.14/i686-pc-cygwin/bin/ -B/home/dave/xcygwin-gcc-3.3.1-bin-2.14/i686-pc-cygwin/lib/ -isystem /home/dave/xcygwin-gcc-3.3.1-bin-2.14/i686-pc-cygwin/include' ' | sed -e 's,$-[BI]$$[^/][^:]$,\1../../\2,g;s,^$[^/][^:]*/$,../../\1,'`" PC="`echo ./xgpc -B./' ' | sed -e 's,$-[BI]$$[^/][^:]$,\1../../\2,g;s,^$[^/][^:]*/$,../../\1,'`" CONFIG_SITE=nonexisting-file \ $src/p/rts/configure --silent > /dev/null --srcdir=$src/p/rts \ `if [ x@with_shared@ = xyes ]; then echo '--with-shared'; fi` cd ./p/rts && make CC="`echo /home/dave/cygwin/gcc-3.3.1-build/gcc/xgcc -B/home/dave/cygwin/gcc-3.3.1-build/gcc/ -B/home/dave/xcygwin-gcc-3.3.1-bin-2.14/i686-pc-cygwin/bin/ -B/home/dave/xcygwin-gcc-3.3.1-bin-2.14/i686-pc-cygwin/lib/ -isystem /home/dave/xcygwin-gcc-3.3.1-bin-2.14/i686-pc-cygwin/include' ' | sed -e 's,$-[BI]$$[^/][^:]$,\1../../\2,g;s,^$[^/][^:]*/$,../../\1,'`" PC="`echo ./xgpc -B./' ' | sed -e 's,$-[BI]$$[^/][^:]$,\1../../\2,g;s,^$[^/][^:]*/$,../../\1,'`" GCC_VERSION="3.3.1" SHELL="/bin/sh" CFLAGS="-g -O2" PFLAGS="" AR="i686-pc-cygwin-ar" AR_FLAGS="rc" RANLIB="i686-pc-cygwin-ranlib" RANLIB_TEST="[ -f i686-pc-cygwin-ranlib ] || ( [ "i686-pc-linux-gnu" = "i686-pc-cygwin" ] && [ -f /usr/bin/ranlib -o -f /bin/ranlib ] )" RTSFLAGS="" DESTDIR="../.." all make[2]: Entering directory `/home/dave/cygwin/gcc-3.3.1-build/gcc/p/rts' echo '{ rts-config.inc. Generated automatically from rts-config.h. }' > rts-config.inc sed -e 's,/\*,{,g;s,\*/,},g;s,^[ \t]*#$.*$,{$\1},' rts-config.h >> rts-config.inc ../.././xgpc -B../.././ -I. -W -Wall -Wpointer-arith -Wwrite-strings -Wmissing-prototypes -Wmissing-declarations -g -O2 --unit-path=/home/dave/cygwin/gcc-3.3.1/gcc/p/rts --automake --print-needed-options "/home/dave/cygwin/gcc-3.3.1/gcc/p/rts/endian.pas" 2> "needed-options" || true if grep -v '^--' "needed-options" > /dev/null; then echo "needed-options: `cat "needed-options"`" >&2; rm -f "needed-options"; false; else true; fi /home/dave/cygwin/gcc-3.3.1-build/gcc/xgcc -B/home/dave/cygwin/gcc-3.3.1-build/gcc/ -B/home/dave/xcygwin-gcc-3.3.1-bin-2.14/i686-pc-cygwin/bin/ -B/home/dave/xcygwin-gcc-3.3.1-bin-2.14/i686-pc-cygwin/lib/ -isystem /home/dave/xcygwin-gcc-3.3.1-bin-2.14/i686-pc-cygwin/include -c -I. -W -Wall -Wpointer-arith -Wwrite-strings -Wmissing-prototypes -Wmissing-declarations -g -O2 /home/dave/cygwin/gcc-3.3.1/gcc/p/rts/rts.c /home/dave/cygwin/gcc-3.3.1/gcc/p/rts/rts.c:633: warning: `struct stat64' declared inside parameter list /home/dave/cygwin/gcc-3.3.1/gcc/p/rts/rts.c:633: warning: its scope is only this definition or declaration, which is probably not what you want /home/dave/cygwin/gcc-3.3.1/gcc/p/rts/rts.c:636: warning: `struct stat64' declared inside parameter list /home/dave/cygwin/gcc-3.3.1/gcc/p/rts/rts.c:639: warning: `struct stat64' declared inside parameter list /home/dave/cygwin/gcc-3.3.1/gcc/p/rts/rts.c: In function `_p_UnixTimeToTime': /home/dave/cygwin/gcc-3.3.1/gcc/p/rts/rts.c:1001: error: wrong type argument to unary minus make[2]: *** [rts.o] Error 1 make[2]: Leaving directory `/home/dave/cygwin/gcc-3.3.1-build/gcc/p/rts' make[1]: *** [pascal.rts] Error 2 make[1]: Leaving directory `/home/dave/cygwin/gcc-3.3.1-build/gcc' make: *** [all-gcc] Error 2 Gcc v. 3.3.1 is used as compiler : gcc -v Reading specs from /usr/local/gcc-3.3.1/lib/gcc-lib/i686-pc-linux-gnu/3.3.1/specs Configured with: ../gcc-3.3.1/configure --prefix=/usr/local/gcc-3.3.1 --enable-shared --enable-threads=posix --disable-checking --enable-long-long --enable-__cxa_atexit --enable-languages=c,c++,ada,f77,objc,java,pascal --with-system-zlib Thread model: posix gcc version 3.3.1 I am using binutils-2.14, cygwin-1.3.22-1 and w32api-2.3-1. Configure for binutils : ../binutils-2.14/configure --prefix=/home/dave/xcygwin-gcc-3.3.1-bin-2.14 --target=i686-pc-cygwin Configure for gcc : ../gcc-3.3.1/configure --prefix=/home/dave/xcygwin-gcc-3.3.1-bin-2.14 --with-gnu-as --with-gnu-ld --with-newlib --disable-nls --enable-sljl-exceptions --enable-languages=c,c++,objc,f77,pascal --with-headers=/home/dave/xcygwin-gcc-3.3.1-bin-2.14/include --target=i686-pc-cygwin Any suggestions ? Thanks, David

4 9

solaris test results with gcc-3.3.1
by Waldek Hebisch 19 Aug '03

19 Aug '03

I just sucessfuly build gpc-20030507 with gcc-3.3.1. Before the build I applied the following patch to gpc-20030507: --- gpc-20030507.orig/p/declarations.c Sat May 3 17:24:08 2003 +++ gpc-20030507/p/declarations.c Sun May 11 22:45:49 2003 @@ -404,7 +404,9 @@ if (block) TREE_USED (block) = 1; +#ifndef GCC_3_3 free (level); +#endif return block; } --- gpc-20030507.orig/p/predef.c Fri May 2 11:40:33 2003 +++ gpc-20030507/p/predef.c Fri May 16 11:13:05 2003 @@ -275,7 +275,7 @@ if (TYPE_NAME (type)) type = build_type_copy ((orig = type)); TYPE_NAME (type) = decl = build_decl (TYPE_DECL, id, type); - DECL_ORIGINAL_TYPE (decl) = orig; + DECL_ORIGINAL_TYPE (decl) = NULL_TREE; } } if (kind == bk_special_syntax || kind == bk_routine) --- gpc-20030507.orig/p/utils/mk-t-inc Sat May 17 14:27:28 2003 +++ gpc-20030507/p/utils/mk-t-inc Sat May 17 14:28:27 2003 @@ -82,6 +82,6 @@ cat "$GCCDIR/tree.def" echo 'DEFTREECODE (LAST_AND_UNUSED_C_TREE_CODE, "unused", "x", 0)' sed -e '/#else/,/#endif/d' "$GCCDIR/p/p-tree.def" -} | sed -ne '/^DEFTREECODE/{s,/\*.*\*/,,;p;}' +} | sed -ne '/^DEFTREECODE/{s,/\*.*\*/,,;s/["'"'"']x["'"'"'].*/"x", 0)/;p;}' } > "$2" || { rm -f "$2"; false; } Test results (from make pascal.check-long, passing tests omited and slightly edited to save space): GPC-TEST-BEGIN ========================== TEST agettext2test.pas: SKIPPED: could not set locale `de_DE' TEST asmtest.pas: SKIPPED: only for IA32 TEST asmtest2.pas: SKIPPED: only for IA32 TEST asmtest3.pas: SKIPPED: only for IA32 TEST crttest.pas: SKIPPED: no curses library found TEST dario.pas: SKIPPED: only for IA32 TEST environo.pas: SKIPPED: setenv not present in libc TEST fay.pas: 1d0 < mprotect of trampoline code: Not enough space failed TEST fjf165a.pas: SKIPPED: German locale not installed TEST fjf480a.pas: SKIPPED: librx not installed TEST fjf480b.pas: SKIPPED: librx not installed TEST fjf512.pas: /dom/n/k/hebisch/gcc/gpc-20030507/p/test/fjf512.pas: In main program: /dom/n/k/hebisch/gcc/gpc-20030507/p/test/fjf512.pas:31: internal compiler error: Segmentation Fault Please submit a full bug report, with preprocessed source if appropriate. See <URL:http://gcc.gnu.org/bugs.html> for instructions. failed TEST fjf582.pas: /dom/n/k/hebisch/gcc/gpc-20030507/p/test/fjf582.pas: In main program: /dom/n/k/hebisch/gcc/gpc-20030507/p/test/fjf582.pas:107: warning: statement with no effect <many identical lines snipped> failed TEST gmptest.pas: SKIPPED: libgmp not installed TEST goto4.pas: /dom/n/k/hebisch/gcc/gpc-20030507/p/test/goto4.pas: In main program: /dom/n/k/hebisch/gcc/gpc-20030507/p/test/goto4.pas:15: internal compiler error: Segmentation Fault Please submit a full bug report, with preprocessed source if appropriate. See <URL:http://gcc.gnu.org/bugs.html> for instructions. failed TEST jj5.pas: SKIPPED: `attribute (stdcall)' not available TEST knuth1.pas: mprotect of trampoline code: Not enough space OK TEST knuth3.pas: /dom/n/k/hebisch/gcc/gpc-20030507/p/test/knuth3.pas: In main program: /dom/n/k/hebisch/gcc/gpc-20030507/p/test/knuth3.pas:14: internal compiler error: Segmentation Fault Please submit a full bug report, with preprocessed source if appropriate. See <URL:http://gcc.gnu.org/bugs.html> for instructions. failed TEST longr2.pas: SKIPPED: no LongReal math routines available TEST math.pas: /dom/n/k/hebisch/gcc/gpc-20030507/p/test/math.pas: In main program: /dom/n/k/hebisch/gcc/gpc-20030507/p/test/math.pas:102: internal compiler error: Segmentation Fault Please submit a full bug report, with preprocessed source if appropriate. See <URL:http://gcc.gnu.org/bugs.html> for instructions. failed TEST nonlocgoto.pas: /dom/n/k/hebisch/gcc/gpc-20030507/p/test/nonlocgoto.pas: In procedure `lvl1': /dom/n/k/hebisch/gcc/gpc-20030507/p/test/nonlocgoto.pas:20: internal compiler error: Segmentation Fault Please submit a full bug report, with preprocessed source if appropriate. See <URL:http://gcc.gnu.org/bugs.html> for instructions. failed TEST regextest.pas: SKIPPED: librx not installed ========================== GPC-TEST-END make[1]: Leaving directory `/dom/n/k/hebisch/gcc/gcc-sol/gcc/p/test' -- Waldek Hebisch hebisch(a)math.uni.wroc.pl or hebisch(a)hera.math.uni.wroc.pl

3 4

Re: build w/ gcc-3.3.1
by Russell Whitaker 19 Aug '03

19 Aug '03

On Sun, 17 Aug 2003, Waldek Hebisch wrote: > Russell Whitaker wrote: > > [..] > > It looks that you have not applied the patch that I posted (see for > example my first message about Solaris test results). Without the patch > the build is known to fail. The patch fixes both problems you met. > Thank you. Once I found the right patch (the one that patches 3 files instead of 2) got this: Reading specs from /usr/local/lib/gcc-lib/i686-pc-linux-gnu/3.3.1/specs Configured with: ../gcc-3.3.1/configure --enable-languages=pascal --enable-threads=posix --enable-__cxa_atexit : (reconfigured) ../gcc-3.3.1/configure --enable-languages=pascal --enable-threads=posix : (reconfigured) ../gcc-3.3.1/configure --enable-languages=pascal --enable-threads=posix : (reconfigured) ../gcc-3.3.1/configure --enable-languages=pascal --enable-threads=posix --enable-__cxa_atexit Thread model: posix gpc version 20030507, based on gcc-3.3.1 with this test results: TEST fjf480a.pas: SKIPPED: librx not installed TEST fjf480b.pas: SKIPPED: librx not installed TEST fjf582.pas: ./fjf582.pas: In main program: ./fjf582.pas:107: warning: statement with no effect [..] failed TEST regextest.pas: SKIPPED: librx not installed # of GPC tests 3594 # of GPC tests passed 3590 # of GPC tests skipped 3 # of GPC tests failed 1 The test that failed - is that a bug in gpc, gcc or the test itself? Russ

2 1

Line Endings
by Frank D. Engel, Jr. 17 Aug '03

17 Aug '03

Based on a discussion taking place in another thread, I created a little program to help me test for mixed line endings in my source files; just thought I'd give it here in case it would help anyone else. Consider it public domain, no warranty, etc. To use it, just compile (with GPC), then give it as command line arguments the name(s) of the text file(s) to be tested. For example: bash-2.05a$ ./countem countem.pas countem.pas --------------------- CRLF: 0 CR : 0 LF : 59 bash-2.05a$ I just thought someone might find this useful. No external dependencies, written and tested under MacOS X, but should just work in virtually any GPC-supported environment. ===== ======= Frank D. Engel, Jr. Modify the equilibrium of the vertically-oriented particle decelerator to result in the reestablishment of its resistance to counterproductive atmospheric penetration. __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free, easy-to-use web site design software http://sitebuilder.yahoo.com

5 11

build w/ gcc-3.3.1
by Russell Whitaker 17 Aug '03

17 Aug '03

gcc-3.2.2 works so well (gpc 3 skip, 0 errs) thought I'd try gcc-3.3.1 For setup, untared the 2 tar files, etc. In dir diffs: ln -s gcc-3.3.diff gcc-3.3.1.diff In dir build: ../gcc-3.3.1/configure --enable-languages=pascal --enable-threads=posix --enable-__cxa_atexit So far, so good. Thought I'd be a little cautious so make PFLAGS=-gstabs 2> errmsgs and the result: make[1]: Circular libgcc.a <- pascal dependency dropped. In file included from /usr/local/src/gpc-20030507-3.3.1/gcc-3.3.1/gcc/p/utils/gpidump.pas:52: ./tree.inc: In procedure `ProcessFile': ./tree.inc:115: error: undeclared identifier `LANG_HOOKS_IDENTIFIER_SIZE' (first use in this routine) ./tree.inc:115: error: (Each undeclared identifier is reported only once ./tree.inc:115: error: for each routine it appears in.) ./tree.inc:115: error: undeclared identifier `struct' (first use in this routine) ./tree.inc:115: error: parse error before `tree_common' ./tree.inc:115: error: invalid structured initializer ./tree.inc:115: error: invalid structured initializer ./tree.inc:115: error: invalid structured initializer ./tree.inc:115: error: invalid structured initializer ./tree.inc:115: error: invalid structured initializer ./tree.inc:115: error: invalid structured initializer ./tree.inc:115: error: invalid structured initializer ./tree.inc:115: error: missing separator ./tree.inc:115: error: parse error before `/' ./tree.inc:115: error: undeclared identifier `tree' (first use in this routine) ./tree.inc:115: error: missing separator ./tree.inc:115: error: parse error before `)' /usr/local/src/gpc-20030507-3.3.1/gcc-3.3.1/gcc/p/utils/gpidump.pas:34: warning: `Verbose' defined but not used /usr/local/src/gpc-20030507-3.3.1/gcc-3.3.1/gcc/p/utils/gpidump.pas:34: warning: `Hex' defined but not used make[2]: *** [gpidump] Error 1 make[1]: *** [pascal.utils] Error 2 make: *** [all-gcc] Error 2 Next, tried: make clean ; make 2> errmsgs1 and the last 8 lines of errmsgs1: /usr/local/src/gpc-20030507-3.3.1/gcc-3.3.1/gcc/p/rts/file.c: In function `_p_Read_Word': /usr/local/src/gpc-20030507-3.3.1/gcc-3.3.1/gcc/p/rts/file.c:2293: warning: dereferencing type-punned pointer will break strict-aliasing rules /usr/local/src/gpc-20030507-3.3.1/gcc-3.3.1/gcc/p/rts/numtodec.pas:113: internal compiler error: in dwarf2out_finish, at dwarf2out.c:12671 Please submit a full bug report, with preprocessed source if appropriate. See <URL:http://gcc.gnu.org/bugs.html> for instructions. make[2]: *** [numtodec.o] Error 1 make[1]: *** [pascal.rts] Error 2 make: *** [all-gcc] Error 2 Hopes this helps, Russ

1 0

Re: solaris test results with gcc-3.3.1
by Waldek Hebisch 16 Aug '03

16 Aug '03

Sorry for additional message. I forgot to say that I gave configure options: --enable-languages=c,pascal --disable-shared I first tried without --disable-shared and the build failed when linking libgcc.a. The final message is: /usr/local/sparc-sun-solaris2.6/bin/ld:libgcc/./libgcc.map:1: parse error I am using GNU binutils 2.13.1. -- Waldek Hebisch hebisch(a)math.uni.wroc.pl or hebisch(a)hera.math.uni.wroc.pl

2 2

`Val' function problems
by Mirsad Todorovac 16 Aug '03

16 Aug '03

Hi! We spoke earlier about the problem with ec in Val (source, x, ec) function, and Frank said it will be fixed in next release (it's exhibited again in '12#11invalid'). Consider the following second problem that `Val' returns '0' if he finds more than one non-digit character in `source' string. If there's only one or zero erroneous digits at the end of number, `Val' converts the number to `x'. 1. Does Borland Pascal do teh same, or is it a GPC bug? 2. Is the base prefix a GNU Pascal extension, or is it present in BP too (relevant for docs page)? 3. Val ('$100000000, x, ec) gives x := 0; ec := 0; There seem to be no indication of overflow error in this case. Thanks, Mirsad program val; uses GPC; var i, ec: Integer; s : String; begin repeat ReadLn (s); Val (s, i, ec); WriteLn (i, ' ', ec); until i = 1000 end. bash-2.05b$ gpc --automake val.pas val.pas:4: warning: missing string capacity -- assuming 255 bash-2.05b$ a.out 12#11 13 0 12#11invalid 0 7 16#ffffg 65535 8 12#11c 13 6 12#11i 13 6 12#11in 0 7 12#11cc 0 7 $ffff 65535 0 $ffffg 65535 6 $ffffgg 0 7 $ffffffff -1 0 16#ffffffff -1 0 $100000000 0 0 -- "I have a dream!" -- Martin Luther King Jr.

5 11

patch
by Mehdi Khaldi 15 Aug '03

15 Aug '03

How to get a patch for gcc-3.2 core? If I use gcc3.2.1 core, my installation would fail. So I try to use gcc-3.2 which is more stable.

2 1

installation on solaris
by Mehdi Khaldi 14 Aug '03

14 Aug '03

Hi, I'm trying to install gpc20030209 version on solaris7. But, when the compiler processes with pascal units, I get this message ../.././xgpc -B../.././ -I../.././p/rts -c -I. -W -Wall -Wpointer-arith -Wwrite-strings -Wmissing-prototypes -Wmissing-declarations -g -O2 --unit-path=/Home/Users/mkhaldi/workspace/gcc-3.2.1/gcc/p/rts --automake `cat needed-options` -DRTS_RELEASE_STRING="'`cat /Home/Users/mkhaldi/workspace/gcc-3.2.1/gcc/p/rts/rts-version`'" -DGCC_VERSION="'3.2.1'" /Home/Users/mkhaldi/workspace/gcc-3.2.1/gcc/p/rts/string.pas --------------------------------------------------------------------------- /Home/Users/mkhaldi/workspace/gcc-3.2.1/gcc/p/rts/string.pas: In function `NewString': /Home/Users/mkhaldi/workspace/gcc-3.2.1/gcc/p/rts/string.pas:674: internal error: Segmentation Fault ---------------------------------------------------------------------------- I don't understand because I installed the same version on alpha with success!! I'm using the gcc-3.2.1 core

2 1

(no subject)
by Mehdi Khaldi 13 Aug '03

13 Aug '03

Why do I get a xxx-all.gpi file with my xxx.gpi file?

2 1

--pedantic (was --param)
by Adriaan van Os 13 Aug '03

13 Aug '03

Frank Heckenbach wrote: > Try this patch The --param patch works, thanks. > (please test with various options and in various > situations). That is a risky thing to ask ... I was just busy putting "all" options on, when I found this: [G4:~/gnu/testgpc/adriaan] adriaan% cat pedantic.pas program pedantic; const knil=nil; type double_t=double; begin end. [G4:~/gnu/testgpc/adriaan] adriaan% gpc -c pedantic.pas --gnu-pascal --pedantic pedantic.pas:2: error: ISO 7185 Pascal allows only simple constants pedantic.pas:3: error: ISO 7185 Pascal does not allow underscores in identifiers This may not be correct (for all other non ISO features a warning is given, not an error). Some results for other dialects: [G4:~/gnu/testgpc/adriaan] adriaan% gpc -c pedantic.pas --borland-pascal --pedantic pedantic.pas:2: error: ISO 7185 Pascal allows only simple constants [G4:~/gnu/testgpc/adriaan] adriaan% gpc -c pedantic.pas --mac-pascal --pedantic pedantic.pas:2: error: ISO 7185 Pascal allows only simple constants pedantic.pas:3: error: unknown identifier `double' [G4:~/gnu/testgpc/adriaan] adriaan% gpc -c pedantic.pas --ucsd-pascal --pedantic pedantic.pas:2: error: ISO 7185 Pascal allows only simple constants pedantic.pas:3: error: unknown identifier `double' [G4:~/gnu/testgpc/adriaan] adriaan% gpc -c pedantic.pas --delphi-pascal --pedantic pedantic.pas:2: error: ISO 7185 Pascal allows only simple constants pedantic.pas:3: error: ISO 7185 Pascal does not allow underscores in identifiers [I wonder if the feature of restricting language constructs with dialect options is worth the trouble maintaining it, except, of course, for both ISO standards, but, since the feature is there, I report whatever I find]. Regards, Adriaan van Os

2 1

TCP/IP in gpc
by "Nick Ioffe 13 Aug '03

13 Aug '03

Hello, gentlemen! Are there any modules for GPC which allow me to implement IPC with sockets? I know that I can write such a library in C and then create it as pascal library, but why to invent the wheel? Thank you in advance, Nick

3 5

Question solaris vs alpha
by Mehdi Khaldi 12 Aug '03

12 Aug '03

I have a small program : --------------------- Module MODULE interface; export MODULE = (DoJob); PROCEDURE DoJob; end. -------------------------- "gpc -v" on Solaris gives : Reading specs from /usr/local/lib/gcc-lib/sparc-sun-solaris2.6/2.95.2/specs gpc version 2.1 (20020510), based on 2.95.2 19991024 (release) -------------------------- I get this error: ./src/module.p:1: parse error before `Module' ------------------------------------------------- But on my alpha plateform, I have got no problem. "Gpc -v" on Alpha gives : Reading specs from /usr/local/lib/gcc-lib/alphaev6-unknown-linux-gnu/3.2.1/specs Configured with: /home/developpement/users/mkhaldi/gcc-3.2.1/configure --enable-languages=pascal Thread model: posix gpc version 20030209, based on gcc-3.2.1 What is wrong? Is my solaris gpc is too old? Thanks

2 1

Re: TCP/IP in gpc
by Frank Heckenbach 12 Aug '03

12 Aug '03

> I've seen it, but what is the bz2 extension? > > How should I decompress it on HP or Windows? http://sources.redhat.com/bzip2/ Frank -- Frank Heckenbach, frank(a)g-n-u.de http://fjf.gnu.de/ GnuPG and PGP keys: http://fjf.gnu.de/plan (7977168E)

1 0

--setlimit
by Adriaan van Os 12 Aug '03

12 Aug '03

Sorry, I am systematically trying out all available compiler options, this time --setlimit ... [G4:~/gnu/testgpc/adriaan] adriaan% cat setlimit.pas program setlimit; type intset = set of integer; bigset = set of 0..100000; begin writeln( 'SizeOf( set of integer) = ', SizeOf( intset)); writeln( 'SizeOf( bigset) = ', SizeOf( bigset)); end. [G4:~/gnu/testgpc/adriaan] adriaan% gpc -o setlimit setlimit.pas setlimit.pas:2: warning: constructing limited integer set `-2147483648 .. -2147483393'; setlimit.pas:2: warning: use `--setlimit=NUMBER' to change the size limit at compile time. setlimit.pas:3: warning: constructing limited integer set `0 .. 255'; setlimit.pas:3: warning: use `--setlimit=NUMBER' to change the size limit at compile time. The second warning is correct, the first a bit misleading, as it suggests construction of a very large set ... [G4:~/gnu/testgpc/adriaan] adriaan% ./setlimit SizeOf( set of integer) = 32 SizeOf( bigset) = 32 ... but both sets have regular sizes. The --setlimit argument changes the upper limit of the sets ... [G4:~/gnu/testgpc/adriaan] adriaan% gpc -o setlimit setlimit.pas --setlimit=10000 setlimit.pas:2: warning: constructing limited integer set `-2147483648 .. -2147473649'; setlimit.pas:2: warning: use `--setlimit=NUMBER' to change the size limit at compile time. setlimit.pas:3: warning: constructing limited integer set `0 .. 9999'; setlimit.pas:3: warning: use `--setlimit=NUMBER' to change the size limit at compile time. ... but the warning is the same. The set sizes are correct: [G4:~/gnu/testgpc/adriaan] adriaan% ./setlimit SizeOf( set of integer) = 1252 SizeOf( bigset) = 1252 However, there seems to be a problem with the implementation ... [G4:~/gnu/testgpc/adriaan] adriaan% cat setlimit2.pas program setlimit2; type intset = set of integer; bigset = set of 0..100000; const i: intset = [ - 1]; b: bigset = [ 100000]; begin end. This produces an internal compiler error when used with --setlimit ... [G4:~/gnu/testgpc/adriaan] adriaan% gpc -o setlimit2 setlimit2.pas --setlimit=1000000000 setlimit2.pas:2: warning: constructing limited integer set `-2147483648 .. -1147483649'; setlimit2.pas:2: warning: use `--setlimit=NUMBER' to change the size limit at compile time. setlimit2.pas:5: internal compiler error: Segmentation fault Please submit a full bug report, with preprocessed source if appropriate. See <URL:http://gcc.gnu.org/bugs.html> for instructions. Without --setlimit, the results are correct (the invalid set initializers are detected) [G4:~/gnu/testgpc/adriaan] adriaan% gpc -o setlimit2 setlimit2.pas setlimit2.pas:2: warning: constructing limited integer set `-2147483648 .. -2147483393'; setlimit2.pas:2: warning: use `--setlimit=NUMBER' to change the size limit at compile time. setlimit2.pas:3: warning: constructing limited integer set `0 .. 255'; setlimit2.pas:3: warning: use `--setlimit=NUMBER' to change the size limit at compile time. setlimit2.pas:5: error: invalid set initializer setlimit2.pas:6: error: invalid set initializer Regards, Adriaan van Os

3 3

Using uninitialized variable w/o warning
by Mirsad Todorovac 11 Aug '03

11 Aug '03

I+'m having an uninitialized string s1 used in ValBase(), and -Wuninitialized wouldn't work: bash-2.05b$ gpc --automake -Wall -O3 -Wuninitialized mir048d.pas bash-2.05b$ gpc --automake -Wall -O0 -Wuninitialized mir048d.pas gpc1: warning: -Wuninitialized is not supported without -O bash-2.05b$ bash-2.05b$ gpc --automake -Wall -O2 -Wuninitialized mir048d.pas bash-2.05b$ gpc --automake -Wall -O1 -Wuninitialized mir048d.pas program mir048d; {Integer2StringBase(), checking converted value} uses GPC; const NTestConvs = 2048; var x : LongInt; i, Base, Width, ec : Integer; s : String (4096); RandomSeed : Integer; procedure ValBase (s: String; var y: LongInt; ec: Integer; Base: Integer); var s1 : String (4096); begin if s[1] = '-' then s1 := '-' + Integer2String (Base) + '#' + s[2..Length (s)] else s1 := Integer2String (Base) + '#' + s1; {uninitialized s1 used here} Val (s1, y, ec); end; procedure TestConv (x : LongInt); var y : LongInt; begin for Base in [2, 3, 4, 7, 8, 9, 12, 13, 16, 24, 36] do { actually, only 2, 8, 16 are special } begin s := Integer2StringBase (x, Base); ValBase (s, y, ec, Base); if x <> y then begin WriteLn ('failed: value (x y) = (', x, '/', y, ')=', s); Halt end; if ec <> 0 then begin WriteLn ('failed: garbled characters at end: s = ', s); Halt end end end; begin RandomSeed := Random (MaxInt); SeedRandom (RandomSeed); Width := 0; for i := 1 to NTestConvs do begin x := Random ($ffffffff); TestConv (x); TestConv (-x); end; for i := 1 to NTestConvs do begin x := Random ($7fffffffffffffff); TestConv (x); TestConv (-x); end; TestConv (0); TestConv (-1); TestConv (-9223372036854775808); TestConv (9223372036854775807); WriteLn ('OK') end. -- "I have a dream!" -- Martin Luther King Jr.

2 1

--param
by Adriaan van Os 11 Aug '03

11 Aug '03

Yeah, a compiler argument again. There is something special with --param, --param exists, but -fparam obviously not. [G4:~/gnu/testgpc/adriaan] adriaan% gpc -c hello.pas --param ggc-min-heapsize=0 [G4:~/gnu/testgpc/adriaan] adriaan% gpc -c hello.pas -fparam ggc-min-heapsize=0 gpc: ggc-min-heapsize=0: No such file or directory gpc1: error: unrecognized option `-fparam' [G4:~/gnu/testgpc/adriaan] adriaan% gcc -c hello.c --param ggc-min-heapsize=0 [G4:~/gnu/testgpc/adriaan] adriaan% gcc -c hello.c -fparam ggc-min-heapsize=0 gcc: ggc-min-heapsize=0: No such file or directory cc1: error: unrecognized option `-fparam' The GCC docs list --param as "--param" where most other arguments are given in the "-f" form (the rationale behind it is unknown to me, I am just summing up the information I gathered). Now, here is the problem, --automake changes any "--" argument into a "-f" argument ... [G4:~/gnu/testgpc/test-20030507] adriaan% gpc --automake --debug-automake predef.pas --param ggc-min-heapsize=0 GPC automake: adding to automake temp file: #compiling: predefc.c GPC automake: gpc -fparam ggc-min-heapsize=0 -c predefc.c gpc: ggc-min-heapsize=0: No such file or directory cc1: error: unrecognized option `-fparam' GPC automake: done gpc1: gpc exited with status 1 I stubled into this while running the gpc testsuite with EXTRA_TEST_PFLAGS="--param ggc-min-expand=0 --param ggc-min heapsize=0" to stress-test ggc, the gcc garbage collector. Regards, Adriaan van Os

2 1

FW: Problem on solaris
by Mehdi Khaldi 11 Aug '03

11 Aug '03

Thanks, It is a problem because the compiler substitutes even after the keyword import! It shouldn't do this. Am I right? -----Original Message----- From: Frank Heckenbach [mailto:frank@g-n-u.de] Sent: Saturday, August 09, 2003 10:41 AM To: gpc(a)gnu.de Subject: Re: Problem on solaris Mehdi Khaldi wrote: > I work on a Solaris 7 plateform. > GPC features are gpc version 2.1 (20020510), based on 2.95.2 19991024 > (release) > > I have one module called sun.p : > ------------------------------ > Module SUN INTERFACE; > > export SUN = all; > > procedure myproc; > > CONST > Max = 32767; > Min = -32768; > End. > > Module SUN IMPLEMENTATION; > > Procedure myproc; > Begin > Writeln('allo'); > End; > > End. > > ------------------------------ > > I have one main program : > ------------------------------ > program essai; > > import sun; > > begin > end. > > ------------------------------ > > When I compile with gpc. I get an error : ./src/testpascal.p:3: parse error > before `1' > > When I watch the temporaries files, actually testpascal.i, I see "import > sun" was switched by "import 1". > > What's wrong? As you can see with `-v', there are some default defines, including `sun' on a Sun. These are actually macros with value 1. You can disable macros in genral using `--no-macros'. But I'd recommend to rename the unit, since `Sun' is probably too general a name, anyway ... Frank -- Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/, 7977168E GPC To-Do list, latest features, fixed bugs: http://www.gnu-pascal.de/todo.html GPC download signing key: 51FF C1F0 1A77 C6C2 4482 4DDC 117A 9773 7F88 1707

2 1

MacOS X Update Request due to strange problem
by Frank D. Engel, Jr. 11 Aug '03

11 Aug '03

I am having some wierd problems with bus errors and seg faults under MacOS X. I am using the currently available release (linked from the GPC binary downloads area), and am wondering when an update will be made available, hoping that some of these problems have been (or will be) fixed. The strange thing is that sometimes the problem can be fixed by sticking extra WRITELNs in between various lines of code. So for example, if I am having trouble and think the following code is at fault: x := SomeFunction(y, z); DoSomethingTo(x); I might change it to: WRITELN('1'); x := SomeFunction(y, z); WRITELN('2'); DoSomethingTo(x); WRITELN('3'); and sometimes this fixes the problem (but of course, I don't want that extra output...) Any ideas/fixes/patches? Thank you. ===== ======= Frank D. Engel, Jr. Modify the equilibrium of the vertically-oriented particle decelerator to result in the reestablishment of its resistance to counterproductive atmospheric penetration. __________________________________ Do you Yahoo!? Yahoo! SiteBuilder - Free, easy-to-use web site design software http://sitebuilder.yahoo.com

4 6

--no-macros
by Mehdi Khaldi 11 Aug '03

11 Aug '03

What does "--no-macros" means? Are all macros undefined?

1 0

2025

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

2002

2001

2000

1999

1998

1997

1996

1995

Gpc