- Gpc - gnu.de

Re: Errors and Standards (was: compiler bug)
by da Silva, Joe 18 Oct '01

18 Oct '01

Correct. Conformant arrays are optional, so that isn't the *real* change to the language ... It is this : When you have a procedure or function (A), as a formal parameter of another procedure or function (B), you must declare it's (A) formal parameters (as shown in example 6 in section 6.11.6 of ISO-10206; there's probably a similar example given in ISO-7185, although haven't looked for it). This (declaring the formal parameter of a formal parameter ;-) wasn't required in the original language definition, in the "User Manual and Report". "Otherwise" was a common and useful extension to the language, but *non-standard*, prior to ISO-10206 (of course, Borland recycled the word "else", just to be different!). Joe. > -----Original Message----- > From: Frank Heckenbach [SMTP:frank@g-n-u.de] > Sent: Thursday, October 18, 2001 7:43 AM > To: cbfalconer(a)worldnet.att.net; gpc(a)gnu.de > Subject: Re: Errors and Standards (was: compiler bug) > > CBFalconer wrote: > > > > > "Classic" is a perfect description of ISO-7185 (thanks, > Prospero), > > > > since it corresponds exactly (well, with just one change, > suggested > > > > by Wirth) to the language originally defined in the 'User > Manual > > > > and Report' published by Jensen and Wirth, in 1974. > > > > > > What is this one change, BTW? > > > > Conformant arrays. Also some tightening up. The existance of any > > change was a big battle between the US and the world, circa 1980, > > resulting in level 0 and level 1 as a compromise. OTHERWISE was > > in the earlier drafts too. > > Conformant arrays are the only difference between 7185 level 0 and > 1, aren't they? So level 0 is completely equivalent to original > Wirth Pascal? Or did Wirth Pascal contain `otherwise'? > > Frank > > -- > Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/ > GPC To-Do list, latest features, fixed bugs: > http://agnes.dida.physik.uni-essen.de/~gnu-pascal/todo.html

3 2

Re: compiler bug
by da Silva, Joe 18 Oct '01

18 Oct '01

Please see below ... Joe. > -----Original Message----- > From: Frank Heckenbach [SMTP:frank@g-n-u.de] > Sent: Wednesday, October 17, 2001 9:28 PM > To: cbfalconer(a)worldnet.att.net; gpc(a)gnu.de > Subject: Re: compiler bug > > CBFalconer wrote: > > > I vote against any such sweeping change. It is enough to say the > > --standard-pascal refers to ISO-1. > > Opinions seem to be divided on what to do. Until and unless there's > an agreement, I'll do nothing about it. ;-) > [Joe da Silva] The best approach, as someone here suggested, is to first introduce a new flag, such as "--classic-pascal", which is equivalent to the present flag "--standard-pascal" flag, with the recommendation to use this new flag to specify ISO-7185. This way, we are no longer (strongly) inferring that ISO-7185 is the only standard. Later, if most people have adopted the new flag, we can drop the old flag or give a warning that the flag is ambiguous. In any case, we can definitely do the first part of this change without adversely affecting anyone, so I see no reason not to proceed at least that far. > > What is the status of the Extended Pascal (10206) standard? Is it > > an official standard, or in the proposed state. I just downloaded > > the postscript version, and that is a monster to handle on this > > machine. Ghostview takes forever, can't backup, etc. > > Yep, they removed the PostScript DSC comments, apparently for no > good reason. I'm probably not allow to distribute a version with > them added again, but the attached script (requires bash and GNU > awk) will do it on your local copy). This will allow gs to backup > and to jump to arbitrary pages. > > > I haven't even the vaguest idea of how to talk to the printer. It > > is a Samsung Laser, which comes with drivers, but not a word about > > the interface at the plug. Can it accept postscript (which is > > really text)? I don't know, but I doubt it. Can it accept text > > with terminal cr/lf, I don't know. Are there ESC sequences to do > > whatever? I still don't know. I can't even find anything from > > their website - it rejected any attempts to download anything > > midway for unknown reasons. Multiple times. Bah humbug. > > > > Compilers are nice and simple. They have a gozinta and a > > comesouta. > > Yeah, I know this problem. Most modern printers (except PostScript > printers which are quite a bit more expensive) have a proprietary > interface and only come with a Windoze driver (and if you're lucky, > a Linux driver), but no documentation of the interface ... > [Joe da Silva] Yes, it's very annoying! Obviously, there aren't enough of us "bugging" the printer manufacturers for this information, so we should pester them some more! On a more positive note, I think a lot of these printers tend to emulate "industry standard" printers/protocols, such as PCL (Hewlett Packard). Since these major printer protocols are "published", you can experiment with these, to see if your particular printer understands them, and to what extent. Not an ideal solution, but sometimes worthwhile. > Frank > > -- > Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/ > GPC To-Do list, latest features, fixed bugs: > http://agnes.dida.physik.uni-essen.de/~gnu-pascal/todo.html << File: > ps2dsc >>

2 1

FW: Errors and Standards (was: compiler bug)
by da Silva, Joe 18 Oct '01

18 Oct '01

Oops! Forgot to "fiddle" the send address again ... :-/ > -----Original Message----- > From: da Silva, Joe > Sent: Thursday, October 18, 2001 2:25 PM > To: 'J. David Bryan' > Subject: RE: Errors and Standards (was: compiler bug) > > Such systems as mentioned below, are non-compliant (which is > not surprising I guess, since it took such a long time for the first > official standard to be published). > > Any system that needs to use standard output for reporting errors, > needs to take care of such details transparently, just like systems > which have a separate "output channel" for errors (since there is > no requirement for the programmer to initialize this either, nor any > defined way to do so). > > Joe. > > -----Original Message----- > From: J. David Bryan [SMTP:dbryan@bcpl.net] > Sent: Thursday, October 18, 2001 3:53 AM > To: GNU Pascal List > Subject: Re: Errors and Standards (was: compiler bug) > > On 17 Oct 2001, at 10:32, da Silva, Joe wrote: > > > ...Peter Grogono (in his book 'Programming in Pascal') says words to the > > effect of.... > > Regrettably, though, books are not proof but at best only supporting > evidence. Grinding through the standard is the only way to be sure. > > Grogono also notes in section 7.1, "Sequential files," that: > > "Some Pascal systems also insist that the standard file 'output' is > mentioned in the program heading even if the program contains no call > to write, so that there is a destination for error messages." > > -- Dave

1 0

compiler bug
by Theo Carr-Brion 17 Oct '01

17 Oct '01

I am using gpc 20010924 with gcc 2.95.3 on UnixWare 7.1 and the following code does not work. Program Test(Input, Output); Type Str10 = String(10); LetterType = (AA, BB, CC, DD); MyRec = record LetterName: Array[LetterType] of Str10; end; procedure SetIt(var aStr1: String; const aStr2: String); begin aStr1:=aStr2; end; var ThisLetter: LetterType; ThisRec: MyRec; begin for ThisLetter:=AA to DD do SetIt(ThisRec.LetterName[ThisLetter], Chr(Ord(ThisLetter)+Ord('A'))); for ThisLetter:=AA to DD do WriteLn(ThisRec.letterName[ThisLetter]); for ThisLetter:=AA to DD do ThisRec.LetterName[ThisLetter]:=Chr(Ord(ThisLetter)+Ord('A')); for ThisLetter:=AA to DD do WriteLn(ThisRec.LetterName[ThisLetter]); end. The first set of WriteLn commands prints out A and B and then spaces. The second set prints out A to D as expected. Theo Carr-Brion

7 36

Re: Obscure error message
by Theo Carr-Brion 17 Oct '01

17 Oct '01

I was using --stack-checking and turning it off cures the problem, thanks. I am not using optimisation as I was fast compilation times and adding dummy variables did not work so it looks like the problem is in the stack checking. Theo Carr-Brion -----Original Message----- From: J. David Bryan [mailto:dbryan@bcpl.net] Sent: 16 October 2001 19:55 To: GNU Pascal List Subject: Re: Obscure error message On 15 Oct 2001, at 10:42, Theo Carr-Brion wrote: > Compiling some of our software with gpc 20010924 I get the following error > message: > > label `10' used before containing binding contour > > Can anyone explain to me what it means, please? -- Dave

3 2

gpc bug found
by Andrew Makhorin 17 Oct '01

17 Oct '01

Hi, It seems I found a bug in gpc. If I try compiling a Pascal program (see the attachment), something like this appears: /tmp/cc4P4VfS.s: Assembler messages: /tmp/cc4P4VfS.s:17865: Error: suffix or operands invalid for `mov' I use Debian GNU/Linux 2.2 and gpc version 19991030 on Intel PC. Andrew Makhorin

3 2

question on gcc version
by Oldham, Adam 17 Oct '01

17 Oct '01

Hello, I have been off the list for a few months. But had a quick question that I am sure has been asked by now. Is GPC compatible with gcc 2.96 or 3.0? Or must I downgrade to gcc 2.95.x to get it to compile correctly? Also, is there a web site that contains a list of archived post to the list? Thanks, Adam ----------------------------------------------------------------------- C. Adam Oldham Marconi Commerce Systems Inc. Software Engineer 7300 West Friendly Ave. adam.oldham(a)marconi.com Greensboro, NC 27420-2087 Phone : 336.547.5952 Fax : 336.547.5079 ----------------------------------------------------------------------- This document contains confidential information of Marconi Commerce Systems Inc. In consideration of the receipt of this document, the recipient agrees not to reproduce, copy, use or transmit this document and/or the information contained herein, in whole or in part, or to suffer such actions by others, for any purpose except with written permission, first obtained, of Marconi Commerce Systems Inc., and further agrees to surrender the same to Marconi Commerce Systems Inc. upon demand. -----------------------------------------------------------------------

3 2

Re: standards, responses to list (was: compiler bug)
by da Silva, Joe 17 Oct '01

17 Oct '01

Well, the discussion on declaration of "output" has probably been adequately covered (the answer to which is, of course, that it's only required if standard output is used, explicitly or implicitly. Since "internal" error messages are often handled separately on many (most?) OSes, these aren't an implicit use of "standard output"). For anyone interested, declaration of "output" has two effects - it automatically declares the text file variable "output" and it issues a "rewrite" (according to Kathleen and Niklaus;-). As for "out-of-order declarations", these ARE permitted by ISO standard ISO-10206 (aka. Extended Pascal). BTW, I too, disagree with the way that responses to list messages are normally directed to the originator, rather than the list. Maybe if we all share this opinion, we can persuade whoever is responsible to change this? Joe. > -----Original Message----- > From: CBFalconer [SMTP:cbfalconer@yahoo.com] > Sent: Saturday, October 13, 2001 4:38 AM > To: J. David Bryan; gpc mail-list > Subject: Re: compiler bug > > "J. David Bryan" wrote: > > > > On 11 Oct 2001, at 18:59, CBFalconer wrote: > > > ... snip ... > > > > I believe that generally it would be most helpful to the GPC maintainers > if > > you could separate into the smallest complete programs each of the > missed > > syntax errors you noted (i.e., create the smallest possible test case > for > > each reported problem). For example, the first error appears to be > caused > > by an out-of-order declaration, so: > > > > program t1; > > > > procedure p; > > begin > > end; > > > > var x: integer; > > > > begin > > end. > > > > ...should do it. Your help in improving the quality of GPC will be > > appreciated. > > Your sample above has two faults. It should specify at least > (output) in the command line, and it has the illegal declaration > portion. Both of which are minor, but contrary to strict > standards. PascalP has a flag to allow some of the out-of-order > declarations. So: > ------ snip ------

4 3

Re: compiler bug
by da Silva, Joe 17 Oct '01

17 Oct '01

Please see below ... Joe. > -----Original Message----- > From: Frank Heckenbach [SMTP:frank@g-n-u.de] > Sent: Monday, October 15, 2001 9:50 AM > To: cbfalconer(a)worldnet.att.net; gpc(a)gnu.de > Subject: Re: compiler bug > > I'm replying to several mails at once ... > ------ snip ------ > CBFalconer wrote: > ------ snip ------ > > PROGRAM testnn1; > > > > BEGIN > > writeln('Testnn fails to detect lack of output file parameter'); > > (* here is needed a way to return a status *) > > (* which is missing from ISO Pascal *) > > (* PascalP uses "terminate(integer)" extension *) > > END. > > This produces a warning with `gpc --standard-pascal'. If you want it > to be an error, add `-Werror'. > [Joe da Silva] Clearly, "output" IS being used by this program, so the fact that it's missing as a parameter of the program, is clearly an error (unless of course, you are compiling to the Borland dialect). If GPC can deal with this (which AFAIK it can), then it's a "non-fatal" error. IMHO, a warning should result only when something is "suspicious", rather than when something is clearly erroneous, as in this example. > > PROGRAM testnn2(output); > > > > CONST > > a = 1; > > > > TYPE > > b = integer; > > > > CONST > > c = 2; > > > > BEGIN > > writeln('Failure to detect misordered declarations'); > > END. > > I'm putting it in the test suite (chuck1.pas), so we can fix it > sometime. (Though I must admit that the priority isn't very high, at > least for me, since I don't program in plain SP myself, and see such > restrictions as rather limiting -- mixing declaration blocks allows > for more "topic oriented" structuring. But, of course, to be really > conformant, GPC must detect this in the future.) > [Joe da Silva] What do you consider "Standard"??? As far as I'm concerned, ISO-10206 is the standard to which GPC aspires, so why should GPC regard the above as an error, when this is clearly permitted by ISO-10206. IMHO, ISO-7185 should not be regarded as if it's the one and only Pascal standard. Prospero call this version of the language "Classic Pascal", to distinguish it from "Extended Pascal". I like that idea. I don't think it helps Pascal's image to always refer to ISO-7185 as THE Pascal standard, since this gives the impression of a very restricted and limited language, which is not something that Pascal deserves. I think we should promote the ISO-10206 standard, not pretend there is only one Pascal standard. (Rant over ;-)

5 8

Re: compiler bug
by da Silva, Joe 17 Oct '01

17 Oct '01

Please see below ... Joe. > -----Original Message----- > From: CBFalconer [SMTP:cbfalconer@yahoo.com] > Sent: Wednesday, October 17, 2001 9:03 AM > To: gpc mail-list > Subject: Re: compiler bug > ------ snip ------ > What is the status of the Extended Pascal (10206) standard? Is it > an official standard, or in the proposed state. I just downloaded > [Joe da Silva] It's official, of course, since 1991 (one year after ISO-7185). If you want to actually buy an official copy, see your local standards supplier (note that many countries have a "local" version of this standard, eg. in Australia, it's AS-3981). > the postscript version, and that is a monster to handle on this > machine. Ghostview takes forever, can't backup, etc. Does anyone > have a version converted to text? > > -- > Chuck F (cbfalconer(a)yahoo.com) (cbfalconer(a)XXXXworldnet.att.net) > Available for consulting/temporary embedded and systems. > (Remove "XXXX" from reply address. yahoo works unmodified) > mailto:uce@ftc.gov (for spambots to harvest) > >

1 0

Obscure error message
by Theo Carr-Brion 16 Oct '01

16 Oct '01

Compiling some of our software with gpc 20010924 I get the following error message: label `10' used before containing binding contour Can anyone explain to me what it means, please? The code is too complicated to reproduce and any simple examples don't have the problem. The code is used on other pascal compilers that do not support Exit so we have a label as the last line in the procedure and use Goto where the Exit would be. The code compiles on Borland pascal and the other compilers that we use. Theo Carr-Brion

2 1

Re: compiler bug
by da Silva, Joe 16 Oct '01

16 Oct '01

ISO-10206 is the Extended Pascal Standard, which is a "fully compatible superset" of the ISO-7185 standard (aka. "Classic Pascal"). You can obtain a Postscript version for A4 page size at : http://jds-freeware.hypermart.net/iso10206.zip You can obtain a Postscript version for USL page size at : http://www.employees.org/~samiam/iso10206.ps You can also obtain these and ISO-7185 somewhere on DEC's European FTP server (don't have the URL handy). You can also get a PDF formatted version (page size?) at : http://www.pascal-central.com/docs/iso10206.pdf (The PDF conversion seems to result in a font which is not very crisp, but you may find this format more convenient.) Some additional information seems to be available here : http://www.pluennecke.de/DOWNLOAD/dnld.htm (Haven't checked this out yet, may or may not be associated with Prospero Software.) Joe. > -----Original Message----- > From: CBFalconer [SMTP:cbfalconer@yahoo.com] > Sent: Tuesday, October 16, 2001 3:30 PM > To: gpc mail-list > Subject: Re: compiler bug > ------ snip ------ > What is ISO-10206, and where is it available? > > At the same time, GPC should be able to check various portability > levels. If the source conforms to a standard, it is compilable > under systems that support that standard. If we can't tell it > conforms, we can't very well put a stamp on it. > > -- > Chuck F (cbfalconer(a)yahoo.com) (cbfalconer(a)XXXXworldnet.att.net) > Available for consulting/temporary embedded and systems. > (Remove "XXXX" from reply address. yahoo works unmodified) > mailto:uce@ftc.gov (for spambots to harvest) > >

1 0

Re: Darwin port possible?
by da Silva, Joe 16 Oct '01

16 Oct '01

>From previous discussions, GPC is not compatible with GCC 3.0, the latest suitable GCC version is 2.95.3. However, I understand that the long term plan is to make GPC compatible with the current version of GCC, so perhaps there's hope ... BTW, I don't know the issues involved with this version incompatibility, nor the time-frame for aligning the GPC and GCC codes, perhaps someone else can comment? Joe. > -----Original Message----- > From: strobe anarkhos [SMTP:anarkhos@mac.com] > Sent: Tuesday, October 16, 2001 7:13 AM > To: pascal.pignard > Cc: gpc(a)gnu.de > Subject: Re: Darwin port possible? > > FYI: There is a gcc 3.0 port on the Darwin CVS in /cvs/Commands/GNU/gcc/

1 0

Darwin port possible?
by strobe anarkhos 15 Oct '01

15 Oct '01

Is this project still alive? I'd like to know if anybody has tried porting gpc to Darwin PPC. Mac OS X has a very large and extensive pascal library called Carbon. It's written in C but all functions are extern pascal. Currently pascal programmers wanting to write applications for OS X have to use an old version of Code Warrior in MacOS and compile a PEF executable. This situation isn't very convenient to say the least. C/C++ programmers can use gcc to compile Mach-O executables, the native binary format for OS X. (pascal used to be the native programming language for MacOS, but has fallen in favor of C using extern pascal functions and pascal strings. Carbon is a huge library consisting of nearly all APIs accumulated over the decades, and some which were not included have 3rd party implementations like QD3D. Quite possibly this is the largest and most complete set of APIs with pascal interfaces) As an added benefit it should be possible to adapt Project Builder, the free OS X IDE, for compiling pascal applications. It's already been adapted to compile C++, Java and AppleScript. It already uses gdb for ObjC/C/C++ debugging. Perhaps the old MacApp Object Pascal framework can be revived, if gpc was ported. There is certainly potential for a pascal renaissance given a free compiler coupled with this extensive pascal-based API. I'm not an expert in gcc internals so I'm not sure if I could do it myself.

2 6

array indexes
by Adam Naumowicz 15 Oct '01

15 Oct '01

Hello, I would like to know what is the reason why GPC complains about type mismatch compiling lines like below: ....... var a:array[0..10] of integer; function at(const index:integer):integer; begin at:=a[index]; end; ....... It seems to me, that there is a too rigid type checking in this matter. Why are constants not allowed here ? Regards, Adam Naumowicz -------------------------------------- WWW: http://math.uwb.edu.pl/~adamn/ --------------------------------------

7 10

FW: List responses (was: standards, responses to list)
by da Silva, Joe 15 Oct '01

15 Oct '01

No, I wasn't trying to "labour the point" here, I really did forget to "fiddle" the "To" address field for this message (see below). And it's certainly not the first time this has happened to me, or others on this list. :-( Joe. > -----Original Message----- > From: da Silva, Joe > Sent: Monday, October 15, 2001 7:40 PM > To: 'african_chief(a)bigfoot.com' > Subject: RE: List responses (was: standards, responses to list) > > Replying to "All recipients" means the originator gets two > copies - not very clever, huh? Sure, then you have to remember > to edit the "To" field, etc, right?. Or sometimes you forget the > whole lot and just "Reply" - then the list thread has gaps. > > I'm sorry if this has been debated before ... certainly not in > the past 5 months, otherwise I wouldn't have bothered to voice > my support for the other people who raised this issue. Let's > just say the current arrangement is most unconventional ... > I'll shut up now. :-/ > > Joe. > > -----Original Message----- > From: Prof. A Olowofoyeku (The African Chief) > [SMTP:african_chief@bigfoot.com] > Sent: Monday, October 15, 2001 6:59 PM > To: gpc mail-list > Subject: Re: standards, responses to list (was: compiler bug) > > On 15 Oct 2001, at 15:35, da Silva, Joe wrote: > > [...] > > BTW, I too, disagree with the way that responses to list messages > > are normally directed to the originator, rather than the list. Maybe > > if we all share this opinion, we can persuade whoever is responsible > > to change this? > > I really hope that we will not start another thread on this topic. People > should get to know their mail readers, and use the facilities thereby > provided for replying to all recipients, or to sender. > > Best regards, The Chief > --------- > Prof. Abimbola Olowofoyeku (The African Chief) > Author of Chief's Installer Pro for Win32 > Email: African_Chief(a)bigfoot.com > http://www.bigfoot.com/~african_chief/

1 0

Help needed about GPC string
by Pierre Muller 14 Oct '01

14 Oct '01

Already some time ago I wanted to add support for GPC strings in GDB pascal extensions. But when I tried to look at it I discovered that its changes from the version I used at that time to a more recent one (this was around a year ago or even more). Are GPC strings now stable ? I need some advice about the following: This is what I got using gpc2953 for djgpp I do understand the meaning of the two first fields quite easily, but what is _p_schema_ ??? While is the length indicated as having 12 bytes when apparently only 9 are used (is this just padding) ? Most importantly, where are the chars ? This the length of the stabs incorrect and a variable just has the chars at the end of this kind of header (as Free Pascal Ansistrings do) ? Or is the data accessed via some pointer again. What is the position in memory of the first char of the string ? Is this value still susceptible to changes ? .stabs "String:t(0,19)=s12Capacity:(0,4),0,32;length:(0,4),32,32;\\",128,0,0,0 .stabs "_p_schema_:(0,20)=@s8;@S;S(0,21)=r(0,1);0000000000001;0000000000001;,64,8;; ",128,0,0,0 I really need some feedback to be able to enhance string support for GPC.

2 1

CELEBS ALL NAKED :-)
by anythinggoes＠mypad.com 14 Oct '01

14 Oct '01

1 0

Who creates this Error-Message?
by michael paap 14 Oct '01

14 Oct '01

Hello, i am running a program compiled with GPC, which reads his input from a file: executable < file now, if the program tries to read more values as there are in the file, i get the following error: executable: attempt to read past end of Input (error #454 at 16ddb) My question now is: Where is this error-message created, and where can I get a list of the meanings of the error-codes? Greetings, Michael

2 1

Help with data conversion..
by Miguel A Pérez E 14 Oct '01

14 Oct '01

Hello, please forgiveme if this is a trivial question. I have an integer variable and I am looking for the easiest way to convert it to an ascii or hexa form. sNumber := HexaToAscii( '30414439'); Then sNumber results in '0AD9' But the string '30414439' is in hexa and it corresponds with the decimal number 809583673. What function will allow me to obtain that hexa string or the ascii string from the integer number? Thank you in advance. Miguel PÃ©rez

3 2

DEC alpha, character escapes
by Miklos Cserzo 14 Oct '01

14 Oct '01

Hi Folks, just for the record the building of gpc-20010924 is straight on DEC (Compaq) alpha running under SuSE 7.1 Linux. 26 tests of the suite are failed. If anyone interested I can send the log-file. Now the question: what is the compiler switch for interpreting character escape sequences? (Like '\t' for tab, '\n' for new line etc..) The {$E+} directive or the --char-escapes switch does not seems to work. Cheers, miklos

3 2

how to assign values to complex constants
by ZINTEL Gerhard 14 Oct '01

14 Oct '01

Hello pascal gurus, I want to declare a complex constant in gpc like the following, non working example: const I : complex = (0.0, 1.0); I have not found any example how to do this in the list archive or in the manual. Another question concerning the same subject: Is there a possibility to assign real values only to the real or imaginary parts of a variable especially to a function return value like in the following non working, sensless example: function add(a,b: complex):complex; begin add.re := re(a) + re(b); add.im := im(a) + im(b); end; Any Idea? Many thanks in advance. Gerhard Gerhard Zintel Faurecia Abgastechnik GmbH Abt.: EGA Tel.: +49 911 7610176 Fax.: +49 911 7610350 e-mail: GZintel(a)Stadeln.Faurecia.com

2 1

Graph Unit
by Fernando Sanz 13 Oct '01

13 Oct '01

I have my gpc working OK under LINUX SuSE 7.0, and would like to use the Borland-style graph mode. Is there a Graph Unit available, like graph.tpu in windows?

2 1

Re: Darwin port possible?
by da Silva, Joe 13 Oct '01

13 Oct '01

This raises a similar question, that I had been wondering about ... If "gcc" has been ported or targeted (ie. as a cross-compiler) to a particular platform, does this mean that "gpc" can be readily (ie. easily) ported or targeted to the same platform? For example, I have seen mention of (but have not located) a "gcc" cross-compiler for the Motorola 68HC11 microcontroller - could this be used with "gpc" to make a Pascal cross-compiler for the 68HC11? Joe. > -----Original Message----- > From: strobe anarkhos [SMTP:anarkhos@mac.com] > Sent: Friday, October 05, 2001 2:21 PM > To: gpc(a)gnu.de > Subject: Darwin port possible? > > Is this project still alive? > > I'd like to know if anybody has tried porting gpc to Darwin PPC. Mac OS X > has a very large and extensive pascal library called Carbon. It's written > in C but all functions are extern pascal. Currently pascal programmers > wanting to write applications for OS X have to use an old version of Code > Warrior in MacOS and compile a PEF executable. This situation isn't very > convenient to say the least. C/C++ programmers can use gcc to compile > Mach-O executables, the native binary format for OS X. > > (pascal used to be the native programming language for MacOS, but has > fallen in favor of C using extern pascal functions and pascal strings. > Carbon is a huge library consisting of nearly all APIs accumulated over > the decades, and some which were not included have 3rd party > implementations like QD3D. Quite possibly this is the largest and most > complete set of APIs with pascal interfaces) > > As an added benefit it should be possible to adapt Project Builder, the > free OS X IDE, for compiling pascal applications. It's already been > adapted to compile C++, Java and AppleScript. It already uses gdb for > ObjC/C/C++ debugging. Perhaps the old MacApp Object Pascal framework can > be revived, if gpc was ported. There is certainly potential for a pascal > renaissance given a free compiler coupled with this extensive pascal-based > API. > > I'm not an expert in gcc internals so I'm not sure if I could do it > myself.

5 7

3D Java Internet Casino 100% Free Bonus!!!!
by saraedunit＠networksstatus.com 13 Oct '01

13 Oct '01

1 0

please help with data conversion
by Miguel A Pérez E 13 Oct '01

13 Oct '01

Hello, please forgiveme if this is a trivial question. I have an integer variable and I am looking for the easiest way to convert it to an ascii or hexa form. sNumber := HexaToAscii( '30414439'); Then sNumber results in '0AD9' But the string '30414439' is in hexa and it corresponds with the decimal number 809583673. What function will allow me to obtain that hexa string or the ascii string from the integer number? Thank you in advance. Miguel PÃ©rez

1 0

GDB scope does not work quite right for Pascal
by Pierre Muller 13 Oct '01

13 Oct '01

At 14:44 12/10/01 , vous avez écrit: > >Number: 222 > >Category: gdb > >Synopsis: GDB scope does not work quite right for Pascal > >Confidential: no > >Severity: non-critical > >Priority: medium > >Responsible: unassigned > >State: open > >Class: sw-bug > >Submitter-Id: net > >Arrival-Date: Fri Oct 12 05:48:01 PDT 2001 > >Closed-Date: > >Last-Modified: > >Originator: Adam Oldham > >Release: gdb 20010813 > >Organization: > >Environment: >Mandrake 8.1, Kernel 2.4.8, glibc 2.2, Intel Platform > >Description: >Source is compiled with FPC (Free Pascal Compiler). This can happen with >any source of pascal. When you declare nested functions, gdb's scope does >not allow the viewing of the variables that are from the parent function >that should be within the scope. > >How-To-Repeat: >The simple program attached will produce the problem. When compiled and >run, the correct output is displayed, but if you run GDB on it, and break >on function test2 and print out int1 which is a global variable for the >function test1, you receive: >"No symbol "INT1" in current context." There are several remarks to that bug report: 1) I don't know at all how nested functions work in C Are they allowed? Do they also use a paremt fram pushing method ? If yes, can locals from the calling function be found in C? Maybe someone from the gdb mailing list can answer that question. If this is already implemented for C its probably easier to just take the same method. 2) There is a solution, I implemented it in the IDE for Free Pascal but it is rather complicated. Let me try to explain this solution to everyone. Nested functions in pascal get a hidden parameter that contains the frame pointer (ebp value for i386 cpu) of the calling function. This allows the program to access correctly local variable of the function that called the nested function. This value is searched in the backtrace at the location where the frame pointer are usually saved ( i.e. at offset 0 of the local ebp value for i386) If we find the corresponding frame (which is not always the first frame above the current one) then we can try if we find the unfound local symbol in that frame). To ease this search, I inserted a pseudo-parameter to the function called parent_ebp (in lower case, while normal Free Pascal symbols are uppercased) that indicate the location of this parnt frame pointer. 3) As maintainer of the pascal language specific part of GDB, I am of course willing to introduce this into the gdb sources, but I would really like to get first some feedback from the gpc list. Does gpc do anything about this calling frame hidden parameter ? Could we agree to use the same method for both compiler in order to get better support for Pascal ? Pierre Muller Institut Charles Sadron 6,rue Boussingault F 67083 STRASBOURG CEDEX (France) mailto:muller@ics.u-strasbg.fr Phone : (33)-3-88-41-40-07 Fax : (33)-3-88-41-40-99

4 3

cannot exec gpcpp: no such file or directory
by dbrookmann＠t-online.de 13 Oct '01

13 Oct '01

Hi, When calling gpc to compile some hallo.p pascal program I get the following message: "gpc: Installation problem, cannot exec 'gpcpp': no such file or directory " I am using SuSE 7.2 and as far as I know I installed all the necessary files. Could you give me some reference where or how I can check the completeness, in particular: where should gpcpp be and where do I get it to put it there (I am new to linux ). Thanks Douglas P.S. I tryed to compare the filestructure in SuSE for the Mac with that for PC in respect to gpc and I gave up this mission when I saw the differences. My gpc on the Mac is working alright :-)

2 1

Re: GDB scope does not work quite right for Pascal
by Pierre Muller 12 Oct '01

12 Oct '01

At 14:18 12/10/01 -0400, Oldham, Adam wrote: >Yes, I saw some of these threads, but nothing seemed to shed light on fixes >for the scoping of this. It is good to know Ada does this as well so that >maybe us Ada/Pascal people can get together and come up with a fix. > >I submitted code that demonstrates this with my bug report as well.... After some testing on both GNU C and GNU Pascal I discovered that they both use the same method (on djgpp i386 target) The calling frame pointer is passed to the nested function in %ecx register and stored in -4(%ebp) in the function prologue (which does not seem to be handled by skip_prologue function, at least I didn't find anything in version 5.0 sources) So the parent frame is placed in %ecx and stored at offset -4 for GNU gcc or gpc while it is pushed at offset 8 in Free Pascal code. Using -gstabs+ I saw nothing generated to explain the meaning of the %ecx parameter or the -4(%ebp) location. Checking the prologue for this movl %ecx,offset(%ebp) isn't probably sufficient to tell that we are in a nested proc... Moreover this is processor specific, which is bad... Stabs does give info about nesting in the stabs concerning the Consider the following source: int test () { int i = 1; int j; int local () { return j+1; }; j = i+1; return local (); } int main () { printf(" result of test() is %d \n",test()); return 0; } This generates .stabs "local:f(0,1),local,test",36,0,8,_local.3 The ,local,test indicates that local is nested inside test function. But this is not enough as I don't know what happens for instance if parameters are passed by registers... Adding some debug info concerning the location of the parent frame seems like a good idea, no ? The Free Pascal approach to use a pseudo parameter called 'parent_ebp' seems to not be applicable to C as this would be a valid C local variable name. Maybe something beginning with a dollar like for the classes? A similar problem exists for With statements in pascal. Stabs defines even a specific stab number for this but this is also unsupported for now.

1 0

Re: GDB scope does not work quite right for Pascal
by Oldham, Adam 12 Oct '01

12 Oct '01

Yes, I saw some of these threads, but nothing seemed to shed light on fixes for the scoping of this. It is good to know Ada does this as well so that maybe us Ada/Pascal people can get together and come up with a fix. I submitted code that demonstrates this with my bug report as well.... Adam -----Original Message----- From: Andrew Cagney [mailto:ac131313@cygnus.com] Sent: Friday, October 12, 2001 1:40 PM To: Daniel Jacobowitz; Pierre Muller Cc: Maurice Lombardi; adam.oldham(a)marconi.com; gdb(a)sources.redhat.com; core(a)freepascal.org; gpc(a)gnu.de Subject: Re: GDB scope does not work quite right for Pascal > On Fri, Oct 12, 2001 at 06:57:32PM +0200, Maurice Lombardi wrote: > >> > There are several remarks to that bug report: >> > 1) I don't know at all how nested functions work in C >> >Are they allowed? > >> >> >> AKAIK no, they are not allowed, and this is the root of the problem, >> since gdb is written mainly by/for C programmers. > > > They aren't allowed by standard C. GCC does in fact allow them, > although their use isn't recommended. I think GDB's support for them > is somewhat crusty. The thread http://sources.redhat.com/ml/gdb-patches/2001-07/msg00714.html is probably relevant. Following on Joel's strategy (Ada) the first thing needed is probably a testcase so that people know the status of the underlying code Andrew

1 0

Re: compiler bug
by Theo Carr-Brion 12 Oct '01

12 Oct '01

The problem seems to be a general one with variables of Array[AType] of String(Capacity) which we use quite a lot. The capacity of the string if not always set. Sometimes it works and sometimes it does not and I can't find the pattern. Setting the capacity of each string in the program gets round the problem. Theo Carr-Brion

2 1

install-gpc-binary
by HARIKRISHNA Kocheralkota 08 Oct '01

08 Oct '01

Hello, The tarball of gpc binary distribution is containing a file "gpcpp", in the lib/gcc-lib/sparc-sun-solaris2.6/2.95.3/ directory, where as the "install-gpc-binary" script from gpc site is checking for 'gpc-cpp'. we are running the 'install-gpc-binary' file contained in /gcc-2.95.3/gcc/p/script, instead of the same available on gpc site. We are facing no problem. Is it OK ? Thanks and Regards hari

2 1

gpc install problem on cygwin-w98
by Per Persson 07 Oct '01

07 Oct '01

Hello! I have tried to compile gpc-20010924 on a cygwin system (windows-98 Pentium 2). I think I follow the instructions in the Install file thoroughly but the compilation fails. The configuration seems to work without problems (I get promped for the patch for gpc-2.1; I use the gcc-core-2.95.2 source found at the gnu-home-site) After a few seconds of make, however I get: gcc -c -DHAVE_CONFIG_H -g -O2 -I. -I/home/Persson/gnucomplers/gcc-2.95.2/lib iberty/../include /home/Persson/gnucomplers/gcc-2.95.2/libiberty/strerror.c /home/Persson/gnucomplers/gcc-2.95.2/libiberty/strerror.c:461: conflicting t ypes for `sys_errlist' /usr/include/sys/errno.h:23: previous declaration of `sys_errlist' make[1]: *** [strerror.o] Error 1 make[1]: Leaving directory `/home/Persson/gnucomplers/gpc-gcc-build/libibert y' make: *** [all-libiberty] Error 2 I use the 'present' version of cygwin with the following setup.log file: 2001/09/29 16:38:34 Starting cygwin install, version 2.78.2.9 Current Directory: C:\user-pgm\install_files\cygwin source: from cwd Selected local directory: C:\user-pgm\install_files\cygwin root: C:/cygwin binary system Installing...latest/ash/ash-20010827-1.tar.bz2 Installing...latest/autoconf/autoconf-2.52-1.tar.bz2 Installing...latest/automake/automake-1.5-1.tar.bz2 Installing...latest/bash/bash-2.05-8.tar.bz2 Installing...latest/binutils/binutils-20010914-2.tar.bz2 Installing...latest/bison/bison-1.28-1.tar.gz Installing...latest/byacc/byacc.tar.gz Installing...latest/bzip2/bzip2-1.0.1-6.tar.gz Installing...latest/clear/clear-1.0.tar.gz Installing...latest/cpio/cpio-2.4.2.tar.gz Installing...contrib/cron/cron-3.0.1-5.tar.bz2 Installing...latest/crypt/crypt-1.0-1.tar.gz Installing...latest/ctags/ctags-5.0.1-1.tar.gz Installing...contrib/cvs/cvs-1.11.0-1.tar.gz Installing...latest/cygrunsrv/cygrunsrv-0.94-1.tar.bz2 Installing...latest/cygwin/cygwin-1.3.3-2.tar.bz2 Installing...latest/dejagnu/dejagnu-20010117-1.tar.gz Installing...latest/diff/diff.tar.gz Installing...latest/expect/expect-20010117-1.tar.gz Installing...latest/file/file-3.33-1.tar.gz Installing...latest/fileutils/fileutils-4.1-1.tar.bz2 Installing...latest/findutils/findutils.tar.gz Installing...latest/flex/flex-2.5.4-1.tar.gz Installing...latest/gawk/gawk-3.0.4-1.tar.gz Installing...latest/gcc/gcc-2.95.3-5.tar.bz2 Installing...latest/gdb/gdb-20010428-1.tar.gz Installing...contrib/gdbm/gdbm-1.8.0-3.tar.gz Installing...contrib/gettext/gettext-0.10.38-2.tar.bz2 Installing...contrib/ghostscript/ghostscript-6.51-1.tar.bz2 Installing...latest/gperf/gperf.tar.gz Installing...latest/grep/grep-2.4.2-1.tar.gz Installing...latest/groff/groff-1.16.1-1.tar.gz Installing...latest/gzip/gzip-1.3-1.tar.gz Installing...latest/inetutils/inetutils-1.3.2-14.tar.gz Installing...contrib/irc/irc-20010101-1.tar.gz Installing...contrib/jbigkit/jbigkit-1.2-4.tar.bz2 Installing...contrib/jpeg/jpeg-6b-4.tar.gz Installing...latest/less/less-358-3.tar.gz Installing...contrib/libpng/libpng-1.0.11-1.tar.gz Installing...latest/login/login-1.4-2.tar.gz Installing...contrib/lynx/lynx-2.8.4-1.tar.bz2 Installing...latest/m4/m4.tar.gz Installing...latest/make/make-3.79.1-4.tar.bz2 Installing...latest/man/man-1.5g-2.tar.gz Installing...latest/mingw/mingw-20010917-1.tar.gz Installing...latest/mingw-runtime/mingw-runtime-1.1-1.tar.bz2 Installing...latest/mt/mt-1.9.2-1.tar.bz2 Installing...contrib/mutt/mutt-1.2.5i-4.tar.bz2 Installing...contrib/ncftp/ncftp-3.0.2-2.tar.gz Installing...latest/ncurses/ncurses-5.2-5.tar.gz Installing...latest/cygwin/newlib-man-20001118.tar.gz Installing...latest/opengl/opengl-1.1.0-5.tar.gz Installing...latest/openssh/openssh-2.9p2-3.tar.bz2 Installing...latest/openssl/openssl-0.9.6b-1.tar.bz2 Installing...latest/patch/patch-2.5-2.tar.gz Installing...latest/pcre/pcre-3.4-2.tar.gz Installing...contrib/perl/perl-5.6.1-2.tar.bz2 Installing...contrib/popt/popt-1.6.1-1.tar.gz Installing...contrib/postgresql/postgresql-7.1.3-1.tar.bz2 Installing...contrib/python/python-2.1.1-2.tar.bz2 Installing...contrib/readline/readline-4.2-3.tar.bz2 Installing...latest/regex/regex-4.4.tar.gz Installing...contrib/rsync/rsync-2.4.6-2.tar.bz2 Installing...contrib/rxvt/rxvt-2.7.2-6.tar.gz Installing...latest/sed/sed-3.02-1.tar.gz Installing...latest/sh-utils/sh-utils-2.0-2.tar.gz Installing...contrib/squid/squid-2.4-STABLE20010508.tar.gz Installing...contrib/ssmtp/ssmtp-2.38.7-2.tar.gz Installing...latest/tar/tar-1.13.19-1.tar.gz Installing...latest/tcltk/tcltk-20001125-1.tar.gz Installing...contrib/tcsh/tcsh-6.10.00-3.tar.gz Installing...latest/termcap/termcap-20010825-1.tar.bz2 Installing...contrib/tetex/tetex-beta-20001218-1.tar.gz Installing...latest/texinfo/texinfo-4.0-4.tar.gz Installing...latest/textutils/textutils-2.0-2.tar.bz2 Installing...contrib/tiff/tiff-3.5.6beta-2.tar.gz Installing...latest/time/time.tar.gz Installing...contrib/unzip/unzip-5.41-1.tar.gz Installing...latest/vim/vim-6.0-1.tar.bz2 Installing...latest/w32api/w32api-1.1-1.tar.bz2 Installing...contrib/wget/wget-1.6-1.tar.gz Installing...latest/which/which-1.4.tar.gz Installing...contrib/xpm-nox/xpm-nox-4.1.0-1.tar.bz2 Installing...contrib/zip/zip-2.3-1.tar.gz Installing...latest/zlib/zlib-1.1.3-6.tar.gz mbox note: Installation Complete 2001/09/29 16:51:41 Ending cygwin install What is wrong? Should I use another setup for Cygwin? Can my djgpp-installation cause problem (I have removed the 'djgpp-path' part of my autoexec.bat file temporarily) Per _________________________________________________________________ HÃ¤mta MSN Explorer kostnadsfritt pÃ¥ http://explorer.msn.se

2 1

gpc-20010924 and make install bug
by Russell Whitaker 06 Oct '01

06 Oct '01

Hi built gpc same way as always ( no CVS ) and gpc -v gives Reading specs from /usr/local/lib/gcc-lib/@target_alias@/2.95.3/specs gpc version 20010924, based on 2.95.3 20010315 (release) As is, test fails miserably. quick kludge: found cp -r \@target_alias\@/* i586-pc-linux-gnu works. the i5 etc directory is where everything should have been. then test results are: tests 1763 pass 1762 skip 1 fail 0 russ

2 2

(no subject)
by Alan Sun 05 Oct '01

05 Oct '01

Dear sir: I've got a problem when I was installing gpc. The instruction told me to run the following command: configure --enable-languages=pascal, but I cannot find an executable file such as configure.exe, and I have read the help entirely but I still don't know where I can get it. Please help me! Thanks. yours, Alan Sun

3 2

Re: copying gpc built on one machine to another
by ANURADHA Srinivasan 05 Oct '01

05 Oct '01

Hello, I am able to build the zipped gpc binary file and when i run it in another machine , it works. But i would like to add the "sysutils.pas" to the units and the corresponding "*.inc" to say,a separate directory "include" in the build directory and then "mak" the binary. * I am able to add the sysutils to the units directory of the tar.gz file but how do i add the "include" in the binary .tar.gz file?This is the first problem. * Second is , when i gunzip and use it in another directory with this sysutils also zipped,it says "-f-extended-syntax and -Wno-warnings unknown".this doesnot happen when i build the binary without the sysutils added to the units directory. How do i add such files to the tar.gz then? Regards, Anu ANURADHA Srinivasan wrote: > Hello, > > The problem was i had done the configure and make in the source directory. > I see the gcc directory after i gave them in build directory. > The make pascal.bindist runs fine with GNU tar. > It stops with an error saying that it cannot remove the 'tmp' directory.I find > that it is the last statement in the makefile for the above command and so am > going to use the .gz that's created. > Thanks for the support. > > Regards, > Anu > > ANURADHA Srinivasan wrote: > > > Hello , > > > > Two problems : > > 1.I don't get a gcc directory in my gp-buil directory. > > 2.I called make pascal.distbindist in gpc-source\gcc and i get this error. > > make[1]: Leaving directory `/home/users/anuradas/gpcsrc/gcc-2.95.3/gcc' > > tar: /dev/rmt/0: Permission denied > > make: *** [pascal.bindist] Error 1 > > > > Can somebody tell me what the problem could be? > > Thank you. > > Regards, > > Anuradha > > > > > > > > Frank Heckenbach wrote: > > > > > > > ANURADHA Srinivasan wrote: > > > > > > > > > Hello , > > > > > > > > > > Suppose i build GPC on one Sun-solaris 2.6 machine and i copy the > > > > > built GPC to another sun-solaris 2.6 machine , it doesnot work.It says > > > > > gpc-ccp not installed properly. > > > > > > > > You need to copy the complete installation (not just the gpc > > > > executable), try `make pascal.bindist'. > > > > > > > > Also, you'll have to install it in the same directory on the target > > > > machine that it was configured for, or set some environment > > > > variables (see the install-gpc-binary script). > > > > > > > > Frank > > > > > > > > -- > > > > Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/ > > > > GPC To-Do list, latest features, fixed bugs: > > > > http://agnes.dida.physik.uni-essen.de/~gnu-pascal/todo.html > > > > > > -- > > > S.Anuradha > > > Generic Data Tools, > > > Alcatel Chennai. > > > Alcanet : 2-757-7123 > > > > -- > > S.Anuradha > > Generic Data Tools, > > Alcatel Chennai. > > Alcanet : 2-757-7123 > > -- > S.Anuradha > Generic Data Tools, > Alcatel Chennai. > Alcanet : 2-757-7123 -- S.Anuradha Generic Data Tools, Alcatel Chennai. Alcanet : 2-757-7123

3 2

(no subject)
by Alan Sun 05 Oct '01

05 Oct '01

Dear sir: I've got a problem in running GPC. I really don't know if it is a bug but the fact is that my GPC cannot compile any program. my program is: program er; var a: integer; begin a := 2; writeln(a); end. The reaction of GPC is gpc1.exe: Invalid option `-famtmpfile=e:/djgpp/tmp\ccaaaaaa.gpc' and the version of my GPC is gpc version 19990510, based on gcc-2.8.1 (the file I downloaded is gpc-19990607-djgpp.zip) Please help me to solve the problem. Thank you! yours, Alan Sun

1 0

Unit for internationalization (i18n) ANNOUNCEMENT
by Eike Lange 05 Oct '01

05 Oct '01

Welcome to the wonderful world of INTERNATIONALIZATION (i18n). This unit provides the powerful mechanism of national language support by accessing .mo files. It includes: locales (not xlocales, because its just 'draft') and libintl. Actually, there are no tools available, so you have to create your .po files by hand. See documentation for gettext ('info gettext') for details. You can download the actual sources via ftp from: agnes.dida.physik.uni-essen.de/pub/home/lange/ Filename is inter-20011005.tar.gz Missing is a tool for creating .po files out of .pas files (like 'xgettext'). Are YOU interested? 2001-10-05 Eike Lange

1 0

Re: copying gpc built on one machine to another
by ANURADHA Srinivasan 05 Oct '01

05 Oct '01

Hello, The problem was i had done the configure and make in the source directory. I see the gcc directory after i gave them in build directory. The make pascal.bindist runs fine with GNU tar. It stops with an error saying that it cannot remove the 'tmp' directory.I find that it is the last statement in the makefile for the above command and so am going to use the .gz that's created. Thanks for the support. Regards, Anu ANURADHA Srinivasan wrote: > Hello , > > Two problems : > 1.I don't get a gcc directory in my gp-buil directory. > 2.I called make pascal.distbindist in gpc-source\gcc and i get this error. > make[1]: Leaving directory `/home/users/anuradas/gpcsrc/gcc-2.95.3/gcc' > tar: /dev/rmt/0: Permission denied > make: *** [pascal.bindist] Error 1 > > Can somebody tell me what the problem could be? > Thank you. > Regards, > Anuradha > > > > > Frank Heckenbach wrote: > > > > > ANURADHA Srinivasan wrote: > > > > > > > Hello , > > > > > > > > Suppose i build GPC on one Sun-solaris 2.6 machine and i copy the > > > > built GPC to another sun-solaris 2.6 machine , it doesnot work.It says > > > > gpc-ccp not installed properly. > > > > > > You need to copy the complete installation (not just the gpc > > > executable), try `make pascal.bindist'. > > > > > > Also, you'll have to install it in the same directory on the target > > > machine that it was configured for, or set some environment > > > variables (see the install-gpc-binary script). > > > > > > Frank > > > > > > -- > > > Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/ > > > GPC To-Do list, latest features, fixed bugs: > > > http://agnes.dida.physik.uni-essen.de/~gnu-pascal/todo.html > > > > -- > > S.Anuradha > > Generic Data Tools, > > Alcatel Chennai. > > Alcanet : 2-757-7123 > > -- > S.Anuradha > Generic Data Tools, > Alcatel Chennai. > Alcanet : 2-757-7123 -- S.Anuradha Generic Data Tools, Alcatel Chennai. Alcanet : 2-757-7123

3 6

gpc-20010924 configure problem
by Pierre Muller 04 Oct '01

04 Oct '01

I am trying to generate a gpc binary for cygwin. For this I downloaded the gpc-20010924.tar.gz sources, as well as the gcc-core-2.95.2.tar.gz from the same ftp server. After unpacking both files, I moved p directory into gcc-2.95.2 dir as stated in the INSTALL file. Then I created a directory called gpc-cygwin-build in gcc-2.95.2 directory, moved into that directory and gave ../configure --enable-languages=pascal as said in the INSTALL. But this did not give the expected result: according to INSTALL the configure script should have asked me if I wanted to patch gcc sources, but the whole configure process ended without any question. The generated Makefile only contained LANGUAGES="c c++" lines.... Did I forget to do something before running configure ? Is this a problem with case sensitiveness of environment variables ? i.e. should I rather use --enable-LANGUAGES=pascal I tried this out, but the main Makefile still looks the same and no file was patched. I don't understand how configure should be aware of the fact that it should patch gcc sources ? All is in the p subdir, but that subdir does not even seem to be read.... Pierre Muller Institut Charles Sadron 6,rue Boussingault F 67083 STRASBOURG CEDEX (France) mailto:muller@ics.u-strasbg.fr Phone : (33)-3-88-41-40-07 Fax : (33)-3-88-41-40-99

2 2

Word Alignment Optimization or bug?
by Loris Caren 03 Oct '01

03 Oct '01

The fragment:- module Size; var BoolVar: Boolean; procedure fred; begin BoolVar := True; end; {fred} end. {module} produces the following 68k code (from 20010623). Should the .lcomm line not be .lcomm Boolvar,1, or is the compiler saying that byte alignment is really horrid and is trying to avoid it? .file "size.p" gcc2_compiled.: __gnu_compiled_pascal: .lcomm Boolvar,2 .text .even Fred: link.w %a6,#0 move.b #1,Boolvar .L2: unlk %a6 rts

3 2

using locales
by lange＠mond.dida.physik.uni-essen.de 02 Oct '01

02 Oct '01

Hi! Could you please tell me, how to use locales in GNU-Pascal. Do I have to use an own database for strings, which need to be translated? Is it possible to use i18n files? Eike

2 1

Problem with preprocessor conditionals
by Sven Jauring 02 Oct '01

02 Oct '01

Hi all I'm having problem with preprocessor conditionals containing comparisions, eg. "#if X == 4". After the following code has executed, the variable var1 is set to 10,not 15 as I expected. --------------------------- #define X 4 #define Y 1 . . . var1 := 0; #ifdef Y var1 := 10; #endif #if X == 4 var1 := 15; #endif ---------------------------- Should this work as I expect? Best Regards Sven Jauring

2 3

Random function
by Jon Marc Zdricolei 02 Oct '01

02 Oct '01

Hi, The following question concerns a friend of mine. As I am not at all familiar with GPC it might seem silly. My friend tries to use the random function like this: " rand := random/exp(31*ln(2)); " When she compiles the program she gets the error " In function 'Rand' : undefined reference to 'Random' ". The question is: is the syntax correct or does GPC support random function? Her program runs correctly on UNIX, however UNIX is not always available, hence she needs to use Linux 7. Unfortunately I don't know what version of GPC is installed. Could you please help? Regards Jon

2 1

gpc 20010924 and rts configure
by Theo Carr-Brion 01 Oct '01

01 Oct '01

I am working on UnixWare 7.1.1 with gcc 2.95.3 and gpc 20010924. The rts configure script still does not work detecting the absence of sys_siglist. The variable in the test program has been changed to be volatile but it is still optimised out unless the variable is actually used. Turning optimisation off or returning sys_siglist in the test program both work for me. Theo Carr-Brion

2 1

New GPC version uploaded
by Peter Gerwinski 30 Sep '01

30 Sep '01

Hello, a new version `gpc-20010924' of the GNU Pascal Compiler has been uploaded to the usual place: ftp://agnes.dida.physik.uni-essen.de/gnu-pascal/alpha/ It is also available via anonymous CVS. For more information see our web site: http://agnes.dida.physik.uni-essen.de/~gnu-pascal/ Have fun, Peter -- http://home.pages.de/~Peter.Gerwinski/ - G-N-U GmbH: http://www.g-n-u.de Maintainer GNU Pascal - http://home.pages.de/~GNU-Pascal/ - gpc-20010924 GnuPG key fingerprint: 9E7C 0FC4 8A62 5536 1730 A932 9834 65DB 2143 9422 keys: http://www.gerwinski.de/pubkeys/ - AntiSpam: http://spam.abuse.net

1 0

Memory leak
by Miklos Cserzo 28 Sep '01

28 Sep '01

Folks, there is a serious memory leak in the gpc-20010623. The full story: The gpc version on the SuSE 7.2 CD is broken. The installation from source is smooth. The results of the test codes are excellent only 8 fails. Then comes the problem. I wrote a code. It compiles and starts to run. But after a few minutes crashes out with segmentation fault. The "top" suggests that the size of the task grows linearly with the time. In about 10 minutes the size is 5 times bigger. Then I tried the same code on under IRIX 6.5 with gpc-20010623. The output is crippled due to a bug but it shows the same symptom. It just keep on growing. The same code with the good-old gpc 2.0 runs for more than 20 hours without any problem. The memory management in the latest distribution must be fundamentally wrong. Have any of you experienced the same problem? Is there a compiler switch to force a more strict memory management mode? Help me please! miklos

4 7

The Future Is Now
by nkacs1wf8swj1＠hotmail.com 28 Sep '01

28 Sep '01

1 0

Re: copying gpc built on one machine to another
by ANURADHA Srinivasan 28 Sep '01

28 Sep '01

Hello , Two problems : 1.I don't get a gcc directory in my gp-buil directory. 2.I called make pascal.distbindist in gpc-source\gcc and i get this error. make[1]: Leaving directory `/home/users/anuradas/gpcsrc/gcc-2.95.3/gcc' tar: /dev/rmt/0: Permission denied make: *** [pascal.bindist] Error 1 Can somebody tell me what the problem could be? Thank you. Regards, Anuradha > > Frank Heckenbach wrote: > > > ANURADHA Srinivasan wrote: > > > > > Hello , > > > > > > Suppose i build GPC on one Sun-solaris 2.6 machine and i copy the > > > built GPC to another sun-solaris 2.6 machine , it doesnot work.It says > > > gpc-ccp not installed properly. > > > > You need to copy the complete installation (not just the gpc > > executable), try `make pascal.bindist'. > > > > Also, you'll have to install it in the same directory on the target > > machine that it was configured for, or set some environment > > variables (see the install-gpc-binary script). > > > > Frank > > > > -- > > Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/ > > GPC To-Do list, latest features, fixed bugs: > > http://agnes.dida.physik.uni-essen.de/~gnu-pascal/todo.html > > -- > S.Anuradha > Generic Data Tools, > Alcatel Chennai. > Alcanet : 2-757-7123 -- S.Anuradha Generic Data Tools, Alcatel Chennai. Alcanet : 2-757-7123

2 1

Random function
by Charles Keeper 28 Sep '01

28 Sep '01

Hello, The following question concerns a friend of mine. As I am not at all familiar with GPC it might seem trivial to you. My friend tries to use the random function like this: " rand := random/exp(31*ln(2)); " When she compiles the program she gets the error " In function 'Rand' : undefined reference to 'Random' ". The question is: is the syntax correct or does GPC support random function? Her program runs correctly on UNIX, however UNIX is not always available, hence she needs to use Linux 7. Unfortunately I don't know what version of GPC is installed. Could you please help? Regards _________________________________________________________________ Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp

2 1

Thanks for the help
by Hartmut Schmider 28 Sep '01

28 Sep '01

Hi folks; this is just to let you know that I have resolved my problems I had with re-building the Pascal compiler and a persistent segementation fault on my Solaris 8 machine. Particluar thanks to Frank who kept making suggestions until I figured it out. It was, in fact, a loose pointer. Regards, Hartmut Schmider High Performance Computing Virtual Laboratory Queen's University 141 Collingwood St. Kingston, Ontario, CANADA K7L 3X6 hs7(a)post.queensu.ca phone (613) 533 6000 ext 78252 FAX (613) 533 2015

1 0

Re: Creating .so
by ANURADHA Srinivasan 27 Sep '01

27 Sep '01

Hello , We tried compiling a DLL with the following sources but have not been successful. program mycall; function add(x:integer;y:integer):integer; far; external 'mylib'; var b:integer; begin b:=add(5,6); end. -------------------------------------------- library mylib; uses winprocs; function add(x:integer;y:integer):integer;export; begin add:=x+y; end; exports add index 1; begin end. ------------------------------------------------- What changes do we have to make to the sources to build the DLL? Regards, Anuradha Frank Heckenbach wrote: > HARIKRISHNA Kocheralkota wrote: > > > Is there any GPC compiler option available for creating .so > > The same as with GCC, e.g.: > > gpc -shared -Wl,-soname=whatever -o foo.so.42 files > > You might also want to try libtool (but I have no experience with it > myself). > > Frank > > -- > Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/ > GPC To-Do list, latest features, fixed bugs: > http://agnes.dida.physik.uni-essen.de/~gnu-pascal/todo.html -- S.Anuradha Generic Data Tools, Alcatel Chennai. Alcanet : 2-757-7123

4 8

copying gpc built on one machine to another
by ANURADHA Srinivasan 27 Sep '01

27 Sep '01

Hello , Suppose i build GPC on one Sun-solaris 2.6 machine and i copy the built GPC to another sun-solaris 2.6 machine , it doesnot work.It says gpc-ccp not installed properly. But my case is like , i am in tools-support and we don't want to give our "internal customers" the elaborate task of building the compiler themselves and then porting the various sources. So, can you kindly tell me , how i can build the GPC in one machine and copy it to any other machine and use the GPC.It is just like the the already built sources that you have on the web.But, we have built it with the latest sources and also have added other units to the 'units' directory which we want everybodyelse to use. thanks and Regards, Anuradha -- S.Anuradha Generic Data Tools, Alcatel Chennai. Alcanet : 2-757-7123

2 1

Rebuilding gpc (conflicting types)
by Hartmut Schmider 26 Sep '01

26 Sep '01

Hi, I need help again. I am re-building gpc on a solaris 8 workstation. All goes well, until the compilation halts with: In file included from /home/hasch/install/gcc-2.95.2/gcc/p/gpc-common.c:29: /home/hasch/install/gcc-2.95.2/gcc/p/gbe.h:152: conflicting types for `xmalloc' /home/hasch/install/gcc-2.95.2/gcc/p/../../include/libiberty.h:129: previous declaration of `xmalloc' In file included from /home/hasch/install/gcc-2.95.2/gcc/p/gpc-common.c:35: /home/hasch/install/gcc-2.95.2/gcc/p/util.h:196: conflicting types for `concat' /home/hasch/install/gcc-2.95.2/gcc/p/../../include/libiberty.h:48: previous declaration of `concat' What's the deal with 'libiberty'? Regards, Hartmut Schmider High Performance Computing Virtual Laboratory Queen's University 141 Collingwood St. Kingston, Ontario, CANADA K7L 3X6 hs7(a)post.queensu.ca phone (613) 533 6000 ext 78252 FAX (613) 533 2015

2 1

Random function
by Miklos Cserzo 26 Sep '01

26 Sep '01

Hi Folks, the memory leak problem not seems to be linked to the call of the "random" function. However, during the test I realized that the built-in "random" is piss poor. The test source goes at the end. You supposed to see evenly distributed numbers in the third column of the output. Try it for yourself. miklos ___________________________________________________ program cgr; { Chaos-game test of random number generator } const dim=100; { Change these if they are too large for you } cyc=100000000; var c,i,j,r:integer; s:array[-dim .. dim, -dim .. dim] of integer; x,y:real; begin for i:= -dim to dim do for j:= -dim to dim do s[i,j]:=0; x:=0; y:=0; for c:= 1 to cyc do begin r:= random(3); case r of 0:begin x:= (x+1)/2; y:= (y+1)/2; end; 1:begin x:= (x-1)/2; y:= (y+1)/2; end; 2:begin x:= (x-1)/2; y:= (y-1)/2; end; 3:begin x:= (x+1)/2; y:= (y-1)/2; end; end; i:= round( x*dim ); j:= round( y*dim ); inc(s[i,j]); end; for i:= -dim to dim do for j:= -dim to dim do writeln(i:6,j:6,s[i,j]:12); end.

2 1

Module Initialisation
by Loris Caren 25 Sep '01

25 Sep '01

-----BEGIN PGP SIGNED MESSAGE----- Can somebody explain what the init_module and fini_module fragments are for that I find in every dot-o emitted by GPC and explain how these fragments are called? I can see that something like this would be needed if/when a module has a 'body', but surely, if a module is just a collection of functions ,procedures and bss data (OK I admit my c background), no per-module initialisation or cleanup is required and these fragments shouldn't be necessary (or should just consist of an immeadiate return)? -----BEGIN PGP SIGNATURE----- Version: 2.6.3i Charset: noconv iQBVAwUBO688F5rsQW7OcFOlAQEGTgH/VW9Vmtgr8onyfewL0sF+3VZNJvepY3g6 mFXgvN7Hfm6PQ4b3mT6Ozjk4w27IFZCl4g37YenvziGUsl+dUhoVYQ== =cN27 -----END PGP SIGNATURE-----

2 1

compiler option for .so
by HARIKRISHNA Kocheralkota 23 Sep '01

23 Sep '01

Hello, Is there any GPC compiler option available for creating .so Thanks and Regards hari

2 1

Re: Using C library functions
by Theo Carr-Brion 20 Sep '01

20 Sep '01

Ive solved my own problem. It was the case sensitivity of the linker and an asmname directive sorted it out. Theo Carr-Brion -----Original Message----- From: Theo Carr-Brion [mailto:Theo.CarrBrion@mitrefinch.co.uk] Sent: 19 September 2001 16:27 To: 'gpc(a)gnu.de' Subject: Using C library functions I have some I/O routines for communicating over a serial line written using the C functions ioctl and write. We need to control time out times and the like. I have defined the functions as external but the linker can't find them. What do I need to do? Thanks in advance, Theo Carr-Brion

1 0

Using C library functions
by Theo Carr-Brion 19 Sep '01

19 Sep '01

I have some I/O routines for communicating over a serial line written using the C functions ioctl and write. We need to control time out times and the like. I have defined the functions as external but the linker can't find them. What do I need to do? Thanks in advance, Theo Carr-Brion

3 3

GPC, Linux and glibc
by Prof Abimbola Olowofoyeku 19 Sep '01

19 Sep '01

Hi all Does GPC link against glibc? I built GPC on a Redhat 7.1 machine and compiled a program there. The program won't run on a Redhat 6.2 machine. It dies with a message "/lib/libc.so.6: version 'GLIBC_2.2' not found ...". I thought that GPC only links 'libgcc.a'. What gives? And how can I force GPC to link only to static libraries? Thanks. Best regards, The Chief -------- Prof. Abimbola A. Olowofoyeku (The African Chief) Author of: Chief's Installer Pro for Win32 http://www.bigfoot.com/~African_Chief/chief32.htm Email: African_Chief(a)bigfoot.com

5 13

creating .so
by HARIKRISHNA Kocheralkota 19 Sep '01

19 Sep '01

Hello We are in the process of porting M$ stuff onto Unix/Liux Part of the requirement is to create equivalents for all DLLs we find in our pascal sources. Could anybody tell me how to proceed ?. Thanks and Regards hari

1 0

list maintainer wanted
by Anja Gerwinski 18 Sep '01

18 Sep '01

Hello, I am currently maintaining the gpc mailing list (just like most other lists at our server). If someone from this list would be willing to take my place as gpc-owner I would appreciate it very much. I get about 5 non-subscriber posts every day I have to read and evaluate (is it spam, is it a genuine post?). Most are spam, but I have to check all in case there is a genuine post among them. Plus, there are about 5 bounces every day (servers being down temporarily or addresses that became invalid). This doesn't sound much, but for me it takes too much time. I accidentally let a mail pass to gpc-announce recently; this shows me I am getting too much mail to look at each properly. If you are willing to maintain the list please contact me. Administration is possible either via a web interface or via commands sent by email; I am using email only. I will write down for you the commands you need to access majordomo. There are not very many you need regularly. When majordomo asks you to accept or reject a non-subscriber post you have to look at that mail via HTTP. If your online time is expensive this is a drawback. I am sure majordomo 2 can attach the mail in question just like majordomo 1 did but I have not yet found out how. Thanks, Anja

1 0

Still no luck
by Hartmut Schmider 18 Sep '01

18 Sep '01

Hi; I have serious problems forcing the GNU Pascal compiler to use /usr/lib/libc.a instead of /usr/lib/libc.so.1 (on Solaris 8). The result is a segmentation fault at runtime. Trying -static among the LFLAGS gives me: Undefined first referenced symbol in file _dlopen /usr/lib/libc.a(nss_deffinder.o) _dlclose /usr/lib/libc.a(nss_deffinder.o) _dlsym /usr/lib/libc.a(nss_deffinder.o) The same happens if I try to play with -B static and -B dynamic. I gave a try to recompile the Pascal compiler including GCC to get a version of the libraries that it can handle, but that requires such a large number of other installations that I am very reluctant to do it. I'm pretty much at my wit's end. Has anyone out there experienced similar trouble? Regards, Hartmut Schmider High Performance Computing Virtual Laboratory Queen's University 141 Collingwood St. Kingston, Ontario, CANADA K7L 3X6 hs7(a)post.queensu.ca phone (613) 533 6000 ext 78252 FAX (613) 533 2015

2 1

Re: gpc-IDE under Windows 2000
by Per Persson 17 Sep '01

17 Sep '01

> > > > I found that gpc with rhide (using djgpp) does not work under Windows >2000. Andris Pavenis : >My last build of rhide (rhide-1.4.7.9) should work with Win2k (I haven't >tested it myself, but others have), but somebody should rebuild GPC >unless You patch NTVDM. You may also try new Robert's version >1.4.9 (see http://www.rhide.com), but I'm not sure it's linked with libc >patched for Win2k > >Andris Thanks! now it seems to work (rhide-1.4.7.9 with NTVDM patch) Per _________________________________________________________________ HÃ¤mta MSN Explorer kostnadsfritt pÃ¥ http://explorer.msn.se

1 0

Solaris 8
by cindy scheveneels 17 Sep '01

17 Sep '01

Hi, I'm searching for a Pascal compiler which is supported on Solaris 8. On the GNU website, I only find Solaris 7... Is there a version for Solaris 8 too (or on roadmap or whatever). Thanx! Cindy -- --------------------------------------------------------------------- SUN MICROSYSTEMS "Take it to the nth" --------------------------------------------------------------------- Cindy Scheveneels Sun Microsystems Belgium Junior Technology System Engineer Lozenberg 15, B-1932 Zaventem mailto: Phone (32)2-704 81 55 cindy.scheveneels(a)belgium.sun.com Fax (32)2-704 80 01 http://www.sun.be Mobile (32)474-90 17 26 --------------------------------------------------------------------- News travels fast - but does it travel to YOU? Make sure you get Sun's latest updates, subscribe today to one of our newsletters: http://www.sun.com/newsletters for iForce partners: http://sun.systemnews.com/ ---------------------------------------------------------------------

2 1

gpc-IDE under Windows 2000
by Per Persson 15 Sep '01

15 Sep '01

Hi! I found that gpc with rhide (using djgpp) does not work under Windows 2000. Which are the alternatives for this operating system? Peng seems to be a good editor, but how about debugging? Is there an IDE for cygwin? Per _________________________________________________________________ HÃ¤mta MSN Explorer kostnadsfritt pÃ¥ http://explorer.msn.se

4 3

Problems with gpc and libc.so on Solaris 8
by Hartmut Schmider 13 Sep '01

13 Sep '01

Hi; we're running GPC on an UltraSparc-III cluster under Solaris8. Our version is precompiled (2.1). For a specific program, we keep getting a segmentation fault at the first call to the standard library libc.so The GNU debugger gives: Program received signal SIGSEGV, Segmentation fault. 0xff2b303c in strlen () from /usr/lib/libc.so.1 So the suspicion is that libc.so.1 doesn't work together with the code generated by gpc. Is there a way to force the use of an alternative libc? The compiler seems to work alright, it just doesn't seem to like the Solaris standard dynamic libraries. Thanks in advance for any help, Hartmut ------------------------------------------------------------------------ Hartmut Schmider High Performance Computing Virtual Laboratory Queen's University 141 Collingwood St. Kingston, Ontario, CANADA K7L 3X6 hs7(a)post.queensu.ca phone (613) 533 6000 ext 78252 FAX (613) 533 2015

2 1

file operations
by Frank Laszlo 13 Sep '01

13 Sep '01

Where can I find a list of commands for reading/writing files and converting strings into their ASCII value? TIA -Frank -----BEGIN PGP SIGNATURE----- Version: PGPfreeware 7.0.3 for non-commercial use <http://www.pgp.com> iQA/AwUBO6EBsxAyIC0SXMu8EQJDZACg1yjRH2lpPVF7lK+O6wBp5+DRlSMAoPFl hdLq8f8QifEW4CfTqGe3E67g =qn6S -----END PGP SIGNATURE-----

1 0

problem with rts configure
by Theo Carr-Brion 13 Sep '01

13 Sep '01

I have found a problem with the configure script for rts (gpc 20010623). It fails to correctly determine the existence of sys_siglist which does not exist on my UnixWare system. It compiles a test program containing a reference to sys_siglist. This compilation succeeds as the compiler (gcc -g -O2) optimises out the unused variable. Taking the optimisation flag off the compiler makes the test work. This will probable effect other tests as well. Theo Carr-Brion

2 1

Re: IRIX compilation
by da Silva, Joe 11 Sep '01

11 Sep '01

2 1

request for help
by Kocherlakota Harikrishna 10 Sep '01

10 Sep '01

Hello, I want equivalents for the following .Could any one help me out : -- swap --get/freeenvironmentstrings --exitproc, exitcode --constants like "fmclosed", "fmoutput" etc.. Otherwise are there any compiler directives to avoid the above (supported by delphi)? Is Class type supported by GPC ? Thanks and Regards Hari

4 7

IRIX compilation
by Miklos Cserzo 10 Sep '01

10 Sep '01

Hi Folks, the latest version I can build on IRIX 6.5 on the top of gcc-core-2.95.2 is gpc-20010502. All the versions more recent than that will fail at the same point. The result is the same using the native make or its GNU counterpart. I include the log of the make of the working and a faulty version as attachments. (There are serious bugs in the "working" version but I can not debug the recent ones without actually compiling them of course.) Cheers, miklos Miklos Cserzo University of Birmingham c/o School of Biosciences MRC - Bioinformatics Project Tel: +44-121-414-3037 Schools of Biosciences and Medicine Fax: +44-121-414-5925 Edgbaston, Birmingham B15 2TT E-mail: miklos(a)bip.bham.ac.uk United Kingdom

2 1

Some GPC questions
by Carlo Mecx 10 Sep '01

10 Sep '01

First of all, I would like to thank you far your effort on the GNU Pascal compiler. I'm new to this list and I have a couple of questions. 1) Mailing list archives Are there no mailing list archives after June 2001 ? I can hardly imagine that there was no activity after that time. 2) GPC and GCC 3.0 What is the status of making GPC work with GCC 3.0 ? The last discussions I found on that topic were in the mailing list archives from June, and at that time, it didn't seem to work yet. 3) GPC & GCC integration Some time ago, there was once a short dicussion of merging GPC into the GCC sources. What happened to this ? Are there still plans to include GPC with GCC ? 4) GPC release I think the last released version of GPC was 2.0 and that is already many years ago. Are there any plans to make a new release of GPC in a forseeable future ? I think the lack of current release version is what makes GPC less popular to projects like Free Pascal for instance. Well, I hope I did not ask questions that were too stupid. Have a good day !

6 7

Re: pow operator miscalculation
by da Silva, Joe 10 Sep '01

10 Sep '01

Hmmm ... FWIW: I'm not good on the jargon, but is "-2" really a unary "-" and a number (2), or is "-2" a number in itself (ie. the sign is not an operator)? This is what Maurice suggested in his second posting, and is the natural/intuitive interpretation of "-2". Joe. > -----Original Message----- > From: J. David Bryan [SMTP:dbryan@bcpl.net] > Sent: Sunday, September 09, 2001 4:20 PM > To: GNU Pascal List > Subject: Re: pow operator miscalculation > > On 8 Sep 2001, at 10:44, Maurice Lombardi wrote: > > > What says the standard ? > > The Extended Pascal standard, Section 6.8.1 "Expressions, General" says: > > "Operator precedences shall be according to five classes of operators > as follows. The operator 'not' shall have the highest precedence, > followed by the exponentiating-operators, followed by the > multiplying-operators, the adding-operators and signs, and finally, > with the lowest precedence, the relational-operators. Sequences of two > or more operators of the same precedence shall be left associative." > > Section 6.8.3.1, "Operators, General" defines the types of operators > mentioned above: > > exponentiating-operator = "**" | "pow" > > multiplying-operator = "*" | "/" | "div" | "mod" | "and" | "and_then" > > adding-operator = "+" | "-" | "><" | "or" | "or_else" > > relational-operator = "=" | "<>" | "<" | ">" | "<=" | ">=" | "in" > > So that means that unary minus has the same precedence as binary minus, > which is lower than that of "pow". So: > > -2 pow 2 > > is evaluated as: > > -(2 pow 2) > > and so equals -4. GPC is correct. > > > As an aside, these rules are a bit odd, in that: > > a = b and c = d > > is evaluated as: > > a = (b and c) = d > > rather than as the more likely intended: > > (a = b) and (c = d) > > (In Ada, by contrast, the logical operators "and", "or", and "xor" have > the > lowest priority, so the first expression is evaluated as shown in the > third > expression.) > > -- Dave

4 3

Re: pow operator miscalculation
by da Silva, Joe 10 Sep '01

10 Sep '01

Unfortunately, you are right. IMHO, this was an oversight (or perhaps to simplify parsing???). A signed number should have been treated as a "primary", rather than treated in the more general case as a unary operator and number. You will also note that "not" has been given the highest priority, yet it's arithmetic counterpart ("-" sign) has merely been given the same priority as an "adding operator". This seems a bit inconsistent, to me. Oh well, I guess we have to "live with it"! :-/ Joe. > -----Original Message----- > From: J. David Bryan [SMTP:dbryan@bcpl.net] > Sent: Monday, September 10, 2001 12:17 PM > To: GNU Pascal List > Subject: Re: pow operator miscalculation > > On 10 Sep 2001, at 9:57, da Silva, Joe wrote: > > > I'm not good on the jargon, but is "-2" really a unary "-" and > > a number (2), or is "-2" a number in itself (ie. the sign is not > > an operator)? > > The Extended Pascal standard, section 6.8.1, "Expressions, General," says > that the expression "-2" is a simple-expression, which is defined as a > sign > followed by a term. So "-" is the sign, and "2" is the term. The > standard > therefore treats any expression with a leading sign as a unary operator > applied to an unsigned expression. > > To continue, "-2 pow 2" is parsed as the sign "-" and the term "2 pow 2". > > The term is parsed as a factor, which is defined as a primary, followed by > > an exponentiating-operator (in this case, "pow"), followed by another > primary. "2" is a primary because primaries may be unsigned-constants. > > > > This is what Maurice suggested in his second posting, and is the > > natural/intuitive interpretation of "-2". > > Unfortunately, "intuitive interpretations" don't count when a standard > says > otherwise.... :-) > > -- Dave

1 0

pow operator miscalculation
by Irfan Fazel 09 Sep '01

09 Sep '01

While using GPC (both an older version and a more current version, info at bottom) the results of using the pow operator were not always correct (as shown in the typescript, results were same regardless of system). System #1 > uname -a SunOS csd 5.7 Generic_106541-15 sun4u sparc SUNW,Ultra-2 > gpc -v Reading specs from /usr/local/lang/lib/gcc-lib/sparc-sun-solaris2.7/2.8.1/specs gpc version 19990118, based on gcc-2.8.1 System #2 > uname -a SunOS cse 5.8 Generic_108528-10 sun4u sparc SUNW,Ultra-2 > gpc -v Reading specs from /usr/local/lib/gcc-lib/sparc-sun-solaris2.8/2.95.3/specs gpc version 20010623, based on 2.95.3 20010315 (release) Thanks, Fazel P.S. I apologize in the event that this this infact is not an error or I have emailed the wrong party.

3 3

GPC-IDE on Linux and windows NT and DDD
by Per Persson 06 Sep '01

06 Sep '01

Hi! I have two (trivial?) questions: 1. I have been using GPC with RHIDE on Windows-98 (rhide v 1.4, sep 30 1997, gpc version 19990510, based on gcc-2.8.1, DJGPP Version 2.02 ) This system works very good, I think. The small bugs I have encountered have all been easy to circumvent. Now the question: Is there any similar systems for Linux and for Windows NT? I have browsed the internet a little and I got the impression that the RHIDE system is not working stable under Linux. I also got the impression that it may not work very good on Windows NT. 2. Does GPC work with DDD under Linux? Thanks Per _________________________________________________________________ HÃ¤mta MSN Explorer kostnadsfritt pÃ¥ http://explorer.msn.se

3 2

Re: Problems/Questions/Answers
by Maurice Lombardi 06 Sep '01

06 Sep '01

da Silva, Joe wrote: > Hi Maurice! > > Just a simple question - are you sure about 9 bit bytes? > The CDC machines I remember (years ago!) had 6 bit bytes, > with an _optional_ two byte (12 bit) extended character set ... It was a 36 bits word machine, split as 4x9 on tape and 6x6 for chars ! Maurice -- Maurice Lombardi Laboratoire de Spectrometrie Physique, Universite Joseph Fourier de Grenoble, BP87 38402 Saint Martin d'Heres Cedex FRANCE Tel: 33 (0)4 76 51 47 51 Fax: 33 (0)4 76 51 45 44 mailto:Maurice.Lombardi@ujf-grenoble.fr

1 0

Problems/Questions/Answers
by Oldham, Adam 06 Sep '01

06 Sep '01

Well, I think I have figured out a way to work around the String problem. That being, to create types for each String I want to use and making it a packed array of whatever, for example: String2 = PACKED ARRAY[0..2] OF CHAR; This will allow the length to be stored in byte 0, and allow data in 1..2. This does require that the CONCAT, etc functions to be modified, but that is far easier than modifying the GPC Source. Now, I have a questions about GPC's word alignment. I currently have this source: =========================================================== program test; type desbuffer = packed array [1..8] of byte; enum1 = (encrypt,decrypt); record2 = record f1 : desbuffer; f2 : enum1; end; record1 = record b1 : byte; b2 : byte; case INTEGER of 1 : (r2 : record2); end; var r1 : record1; begin writeln('sizeof r1 = ',sizeof(r1)); writeln('r1.b1 = ',INTEGER((a)r1.b1)); writeln('r1.b2 = ',INTEGER((a)r1.b2)); writeln('r1.r2.f1 = ',INTEGER((a)r1.r2.f1)); writeln('r1.r2.f2 = ',INTEGER((a)r1.r2.f2)); end. ===================================================== With, the alignment of the output is: sizeof r1 = 16 r1.b1 = 134678600 r1.b2 = 134678601 r1.r2.f1 = 134678604 r1.r2.f2 = 134678612 Our old compiler did this: sizeof r1 = 12 r1.b1 = 4197796 r1.b2 = 4197797 r1.r2.f1 = 4197798 r1.r2.f2 = 4197806 Basically, GPC adds 3 extra bytes between record r1's b2 variable and the variant part of the record, where our old compiler only used 1 byte more. Is there a way to get GPC to pack in more closely for this type of instance? Next question regards ennumerated types, can enummerated type space be smaller than 4 bytes minimum? For example: TYPE: eVideoMode = (VideoStandard, VideoEnhanced); VAR a : eVideoMode; BEGIN Writeln (sizeof(a)); end. With GPC, the output is 4. With our old compiler, it stored the size of an enummerated variable as 1. I know these questions may be annoying, and I apologize for that. But the compiler evaluation is almost complete. These are some of the last big features that we cannot find workarounds for.... so if you know any, please let me know. Adam END ----------------------------------------------------------------------- C. Adam Oldham Marconi Commerce Systems Inc. Software Engineer 7300 West Friendly Ave. adam.oldham(a)marconi.com Greensboro, NC 27420-2087 Phone : 336.547.5952 Fax : 336.547.5079 ----------------------------------------------------------------------- This document contains confidential information of Marconi Commerce Systems Inc. In consideration of the receipt of this document, the recipient agrees not to reproduce, copy, use or transmit this document and/or the information contained herein, in whole or in part, or to suffer such actions by others, for any purpose except with written permission, first obtained, of Marconi Commerce Systems Inc., and further agrees to surrender the same to Marconi Commerce Systems Inc. upon demand. -----------------------------------------------------------------------

2 1

Re: Problems/Questions/Answers
by da Silva, Joe 06 Sep '01

06 Sep '01

I don't think it's surprising that a 32 bit compiler likes to align data to 32 bit (4 byte) boundaries. ;-) I'm no expert on this, but I suspect this may be an "optimisation" setting in the compiler build (for optimal code speed, I guess). Another thing to try is the magic word "packed", as in "packed record", in lieu of simply "record" ... Joe. > -----Original Message----- > From: Oldham, Adam [SMTP:adam.oldham@marconi.com] > Sent: Thursday, September 06, 2001 7:36 AM > To: 'gpc(a)gnu.de' > Subject: Problems/Questions/Answers > > Well, I think I have figured out a way to work around the String problem. > That being, to create types for each String I want to use and making it a > packed array of whatever, for example: > String2 = PACKED ARRAY[0..2] OF CHAR; > > This will allow the length to be stored in byte 0, and allow data in 1..2. > This does require that the CONCAT, etc functions to be modified, but that > is > far easier than modifying the GPC Source. > > Now, I have a questions about GPC's word alignment. I currently have this > source: > =========================================================== > program test; > > type > > desbuffer = packed array [1..8] of byte; > > enum1 = (encrypt,decrypt); > > record2 = record > f1 : desbuffer; > f2 : enum1; > end; > > record1 = record > b1 : byte; > b2 : byte; > case INTEGER of > 1 : (r2 : record2); > end; > > var > r1 : record1; > > begin > > writeln('sizeof r1 = ',sizeof(r1)); > > writeln('r1.b1 = ',INTEGER((a)r1.b1)); > writeln('r1.b2 = ',INTEGER((a)r1.b2)); > writeln('r1.r2.f1 = ',INTEGER((a)r1.r2.f1)); > writeln('r1.r2.f2 = ',INTEGER((a)r1.r2.f2)); > > end. > ===================================================== > With, the alignment of the output is: > sizeof r1 = 16 > r1.b1 = 134678600 > r1.b2 = 134678601 > r1.r2.f1 = 134678604 > r1.r2.f2 = 134678612 > > Our old compiler did this: > sizeof r1 = 12 > r1.b1 = 4197796 > r1.b2 = 4197797 > r1.r2.f1 = 4197798 > r1.r2.f2 = 4197806 > > Basically, GPC adds 3 extra bytes between record r1's b2 variable and the > variant part of the record, where our old compiler only used 1 byte more. > Is there a way to get GPC to pack in more closely for this type of > instance? > > > > Next question regards ennumerated types, can enummerated type space be > smaller than 4 bytes minimum? > For example: > TYPE: > eVideoMode = (VideoStandard, > VideoEnhanced); > VAR > a : eVideoMode; > > BEGIN > Writeln (sizeof(a)); > end. > > With GPC, the output is 4. With our old compiler, it stored the size of > an > enummerated variable as 1. > > > > I know these questions may be annoying, and I apologize for that. But the > compiler evaluation is almost complete. These are some of the last big > features that we cannot find workarounds for.... so if you know any, > please > let me know. > > Adam > END > > > ----------------------------------------------------------------------- > C. Adam Oldham Marconi Commerce Systems Inc. > Software Engineer 7300 West Friendly Ave. > adam.oldham(a)marconi.com Greensboro, NC 27420-2087 > Phone : 336.547.5952 Fax : 336.547.5079 > ----------------------------------------------------------------------- > This document contains confidential information of Marconi Commerce > Systems Inc. In consideration of the receipt of this document, the > recipient agrees not to reproduce, copy, use or transmit this document > and/or the information contained herein, in whole or in part, or to > suffer such actions by others, for any purpose except with written > permission, first obtained, of Marconi Commerce Systems Inc., and > further agrees to surrender the same to Marconi Commerce Systems Inc. > upon demand. > -----------------------------------------------------------------------

2 1

Internal compiler error on Unixware
by Theo Carr-Brion 05 Sep '01

05 Sep '01

I am trying to compile gpc on Unixware 7.1.1 with gcc 2.95.3 and gpc 20010623. These two versions do not seem to be important. I have installed the latest versions of binutils, grep, sed, texinfo fom www.gnu.org and have versions of gnu make and patch. I can compile these utilities and gcc. I get the following error compiling the gpc rts: ../.././xgpc -B../.././ -c -I. -W -Wall -Wpointer-arith -Wwrite-strings -Wmissing-prototypes -Wmissing-declarations -g -O2 -DRTS_RELEASE_STRING="'`cat /usr/local/src/gcc-2.95.3/gcc/p/rts/rts-version`'" --unit-path=/usr/local/src/gcc-2.95.3/gcc/p/rts --automake string.pas string.pas: In function `Memcompcase': string.pas:211: Internal compiler error in `add_bound_info', at dwarf2out.c:7383 Please submit a full bug report. There is no core dump. Can anyone help me please? Is there any other information I can give? Theo Carr-Brion

1 0

None
by Oldham, Adam 04 Sep '01

04 Sep '01

Well how do you guys debug GPC when you are testing new features you have written? ----------------------------------------------------------------------- C. Adam Oldham Marconi Commerce Systems Inc. Software Engineer 7300 West Friendly Ave. adam.oldham(a)marconi.com Greensboro, NC 27420-2087 Phone : 336.547.5952 Fax : 336.547.5079 ----------------------------------------------------------------------- This document contains confidential information of Marconi Commerce Systems Inc. In consideration of the receipt of this document, the recipient agrees not to reproduce, copy, use or transmit this document and/or the information contained herein, in whole or in part, or to suffer such actions by others, for any purpose except with written permission, first obtained, of Marconi Commerce Systems Inc., and further agrees to surrender the same to Marconi Commerce Systems Inc. upon demand. -----------------------------------------------------------------------

2 1

debugging the gpc executable
by Oldham, Adam 04 Sep '01

04 Sep '01

At the risk of sounding increcibly inept.... For those of you that have modified the GPC source, how do you go about debugging it? I've built it with debugging symbols, but GDB doesn't recognize any of the functions names, I've never had this problem before.... Any suggestions? Adam ----------------------------------------------------------------------- C. Adam Oldham Marconi Commerce Systems Inc. Software Engineer 7300 West Friendly Ave. adam.oldham(a)marconi.com Greensboro, NC 27420-2087 Phone : 336.547.5952 Fax : 336.547.5079 ----------------------------------------------------------------------- This document contains confidential information of Marconi Commerce Systems Inc. In consideration of the receipt of this document, the recipient agrees not to reproduce, copy, use or transmit this document and/or the information contained herein, in whole or in part, or to suffer such actions by others, for any purpose except with written permission, first obtained, of Marconi Commerce Systems Inc., and further agrees to surrender the same to Marconi Commerce Systems Inc. upon demand. -----------------------------------------------------------------------

2 1

How can I tell the Compiler, that the source of an unit is at the same place as the main-source, when I invoke it from somewhere else?
by michael paap 04 Sep '01

04 Sep '01

Hello, can anyone please help me with the following: I 've got a Directory, where there is the sourcecode which shall be compiled, and where the executable has to go. But I have to invoke gpc from a different directory. This works fine... i am doing it this way: /usr/local/bin/gpc -s --automake /home/michael/WebAssign/data/1612/compile/testeSchlange.pas -o /home/michael/WebAssign/data/1612/compile/executable This compiles "testeSchlange.pas" and produces a file named "executable" in the directory /home/michael/WebAssign/data/1612/compile/ But now I want to use an unit, which is not precompiled. The sourcecode of the unit is in the same directory as the sourcecode of the main-program. If I do the same as in the first case, the unit is not found. So tried it like this: /usr/local/bin/gpc -s --automake --unit-path /home/michael/WebAssign/data/1612/compile/ /home/michael/WebAssign/data/1612/compile/testeSchlange.pas -o /home/michael/WebAssign/data/1612/compile/executable But this does not work, too. So, can anyone give me the right syntax? What is the difference between --unit-path and --object-path? Greetings, Michael Paap

2 2

compiling gpc
by Theo Carr-Brion 04 Sep '01

04 Sep '01

I am trying to compile gpc20010623 with gcc 2.95.3 but the compiler complains about the following. in gcc/tree.h: extern int lang_decode_option PROTO((int, char **)); in gcc/p/lang.c: #ifdef EGCS int lang_decode_option (argc, argv) int argc; char **argv; { return pascal_decode_option (argc, argv); } #else /* not EGCS */ int lang_decode_option (p) char *p; { return pascal_decode_option (p); } #endif /* not EGCS */ However, I am not using EGCS but gcc 2.95.3. Is comething configured incorrectly? Theo Carr-Brion

3 2

Borland Pascal emulation : mayday, mayday, mayday !
by Jean-Pierre.Chevillard 03 Sep '01

03 Sep '01

bonjour, my question is : " is it, in GPC, some replacement for Borlnd's {R+ } ( = range check at run time, mainly on arrays indices) ?" I did not find any trace in the GPC manual. My trial (see below) where unsuccessful and I need it for my students ... with thanks, sincerly yours, J.-P. Chevillard Bat 333 universite Paris-Sud 91405 Orsay cedex France jpchevil(a)lei.u-psud.fr ********************************************************** * * * please reply also to jacqueline.chevillard(a)lac.u-psud.fr * * * ********************************************************** =================================== here is the pascal program :: more inex.pas program p2; { 2eme exemple } {$R+} const Nx = 5; var t : array [1..Nx] of integer; k : integer; begin for k:= 1 to Nx do begin t[k] := sqr (k) end ; for k:= -Nx to Nx*2 do begin writeln (k, " ", t[k]) end ; end . =================================== here the compilation command :: gpc -v index.pas =================================== and the output :: Reading specs from /usr/lib/gcc-lib/i386-linux/2.95.2/specs gpc version 19991030, based on 2.95.2 20000220 (Debian GNU/Linux) /usr/lib/gcc-lib/i386-linux/2.95.2/gpc-cpp -lang-pascal -v -nocharescape -D__GNU_PASCAL__ -undef -D__GNUC__=2 -D__GNUC_MINOR__=95 -D__GPC__=2 -D__GPC_MINOR__=0 -D__GPC_RELEASE__=19991030 -D__ELF__ -Dunix -D__i386__ -Dlinux -D__ELF__ -D__unix__ -D__i386__ -D__linux__ -D__unix -D__linux -Asystem(posix) -D__BITS_LITTLE_ENDIAN__=1 -D__BYTES_LITTLE_ENDIAN__=1 -D__WORDS_LITTLE_ENDIAN__=1 -Acpu(i386) -Amachine(i386) -Di386 -D__i386 -D__i386__ index.pas /tmp/ccOyhQfl.i GNU CPP version 2.95.2 20000220 (Debian GNU/Linux) (i386 Linux/ELF) #include "..." search starts here: #include <...> search starts here: /usr/local/include /usr/i386-linux/include /usr/lib/gcc-lib/i386-linux/2.95.2/include /usr/include End of search list. index.pas:3: warning: unknown GNU Pascal directive `$r' /usr/lib/gcc-lib/i386-linux/2.95.2/gpc1 /tmp/ccOyhQfl.i -quiet -dumpbase index.pas -version -famtmpfile=/tmp/ccuvcvNf.gpc -o /tmp/ccOyhQfl.s GNU Pascal version 2.95.2 20000220 (Debian GNU/Linux) (i386-linux) compiled by GNU C version 2.95.2 20000220 (Debian GNU/Linux). as -V -Qy -o /tmp/ccOyhQfl1.o /tmp/ccOyhQfl.s GNU assembler version 2.9.5 (i386-linux) using BFD version 2.9.5.0.37 /usr/lib/gcc-lib/i386-linux/2.95.2/collect2 -m elf_i386 -dynamic-linker /lib/ld-linux.so.2 /usr/lib/crt1.o /usr/lib/crti.o /usr/lib/gcc-lib/i386-linux/2.95.2/crtbegin.o -L/usr/lib/gcc-lib/i386-linux/2.95.2 /tmp/ccOyhQfl1.o -lgpc -lm -lgcc -lc -lgcc /usr/lib/gcc-lib/i386-linux/2.95.2/crtend.o /usr/lib/crtn.o Compilation finished at Wed Aug 29 15:33:08 ===================================

3 2

Re: Pascal on UnixWare 7
by Theo Carr-Brion 03 Sep '01

03 Sep '01

Ive tried again using gcc 2.95.3 and gpc20010623 and get the following error: gcc -c -DIN_GCC -DGPC -g -O2 `case "gcc" in *gcc*) echo -Wall;; esac` -I. -I.. -I. -I./.. -I./../config -I./../../include gpc-common.c In file included from gpc-common.c:29: gbe.h:152: conflicting types for `xmalloc' ../../include/libiberty.h:129: previous declaration of `xmalloc' In file included from gpc-common.c:35: util.h:196: conflicting types for `concat' ../../include/libiberty.h:48: previous declaration of `concat' gmake[2]: *** [gpc-common.o] Error 1 gmake[2]: Leaving directory `/usr/local/src/gcc-2.95.3/gcc/p' gmake[1]: *** [gpc1] Error 2 gmake[1]: Leaving directory `/usr/local/src/gcc-2.95.3/gcc' gmake: *** [all-gcc] Error 2 In include/libiberty.h: extern char *concat PARAMS ((const char *, ...)); extern PTR xmalloc PARAMS ((size_t)); In gcc/p/util.h: extern char *concat PARAMS ((char *, ...)); In gcc/p/gbe.h: extern char *xmalloc PARAMS ((size_t)); Can anyone help me please. I am mainly a pascal programmer and new to all this stuff. Theo Carr-Brion

2 1

Range Checking?
by Michael Paap 01 Sep '01

01 Sep '01

Hello, is there any command-line-option to enable range-checking, as in TP 5.5 the {$R} - switch ? greetings, Michael Paap

1 0

Re: Pascal on UnixWare 7
by Theo Carr-Brion 29 Aug '01

29 Aug '01

We tried compiling gpc earlier this year but have been too busy for a while. This was the outcome: Problems compiling gpc 20010121 under Unixware 7.1.1 using gcc 2.92.2 and Skunkware 7.1.1B 1. rts wont compile /usr/local/src/gcc-2.95.2/gcc/p/rts/string.pas: In function `Memcompcase': /usr/local/src/gcc-2.95.2/gcc/p/rts/string.pas:226: Internal compiler error in `add_bound_info', at gcc2.95.2//gcc/dwarf2out.c:7376 solved by compiling with -g0. We can live without debugging. 2. Tried a simple program: Program Test; begin WriteLn('Hello'); end. gpc test.pas gave: UX:as: WARNING: /var/tmp/cc00027c.s:76:name already bound as global: init_pascal_main_program UX:as: WARNING: /var/tmp/cc00027c.s:77:name already bound as global: pascal_main_program Undefined first referenced symbol in file sys_siglist /usr/local/lib/gcc-lib/i686-UnixWare7.1.1-sysv5/2.95.2/libgpc.a(rts.o) UX:ld: ERROR: a.out: fatal error: Symbol referencing errors. No output written to a.out test.s shows init_pascal_main_program etc all repeated. Theo Carr-Brion

1 0

Pascal on UnixWare 7
by Theo Carr-Brion 29 Aug '01

29 Aug '01

We are looking for a Pascal compiler for SCO UnixWare V7. We tried compiling the Gnu Pascal compiler but it came up with various problems. Has anyone got it successfully working on UnixWare? Another possibility we would like to try is to compile our programs on Linux and use the lxrun emulator that allows you to run Linux programs on UnixWare. Has anyone had any experience of this working? Any information or hints would be gratefully appreciated. Theo Carr-Brion

2 1

range checking
by Adam Naumowicz 29 Aug '01

29 Aug '01

Hello, Maybe that is a trivial question but I want to know whether there is a way to turn on/off range checking with GPC. I missed to find it in the man pages, seems it is in the set of options inherited from GCC which I'm not very familiar with ;-) Thanks in advance, Adam Naumowicz -------------------------------------- WWW: http://math.uwb.edu.pl/~adamn/ --------------------------------------

3 2

gcc-3
by Russell Whitaker 27 Aug '01

27 Aug '01

Hi Frank, Peter: Now that gcc-3.0.1 is out, looked at libbackend.a which is an internal lib of gcc's OBJS and compared that with the list of OBJS in 2.95.3: (no guarentee the following is 100% accurate) Going from 2.95.3 to 3.01: These were droped: stupid.o getpw.o mbchar.o dyn-string.o These are added: diagnostic.o builtins.o haifa-sched.o regrename.o predict.o lists.o ggc-common.o stringpool.o simplify-rtx.o ssa.o bb.reorder.o dcc.o sched-vis.o sched-dcps.o sched-rgn.o sched-ebb.o params.o ( What started this train of thought was the idea that perhaps I could make a 2.95.3 version of libbackend.a and then try writing a makefile to compile gpc without recompiling gcc. Last step would be to try using 3.0.1 libbackend.a ). The lists above any help? Russ

1 0

Re: Need a complete set implementation in GPC (data alignment)
by da Silva, Joe 23 Aug '01

23 Aug '01

Please see below ... Joe. > -----Original Message----- > From: Sven Jauring [SMTP:sven.jauring@hiq.se] > Sent: Thursday, August 23, 2001 6:52 PM > To: gpc(a)gnu.de > Subject: Re: Need a complete set implementation in GPC (data > alignment) > > Hi Frank > > Thank you for your help. I modifed the compiler according to your > instructions so that it uses Byte instead of MedCard for sets. > It worked wonders for the two 8 bit sets. (BSLB and BSHB in my example > code below). > Unfortunately I ran into trouble with the 16 bit sets. > > I need BIT0 to represent the least and BIT15 the most significant bit, but > since the 16 bit set is split into two bytes, BIT8 represents the least > and BIT7 the most significant bit: > > +-----+---+----+-----+---+----+ > USRINT |bit15|...|bit8|bit7 |...|bit0| > +-----+---+----+-----+---+----+ > BT |BIT7 |...|BIT0|BIT15|...|BIT8| > +-----+---+----+-----+---+----+ > > This seems like some sort of LittleEndianness? > [Joe da Silva] It sure does! Since this code seems to still be supported by it's creators, perhaps you can request them to put some sort of conditional compilation in the code, to take care of big/little-endianness? > Is it possible to have the byte order shifted, so that USRINT and BT > aligns? > > I can't just change the order of declaration for BITS, e.g > BITS=(BIT8,...,BIT15,...,BIT0,...,BIT7), since that would "undermine" the > use of ord() and subsets (e.g [BIT6..BIT8]). > > The Pascal code that I need to compile is not actually ours, so any > changes to the code has to be done everytime a new version is released. > (It is also rather large...) > The code would not have had this kind of contructions had it been ours. > ;-) > > Best Regards > Sven Jauring > > Frank Heckenbach wrote: > > Sven Jauring wrote: > > > Recently I posted some questions concerning problems with 16 bit > sets. > > I got good suggestions from some of you, but further analysis of > the > > code revealed this kind of construct: > > **************************** > > TYPE > > INT16 = INTEGER(16); > > INT8 = packed 0.. > > INT0_65535 = packed 0..65535; > > B_TYPE = (B1, B2, B3, B4, B5, B6, B7, B8); > > BITS = > (BIT0,BIT1,BIT2,BIT3,BIT4,BIT5,BIT6,BIT7,BIT8,BIT9, > > > > BIT10,BIT11,BIT12,BIT13,BIT14,BIT15); > > B_TYPE_SET = set of B_TYPE; > > BIT_SET = set of BITS; > > > > VAR > > OUT_REC = record case INT16 of > > 0 : (BSLB: B_TYPE_SET; > > BSHB: B_TYPE_SET); > > 1 : (USRINT : INT0_65535); > > 2 : (BT: BIT_SET); > > END; > > > > ****************************** > > I haven't followed the thread too intensely since I was out of town > last week. If I understand it correctly, what you need is that a set > > of a type of, say 8, elements is only 1 byte large. (However, in the > > code above, there will also be endianness problems, i.e. on a > little-endian system BSLB would align with the least significant > bits of USRINT and on a big-endian system with the most significant > bits; this problem could be overcome with a conditional compilation, > > see, e.g., the declaration of TWindowXY in GPC's CRT unit). > > GPC internally stores sets as arrays of a certain type, currently > MedCard. It is fairly easy to change that type to Byte (requires a > small change in p/rts/sets.pas (TSelElement) and two in p/util.c > (set_word_size and set_alignment)). > > However note: > > - This will slightly decrease the performance of set routines since > they will use byte rather than word operations internally. > > - Sets with and without this change will be incompatible. Don't try > to mix object files created by a patched and an unpatched > compiler. > > - This works only down to bytes. Trying even smaller types (like > Cardinal (4)) there will not work. > > Another approach would be to keep the array of words for sets at > least as big as a word, and use a single smaller type for smaller > sets. Then they would take only as many bits as required within a > packed record. However, this would require quite some effort. > Basically, every set operation would have to check if their > arguemnts are of the second type and convert them, and likewise > convert back the result. > > Personally, I'd suggest to change your Pascal code to not rely on > the variant alignment and such ... > > Frank > > -- > Frank Heckenbach, frank(a)g-n-u.de, <http://fjf.gnu.de/> > GPC To-Do list, latest features, fixed bugs: > <http://agnes.dida.physik.uni-essen.de/~gnu-pascal/todo.html> > << File: Card for Sven Jauring >>

1 0

Need a complete set implementation in GPC (data alignment)
by Sven Jauring 23 Aug '01

23 Aug '01

Hi Recently I posted some questions concerning problems with 16 bit sets. I got good suggestions from some of you, but further analysis of the code revealed this kind of construct: **************************** TYPE INT16 = INTEGER(16); INT8 = packed 0.. INT0_65535 = packed 0..65535; B_TYPE = (B1, B2, B3, B4, B5, B6, B7, B8); BITS = (BIT0,BIT1,BIT2,BIT3,BIT4,BIT5,BIT6,BIT7,BIT8,BIT9, BIT10,BIT11,BIT12,BIT13,BIT14,BIT15); B_TYPE_SET = set of B_TYPE; BIT_SET = set of BITS; VAR OUT_REC = record case INT16 of 0 : (BSLB: B_TYPE_SET; BSHB: B_TYPE_SET); 1 : (USRINT : INT0_65535); 2 : (BT: BIT_SET); END; ****************************** The code heavily depends on the record variants to be aligned exactly on top of each other. Is there anyone in the GPC project that is working, or planning to work, on this issue? ("optimized set constructor"??) How long would it take? The company I'm working for, HiQ Approve AB, is willing to discuss a financial contribution to get this done. Best Regards Sven Jauring

2 2

Variables not on the stack
by Oldham, Adam 22 Aug '01

22 Aug '01

I was wondering if anyone could tell me where variables not are not declared within procedures (aka not on the stack) are stored? And can this address space be changed by the user easily? Thanks, Adam ----------------------------------------------------------------------- C. Adam Oldham Marconi Commerce Systems Inc. Software Engineer 7300 West Friendly Ave. adam.oldham(a)marconi.com Greensboro, NC 27420-2087 Phone : 336.547.5952 Fax : 336.547.5079 ----------------------------------------------------------------------- This document contains confidential information of Marconi Commerce Systems Inc. In consideration of the receipt of this document, the recipient agrees not to reproduce, copy, use or transmit this document and/or the information contained herein, in whole or in part, or to suffer such actions by others, for any purpose except with written permission, first obtained, of Marconi Commerce Systems Inc., and further agrees to surrender the same to Marconi Commerce Systems Inc. upon demand. -----------------------------------------------------------------------

4 3

gpc compilation error under Solaris 7
by Thomas Keller 20 Aug '01

20 Aug '01

Dear support I just tried to compile gpc on Sun Solaris 7 with gcc 2.95.3. I got the following error message: Making info file `gpc.info' from `gpc.texi'. ../install.texi:143: Unknown command `smallformat'. ../install.texi:145: Unmatched `@end'. ../install.texi:155: Unknown command `smallformat'. ../install.texi:158: Unmatched `@end'. ../reference.texi:8587: itemize requires an argument: the formatter for @item. ../reference.texi:8599: itemize requires an argument: the formatter for @item. makeinfo: Removing output file `gpc.info' due to errors; use --force to preserve. make: *** [p/doc/en/info/gpc.info] Error 2 Can you give some hints how to overcome this problem? Thomas

2 1

output segmentation fault
by Christopher Ferrall 17 Aug '01

17 Aug '01

Before I spent a lot of time getting RewriteDemo to fail in the same way, any short answer to the following? A program that was running under Linux is failing on a sunfire cluster with GPC recently installed. The "RewriteDemo" in the manual executes normally, and I've tried several variants of the following code segments with the same results. var dmp_file : text; envname : string; ... assign(dmp_file,envname+'.output'); extend(dmp_file); ... A gdb backtrace: (gdb) run Starting program: /home/hpc1014/fmtest/./a.out Program received signal SIGSEGV, Segmentation fault. 0xff2b303c in strlen () from /usr/lib/libc.so.1 (gdb) bt #0 0xff2b303c in strlen () from /usr/lib/libc.so.1 #1 0xff302890 in _doprnt () from /usr/lib/libc.so.1 #2 0xff304658 in sprintf () from /usr/lib/libc.so.1 #3 0x2f664 in _p_get_file_name (File=0x690d8) at file.c:1512 #4 0x358b8 in Ioerrorfile (N=404, F=@0x690d8) at error.pas:849 #5 0x43050 in _p_unbind (File=0x690d8) at bind.c:271 #6 0x3d20c in Assignfile (T=@0x690d8, Name=@0xffbed128) at files.pas:198 #7 0x1bcec in Client_create (Environment=0x6da88, Starting_point=0x0, Starting_options=0x0) at /home/hpc1014/fmopt/fmopt_client.pas:215 #8 0x17804 in Fm_create (Environment=@0xffbed8b8, Fmobject=@0xffbed890, Starting_point=0x0, Starting_options=0x0, Sname=@0xffbed8a8) at /home/hpc1014/fmopt/fmopt.pas:86 #9 0x2b700 in Tmain () at /home/hpc1014/fmtest/testsh.pas:72 #10 0x2b794 in pascal_main_program () at /home/hpc1014/fmtest/testsh.pas:80 #11 0x2bb80 in main (argc=1, argv=0xffbefdec, envp=0xffbefdf4) at <implicit code>:81

2 1

gpc compilation error
by Thomas Keller 17 Aug '01

17 Aug '01

Hi I just tried to compile gpc on Sun Solaris 7 with gcc 2.95.3. I got the following error message: In file included from gpc-common.c:29: gbe.h:152: conflicting types for `xmalloc' ../../include/libiberty.h:129: previous declaration of `xmalloc' In file included from gpc-common.c:35: util.h:196: conflicting types for `concat' ../../include/libiberty.h:48: previous declaration of `concat' make[2]: *** [gpc-common.o] Error 1 make[2]: Leaving directory `/usr/local/gcc-2.95.3/gcc/p' make[1]: *** [gpc1] Error 2 make[1]: Leaving directory `/usr/local/gcc-2.95.3/gcc' make: *** [all-gcc] Error 2 Can you give some hints how to overcome this problem? with best regards Thomas

2 1

GPC Pedigree
by Loris Caren 17 Aug '01

17 Aug '01

Forgive me if this is a FAQ - the archive is still down and I haven't seen the question in the last month! Can anybody point to 'significant' users of GPC that I can offer to management to demonstate it's pedigree? I'd particularly like to hear of users in the aerospace / safty industries and in embedded environments.

1 0

GPC on Mac OS X / Darwin.
by pascal.pignard 16 Aug '01

16 Aug '01

Hello, I try and retry to port GPC - GNU Pascal compiler - on Mac OS X, all details are on my french web site http://perso.wanadoo.fr/blady section "Créations". I try the port with gcc 2.95.2 - (926-3) and gpc 2.1 (20010417). My strategy is to modified compiler files with the Apple gcc modified files, as it has been done for gpc based on GNU gcc files. I obtain some internal error when launching gpc - please see results file at http://perso.wanadoo.fr/blady/telechargements/gpc/resultats.pdf. The compiler don't seem to accept CALL instr for reload operation. Perhaps, I may have modify some critical sections for the compiler - please see http://perso.wanadoo.fr/blady/telechargements/gpc/CompGPC2_1.pdf for my instructions to build the compiler and http://perso.wanadoo.fr/blady/telechargements/gpc/gpc_a.tgz for the modified source files. Can you indicate where are these errors ? Otherwise, can you indicate me an other person to contact ? Is there any other person who is involved in the same port ? Thanks for all your effort, I apologize for my bad English and the French texts. Best regards, Pascal Pignard.

1 0

None
by Oldham, Adam 16 Aug '01

16 Aug '01

I was wondering if one of the GPC developers could email me privately regarding feature implementations, please. Thank youm Adam Oldham ----------------------------------------------------------------------- C. Adam Oldham Marconi Commerce Systems Inc. Software Engineer 7300 West Friendly Ave. adam.oldham(a)marconi.com Greensboro, NC 27420-2087 Phone : 336.547.5952 Fax : 336.547.5079 ----------------------------------------------------------------------- This document contains confidential information of Marconi Commerce Systems Inc. In consideration of the receipt of this document, the recipient agrees not to reproduce, copy, use or transmit this document and/or the information contained herein, in whole or in part, or to suffer such actions by others, for any purpose except with written permission, first obtained, of Marconi Commerce Systems Inc., and further agrees to surrender the same to Marconi Commerce Systems Inc. upon demand. -----------------------------------------------------------------------

1 0

Building GPC on sparc-solaris
by Anuradha 16 Aug '01

16 Aug '01

Hello, We still have not solved the problem. the error in "unsetenv" of strng2.pas still persists. we commented out the procedure itself and i get a big series of errors in other lines that i attach. can you kindly tell me what the problem could be? Thanks and Regards, Anu KOCHERLAKOTA.HARIKRISHNA/OU=DCCH1(a)bt0200.net.alcatel.be wrote: > frank(a)g-n-u.de wrote: > > > Kocherlakota Harikrishna wrote: > > > > > Now we are trying to use the same sources to build the compiler on > > > solaris and while executing the command > > > "make LANGUAGES=pascal" > > > > The LANGUAGES=pascal thing is only for gcc-2.8.1, not gcc-2.95.* > > where the languages are selected with configure. Please see the > > install instructions. > > > > Frank > > > > -- > > Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/ > > GPC To-Do list, latest features, fixed bugs: > > http://agnes.dida.physik.uni-essen.de/~gnu-pascal/todo.html > > KOCHERLAKOTA.HARIKRISHNA/OU=DCCH1(a)bt0200.net.alcatel.be wrote: > > > Hello > > we previously had built the compiler on Linux with the sources from > > > > ftp://agnes.dida.physik.uni-essen.de/gnu-pascal/alpha site. > > > > Now we are trying to use the same sources to build the compiler on > > solaris and while executing the command > > "make LANGUAGES=pascal" > > > > The following error is seen: > > > > make: Fatal error in reader: Makefile, line 2219: Unexpected end of line > > seen > > > > Current working directory /home/users/gcc-2.95.2/gcc > > > > *** Error code 1 > > > > make: Fatal error: Command failed for target `all-gcc' > > > > Please help us how to proceed further . > > > > Thanks and kind Regards > > hari > > ------------------------------------------------------------------------ > /users/anuradas/anu/gcc-2.95.2/gcc/p/rts --automake /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas > /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas: In procedure `Unsetenv': > /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:249: parse error before `Cstrings' > /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:250: parse error before `Cstrings' > /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:250: parse error before `Cstrings' > /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:250: warning: expression used as a statement - value is ignored > /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:250: warning: statement with no effect > /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:250: warning: expression used as a statement - value is ignored > /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:250: warning: statement with no effect > /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:251: parse error before `Cstrings' > /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:251: warning: expression used as a statement - value is ignored > /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:251: warning: statement with no effect > xgpc: Internal compiler error: program gpc1 got fatal signal 11 > make[2]: *** [string2.o] Error 1 > make[2]: Leaving directory `/home/users/anuradas/anu/gcc/p/rts' > make[1]: *** [pascal.rts] Error 2 > make[1]: Leaving directory `/home/users/anuradas/anu/gcc' > make: *** [install-gcc] Error 2 -- S.Anuradha Generic Data Tools, Alcatel Chennai. Alcanet : 2-757-7123 ../.././xgpc -B../.././ -c -I. -W -Wall -Wpointer-arith -Wwrite-strings -Wmissi ng-prototypes -Wmissing-declarations -g -O2 -DRTS_RELEASE_STRING="'`cat /home/u sers/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/rts-version`'" --unit-path=/home/user s/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts --automake /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:93: pointer domain type undefined /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:93: parse error be fore `Asmname' /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:93: comma missing after identifier `Environment' /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:93: parse error be fore `;' /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:94: comma missing after identifier `Environment' /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:96: `Penvironment' redeclared as different kind of symbol /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:86: previous decla ration of `Penvironment' /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:96: redefinition o f `Environment' /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:96: `Environment' previously declared here /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas: In procedure `Set env': /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:198: type name exp ected, identifier `Penvironment' given /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:199: initial value is of wrong type /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:199: warning: type defaults to `int' in declaration of `Newenvironment' /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:208: pointer type required for `New' /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:209: invalid type argument of ``^'' /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:209: accessing fie lds of a restricted type object is not allowed /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:209: accessing a c omponent of a restricted type object is not allowed /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:209: subscripted o bject is not an array or string /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:210: invalid type argument of ``^'' /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:210: accessing fie lds of a restricted type object is not allowed /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:213: incompatible types in assignment /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas: In procedure `Uns etenv': /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:225: warning: unus ed variable `J' /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:225: warning: unus ed variable `I' /home/users/nagarajb/vinayak/gcc-2.95.2/gcc/p/rts/string2.pas:113: warning: unus ed parameter `Varname' xgpc: Internal compiler error: program gpc1 got fatal signal 11 make[2]: *** [string2.o] Error 1 make[2]: Leaving directory `/home/users/nagarajb/una/gcc/p/rts' make[1]: *** [pascal.rts] Error 2 make[1]: Leaving directory `/home/users/nagarajb/una/gcc' make: *** [all-gcc] Error 2 $

1 0

compiler crash
by Adam Naumowicz 14 Aug '01

14 Aug '01

Hello, Trying to debug a program I used a conditional compilation of my source which simply includes a couple (two or three) of additional units providing some extended output to a file. Unfortunately then I got gpc: Internal compiler error: program gpc1 got fatal signal 11 gpc1: gpc exited with status 1 gpc1: gpc exited with status 1 gpc1: gpc exited with status 1 Maybe there is a limit of used units or some other entity that I exceeded? In fact I don't think if that could be that easy, but maybe ... ;-) I use the latest snapshot on Solaris. The problem existed also with the Linux version but vanished when I removed a conflict with overloaded methods. And I would like to re-ask a simple question for which I still don't know the answer: how to switch on/off the range checking with GPC ? Regards, Adam Naumowicz -------------------------------------- WWW: http://math.uwb.edu.pl/~adamn/ --------------------------------------

1 0

automake, autoconf etc.. missing
by Kocherlakota Harikrishna 09 Aug '01

09 Aug '01

Hello, while building the GPC for sun sparc solaris 2.6(native) the following messages are seen with 'configure' command checking for working autoconf missing checking for working automake missing checking for working xgettext missing checking for working bison missing will it any way cause problem in building the compiler ? As building of each of these tools requires lot of time, can i get executables for sparc solaris anywhere ? Any other alternative ? please suggest me. thanks and regards hari

3 3

request for help
by Kocherlakota Harikrishna 09 Aug '01

09 Aug '01

hello, while building the GPC for sparc sun solaris 2.6 (native) the following error is coming with 'make ' command. Can anybody help me out. make[1]: *** No rule to make target `choose-temp.o', needed by `xgpc'. Stop. make[1]: Leaving directory `/home/users/kharik/hari/gcc' make: *** [all-gcc] Error 2 thanks and regards hari

1 0

building GPC on sun-solaris
by Anuradha 07 Aug '01

07 Aug '01

Hello, I am using binutils-2.10,gcc-2.95.2 and gpc20010107 to build a GPc for sun-solaris-2.6. I did a configure with <gpc-src-dir>/configure --prefix=<objdir> --enable-languages=pascal --with-gnu-as --with-gnu-ld then gave make bootstrap It gives me an error fixinc.sh : cannot open file but the current directory is ofcourse <gpcsource direc>/gcc where fixinc is. Do you know what the error could be? Thank you. Kind Regards, Anu frank(a)g-n-u.de wrote: > Mirsad Todorovac wrote: > > > I have to report a bug in your code which prevents your PASCAL compiler to > > be built unless -DEGCS -DEGCS92 and -DEGCS95 are all defined (using 2.95.3 > > back-end). This has not been set by ``configure'', so manual intervention > > was needed. I can't tell if defining -DEGCS97 would be better than not, > > but I was satisfied (as for now) with having a PASCAL running on the > > system!!! (alpha-dec-osf4.0b box, gcc-2.95.3 compiler suite, gmake, gsed) > > > > Also, never in the installation instruction it isn't mentioned that GPC > > needs a smarter sed - this could be addressed by ``configure'' script too. > > Well, I'm not so familiar with non-GNU sed's. Since you didn't tell > us exactly fails with sed, I can only guess. Does the following > help? > > --- /home/gpc/src/p/config-lang.in.orig Mon May 7 03:54:43 2001 > +++ /home/gpc/src/p/config-lang.in Sun May 27 00:58:49 2001 > @@ -26,8 +26,8 @@ > # stagestuff - files to add to $(STAGESTUFF) > # diff_excludes - files to ignore when building diffs between two versions. > > -version=`sed -ne '/version_string/s/.*\"$[^ \"]*$[ \"].*/\1/p' "$srcdir/version.c"` > -mainversion=`echo $version | sed -e 's/.*\"$[0-9]*\.[0-9]*\.[0-9]*$.*/\1/'` > +version=`grep version_string "$srcdir/version.c" | sed -e 's/[^"]*"//;s/[ "].*//'` > +mainversion="$version" > if echo $version | grep '2\.9\|3\.0' > /dev/null; then > echo "#define EGCS" > gcc-version.h > echo "#define EGCS92" >> gcc-version.h > > (Peter, if you read this: If I'm not mistaken, mainversion is always > equal to version because the regex for mainversion contained a `"' > and version never contains any `"'. Since I don't know for which > strange e?gc[cs] version numbering schemes this might be useful, I > can't check it, either. So I'm just setting mainversion=version now. > If that's not was meant, please correct it yourself.) > > > Also, very helpful would be if the building of PASCAL compiler wouldn't > > include "fixing" of C include files again, which takes anormous amount of > > time on Alpha/Digital-Unix box. > > Building GPC always causes (most) of the C compiler to be built > because GPC shares parts with it. The fixincludes thing is probably > superfluous in this case, but I don't know if/how it can easily be > changed. Perhaps someone else can help you there... > > Maybe doing `touch stmp-fixinc' before the make helps, but that's > untested. > > Frank > > -- > Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/ > GPC To-Do list, latest features, fixed bugs: > http://agnes.dida.physik.uni-essen.de/~gnu-pascal/todo.html -- S.Anuradha Generic Data Tools, Alcatel Chennai. Alcanet : 2-757-7123

2 1

signals
by Adam Naumowicz 07 Aug '01

07 Aug '01

Hello, I have two questions: Is that the proper way to install a signal handler? program testsignal; uses gpc; Procedure CatchSignal(sig:integer); begin case sig of 2: writeln('Interrupted'); end; end; var o:TSignalHandler; b:boolean; i:longint; begin InstallSignalHandler(SigInt,CatchSignal,true,true,o,b); for i:=1 to 2000 do writeln(i); end. I intended it to be a SIGINT handler, but the Ctrl+C in the console doesn't make the CatchSignal proc executed. I also don't know why I cannot write SigInt as the case label - the compiler complains that SigInt is not a constant or a variable of an ordinal type (but it is declared as an integer in the GPC unit). Any ideas? The second question I would like to ask is about the 'segmentation fault' I get in one of my progs. I thought it can appear if I try to reference something that is already disposed, but this time my debugger says that it appears where a 'goto' statement is in the code. The executable is quite big (1,7 MB without the -s switch) and maybe that is the problem ? Anyone can tell me what actually the 'segmentation fault' is and what can be the reason of it? Thanks in advance. Regards, Adam Naumowicz -------------------------------------- WWW: http://math.uwb.edu.pl/~adamn/ --------------------------------------

4 8

Re: [Fwd: 16 bit sets?]
by da Silva, Joe 07 Aug '01

07 Aug '01

OK then, what I suggested might be suitable. All you would need is to redefine some of your type and record definitions, a bit. You wouldn't need to touch the "code proper", and the same source code could run on your older platforms too. Eg. perhaps as follows : type INT0_255 = packed 0..255; BITS = (BIT0,BIT1,BIT2,BIT3, BIT4,BIT5,BIT6,BIT7, BIT8,BIT9,BIT10,BIT11, BIT12,BIT13,BIT14,BIT15, BIT16,BIT17,BIT18,BIT19, BIT20,BIT21,BIT22,BIT23, BIT24,BIT25,BIT26,BIT27, BIT28,BIT29,BIT30,BIT31); var VARIABLE1 : record case shortint of 0: (DUMMY0, AWORD: shortint); 1: (DUMMY1: shortint; MSB, LSB: INT0_255); 2: (BT : BITS); end; Of course, DUMMY0/DUMMY1/BIT16..BIT31 would be just wasted memory, but you say that's not an issue ... You could even have some "conditional defines" to exclude them on other platforms, if required. :-) BTW, I have no idea which way the (set) bits and (16 bit) words are aligned within 32 bit words, for your intended platform(s), but I'm sure you can figure that out anyway. Joe. > -----Original Message----- > From: Sven Jauring [SMTP:sven.jauring@hiq.se] > Sent: Monday, August 06, 2001 10:02 PM > To: da Silva, Joe > Subject: Re: [Fwd: 16 bit sets?] > > Hi Joe > > Memory waste is no issue, but original code stability is. That is, I need > to > keep the original code as unmodified as possible. > > We are actually looking at how much work it would be to add the "set size" > functionality in GPC! > I would appretiate any thoghts/advice on this subject from anyone! > > /sven > > "da Silva, Joe" wrote: > > > Just an idea ... if memory (waste) isn't an issue, and if you > > can't (currently) get 16 bits sets with GPC, how about making > > everything 32 bit instead? > > > > Joe. > > > > > -----Original Message----- > > > From: Sven Jauring [SMTP:sven.jauring@hiq.se] > > > Sent: Friday, August 03, 2001 9:22 PM > > > To: Russell Whitaker > > > Cc: gpc(a)gnu.de > > > Subject: Re: [Fwd: 16 bit sets?] > > > > > > Hi Russel > > > Thanks for your help, but unfortunatly the pascal code that I'm trying > to > > > compile actually deals specifically with sets. (E.g. Variable1.BT := > > > Variable1.BT - [BIT4] + [BIT2]; and so forth...) > > > > > > Best Regards > > > Sven Jauring > > > > > > Russell Whitaker wrote: > > > > > > > On Fri, 3 Aug 2001, Sven Jauring wrote: > > > > > > > > > Hi again! > > > > > > > > > > I need to be able to specify not only 16 bit sizes but also 8 bit > and > > > 4 > > > > > bit sizes as well. > > > > > Is there anyone out there that could give me a hint of HOW to > > > implement > > > > > the functionality in GPC > > > > > > > > Patched your program a little. It *might* be what you're looking > for. > > > > > > > > > ******************************** > > > > type > > > > INT0_255 = packed 0..255; > > > > > > > > { BITS = (BIT0,BIT1,BIT2,BIT3, > > > > BIT4,BIT5,BIT6,BIT7, > > > > BIT8,BIT9,BIT10,BIT11, > > > > BIT12,BIT13,BIT14,BIT15); } > > > > > > > > bitarray = packed array [ 0..15 ] of integer ( 1 ); > > > > > > > > var > > > > VARIABLE1 : record case shortint of > > > > 0: (AWORD: shortint); > > > > 1: (MSB: INT0_255; > > > > LSB: INT0_255); > > > > 2: (BT : bitarray ); > > > > end; > > > > > > > > begin > > > > writeln( sizeof (VARIABLE1)); > > > > end. > > > > > ********************************* > > > > > > > > prints 2 (bytes) > > > > > > > > Hopes this helps > > > > Russ << File: Card for Sven Jauring >> << File: Card for Sven > Jauring >>

1 0

Re: [Fwd: 16 bit sets?]
by da Silva, Joe 06 Aug '01

06 Aug '01

Just an idea ... if memory (waste) isn't an issue, and if you can't (currently) get 16 bits sets with GPC, how about making everything 32 bit instead? Joe. > -----Original Message----- > From: Sven Jauring [SMTP:sven.jauring@hiq.se] > Sent: Friday, August 03, 2001 9:22 PM > To: Russell Whitaker > Cc: gpc(a)gnu.de > Subject: Re: [Fwd: 16 bit sets?] > > Hi Russel > Thanks for your help, but unfortunatly the pascal code that I'm trying to > compile actually deals specifically with sets. (E.g. Variable1.BT := > Variable1.BT - [BIT4] + [BIT2]; and so forth...) > > Best Regards > Sven Jauring > > Russell Whitaker wrote: > > > On Fri, 3 Aug 2001, Sven Jauring wrote: > > > > > Hi again! > > > > > > I need to be able to specify not only 16 bit sizes but also 8 bit and > 4 > > > bit sizes as well. > > > Is there anyone out there that could give me a hint of HOW to > implement > > > the functionality in GPC > > > > Patched your program a little. It *might* be what you're looking for. > > > > > ******************************** > > type > > INT0_255 = packed 0..255; > > > > { BITS = (BIT0,BIT1,BIT2,BIT3, > > BIT4,BIT5,BIT6,BIT7, > > BIT8,BIT9,BIT10,BIT11, > > BIT12,BIT13,BIT14,BIT15); } > > > > bitarray = packed array [ 0..15 ] of integer ( 1 ); > > > > var > > VARIABLE1 : record case shortint of > > 0: (AWORD: shortint); > > 1: (MSB: INT0_255; > > LSB: INT0_255); > > 2: (BT : bitarray ); > > end; > > > > begin > > writeln( sizeof (VARIABLE1)); > > end. > > > ********************************* > > > > prints 2 (bytes) > > > > Hopes this helps > > Russ << File: Card for Sven Jauring >>

1 0

Re: ISO standards (was Good version for mostly IT activity)
by da Silva, Joe 06 Aug '01

06 Aug '01

See below ... Joe. > -----Original Message----- > From: Bohdan Vlasyuk [SMTP:bohdan@kivc.vstu.vinnica.ua] > Sent: Saturday, July 21, 2001 12:10 AM > To: gpc(a)gnu.de > Subject: Good version for mostly IT activity > > Hi ! > > I need your advice -- I want to find stable gpc version suitable for > my needs.. > > I'm run Linux [2.4.6 as for now, and I plan to further upgrades :-)]. > > I need gpc to compile user programs, which would be likely developed > under mics. environment, but generally under DOS with old borland > pascal {They think that BP IDE is the best}. Programs are expected to > be relatively small, and I don't think that anyone would use > OO-extensions more that for few strings, it would at all. > > Actually, BP compatibility is not REQUIRED, but would be nice. Are > there any standards in Pascal like ISO C ?? > [Joe da Silva] Yes, there are actually two ISO Pascal standards : 1. ISO 7185 - Non-extended (aka Classic) Pascal 2. ISO 10206 - Extended Pascal (superset) You can obtain a free copy of ISO 10206, in either A4 or US-Legal document size, at : http://ftp.digital.com/pub/Digital/Pascal/iso10206_a4.ps.gz http://ftp.digital.com/pub/Digital/Pascal/iso10206.ps.gz You can also find an easy-to-read introduction to Extended Pascal (by Prospero Software) at : http://www.prosperosoftware.com/epintro.html > Personally I don't program Pascal, so I can't judge which one is > better. > > What can you tell me about FPC? Is it worth looking ?? > > thank you for your opinion. > > P.s.: If that's wrong list for that type of questions, I'm terrible > sorry, could you please direct me to right source? > > -- > "I once witnessed a long-winded, month-long flamewar over the use of > mice vs. trackballs...It was very silly." > (By Matt Welsh)

1 0

GPC on Mac OS X
by chewie＠mac.com 05 Aug '01

05 Aug '01

Hello, Has anyone been successful compiling GPC for Mac OS X. I am having no luck. Thanks, J

1 0

Re: Automatic gpc installation
by Ernst-Ludwig Bohnen 03 Aug '01

03 Aug '01

On Thu, 2 Aug 2001, Stephen Hurd wrote: > Yeah, gmake is in the path if it's installed from the ports collection or as > a package. It's not in the default install though, so maybe a test and > warning if it doesn't exist... doesn't really matter though, I'd think > anyone would pick up on that pretty quick. Removed the 'alias make=..' and made a check wether gmake can be used. This should work reliable on all? Unix/Linux Systems. Gmake is mandatory, not make. See: http://www.desy.de/~bohnen/gpc/install.gpc > > I wasn't sure if you wanted the output from ftp put into a logfile or not, I > noticed that wget was outputting to outfile (If I understand wget properly - > never used it) but I left it to the screen... mostly because it has a nice > status bar. The reason to hide the output (and not throwaway) of wget is to allow together with the -v 0 switch a batch version, which makes possible a remote triggered 'Hands off installation' for many machines on a bigger site. As far as I anderstand various ftp solutions, ftp works fine in interactive mode but not in batch. Do be done: Correct output of wget under control of the variable VERBOSITY !! Thank you for suggestions > It would have required less changes if it was left using wget, but since I > don't use it, I figured I'd set it up so other people could not use it too. > :-)

2 1

[Fwd: 16 bit sets?]
by Sven Jauring 03 Aug '01

03 Aug '01

Hi again! I need to be able to specify not only 16 bit sizes but also 8 bit and 4 bit sizes as well. Is there anyone out there that could give me a hint of HOW to implement the functionality in GPC and some kind of estimation of how long TIME it would take? Best Regards Sven Jauring -------- Original Message -------- Subject: 16 bit sets? Date: Tue, 31 Jul 2001 16:34:50 +0200 From: Sven Jauring <sven.jauring(a)hiq.se> To: gpc(a)gnu.de Hi, I'm working in a project, where I need to compile old pascal code using GPC (beta 20010201). The code is scattered with variable types, that depends on bit correlations in unions. E.g: ******************************** type INT0_255 = packed 0..255; BITS = (BIT0,BIT1,BIT2,BIT3, BIT4,BIT5,BIT6,BIT7, BIT8,BIT9,BIT10,BIT11, BIT12,BIT13,BIT14,BIT15); var VARIABLE1 : record case int16 of 0: (WORD: INTEGER); 1: (MSB: INT0_255; LSB: INT0_255); 2: (BT : set of BITS); end; ********************************* In order for this declaration to function properly, I seem to need the possibility to specify 'BT' to be just 16 bits, and not 32 bits, which seems to be default. I tried to find out from the manual if this is possible. I found the following passages: "The Extended Pascal features still missing from GPC are ..., set types with variable bounds, ..." and "Planned features: Other types... *sparse sets; sets of arbitrary types ?? ???" For me, this is pretty deep water, so I won't take offence if you tell me to RTFM, but never the less... My question is this: Can it be done in the latest release (20010623) or should I wait for someone to implement this feature? Best Regards Sven Jauring

2 2

calling c code from pascal
by Miguel Pérez E 02 Aug '01

02 Aug '01

Hello, sorry if this is a trivial question. I´d like to use dzcomm library in my pascal program. It is necesary to first initialize allegro: ///****************************************// program Terminal; {$L c:\djgpp\allegro\src\allegro.c} function allegro_init() : integer; asmname 'allegro_init'; external; begin allegro_init(); Writeln('Hola, esta es una prueba.'); readln; end. ///****************************************// but the gpc says: C:\DJGPP\allegro\dzcomm\term>gpc term2.pas --autobuild term2.pas:5: parse error before `)' term2.pas: In main program: term2.pas:8: parse error before `)' term2.pas:8: warning: function call as a statement - value is ignored What I am doing wrong?, or what switches do I have to set? Thank you for your help. Miguel Pérez E Development Engineer Primestone E-Mail: miguel.perez(a)primestone.com Tel: (571) 6265432 Fax: (571) 6156377

2 1

Automatic gpc installation
by Ernst-Ludwig Bohnen 02 Aug '01

02 Aug '01

Hi gpc fans, I think many people are bullfighting with gpc-installation on various platforms, me as well. It's a hard job. Hence I decided to write a tool trying to do all the work from scratch automatically. The tool (install.gpc) is intended to work for UNIX/Linux systems: System Status ----------------------------------------------- Linux SuSE 7.2 OK Linux SuSE 6.3 OK, makeinfo ver. 1.68 didn't work, needs 4.0 SunOS See URLs below IRIX See URLs below, same problem as for SunOS HP-UX Wrong make version, delayed AIX Not tested up to now, delayed The current status is that install.gpc seems to work fine only on Suse 6.3 & 7.2. Initial problems were due to an outdated makeinfo. Everybody who is interested may download the tool from: http://www.desy.de/~bohnen/gpc/install.gpc make it executeble and try it out (first time I recommend to do it as a simple user). Simply type: install.gpc <RET> to install gpc from scratch (default is pgc-20010623 with gcc-2.95.2). Type install.gpc -h for how to modify defaults and control verbosity, etc. Have a look on pre/post mortem log files written by install.gpc. http://www.desy.de/~bohnen/gpc/install.log.SUN http://www.desy.de/~bohnen/gpc/install.log.IRIX http://www.desy.de/~bohnen/gpc/install.log.HP-UX (no gmake) Maybe there is somebody who knows the reason for abnormal end of installation. Hints and suggestions are welcome to make install.gpc run more successful on those systems. Ernst-Ludwig

2 2

16 bit sets?
by Sven Jauring 31 Jul '01

31 Jul '01

Hi, I'm working in a project, where I need to compile old pascal code using GPC (beta 20010201). The code is scattered with variable types, that depends on bit correlations in unions. E.g: ******************************** type INT0_255 = packed 0..255; BITS = (BIT0,BIT1,BIT2,BIT3, BIT4,BIT5,BIT6,BIT7, BIT8,BIT9,BIT10,BIT11, BIT12,BIT13,BIT14,BIT15); var VARIABLE1 : record case int16 of 0: (WORD: INTEGER); 1: (MSB: INT0_255; LSB: INT0_255); 2: (BT : set of BITS); end; ********************************* In order for this declaration to function properly, I seem to need the possibility to specify 'BT' to be just 16 bits, and not 32 bits, which seems to be default. I tried to find out from the manual if this is possible. I found the following passages: "The Extended Pascal features still missing from GPC are ..., set types with variable bounds, ..." and "Planned features: Other types... *sparse sets; sets of arbitrary types ?? ???" For me, this is pretty deep water, so I won't take offence if you tell me to RTFM, but never the less... My question is this: Can it be done in the latest release (20010623) or should I wait for someone to implement this feature? Best Regards Sven Jauring

2 1

no gpcpp ?
by Oliver Kullmann 28 Jul '01

28 Jul '01

Hi, on the search for an ISO 7185 compliant compiler I found gpc, which I have installed in Suse 7.2 Linux, however, trying to compile something doesn't work: gpc: installation problem, cannot exec `gpcpp': No such file or directory Now I have no idea what to do (the documentation does not say something about that (at least I didn't find it)). Can somebody help?! Thanks in any case! Oliver

5 8

module/unit interface `Crt' could not be imported
by Miguel Pérez E 27 Jul '01

27 Jul '01

Hello, sorry if this is a trivial question. I´m trying to compile the folloing program: program DateTimeDemo; uses DOS, CRT ; var ano, mes, dia, numdia : word; begin GetDate(ano, mes, dia, numdia); WriteLn('Current date is: ' + ano)); readkey; end. and gpc cannot find CRT and DOS, but these units are present. The output of compilations this: C:\DJGPP\src>gpc dosuntes.pas --unit-path="c:\djgpp\lib\gcc-lib\djgpp\2.953\unit s" -v Reading specs from c:/djgpp/lib/gcc-lib/djgpp/2.953/specs gpc version 20010623, based on 2.95.3 20010315/djgpp (release) c:/djgpp/lib/gcc-lib/djgpp/2.953/gpcpp.exe -lang-pascal -v -famtmpfile=c:/djgpp /tmp\ccaaaaaa -funit-path=c:\djgpp\lib\gcc-lib\djgpp\2.953\units -fdelphi-commen ts -D__GNU_PASCAL__ -undef -D__GNUC__=2 -D__GNUC_MINOR__=95 -D__GPC__=2 -D__GPC_ MINOR__=0 -D__GPC_RELEASE__=20010623 -D__BITS_LITTLE_ENDIAN__=1 -D__BYTES_LITTLE _ENDIAN__=1 -D__WORDS_LITTLE_ENDIAN__=1 -Dunix -Di386 -DGO32 -DDJGPP=2 -DMSDOS - D__OS_DOS__=1 -D__unix__ -D__i386__ -D__GO32__ -D__DJGPP__=2 -D__MSDOS__ -D__OS_ DOS__=1 -D__unix -D__i386 -D__GO32 -D__DJGPP=2 -D__MSDOS -Asystem(unix) -Asystem (msdos) -Acpu(i386) -Amachine(i386) -Acpu(i386) -Amachine(i386) -Di386 -D__i386 -D__i386__ -D__tune_pentium__ -imacros c:/djgpp/lib/djgpp.ver -remap dosuntes.pa s c:/djgpp/tmp\cccaaaaa GNU Pascal Compiler PreProcessor version 20010623, based on gcc-2.95.3 20010315/ djgpp (release) (80386, BSD syntax) #include "..." search starts here: #include <...> search starts here: c:/djgpp/lang/pascal c:/djgpp/include /usr/local/include c:/djgpp/i586-pc-msdosdjgpp/include c:/djgpp/lib/gcc-lib/djgpp/2.953/include c:/djgpp/include End of search list. c:/djgpp/lib/gcc-lib/djgpp/2.953/gpc1.exe c:/djgpp/tmp\cccaaaaa -quiet -dumpbas e dosuntes.pas -version -famtmpfile=c:/djgpp/tmp\ccaaaaaa -funit-path=c:\djgpp\l ib\gcc-lib\djgpp\2.953\units -o c:/djgpp/tmp\ccdaaaaa GNU Pascal version 2.95.3 20010315/djgpp (release) (djgpp) compiled by GNU C ver sion 2.95.3 20010315/djgpp (release). GNU Pascal version is actually 20010623, based on gcc-2.95.3 20010315/djgpp (rel ease) dosuntes.pas:34: module/unit interface `Dos' could not be imported How can I get it working? Thank you in advance Miguel Pérez E Development Engineer Primestone E-Mail: miguel.perez(a)primestone.com Tel: (571) 6265432 Fax: (571) 6156377

2 1

bug in string concatenation ?
by Maurice Lombardi 27 Jul '01

27 Jul '01

Hello This is the smallest program which displays the bug program bug; var s:string[255]=''; begin s:=s+'a'; s:=s+'b'; end. It works fine apparently. But by stepping with a debugger, I see that after each string concatenation the stack is increased by 16 bytes. No harm in usual programs since the stack is released at each exit of procedure by something like mov %ebp,%esp But in a procedure which was computing 80*480 bytes and concatenating them to strings, the increase in stack size by 16*80*480=614400 bytes overflowed the default djgpp stack size of 512k, producing weird crashes. As a workaround I increased the stack size of course, but the bug should be solved. The bug is present with or without optimization options, both on my work computer: djgpp v2.03, gpc-20010623 based on gcc-2.95.3, binutils 2.11.2, W98se dos box, and on my home computer djgpp v2.03, gpc-20010315 based on gcc-2.95.2, binutils 2.9.5.1, bare dos 6.23 The first step would be to try on a linux machine to see if it is a problem of gpc or djgpp. I have none at hand presentlly. Hope this helps Maurice -- Maurice Lombardi Laboratoire de Spectrometrie Physique, Universite Joseph Fourier de Grenoble, BP87 38402 Saint Martin d'Heres Cedex FRANCE Tel: 33 (0)4 76 51 47 51 Fax: 33 (0)4 76 51 45 44 mailto:Maurice.Lombardi@ujf-grenoble.fr

2 1

Gnu Pascal on Palm?
by Heuristx＠Yahoo.com 26 Jul '01

26 Jul '01

Hi, Sorry if this is an silly or old question - I'm new to Gnu Pascal and I haven't found anything about this in the archives or the FAQ... The Gnu Pascal intro lists operating systems for which we can compile it, but then it states, 'and more...' It also says that Gnu Pascal can be compiled on any device that supports the Gnu C. Now, there is a cross-platform Gnu C compiler that works on Windows but compiles for the Palm OS. Does it mean that it's possible to make a Pascal compiler for the Palm? I haven't heard anything about it, but it would be the most significant news since Gnu C for the Palm itself... Even if it has to run on the Palm device, it would open up some interesting possibilities. Steve Philipp _________________________________________________________ Do You Yahoo!? Get your free @yahoo.com address at http://mail.yahoo.com

1 0

install-gpc-binary : gpc: cannot execute
by Anuradha 26 Jul '01

26 Jul '01

Hello, The gpc is formed after a lot of changes in the script .But it gives an error "gpc: cannot execute" Can you kindly tell me why it happens. Thanks and Regards, Anu frank(a)g-n-u.de wrote: > Kocherlakota Harikrishna wrote: > > > I downloaded the binary file gpc-19990118.sparc-sun-solaris2.6.tar.gz > > for my solaris 2.6 machine and unpacked it as given. > > Then i tried to compile simple pascal program. > > The following error is seen : > > "Installation problem. Cannot execute gpc-cpp" > > GPC binaries must be installed exactly in the directory they were > compiled for. If the archive contains absolute paths, it means you > have to extract it from the root directory (/). > > If this isn't possible (you're not the sysadmin, or don't want to), > see the script > ftp://agnes.dida.physik.uni-essen.de/gnu-pascal/alpha/binary/install-gpc-binary > > Frank > > -- > Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/ > GPC To-Do list, latest features, fixed bugs: > http://agnes.dida.physik.uni-essen.de/~gnu-pascal/todo.html -- S.Anuradha Generic Data Tools, Alcatel Chennai. Alcanet : 2-757-7123

2 1

about serial communciations
by Miguel Pérez E 26 Jul '01

26 Jul '01

Hello, I am new to GPC but I have experience with Delphi. There I use Turbopower´s Async library to do serial communications. Can I use that library with GPC?. Can you show me a simple program that demonstrates serial communications? or where do I get it? Thank you in advance. Miguel Pérez E Development Engineer Primestone E-Mail: miguel.perez(a)primestone.com Tel: (571) 6265432 Fax: (571) 6156377

3 4

Increasing stack
by Prof. A Olowofoyeku (The African Chief) 23 Jul '01

23 Jul '01

Hi all How does one increase the memory reserved for the stack in GPC programs on Linux? Thanks. Best regards, The Chief --------- Prof. Abimbola Olowofoyeku (The African Chief) Author of Chief's Installer Pro for Win32 Email: African_Chief(a)bigfoot.com http://www.bigfoot.com/~african_chief/

4 3

Re: Good version for mostly IT activity
by Bohdan Vlasyuk 23 Jul '01

23 Jul '01

On Fri, Jul 20, 2001 at 10:54:34AM -0700, George Shapovalov wrote: > Under Linux, just grab the latest version released (under alpha > directory on an ftp server, last betta is already WAY out of sync), > usually it is pretty stable. Oh.. I've got latest beta, and was quite surprised to find there patches for `egcs', while I have only 2.95.3 and 3.0 installed. > Also do not install gcc itself -- I had issues. Thanks. > As far as IDE goes you can use Rhide under dos (djpp) and linux. thanks. I don't use IDE. And I don't write in pascal too -- I just don't like feeling when I can't control what code would be produced, and, unfortunately, I don't feel like it with pascal. > BP compatibility: except newest features introduced in Delphy it > is working nice. What about types ?? I need that BP sourced would be compiled and work withput any changes, and I exact memory managenent would be required. It is quite confusing when `integer' takes 4 bytes instead of 2, especially if you have limited memory and targe array of integers. also, are BP sets supported? is `data layout' comatible, i.e. would blockread() of some set work as expected ?? [byteorder is fixed]. can anyone explain me how 'absolute' works in gpc ? > Few features require special compilation options, few are > unimplemented on purpose. > FPC: there was a discussion on this list and as I remember the word > was that it is not implementing so many extended pascal features Ok, I think I'll note this, and start with gpc, and will think about FPC on request. -- Wishing without work is like fishing without bait. -- Frank Tyger

1 0

Trouble importing units/modules
by Dimitrios Bartzos 22 Jul '01

22 Jul '01

Hello, I have just compiled and installed gpc on a linux Redhat 6.1 system. Everything seems to be fine, except that when I tried a few of the demo programs I get an error about not being able to find-import the Gpc module. I tried using the --unit-directory= ... option when invoking gpc but that did not help. Any suggestions? (Probably it's a common question that has passed a million times through here, but I didn't find an answer to it yet). I would appreciate a personal reply as I am not a member of the mailing list. Thanks in advance, Dimitrios. --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.265 / Virus Database: 137 - Release Date: 7/18/01

1 0

Good version for mostly IT activity
by Bohdan Vlasyuk 22 Jul '01

22 Jul '01

Hi ! I need your advice -- I want to find stable gpc version suitable for my needs.. I'm run Linux [2.4.6 as for now, and I plan to further upgrades :-)]. I need gpc to compile user programs, which would be likely developed under mics. environment, but generally under DOS with old borland pascal {They think that BP IDE is the best}. Programs are expected to be relatively small, and I don't think that anyone would use OO-extensions more that for few strings, it would at all. Actually, BP compatibility is not REQUIRED, but would be nice. Are there any standards in Pascal like ISO C ?? Personally I don't program Pascal, so I can't judge which one is better. What can you tell me about FPC? Is it worth looking ?? thank you for your opinion. P.s.: If that's wrong list for that type of questions, I'm terrible sorry, could you please direct me to right source? -- "I once witnessed a long-winded, month-long flamewar over the use of mice vs. trackballs...It was very silly." (By Matt Welsh)

5 5

"Installation problem. Cannot execute gpc-cpp"
by Kocherlakota Harikrishna 20 Jul '01

20 Jul '01

Hello, I downloaded the binary file gpc-19990118.sparc-sun-solaris2.6.tar.gz for my solaris 2.6 machine and unpacked it as given. Then i tried to compile simple pascal program. The following error is seen : "Installation problem. Cannot execute gpc-cpp" Please guide me on this. Hari

2 1

gpc test result
by Russell Whitaker 20 Jul '01

20 Jul '01

Hi Upgraded to Slackware 8.0; Don't have X running yet so downloaded using wget and found it faster than using Netscape. wget ftp://agnes.dida.physik.uni-essen.de/gnu-pascal/alpha/gpc-20010623.tar.gz compiled, installed, ran test, results (5 of the 6 skipped is my fault): TEST crttest.pas: In file included from /usr/include/sys/time.h:30, from /usr/local/lib/gcc-lib/i586-pc-linux-gnu/2.95.3/units/crtc.c:1001: /usr/include/sys/select.h:52: warning: `__NFDBITS' redefined /usr/include/linux/posix_types.h:22: warning: this is the location of the previous definition /usr/include/sys/select.h:54: warning: `__FDMASK' redefined /usr/include/linux/posix_types.h:34: warning: this is the location of the previous definition gpc1: gpc exited with status 1 gpc1: gpc exited with status 1 TEST dialec3.pas: In file included from /usr/include/sys/time.h:30, from /usr/local/lib/gcc-lib/i586-pc-linux-gnu/2.95.3/units/crtc.c:1001: /usr/include/sys/select.h:52: warning: `__NFDBITS' redefined /usr/include/linux/posix_types.h:22: warning: this is the location of the previous definition /usr/include/sys/select.h:54: warning: `__FDMASK' redefined /usr/include/linux/posix_types.h:34: warning: this is the location of the previous definition gpc1: gpc exited with status 1 gpc1: gpc exited with status 1 failed TEST dialec6.pas: In file included from /usr/include/sys/time.h:30, from /usr/local/lib/gcc-lib/i586-pc-linux-gnu/2.95.3/units/crtc.c:1001: /usr/include/sys/select.h:52: warning: `__NFDBITS' redefined /usr/include/linux/posix_types.h:22: warning: this is the location of the previous definition /usr/include/sys/select.h:54: warning: `__FDMASK' redefined /usr/include/linux/posix_types.h:34: warning: this is the location of the previous definition gpc1: gpc exited with status 1 gpc1: gpc exited with status 1 failed TEST dialec7.pas: In file included from /usr/include/sys/time.h:30, from /usr/local/lib/gcc-lib/i586-pc-linux-gnu/2.95.3/units/crtc.c:1001: /usr/include/sys/select.h:52: warning: `__NFDBITS' redefined /usr/include/linux/posix_types.h:22: warning: this is the location of the previous definition /usr/include/sys/select.h:54: warning: `__FDMASK' redefined /usr/include/linux/posix_types.h:34: warning: this is the location of the previous definition gpc1: gpc exited with status 1 gpc1: gpc exited with status 1 failed TEST fjf165a.pas: SKIPPED: German locale not installed TEST fjf469.pas: failed: ./fjf469.pas:4: referenced type `Undef' undefined gpc: Internal compiler error: program gpc1 got fatal signal 11 TEST fjf480a.pas: SKIPPED: librx not installed TEST fjf480b.pas: SKIPPED: librx not installed TEST fjf480c.pas: SKIPPED: librx not installed TEST gmptest.pas: SKIPPED: libgmp not installed TEST regextest.pas: SKIPPED: librx not installed TEST turbo3test.pas: In file included from /usr/include/sys/time.h:30, from /usr/local/lib/gcc-lib/i586-pc-linux-gnu/2.95.3/units/crtc.c:1001: /usr/include/sys/select.h:52: warning: `__NFDBITS' redefined /usr/include/linux/posix_types.h:22: warning: this is the location of the previous definition /usr/include/sys/select.h:54: warning: `__FDMASK' redefined /usr/include/linux/posix_types.h:34: warning: this is the location of the previous definition gpc1: gpc exited with status 1 gpc1: gpc exited with status 1 failed # of GPC tests 1680 # of GPC tests passed 1668 # of GPC tests skipped 6 # of GPC tests failed 6 Reading specs from /usr/local/lib/gcc-lib/i586-pc-linux-gnu/2.95.3/specs gpc version 20010623, based on 2.95.3 20010315 (release) Russ

2 2

timing
by Cyelee Kulkarni 18 Jul '01

18 Jul '01

Is there any way to display on the screen the amount of time it took to run a particular program? --- C __________________________________________________ Do You Yahoo!? Get personalized email addresses from Yahoo! Mail http://personal.mail.yahoo.com/

3 2

None
by Adam Naumowicz 18 Jul '01

18 Jul '01

Hello, Following the previous discussion thread I tried to build newer version of GPC on my machine. I had no problems building gpc version 20010502, based on 2.95.3 20010315. Unfortunatelly with the current sources of GPC (20010623) I got the following make errors: In file included from /export/install/gpc/gcc-2.95.3/gcc/p/gpc-common.c:29: /export/install/gpc/gcc-2.95.3/gcc/p/gbe.h:152: conflicting types for `xmalloc' /export/install/gpc/gcc-2.95.3/gcc/p/../../include/libiberty.h:129: previous declaration of `xmalloc' In file included from /export/install/gpc/gcc-2.95.3/gcc/p/gpc-common.c:35: /export/install/gpc/gcc-2.95.3/gcc/p/util.h:196: conflicting types for `concat' /export/install/gpc/gcc-2.95.3/gcc/p/../../include/libiberty.h:48: previous declaration of `concat' make[2]: *** [gpc-common.o] Error 1 make[2]: Leaving directory `/export/install/gpc/build/gcc/p' make[1]: *** [gpc1] Error 2 make[1]: Leaving directory `/export/install/gpc/build/gcc' make: *** [all-gcc] Error 2 Is there something wrong with the patch for GCC 2.95.3 ? Regards, Adam Naumowicz -------------------------------------- WWW: http://math.uwb.edu.pl/~adamn/ --------------------------------------

2 3

Building a i686-Linux -> 68k-coff Cross Compiler
by Loris Caren 18 Jul '01

18 Jul '01

Hello, I've got gcc-2.95.3, binutils-2.11 and gpc-20010623. I am able to build a native gpc and a gcc cross compiler, but the gpc cross almost finishes construction before stopping with an error message. Can anybody report success at building this cross, or suggest what my problem might be? ../../gcc-2.95.3/gcc/p/script/mkdir-p p/rts src=`cd ../../gcc-2.95.3/gcc && pwd` && \ cd p/rts && \ CC="`echo /usr4/gpc68-build/gcc/xgcc -B/usr4/gpc68-build/gcc/ -B/usr/local/m68k-coff/bin/ -I/usr/local/m68k-coff/include' ' | sed -e 's,-B$[^/][^:]$,-B../../\1,g;s,^$[^/][^:]$,../../\1,'`" PC="`echo ./xgpc -B./' ' | sed -e 's,-B$[^/][^:]$,-B../../\1,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` configure: error: installation or configuration problem: C compiler cannot create executables.

2 1

Re: importing GRX unit
by Toby Ewing 17 Jul '01

17 Jul '01

Hi, all Maurice's directions, as usual, were exactly what I needed. Things are working fine now. Thank you! Toby Maurice Lombardi wrote: > ... > You have to compile and install grx after download. It does not > contains the binaries, in particular the file libgrx20.a will be > created in /djgpp/contrib/grx243/lib/dj2 and installation will move it > into the /djgpp/lib directory. > > In summary > - edit the the file /djgpp/contrib/grx243/makedefs.grx > at least set INCLUDE_GPC_SUPPORT=y > and probably set a GRX_DEFAULT_FONT_PATH > > - cd /djgpp/contrib/grx243 > make -f makefile.dj2 > it will compile everything, library and also C and pascal tests > > - these tests can be run in place before installing in going > to the test and pascal subdirectories (and bgi subdirectories of them) > > - if you are satisfied > cd /djgpp/contrib/grx243 > make -f makefile.dj2 install > will install libgrx20.a and some C header files (.h) > > - if you have defined a GRX_DEFAULT_FONT_PATH > cd /djgpp/contrib/grx243/src > make -f makefile.dj2 install-fonts > this step could be included in the previous one but it has not been done. > Without it the fonts will remain in the /djgpp/contrib/grx243/fonts directories > and you have to set explicitly a GRX_FONT_PATH in the environment > (may be in the djgpp.env file).

1 0

Units / Compatibility to TurboPascal 5.5
by Michael Paap 17 Jul '01

17 Jul '01

Hello, does anybody know, if there is an option to make GPC understand the old TuboPascal syntax for using units, where the unit-name is explicitely written before every call? It looks like this: ----------------------------------------- program utest; uses stapel; var data : char; begin data := 'a'; stapel.push(data); data := 'b'; stapel.push(data); data := 'c'; stapel.push(data); stapel.top(data); stapel.pop; writeln(data); stapel.top(data); stapel.pop; writeln(data); stapel.top(data); stapel.pop; writeln(data); end. ----------------------------------------- We need this, because this syntax is used in the scripts for the students, but now we want to change our remote test-environment from TP to GPC... BTW: I want to thank very much all those people, answering stupid newbie-questions, especially Frank Heckenbach! Greetings, Michael

2 1

Re: importing GRX unit
by Toby Ewing 16 Jul '01

16 Jul '01

Hi, Maurice You wrote > Toby Ewing wrote: > ... > But when I > > compile (alt-c c) I get: > > Error: module/unit interface 'Grx20' could not be imported > > When I make (F9), I get: > > Error: module/unit interface 'Grx20' could not be compiled > > Where have you put the file libgrx20.a ? > There is a {$L grx20} instruction in grx.pas which loads it if it finds > it in some standard place. > It should be on the %DJDIR%\lib directory, or its location > can be given in the djgpp.env file or explicitly by a -L > option while compiling. Interesting... a search on the hard disk reveals nothing named libgrx20.a. The closest I have is a libgrx.h, in /djgpp/contrib/grx243/src/include. I don't suppose that's the one I want? Where would I find libgrx20.a, if it's not included in the grx download?! > An other possibility is that you have used an old main program. > At some point the unit import file has ben renamed > from grx20.pas to grx.pas. Thanks for pointing this out. I hadn't caught this. Yes, unit is just grx.pas, so I have renamed my import call. The message I get now is: cannot find -lgrx20 {or cannot find -lgrx, if that's how I list the library} ld returned 1 exit status Toby

2 1

Seems that message/rfc822 data was corrupted.
by toms＠ncifcrf.gov 16 Jul '01

16 Jul '01

Has any progress been made on fixing this: Seems that message/rfc822 data was corrupted. ? It appears every time I load a gpc daily digest into elm. It really takes a long time to process. Thanks, 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 http://www.lecb.ncifcrf.gov/~toms/

1 0

What does this warning mean?
by Michael Paap 15 Jul '01

15 Jul '01

Hello, I'm using gpc 20000727 on a Linux-machine (Distribution SuSe 7.2). When compiling, I always get the following warning: /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.2/libgpc.a(randfile.o): In function `do_seek': /home/elug/pascal-wochenende-20000729/gcc-2.95.2/gcc/p/rts/randfile.c:327: the `llseek' function may be dangerous; use `lseek64' instead. Can anyone tell me if this is a problem of any importance and how I can solve it? If it is unimportant, a tip, how to prevent this warning would be helpful. Greetings, Michael Paap

2 1

importing GRX unit
by Toby Ewing 14 Jul '01

14 Jul '01

Hello again The difficulties continue... this morning the compiler crashed so badly it wouldn't compile anything. After a few struggles, I did a clean delete, download, and reinstall. Things are going pretty well, and now all programs compile fine except those that use the grx unit. I compiled the unit OK, and moved grx.o to the djgpp/bin directory. But when I compile (alt-c c) I get: Error: module/unit interface 'Grx20' could not be imported When I make (F9), I get: Error: module/unit interface 'Grx20' could not be compiled What is this about, and what do I have to do to make it work? regards, Toby

2 1

Basic problem on IRIX
by Miklos Cserzo 13 Jul '01

13 Jul '01

Hi Folks, something went terribly wrong with the latest release of GPC on IRIX. Here is a short test code: program testit; var x:real; begin x:=355/113; writeln(round(355/113):10); writeln(355/113:12:8); writeln(round(355/113):10,' ',355/113:12:8); writeln(355/113:12:8,' ',round(355/113)); writeln(round(355/113*100)); writeln(round(355/113*10000)); writeln(round(x):10); writeln(x:12:8); writeln(round(x),' ',x:12:8); writeln(round(x*100)); writeln(round(x*10000)); end. And here is the output piped to 'cat -v' (note the invisible characters): 3 0.000.^@^@00 3 3.15923292 0.000.^@^@00 3 314 31416 3 0.000.^@^@00 3 0.00000000 314 31416 Also note that the real value in the third line is incorrect. The version: Reading specs from /usr/local/test/lib/gcc-lib/mips-sgi-irix6.5/2.95.2/specs gpc version 20010502, based on 2.95.2 19991024 (release) The OS: IRIX 6.5.12 The log of the make process and the result of the test programs are attached. The compilation of the most recent version of GPC is not resulting a valid binary. Any idea about this? Cheers, miklos

2 3

Building GPC on sparc-solaris
by Kocherlakota Harikrishna 13 Jul '01

13 Jul '01

Hello, we have done the following on reading the installation guide. 1../configure --enable-languages=pascal --prefix=<inst dir> --with-gnu-as --with-gnu-ld 2.make {make-3.79 from gnu site) 3.make install still we are not succesful in building the gpc.the error is attached. Thanks and regards, Hari frank(a)g-n-u.de wrote: > Kocherlakota Harikrishna wrote: > > > Now we are trying to use the same sources to build the compiler on > > solaris and while executing the command > > "make LANGUAGES=pascal" > > The LANGUAGES=pascal thing is only for gcc-2.8.1, not gcc-2.95.* > where the languages are selected with configure. Please see the > install instructions. > > Frank > > -- > Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/ > GPC To-Do list, latest features, fixed bugs: > http://agnes.dida.physik.uni-essen.de/~gnu-pascal/todo.html KOCHERLAKOTA.HARIKRISHNA/OU=DCCH1(a)bt0200.net.alcatel.be wrote: > Hello > we previously had built the compiler on Linux with the sources from > > ftp://agnes.dida.physik.uni-essen.de/gnu-pascal/alpha site. > > Now we are trying to use the same sources to build the compiler on > solaris and while executing the command > "make LANGUAGES=pascal" > > The following error is seen: > > make: Fatal error in reader: Makefile, line 2219: Unexpected end of line > seen > > Current working directory /home/users/gcc-2.95.2/gcc > > *** Error code 1 > > make: Fatal error: Command failed for target `all-gcc' > > Please help us how to proceed further . > > Thanks and kind Regards > hari /users/anuradas/anu/gcc-2.95.2/gcc/p/rts --automake /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas: In procedure `Unsetenv': /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:249: parse error before `Cstrings' /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:250: parse error before `Cstrings' /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:250: parse error before `Cstrings' /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:250: warning: expression used as a statement - value is ignored /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:250: warning: statement with no effect /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:250: warning: expression used as a statement - value is ignored /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:250: warning: statement with no effect /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:251: parse error before `Cstrings' /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:251: warning: expression used as a statement - value is ignored /home/users/anuradas/anu/gcc-2.95.2/gcc/p/rts/string2.pas:251: warning: statement with no effect xgpc: Internal compiler error: program gpc1 got fatal signal 11 make[2]: *** [string2.o] Error 1 make[2]: Leaving directory `/home/users/anuradas/anu/gcc/p/rts' make[1]: *** [pascal.rts] Error 2 make[1]: Leaving directory `/home/users/anuradas/anu/gcc' make: *** [install-gcc] Error 2

2 1

Re: GPC Build Error
by Gloria, Jing 13 Jul '01

13 Jul '01

I am having problems with building GPC. Aside from the problem with the prototype for concat, there is also another one with xmalloc in gbe.h and include/libiberty.h. There may be more. I am installing on an Intel x86/Solaris 7 platform using GCC 2.95.2. I pulled down the GCC source from the Sunfreeware site and the GPC source from the GPC site. Do I have incompatible source GPC and GCC modules??? Any assistance will be greatly appreciated. Regards, Jing Gloria Texas Instruments -----Original Message----- From: Maurice Lombardi [mailto:Maurice.Lombardi@ujf-grenoble.fr] Sent: Friday, July 13, 2001 02:21 PM To: Gloria, Jing Cc: gpc Subject: Re: GPC Build Error Gloria, Jing wrote: > you say that the prototypes in both files are > the same. Is it: > extern char *concat PARAMS ((char *, ...)); > or is it the one with ((const char *, ...));? No, the prototypes differ exactly as in your case. Maurice -- Maurice Lombardi Laboratoire de Spectrometrie Physique, Universite Joseph Fourier de Grenoble, BP87 38402 Saint Martin d'Heres Cedex FRANCE Tel: 33 (0)4 76 51 47 51 Fax: 33 (0)4 76 51 45 44 mailto:Maurice.Lombardi@ujf-grenoble.fr

1 0

size of executables
by michael paap 13 Jul '01

13 Jul '01

Hello, I am not familiar with the GPC, but i will have to rewrite a Java-application, which calls a Pascal-compiler and executes the new-built program afterwords to work with GPC instead of Turbo-Pascal. So I have two questions, for which I request Your help: 1. There is a really big difference in the size of executables made by TPC under Dos ans those made by GPC under LINUX. Is this normal, or is there any possibility, to decrease the size of the executables made by GPC? 2. Is there any possibility, to give the Sourcecode to GPC as a string-parameter instead of using a file? I would like to call GPC from the Java-Program this way, if possible. Greetings, Michael Paap

4 4

latest version of gpc
by P. U. (Uli) Kruppa 13 Jul '01

13 Jul '01

Sorry for the stupid question, but I get lost on the gpc ftp-server: How do I know the latest version of binaries and sources? Are these numbers ...199900... ...200105... dates of release or what do they mean? Thanx for your answer. Uli. *--------------------------------------* | www.pukruppa.de www.2000d.de | | Wuppertal - Germany | *--------------------------------------*

2 1

GPC Build Error
by Gloria, Jing 13 Jul '01

13 Jul '01

I am trying to install the latest version (20010623) of GPC. However, during the make I get the following error: -------------------------------------------- In file included from /usr/pgmdev/gcc-2.95.2/gcc/p/gpc-common.c:35: /usr/pgmdev/gcc-2.95.2/gcc/p/util.h:196: conflicting types for `concat' /usr/pgmdev/gcc-2.95.2/gcc/p/../../include/libiberty.h:48: previous declaration of `concat' make[1]: *** [gpc-common.o] Error 1 -------------------------------------------- in include\libiberty.h:48 - extern char *concat PARAMS ((const char *, ...)); in gcc-2.95.2/gcc/p/util.h:196 - extern char *concat PARAMS ((char *, ...)); Pls advise which one is correct. Or is there a switch/directive to disregard this error? I am installing on an Intel x86/Solaris 7 platform using GCC 2.95.2. I pulled down the GCC source from the Sunfreeware site and the GPC source from the GPC site. Pls advise also if there are other potential problems that have already been reported and addressed. By the way the link to the GPC mailing list archive http://www.gnu.de/archive/wilma.cgi/gpc is broken. Regards, Jing Gloria Texas Instruments

3 2

Re: GPC Build Error
by Gloria, Jing 13 Jul '01

13 Jul '01

Maurice, you say that the prototypes in both files are the same. Is it: extern char *concat PARAMS ((char *, ...)); or is it the one with ((const char *, ...));? My util.h also has the ifndef EGCS92 test. Regards, Jing Gloria Texas Instruments

2 1

GNU Pascal Coding Standards
by Nicola Girardi 13 Jul '01

13 Jul '01

Hi GPC'ers! Just the link for those not subscribed to gpc-doc(a)gnu.de: http://adele.gerwinski.de/~nicola/pascal-standards/ NB: We're sorry for the long HTML file, but if we use texi2html to split the files we get many links pointing to the same document instead of pointing to the GNU Coding Standards, to which we refer often. Greetings, Frank Heckenbach <frank(a)pascal.gnu.de> Peter Gerwinski <peter(a)gerwinski.de> Nicola Girardi <nikke(a)swlibero.org>

1 0

GNU Pascal Coding Standards
by Nicola Girardi 12 Jul '01

12 Jul '01

Hi GPC'ers! In the next days the GNU Pascal Coding Standards will be released to the public. As it will be the first public release, there may be some discussions on the several issues raised by the manual. So please join the gpc-doc@ mailing list if you'd like to see and/or take part in the discussions, rather than starting a thread here. The aim of the GNU Pascal Coding Standards is extending the GNU Coding Standards with specific information relating Pascal programming. Of course there are topics that can be shared between the two manuals, and we have taken this into account. Greetings, Frank Heckenbach <frank(a)pascal.gnu.de> Peter Gerwinski <peter(a)gerwinski.de> Nicola Girardi <nikke(a)swlibero.org>

2 1

Re: Boolean problem
by jallan 12 Jul '01

12 Jul '01

If your example was: procedure testshift; VAR shift_cor :boolean; begin shift_cor := true; writeln('shift_cor: ',shift_cor); { shift_cor: True } if shift_cor=true then Shift_correction; end; then it would work as you expect Jamie ----- Original Message ----- From: jallan To: Casper ter Kuile ; gpc Sent: Friday, July 13, 2001 1:44 AM Subject: Re: Boolean problem Casper, The example you've given does not set the value of shift_cor at all. It simply displays text and the value TRUE. You have to set shift_cor initially before it will have a value to test upon. ----- Original Message ----- From: Casper ter Kuile To: gpc(a)gnu.de Sent: Friday, July 13, 2001 1:07 AM Subject: Boolean problem Hi, I encounter a stange problem. The boolean variable "shift_cor" is "true" shift_cor :boolean; writeln('shift_cor: ',true); { shift_cor: True } if shift_cor=true then Shift_correction; But the if statement does not work out to be "true" as the procedure "Shift_correction" does not run. Anyone an idea what is wrong here? Thanks! Casper. Casper ter Kuile, Lab. for Radiation Research (LSO), National Institute of Public Health and the Environment (RIVM) PO box 1, NL-3720 BA, Bilthoven, the Netherlands Phone +(31)-30-2742647 or +(31)-30-2742515 E-mail: casper.ter.kuile(a)rivm.nl Web: http://www.rivm.nl

1 0

Boolean problem
by Casper ter Kuile 12 Jul '01

12 Jul '01

Hi, I encounter a stange problem. The boolean variable "shift_cor" is "true" shift_cor :boolean; writeln('shift_cor: ',true); { shift_cor: True } if shift_cor=true then Shift_correction; But the if statement does not work out to be "true" as the procedure "Shift_correction" does not run. Anyone an idea what is wrong here? Thanks! Casper. Casper ter Kuile, Lab. for Radiation Research (LSO), National Institute of Public Health and the Environment (RIVM) PO box 1, NL-3720 BA, Bilthoven, the Netherlands Phone +(31)-30-2742647 or +(31)-30-2742515 E-mail: casper.ter.kuile(a)rivm.nl Web: http://www.rivm.nl

2 1

size of executables / sourcecode as string-parameter?
by michael paap 12 Jul '01

12 Jul '01

Hello, I am not familiar with the GPC, but i will have to rewrite a Java-application, which calls a Pascal-compiler and executes the new-built program afterwords to work with GPC instead of Turbo-Pascal. So I have two questions, for which I request Your help: 1. There is a really big difference in the size of executables made by TPC under Dos ans those made by GPC under LINUX. Is this normal, or is there any possibility, to decrease the size of the executables made by GPC? 2. Is there any possibility, to give the Sourcecode to GPC as a string-parameter instead of using a file? I would like to call GPC from the Java-Program this way, if possible. Greetings, Michael Paap

1 0

collect2
by Nicola Girardi 12 Jul '01

12 Jul '01

Hi GPC'ers!! I was trying to set up a cross compiler on a Linux host to generate Windoze executables. I succeeded using the usual --target=...-mingw32 but when I run i...-mingw32-gpc I get a message about collect2 missing. And in fact, it is missing. Only symlinking ld to collect2 works smoothly. Why does that happen? Thanks in advance. Nick

3 4

crashing while killing list
by Toby Ewing 11 Jul '01

11 Jul '01

Hi, all I just upgraded to a more recent version of GPC, 2001something. I don't know if that's the root cause, but I'm having trouble killing a linked list. I get a page fault or a GPF (I'm running under win98) when trying to delete the last or next to last record. I've marked the line named in the call traceback. I took my Linsert and Lwipe procedures and put them into a test program (see below). It runs perfectly. But when I run them in the program I'm actually working on -- the program I took the procedures from -- it crashes in Lwipe. Nothing else in the big program even refers to the list. Any suggestions? It's frustrating to be stopped on such an elementary problem. Lists and I have been friends for years, and I'm supposed to be stuck on much more interesting problems! Toby _____________________________ Program ListTest; type PRec = ^Rec; Rec = record ri : integer; Next : PRec; end; var Root : PRec; i : integer; {----------} Procedure LWipe(var Root : PRec); var point : PRec; begin while (Root^.next <> Nil) do begin {<<== program crashes on this line} write('deleting ', root^.ri, ' '); point := Root; Root := Root^.next; Dispose(point); end; if Root <> Nil then begin write('deleting ', root^.ri); Dispose(Root); Root := Nil; end; end; {----------} Procedure LInsert(var num : integer; var Root : PRec); {insert a new record at the *front* of the list} var Site : Rec; temp : PRec; begin with Site do begin ri := num; next := Nil; end; if Root = Nil then begin {starting the list} New(Root); Root^ := Site; end else begin {list already exists} New(temp); {get new memory} temp^ := Site; {move memory} temp^.next := Root; {repoint pointers} Root := temp; end; end; {LInsert} {----------} Begin for i := 1 to 100 do LInsert(i, Root); LWipe(Root); End.

2 1

Fwd: crashing while killing list
by Toby Ewing 11 Jul '01

11 Jul '01

*Groan* once again, programing is primarily a lesson in humility. rpewing(a)lbl.gov wrote: > I just upgraded to a more recent version of GPC, 2001something. I don't > know if that's the root cause, but I'm having trouble killing a linked > list. I get a page fault or a GPF (I'm running under win98) when trying > to delete the last or next to last record. I've marked the line named > in the call traceback. .. I forgot to initialize the pointer to Nil. I think BP did this for me, so I got out of the habit. A corrected version is below. Toby > _____________________________ > > Program ListTest; > > type > PRec = ^Rec; > Rec = record > ri : integer; > Next : PRec; > end; > > var > Root : PRec; > i : integer; > {----------} > > Procedure LWipe(var Root : PRec); > var point : PRec; > begin > while (Root <> Nil) do begin > write('deleting ', root^.ri, ' '); > point := Root; > Root := Root^.next; > Dispose(point); > end; > end; > {----------} > > Procedure LInsert(var num : integer; > var Root : PRec); > {insert a new record at the *front* of the list} > var > Site : Rec; > temp : PRec; > begin > with Site do begin > ri := num; > next := Nil; > end; > if Root = Nil then begin {starting the list} > New(Root); > Root^ := Site; > end else begin {list already exists} > New(temp); {get new memory} > temp^ := Site; {move memory} > temp^.next := Root; {repoint pointers} > Root := temp; > end; > end; {LInsert} > {----------} > > Begin Root := Nil; {<< the line I forgot} > for i := 1 to 100 do LInsert(i, Root); > LWipe(Root); > End. >

1 0

a string question
by Adam Naumowicz 11 Jul '01

11 Jul '01

Hello, I have a basic question concerning strings and array memory representation in GPC. To my amusement I noticed that in the following program the string assigned to an array element cannot be then restored from the array itself. So probably an array of strings is not represented in memory just like an array of simple type, and cannot (?) be simply getmem-ed ? program test; type NameStr=String[8]; shortarray=array[1..3] of NameStr; var n:NameStr; a:^shortarray; i:integer; begin getmem(a,3*sizeof(NameStr)); n:='12345678'; for i:=1 to 3 do begin a^[i]:=n; writeln('n = ',n) writeln('a^[i] = ',a^[i]); end; end. As a result the value of a^[i] is an empty string after the assignment; I will be very grateful for any answers or comments (I use gpc version 20010502, based on 2.95.3 20010315). Regards, Adam Naumowicz -------------------------------------- WWW: http://math.uwb.edu.pl/~adamn/ --------------------------------------

7 16

Object pascal mode for Emacs
by Preben Mikael Bohn 11 Jul '01

11 Jul '01

Hello Does anyone know if there is an Object-Pascal mode for Emacs? I am currently using the 'built-in' Pascal-support, however it dosn't handle objects well. I also tried the Delphi mode (I cannot remember where I got this from) but this dosn't seem to handle GPS-objects well... :-) Best regards Preben Bohn ===== The two rules for success are: 1. Never tell them everything you know. ____________________________________________________________ Do You Yahoo!? Get your free @yahoo.co.uk address at http://mail.yahoo.co.uk or your free @yahoo.ie address at http://mail.yahoo.ie

2 1

Re: [Fwd: RE: Error with asmname]
by Jing Gloria 11 Jul '01

11 Jul '01

Maurice, thanks for taking the time look into my problem. Unfortunately, I have to work with certain constraints on this project. I am trying to find the least amount of work to port the current software to the new hardware platform (SPARC/RISC SunOS to i86 Solaris 7). We will continue to support both hardware platforms and I would prefer one set of source files for both systems. Our SPARC/RISC SunOS software uses an old Pascal compiler which does not have a cross-compiler for i86. Worst case scenario would be to generate a new set of source files for the i86 platform and use the techniques that you suggested. Again, thanks for the suggestions and assistance. I will make a new build of GPC using the latest source code. I will do that tomorrow; I am now at home since the airconditioning unit in my house conked out last night. I have to get it fixed today. Can't do without the AC in this hot Texas summer! Regards, Jing Gloria Texas Instruments

1 0

[Fwd: RE: Error with asmname]
by Maurice Lombardi 11 Jul '01

11 Jul '01

I forward this message to the list to enable people to understand the answer which is at the end. -------- Original Message -------- Objet: RE: Error with asmname Date: Tue, 10 Jul 2001 15:51:51 -0500 De: "Gloria, Jing" <j-gloria(a)ti.com> A: "'Maurice Lombardi'" <Maurice.Lombardi(a)ujf-grenoble.fr> Maurice, pls be kind enough to run my test program in your system and see if it compiles and links correctly. I have attached all three source files and makefile needed. Pls advise which version of GPC you are using. Thanks in advance for your assistance. I will be making a build of the latest GPC from source tomorrow. Regards, Jing Gloria Texas Instruments --------------------------------------------------------- The problem is with try_hello.pas which is also a main pascal program. The gpc-main trick is only to circumvent the case in which a C module happens to define a function with name identical to the default gpc main name. But you cannot have two gpc mains because you have conflicts with gpc main initializers and finalizers. The solution is to write try_hello.pas as a unit, like this: xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx unit try_hello; INTERFACE Var Testcode: integer; asmname 'testcode'; Procedure p_hello; IMPLEMENTATION Procedure p_hello; begin Writeln ('PASCAL says: Hello, world.'); Testcode := TestCode *2; Writeln ('Testcode = ', TestCode); end; End. xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx Your makefile works then. But this is still not the right way of doing. You do not need makefiles with gpc Rewrite try_main as xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx program Hello (Output); uses try_hello; {$L c_hello.c} procedure c_hello; external; Begin Writeln ('Starting in main PASCAL module.'); Writeln ('Calling C routine.'); c_hello; Writeln ('Now back from C.'); P_hello; WRITELN ('That is all folks!!') End. xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx then you can compile only the main with --automake gpc try_main.pas -o try_main.exe --automake gpc automatically compiles try_hello.pas and c_hello.c becauses it has all informations needed in try_main by way of the uses clause for pascal units and {$L } for c modules. Maurice BTW I use djgpp/ gpc 20010623 based on gcc 2.95.3 -- Maurice Lombardi Laboratoire de Spectrometrie Physique, Universite Joseph Fourier de Grenoble, BP87 38402 Saint Martin d'Heres Cedex FRANCE Tel: 33 (0)4 76 51 47 51 Fax: 33 (0)4 76 51 45 44 mailto:Maurice.Lombardi@ujf-grenoble.fr {$gpc-main=Dummy} Var Testcode: integer; asmname 'testcode'; Procedure p_hello; begin Writeln ('PASCAL says: Hello, world.'); Testcode := TestCode *2; Writeln ('Testcode = ', TestCode); end; Begin { dummy block or else the GNU Pascal compiler will complain and generate a compile error.} End. #include <stdio.h> extern int testcode; C_hello() { printf ("Hello, World - from C \n\r"); testcode = 12; } # Test Makefile for Pascal and C compiler. ..KEEP_STATE: # try2: try_main.o c_hello.o try_hello.o gpc -o try2 try_main.o try_hello.o c_hello.o c_hello.o: c_hello.c gcc -O -c c_hello.c try_hello.o: try_hello.pas gpc -c try_hello.pas try_main.o: try_main.pas gpc -c try_main.pas program Hello (Output); procedure c_hello; external; Procedure p_hello; external; Begin Writeln ('Starting in main PASCAL module.'); Writeln ('Calling C routine.'); c_hello; Writeln ('Now back from C.'); P_hello; WRITELN ('That is all folks!!') End.

1 0

[Fwd: Re: Error with asmname]
by Maurice Lombardi 11 Jul '01

11 Jul '01

This message was bounced back due to youe email problemq Gloria, Jing wrote: > Maurice, > > thanks for your inputs. > > I followed your suggestion using the old style __asmname__ > and I get the Pascal module to compile without errors. > But now I get the following error during link. > > rigor% make > gpc -c try_hello.pas > try_hello.pas:2: warning: missing program header > gpc -o try2 try_main.o try_hello.o c_hello.o > Undefined first referenced > symbol in file > testcode try_hello.o > ld: fatal: Symbol referencing errors. No output written to try2 > collect2: ld returned 1 exit status > *** Error code 1 > make: Fatal error: Command failed for target `try2' > > try_hello.pas is the module that is exporting Testcode. How ? Is > there any other flag or directive that I am missing? It > looks like try_hello.pas is expecting testcode to be external. > Difficult to say without having the codes at hand ... > I may have to bite the bullet here and build the latest > released GPC code. I am avoiding this since I am a newbie > on Solaris/Unix systems. Probably so. You seem to try not to use the automake features of gpc, and use C-style programming, with independent compilations of the modules, final linking and the like. But if your programs are properly written, you should have only to type gpc try_main.pas -o try2 --automake and gpc manages to compile all C modules and pascal units that are needed, because all needed information is in the source files. But I do not remember what was posible two years ago, and probably very few people can do. Much effort have been made on the compiler for this to work well. So probably install the last gpc alpha and look in the demos directory the programs gpc_c_pas.pas c_gpc.pas and friends which show how to do that properly. Maurice -- Maurice Lombardi Laboratoire de Spectrometrie Physique, Universite Joseph Fourier de Grenoble, BP87 38402 Saint Martin d'Heres Cedex FRANCE Tel: 33 (0)4 76 51 47 51 Fax: 33 (0)4 76 51 45 44 mailto:Maurice.Lombardi@ujf-grenoble.fr

1 0

[Fwd: Re: Error with asmname]
by Maurice Lombardi 11 Jul '01

11 Jul '01

This message was bounced back due to your email problems Gloria, Jing wrote: > I would appreciate any assistance to the following problem. > > The following 2 lines of code result in error during compilation: > > Var > Testcode: integer; asmname 'testcode'; > > Error: > try_hello.pas:3: parse error before character constant > try_hello.pas:5: comma missing after identifier `Asmname' > try_hello.pas:5: parse error before `;' > > Note: Line 3 is the line with asmname keyword. > > I am using: > GNU Pascal version 2.95 19990728 (release) (i386-pc-solaris2.7) > compiled by GNU C version 2.95.1 19990816 (release). > > If I remove the asmname 'testcode' from line 3, then the > compilation goes through without any errors. the syntax of asmname for variables has changed on 2000/04/12, to be more consistent with the syntax for procedures and functions. Old syntax was Var Testcode: __asmname__ 'testcode' integer; The new is Var Testcode: integer; asmname 'testcode'; external; external is needed if it is imported from elsewhere (usually C), it is not if you want to export from pascal to C; So use the old syntax if you are in a hurry, but rather upgrade to a recent gpc version (the last alpha is the best). Maurice -- Maurice Lombardi Laboratoire de Spectrometrie Physique, Universite Joseph Fourier de Grenoble, BP87 38402 Saint Martin d'Heres Cedex FRANCE Tel: 33 (0)4 76 51 47 51 Fax: 33 (0)4 76 51 45 44 mailto:Maurice.Lombardi@ujf-grenoble.fr

1 0

email problems
by Peter Gerwinski 11 Jul '01

11 Jul '01

Hello, during the last 36 hours emails to this list were not delivered. The problem is fixed now. In case you have unsuccessfully tried to post to the list, please retry now. In den letzten 36 Stunden wurde E-Mails an diese Liste nicht zugestellt. Das Problem ist jetzt behoben. Wer in diesem Zeitraum vergeblich versucht hat, E-Mail an die Liste zu schicken, kann es jetzt noch einmal probieren. Peter -- http://home.pages.de/~Peter.Gerwinski/ - G-N-U GmbH: http://www.g-n-u.de Maintainer GNU Pascal - http://home.pages.de/~GNU-Pascal/ - gpc-20010623 GnuPG key fingerprint: 9E7C 0FC4 8A62 5536 1730 A932 9834 65DB 2143 9422 keys: http://www.gerwinski.de/pubkeys/ - AntiSpam: http://spam.abuse.net

1 0

Re: Solaris 8 install & post-install problems
by Frank Heckenbach 11 Jul '01

11 Jul '01

> I have been trying, on behalf of one of our researchers here, to > install the gpc-20010623 on a Solaris 8 (8-04) SunBlade. > > I had install problems buth using Sun's "extra" gcc-2.95.2 sources as > the base and using the gcc-core distribution from the GPC ftp site. > > Mainly, these difficulties appear to arise because things like xmalloc > and concat were being multiply defined. > > So, by a good deal of guesswork, I ended up adding: > > -DEGCS -DEGCS92 -DEGCS95 > > to be defined when doing the make. It compiled. This suggests that configure didn't run correctly since it's supposed to set the correct defines automatically. > However when I try to compile a "hello word" I get the following > at the linker stage > > Undefined first referenced > symbol in file > _p_eq /usr/local/packages/gcc-2.95.2/lib/gcc-lib/sparc-sun-solaris2.8/2.95.2/libgpc.a(string.o) > ld: fatal: Symbol referencing errors. No output written to a.out > collect2: ld returned 1 exit status > > > I guess this is a Pascal thing. > > [...] > > GNU Pascal Compiler PreProcessor version 20010605, based on gcc-2.95.2 19991024 (release) (sparc) ^^^^^^^^ That seems strange since you said you were using 20010623 (this problem on the Sparc was fixed (I hope) on 2001-06-19, so it does make a difference). Does ./gpcpp (in the build directory) claim to be 20010623? If so, apparently the Makefile used an older installed compiler. Otherwise, you either did not get 20010623 (and might want to do so now), or something went wrong in our CVS archives (which I can't check right now). You can probably work around the problem by removing `{$if True}' and the following `{$endif}' in p/rts/string.pas, but I'd appreciate if you try to find out whether there's a real problem left or it was only a version conflict. Frank -- Frank Heckenbach, frank(a)g-n-u.de http://fjf.gnu.de/ PGP and GPG keys: http://fjf.gnu.de/plan

1 0

Re: AssignFile -> Assign
by Frank Heckenbach 11 Jul '01

11 Jul '01

=?iso-8859-1?q?Preben=20Mikael=20Bohn?= wrote: > > > In Delphi they use AssignFile instead of Assign. I have defined a > > > unit > > > rtlib, where all Delphi-specific procedures are defined. > > Be welcome to contribute it (though some of them are already > > included with GPC, e.g. AssignFile is in the GPC unit, though with > > the same limitation you describe). > > Well, right now it's only very few functions. I have some other > functions, though, defined in some other units (e.g. IntToStr, etc), > that I would be happy to contribute (I hope/guess Borland don't mind me > using the same name and same functionality as their functions?). > > For now I think I'll just search/replace AssignFile with Assign... > > Best regards > > Preben Bohn > > PS. Where should I send my units? And are they at all needed? You might want to get in touch with The Chief who knows more about Delphi, has written some routines himself, and knows what's there and what's missing. Frank -- Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/ GPC To-Do list, latest features, fixed bugs: http://agnes.dida.physik.uni-essen.de/~gnu-pascal/todo.html

1 0

Re: Building GPC on sparc-solaris
by Frank Heckenbach 11 Jul '01

11 Jul '01

Kocherlakota Harikrishna wrote: > Now we are trying to use the same sources to build the compiler on > solaris and while executing the command > "make LANGUAGES=pascal" The LANGUAGES=pascal thing is only for gcc-2.8.1, not gcc-2.95.* where the languages are selected with configure. Please see the install instructions. Frank -- Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/ GPC To-Do list, latest features, fixed bugs: http://agnes.dida.physik.uni-essen.de/~gnu-pascal/todo.html

1 0

Re: Error with asmname
by Frank Heckenbach 11 Jul '01

11 Jul '01

Gloria, Jing wrote: > I would appreciate any assistance to the following problem. > > The following 2 lines of code result in error during compilation: > > Var > Testcode: integer; asmname 'testcode'; > > Error: > try_hello.pas:3: parse error before character constant > try_hello.pas:5: comma missing after identifier `Asmname' > try_hello.pas:5: parse error before `;' > > Note: Line 3 is the line with asmname keyword. > > I am using: > GNU Pascal version 2.95 19990728 (release) (i386-pc-solaris2.7) > compiled by GNU C version 2.95.1 19990816 (release). > > If I remove the asmname 'testcode' from line 3, then the > compilation goes through without any errors. > > Thanks in advance for any assistance. This part of the syntax was changed recently. What you describe is the new syntax, but your compiler version requires the old syntax like this: Var Testcode: __asmname__ 'testcode' integer; Testcode: integer; Note that's a non-external variable with a specified asmname. If you mean an external variable, the old syntax is: Var Testcode: __asmname__ 'testcode' integer; and the new one: Var Testcode: integer; external; asmname 'testcode'; So, use the old syntax or upgrade GPC (if you're doing such things a lot, you might want to upgrade now, since you'll probably do it sometime, anyway, and then you'd habve to change everything). Frank PS: Please turn off HTML! -- Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/ GPC To-Do list, latest features, fixed bugs: http://agnes.dida.physik.uni-essen.de/~gnu-pascal/todo.html

1 0

Error with asmname
by Gloria, Jing 09 Jul '01

09 Jul '01

I would appreciate any assistance to the following problem. The following 2 lines of code result in error during compilation: Var Testcode: integer; asmname 'testcode'; Error: try_hello.pas:3: parse error before character constant try_hello.pas:5: comma missing after identifier `Asmname' try_hello.pas:5: parse error before `;' Note: Line 3 is the line with asmname keyword. I am using: GNU Pascal version 2.95 19990728 (release) (i386-pc-solaris2.7) compiled by GNU C version 2.95.1 19990816 (release). If I remove the asmname 'testcode' from line 3, then the compilation goes through without any errors. Thanks in advance for any assistance. Jing Gloria Texas Instruments

1 0

Re: gpc asks for djgpp.ver?
by Toby Ewing 09 Jul '01

09 Jul '01

Hi, folks, Maurice Lombardi wrote: > Toby Ewing wrote: > > I downloaded gpc version 20010623, based on 2.95.3 20010315, and unzipped it > > into my existing c:/djgpp directory (I'm running under win98). Then I started > > up RHIDE, loaded my program, and tried to compile. > > > > The compilation quickly stopped with the error: > > djgpp.ver: no such file or directory (ENOENT). > > > > Sure enough, I find no djgpp.ver anywhere. Where do I get this file? Was it > > there before, and deleted during the upgrade? > > You probably have gcc-2.95.2 with your old setup. > this file djgpp.ver (in the lib directory) appeared when going from 2.95.2 to 2.95.3 > So upgrade gcc from gcc2952b.zip to gcc2953b.zip. > > Maurice That was it! thanks, Maurice. Toby

1 0

gpc asks for djgpp.ver?
by Toby Ewing 09 Jul '01

09 Jul '01

Hello, all I've been running into a strange bug, and hoping that it had been corrected in a more recent version of the compiler, I decided to upgrade. Perhaps this was a mistake... I downloaded gpc version 20010623, based on 2.95.3 20010315, and unzipped it into my existing c:/djgpp directory (I'm running under win98). Then I started up RHIDE, loaded my program, and tried to compile. The compilation quickly stopped with the error: djgpp.ver: no such file or directory (ENOENT). Sure enough, I find no djgpp.ver anywhere. Where do I get this file? Was it there before, and deleted during the upgrade? Toby soil scientist, Iowa State University

1 0

Building GPC on sparc-solaris
by Kocherlakota Harikrishna 09 Jul '01

09 Jul '01

Hello we previously had built the compiler on Linux with the sources from ftp://agnes.dida.physik.uni-essen.de/gnu-pascal/alpha site. Now we are trying to use the same sources to build the compiler on solaris and while executing the command "make LANGUAGES=pascal" The following error is seen: make: Fatal error in reader: Makefile, line 2219: Unexpected end of line seen Current working directory /home/users/gcc-2.95.2/gcc *** Error code 1 make: Fatal error: Command failed for target `all-gcc' Please help us how to proceed further . Thanks and kind Regards hari

1 0

Solaris 8 install & post-install problems
by Kev Buckley 09 Jul '01

09 Jul '01

Hello, I have been trying, on behalf of one of our researchers here, to install the gpc-20010623 on a Solaris 8 (8-04) SunBlade. I had install problems buth using Sun's "extra" gcc-2.95.2 sources as the base and using the gcc-core distribution from the GPC ftp site. Mainly, these difficulties appear to arise because things like xmalloc and concat were being multiply defined. So, by a good deal of guesswork, I ended up adding: -DEGCS -DEGCS92 -DEGCS95 to be defined when doing the make. It compiled. However when I try to compile a "hello word" I get the following at the linker stage Undefined first referenced symbol in file _p_eq /usr/local/packages/gcc-2.95.2/lib/gcc-lib/sparc-sun-solaris2.8/2.95.2/libgpc.a(string.o) ld: fatal: Symbol referencing errors. No output written to a.out collect2: ld returned 1 exit status I guess this is a Pascal thing. Anyone had any success with GPC under Solaris 8 ? Anyone shed any light ? Full gpc -v helo.pas output is Reading specs from /usr/local/packages/gcc-2.95.2/lib/gcc-lib/sparc-sun-solaris2.8/2.95.2/specs gpc version 20010605, based on gcc-2.95.2 19991024 (release) /usr/local/packages/gcc-2.95.2/lib/gcc-lib/sparc-sun-solaris2.8/2.95.2/gpcpp -lang-pascal -v -famtmpfile=/var/tmp/cc4YaaNX -fdelphi-comments -D__GNU_PASCAL__ -undef -D__GNUC__=2 -D__GNUC_MINOR__=95 -D__GPC__=2 -D__GPC_MINOR__=0 -D__GPC_RELEASE__=20010605 -D__BITS_BIG_ENDIAN__=1 -D__BYTES_BIG_ENDIAN__=1 -D__WORDS_BIG_ENDIAN__=1 -D__NEED_ALIGNMENT__=1 -Dsparc -Dsun -Dunix -D__svr4__ -D__SVR4 -D__sparc__ -D__sun__ -D__unix__ -D__svr4__ -D__SVR4 -D__sparc -D__sun -D__unix -Asystem(unix) -Asystem(svr4) -D__GCC_NEW_VARARGS__ -Acpu(sparc) -Amachine(sparc) hello.pas /var/tmp/cc5YaaNX.i GNU Pascal Compiler PreProcessor version 20010605, based on gcc-2.95.2 19991024 (release) (sparc) #include "..." search starts here: #include <...> search starts here: /usr/local/include /usr/local/packages/gcc-2.95.2/sparc-sun-solaris2.8/include /usr/local/packages/gcc-2.95.2/lib/gcc-lib/sparc-sun-solaris2.8/2.95.2/include /usr/include End of search list. /usr/local/packages/gcc-2.95.2/lib/gcc-lib/sparc-sun-solaris2.8/2.95.2/gpc1 /var/tmp/cc5YaaNX.i -quiet -dumpbase hello.pas -version -famtmpfile=/var/tmp/cc4YaaNX -o /var/tmp/cc5YaaNX.s GNU Pascal version 2.95.2 19991024 (release) (sparc-sun-solaris2.8) compiled by GNU C version 2.95.2 19991024 (release). GNU Pascal version is actually 20010605, based on gcc-2.95.2 19991024 (release) /usr/ccs/binås -V -Qy -s -o /var/tmp/cc5YaaNX1.o /var/tmp/cc5YaaNX.s /usr/ccs/binås: Sun WorkShop 6 99/08/18 /usr/local/packages/gcc-2.95.2/lib/gcc-lib/sparc-sun-solaris2.8/2.95.2/collect2 -V -Y P,/usr/ccs/lib:/usr/lib -Qy /usr/local/packages/gcc-2.95.2/lib/gcc-lib/sparc-sun-solaris2.8/2.95.2/crt1.o /usr/local/packages/gcc-2.95.2/lib/gcc-lib/sparc-sun-solaris2.8/2.95.2/crti.o /usr/ccs/lib/values-Xa.o /usr/local/packages/gcc-2.95.2/lib/gcc-lib/sparc-sun-solaris2.8/2.95.2/crtbegin.o -L/usr/local/packages/gcc-2.95.2/lib/gcc-lib/sparc-sun-solaris2.8/2.95.2 -L/usr/ccs/bin -L/usr/ccs/lib -L/usr/local/packages/gcc-2.95.2/lib /var/tmp/cc5YaaNX1.o -lgpc -lm -lgcc -lc -lgcc /usr/local/packages/gcc-2.95.2/lib/gcc-lib/sparc-sun-solaris2.8/2.95.2/crtend.o /usr/local/packages/gcc-2.95.2/lib/gcc-lib/sparc-sun-solaris2.8/2.95.2/crtn.o ld: Software Generation Utilities - Solaris-ELF (4.0) Undefined first referenced symbol in file _p_eq /usr/local/packages/gcc-2.95.2/lib/gcc-lib/sparc-sun-solaris2.8/2.95.2/libgpc.a(string.o) ld: fatal: Symbol referencing errors. No output written to a.out collect2: ld returned 1 exit status -- Regards, ---------------------------------------------------------------------- * Kevin M. Buckley e-mail: K.Buckley(a)lancaster.ac.uk * * * * Systems Administrator * * Computer Centre * * Lancaster University Voice: +44 (0) 1524 5 93718 * * LANCASTER. LA1 4YW Fax : +44 (0) 1524 5 25113 * * England. * * * * My PC runs Linux/GNU, you still computing the Bill Gate$' way ? * ----------------------------------------------------------------------

2 1

AssignFile -> Assign
by Preben Mikael Bohn 09 Jul '01

09 Jul '01

Hi all I'm just trying to convert a Delphi program (non-visual) into GPC. I thought it would be much harder, but actually it's very easy. I have one problem though: In Delphi they use AssignFile instead of Assign. I have defined a unit rtlib, where all Delphi-specific procedures are defined. I first defined AssignFile as procedure assignFile(var f : TextFile; fileName : string ); begin assign(f,filename); end; { assignFile } However now I also need to define it with typed files. Is there a way to have more than one definition? Best regards Preben Bohn PS. Yes, I could just replace AssignFile with Assign... :-) ===== The two rules for success are: 1. Never tell them everything you know. ____________________________________________________________ Do You Yahoo!? Get your free @yahoo.co.uk address at http://mail.yahoo.co.uk or your free @yahoo.ie address at http://mail.yahoo.ie

2 2

moveleft?
by Oldham, Adam 07 Jul '01

07 Jul '01

Hello people, Again, I didn't see this in any FAQs or in the Bug List, so I am going to post the question. The Moveleft and Moveright functions should basically take a source and destination and copy the length number of bytes (from the left or right respectively), correct? That is how it worked with the old compiler I had, but I think we have come to the conclusion that it is horribly nonstandard, and since there are no help files on moveleft and moveright on the GPC page, I have to ask, and then ask if this is a bug. My sample source is this: TYPE AnyStr = STRING[40]; AnyStrPtr = ^AnyStr; VAR TestVar1 : AnyStrPtr; TestVar2 : AnyStrPtr; TestVar3 : AnyStr; TestVar4 : AnyStr; BEGIN TestVar3 := 'TEST1'; TestVar1 := AnyStrPtr(@TestVar3); TestVar4 := 'TEST3'; TestVar2 := AnyStrPtr(@TestVar4); writeln(TestVar1^); writeln(TestVar2^); MOVELEFT (TestVar1^, TestVar2^, (LENGTH(TestVar1^) + 1)); writeln(""); writeln("After"); writeln(TestVar1^); writeln(TestVar2^); END. { unit pSos } With GPC, the output is: TEST1 -> (TestVar1) TEST3 -> (TestVar2) After TEST1 -> (TestVar1 after MoveLeft) TEST3 -> (TestVar2 after MoveLeft) With my old compiler, the output is: TEST1 TEST3 After TEST1 TEST1 As it basically copies the length bytes of TestVar1 into TestVar2. Now, my question, does GPC work differently for this function, and if yes or no, is this a bug. Also, if you guys need some help finishing the GPC manual, let me know, I am willing to lend a hand. Adam Oldham ----------------------------------------------------------------------- C. Adam Oldham Marconi Commerce Systems Inc. Software Engineer 7300 West Friendly Ave. adam.oldham(a)marconi.com Greensboro, NC 27420-2087 Phone : 336.547.5952 Fax : 336.547.5079 ----------------------------------------------------------------------- This document contains confidential information of Marconi Commerce Systems Inc. In consideration of the receipt of this document, the recipient agrees not to reproduce, copy, use or transmit this document and/or the information contained herein, in whole or in part, or to suffer such actions by others, for any purpose except with written permission, first obtained, of Marconi Commerce Systems Inc., and further agrees to surrender the same to Marconi Commerce Systems Inc. upon demand. -----------------------------------------------------------------------

4 3

[Re: moveleft?]
by Maurice Lombardi 06 Jul '01

06 Jul '01

Oldham, Adam wrote: > TYPE > AnyStr = STRING[40]; > AnyStrPtr = ^AnyStr; > > VAR > TestVar1 : AnyStrPtr; > TestVar2 : AnyStrPtr; > TestVar3 : AnyStr; > TestVar4 : AnyStr; > > BEGIN > TestVar3 := 'TEST1'; > TestVar1 := AnyStrPtr(@TestVar3); > TestVar4 := 'TEST3'; > TestVar2 := AnyStrPtr(@TestVar4); > writeln(TestVar1^); > writeln(TestVar2^); > MOVELEFT (TestVar1^, TestVar2^, (LENGTH(TestVar1^) + 1)); > writeln(""); > writeln("After"); > writeln(TestVar1^); > writeln(TestVar2^); > END. { unit pSos } > > With GPC, the output is: > TEST1 -> (TestVar1) > TEST3 -> (TestVar2) > > After > TEST1 -> (TestVar1 after MoveLeft) > TEST3 -> (TestVar2 after MoveLeft) > > With my old compiler, the output is: > TEST1 > TEST3 > > After > TEST1 > TEST1 > > As it basically copies the length bytes of TestVar1 into TestVar2. Now, my > question, does GPC work differently for this function, and if yes or no, is > this a bug. Your old compiler was probably a Borland type, i.e. AnyStr are one byte [0] containing the length and 40 bytes containing the chars. This is why you moved length()+1 chars, 1 being for the zeroth char. In gpc String is different. It is defined as: type String (Capacity : Integer) = record Length : 0 .. Capacity; String : packed array [1 .. Capacity + 1] of Char end; When you moves 6 chars, you move mainly the Capacity and (part of) the Length field, this is why it seems you move nothing. The result would be even stranger if the two strings had different Capacity and/or Length. One solution if you want to move only the chars would be MOVELEFT (TestVar1^[1], TestVar2^[1], (LENGTH(TestVar1^))); i.e. addresses of the first chars and no more +1. This non pascal, C style or assembly style, kind of programming can work only if you know exactly the internals of your system, down to binary level. Otherwise it opens a can of worms and any porting from one system to another is a very efficient bug generator, as you have checked. For example If you tried to move also the Capacity and Length fields to solve your problem, the result would depend on undefined things like alignment of these fields: try to write SizeOf(AnyStr). On my system it is 52, instead of 40 + 1 + 2*SizeOf(integer) = 49: alignment on a four bytes (integer) boundary. String assignment is probably the right way of doing ! So this is definitely not a bug of gpc, rather a bug entailed by Borland style programming. Hope this helps Maurice -- Maurice Lombardi Laboratoire de Spectrometrie Physique, Universite Joseph Fourier de Grenoble, BP87 38402 Saint Martin d'Heres Cedex FRANCE Tel: 33 (0)4 76 51 47 51 Fax: 33 (0)4 76 51 45 44 mailto:Maurice.Lombardi@ujf-grenoble.fr

1 0

trouble reading postings
by toms＠ncifcrf.gov 06 Jul '01

06 Jul '01

In the last few days I have been getting this message for the summary of gpc postings: Seems that message/rfc822 data was corrupted. Has something changed on the list? Is someone putting weird stuff into their email messages? I use elm (old but a better design than mutt!!) to read my email. 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 http://www.lecb.ncifcrf.gov/~toms/

2 1

Re: Compiling Source Files w/o Program Statement
by Gloria, Jing 05 Jul '01

05 Jul '01

Maurice, thanks for the prompt response. I was just showing an example of the our source files. This whole software is composed on a couple hundred files (about 95% in Pascal, some C, and a couple in assembly). The whole thing is then linked. So there is only one file with the program header. All other source files just contain procedures in Pascal or C functions. In this particular instance, I am trying to make a program where a C program calls the Pascal routine. Regards, Jing -----Original Message----- From: Maurice Lombardi [mailto:Maurice.Lombardi@ujf-grenoble.fr] Sent: Thursday, July 05, 2001 11:42 AM To: Gloria, Jing Cc: 'gpc(a)gnu.de' Subject: Re: Compiling Source Files w/o Program Statement Gloria, Jing wrote: > I have installed GPC and GCC on a Solaris 7 x86 platform. We are > migrating software from RISC/SPARC Sun OS to x86 Solaris 7. > > GPC is version 19991030. based on 2.95 19990728. GCC is 2.95.2. > > The GPC Mailing List archive web site has been unreachable. I apologize > if the following question has already be addressed in the past. > > Problem: GPC will not compile our Pascal source files since they do not > have any Program statements. > > Sample program: > > Procedure hello; > begin > Writeln ('PASCAL says: Hello, world.'); > Writeln (' ') > End; > > ****end of sample program**** > > When I run GPC (gpc -c filename), I get the following messages: > warning: missing program header > parse error at end of input > > The only way I found to get gpc to compile is by adding: > Begin > End. > > at the end of the source file. I still get the warning message about > missing program header but GPC compiles. I would prefer not to do this > since we will be using the same source files for the maintenance of the > software in both SPARC/RISC and Intel x86 platforms. What a "program" which contains only the declaration of a procedure is intended to do ? It cannot lead to anything executable ? Maurice -- Maurice Lombardi Laboratoire de Spectrometrie Physique, Universite Joseph Fourier de Grenoble, BP87 38402 Saint Martin d'Heres Cedex FRANCE Tel: 33 (0)4 76 51 47 51 Fax: 33 (0)4 76 51 45 44 mailto:Maurice.Lombardi@ujf-grenoble.fr

2 1

Compiling Source Files w/o Program Statement
by Gloria, Jing 05 Jul '01

05 Jul '01

I have installed GPC and GCC on a Solaris 7 x86 platform. We are migrating software from RISC/SPARC Sun OS to x86 Solaris 7. GPC is version 19991030. based on 2.95 19990728. GCC is 2.95.2. The GPC Mailing List archive web site has been unreachable. I apologize if the following question has already be addressed in the past. Problem: GPC will not compile our Pascal source files since they do not have any Program statements. Sample program: Procedure hello; begin Writeln ('PASCAL says: Hello, world.'); Writeln (' ') End; ****end of sample program**** When I run GPC (gpc -c filename), I get the following messages: warning: missing program header parse error at end of input The only way I found to get gpc to compile is by adding: Begin End. at the end of the source file. I still get the warning message about missing program header but GPC compiles. I would prefer not to do this since we will be using the same source files for the maintenance of the software in both SPARC/RISC and Intel x86 platforms. Pls reply to my e-mail address. I am not yet registered in the gpc mailing list. Thanks in advance for any assistance extended. Regards, Jing Texas Instruments Sherman, TX

2 1

syntax problem
by Kocherlakota Harikrishna 05 Jul '01

05 Jul '01

Hello Does GPC support the following syntax. <unitname>.<procedurename> thanks and regards hari

2 1

ENLARGE YOUR PENIS GUARANTEED 29950 (fwd)
by John L. Ries 04 Jul '01

04 Jul '01

The following unsolicited message was sent to the GNU Pascal mailing list from inside your network, in violation of your acceptable use policy. The originating host is pm5port4.stmarys.pcidu.com [208.29.96.24]. This is the fourth spam I have received from stmarys.pcidu.com today and the fifth this week. I intend to block further email from stmarys.pcidu.com to salford-systems.com until you notify me that this abuser has been terminated. ------------------------------------------------------- John L. Ries Salford Systems Phone: (619)543-8880 x25 or (760)765-4738 FAX: (619)543-8888 E-Mail: jries(a)salford-systems.com _______________________________________________________ ---------- Forwarded message ---------- Return-Path: <gpc-owner+M4(a)gnu.de> Received: from adele.gerwinski.de (adele.Gerwinski.de [217.69.76.193]) by scott.salford-systems.com (8.11.1/8.11.1) with ESMTP id f646S1m23769 for <jries(a)salford-systems.com>; Tue, 3 Jul 2001 23:28:01 -0700 (PDT) Received: from localhost ([::ffff:127.0.0.1] helo=gnu.de) by adele.gerwinski.de with smtp (Exim 3.12 #1 (Debian)) id 15HfVa-0004yN-00; Wed, 04 Jul 2001 07:47:30 +0200 Received: from tiku.hut.fi ([::ffff:130.233.228.86]) by adele.gerwinski.de with esmtp (Exim 3.12 #1 (Debian)) id 15HfVU-0004yD-00 for <gpc(a)gnu.de>; Wed, 04 Jul 2001 07:47:24 +0200 Received: from sclserver.designworkshop.cl (planarltda.manquehue.net [200.27.201.207]) by tiku.hut.fi (8.9.3/8.9.3) with ESMTP id IAA30409; Wed, 4 Jul 2001 08:46:47 +0300 (EET DST) From: jb4700(a)hotmail.com Received: from 208.29.96.24 ([208.29.96.24]) by sclserver.designworkshop.cl (Lotus Domino Release 5.0.5) with SMTP id 2001070316542485:548 ; Tue, 3 Jul 2001 16:54:24 -0400 Message-ID: <00004dfd58b3$0000060c$000074fe(a)208.29.96.24> To: <indor(a)hotmail.com> Subject: ENLARGE YOUR PENIS GUARANTEED 29950 Date: Sat, 07 Jul 2001 01:42:39 -0400 MIME-Version: 1.0 X-Priority: 3 (Normal) X-MSMail-Priority: Normal Errors-To: ntnomgnwo5th1(a)iupi.pt X-MIMETrack: Itemize by SMTP Server on SCLServer/design workshop chile(Release 5.0.5 |September 22, 2000) at 03-07-2001 16:54:26, Serialize by Router on SCLServer/design workshop chile(Release 5.0.5 |September 22, 2000) at 04-07-2001 01:50:03, Serialize complete at 04-07-2001 01:50:03 Content-Transfer-Encoding: quoted-printable Content-Type: text/html; charset="iso-8859-1" Precedence: bulk Sender: gpc-owner(a)gnu.de MEN.....Stop Being Ashamed Of Your Penis Size! Women Get This For Your Boyfriend/Husband It REALLY WORKS! CLICK HERE NOW TO BE AMAZED To be taken off our mailing list, simply send an email to here with your email address in the body of the email. ****

1 0

Re: Information that you have requested
by John L. Ries 04 Jul '01

04 Jul '01

The following unsolicited message was sent to the GNU Pascal mailing list. It uses a mailbox on your system (vgicncenetcheung(a)yahoo.com) to receive responses in violation of your acceptable use policy. Please investigate this matter and punish the perpetrator accordingly. ------------------------------------------------------- John L. Ries Salford Systems Phone: (619)543-8880 x25 or (760)765-4738 FAX: (619)543-8888 E-Mail: jries(a)salford-systems.com _______________________________________________________ ---------- Forwarded message ---------- >From kd307(a)hotmail.com Wed Jul 04 14:21:40 2001 Return-Path: <gpc-owner+M6(a)gnu.de> Received: from adele.gerwinski.de (adele.Gerwinski.de [217.69.76.193]) by scott.salford-systems.com (8.11.1/8.11.1) with ESMTP id f648MBm23728 for <jries(a)salford-systems.com>; Wed, 4 Jul 2001 01:22:12 -0700 (PDT) Received: from localhost ([::ffff:127.0.0.1] helo=gnu.de) by adele.gerwinski.de with smtp (Exim 3.12 #1 (Debian)) id 15HhcK-0005Lq-00; Wed, 04 Jul 2001 10:02:36 +0200 Received: from tiku.hut.fi ([::ffff:130.233.228.86]) by adele.gerwinski.de with esmtp (Exim 3.12 #1 (Debian)) id 15HhcD-0005Lh-00 for <gpc(a)gnu.de>; Wed, 04 Jul 2001 10:02:29 +0200 Received: from chillan.dportales.cl (IDENT:root@[200.28.88.98]) by tiku.hut.fi (8.9.3/8.9.3) with ESMTP id LAA07219; Wed, 4 Jul 2001 11:02:19 +0300 (EET DST) From: kd307(a)hotmail.com Received: from 208.29.114.32 (pm9port12.stmarys.pcidu.com [208.29.114.32]) by chillan.dportales.cl (8.9.3/8.8.7) with SMTP id LAA32171; Thu, 31 May 2001 11:34:19 -0400 Message-ID: <0000433a17af$000038df$000055de(a)208.29.114.32> To: <jwchoe(a)hotmail.com> Subject: Re: Information that you have requested 21982 Date: Fri, 06 Jul 2001 16:40:56 -0400 MIME-Version: 1.0 Content-Type: text/html; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable X-Priority: 3 X-MSMail-Priority: Normal Errors-To: cveuftrgvrs(a)loja.net Precedence: bulk Sender: gpc-owner(a)gnu.de [ The following text is in the "iso-8859-1" character set. ] [ Your display is set for the "US-ASCII" character set. ] [ Some characters may be displayed incorrectly. ] <html> <body alink="#FFFFFF" vlink="#FFFFFF" link="#FFFFFF"> <div align="center"> <center> <table bgColor="#000000" border="0" cellPadding="0" cellSpacing="0" width="596"> <tbody> <tr> <td align="center" colSpan="2" vAlign="top" width="590" bgcolor="#000000"> <p align="center"><font color="#000000"><font face="Webdings" size="6">e </font><b><font face="Verdana" size="5" color="#FFFFFF">Earn </font></font><font face="Verdana" size="5" color="#FF0000">$1500</font><font face="Verdana" size="5" color="#FFFFFF"> Or More Per Week! </font> </b> </td> </tr> <tr> <td colSpan="2" vAlign="top" width="590"> <table bgColor="black" border="0" cellPadding="0" cellSpacing="0" height="1" width="596"> <tbody> <tr> <td><img height="1" width="1"></td> </tr> </tbody> </table> </td> </tr> <tr> <td align="center" bgColor="#FFB13E" height="17" vAlign="center" width="89"> <div align="center">   </div> </td> <td align="right" bgColor="#FFB13E" height="17" vAlign="center" width="501"> <div align="center"> <b><font size="2" face="Arial">This offer is limited to the first 49 people who contact me today!</font></b> </div> </td> <tr> <td align="center" colSpan="2" vAlign="top" width="590" bgcolor="#B0D8FF"> <table bgColor="black" border="0" cellPadding="0" cellSpacing="0" height="1" width="596"> <tbody> <tr> <td><img height="1" width="1"></td> </tr> </tbody> </table> </td> </tr> </tbody> </table> </center> </div> <div align="center"> <center> <table align="center" border="0" cellPadding="0" cellSpacing="0" width="596" height="1" bgcolor="#000000"> <tbody> <tr> <td align="center" bgColor="#000000" vAlign="top" height="118"> <div align="center"> <center> <table border="0" cellPadding="0" cellSpacing="0" bgcolor="#000000"> <tbody> <tr> <td width="10" bgcolor="#FFFF00"></td> <td align="center" vAlign="top" bgcolor="#FFFF00"> <p align="center"><br> <font face="Verdana" size="2">Let's face it, every business opportunity is not for everyone.  You need something that fits your needs, budget, and schedule.  That is why we have put together several <b><font color="#ff0000">"Real" </font>Income Opportunities</b> just for you. We have searched and searched and finally found and compiled the best opportunities available.  </font></p> <p align="center"><font face="Verdana" size="2">I promise, you will not regret it. You will finally find something you truly can make Money with. You really can make an <b>Extra $200 to $1,500 a Week</b> if you have a few hours a week to work your business!</font></p> <p align="center"><font face="Verdana" size="2">You do not have to pay one dime to find out about these true money making opportunities.<span style="mso-spacerun: yes">  </span>Just <b>Call 1(800)234-8190</b> and we will show you the best, <b>real</b> moneymakers available.<span style="mso-spacerun: yes">  </span>It is <b>100% FREE</b>, so visit us today, do not miss out on a life changing opportunity.</font></p> <p><font face="Verdana" size="2">This is <b>Absolutely</b> <font color="#ff0000"><b>No Risk</b></font>, so <b>Call 1(800)234-8190</b> Right Now, and <b>Find The Opportunity of A Lifetime</b>!</font></p> <p>  </td> <td width="10" bgcolor="#FFFF00"></td> </tr> <tr> <td colSpan="3" height="10" width="437" bgcolor="#FFFF00"> <p align="center"><b></font><font face="Verdana" size="4">Call 1(800)234-8190 Immediatly<b><br>24 Hrs / 7 Days</font></b></a></p> <p align="center"> </p> </td> </tr> </tbody> </table> </center> </div> </td> <td align="center" bgColor="#000000" vAlign="top" width="1" height="118"> </td> <td bgColor="#000000" height="1" rowSpan="2" vAlign="top" width="150"> <div align="center"> <font color="#FFFFFF" size="2" face="Arial"><b>- Testimonials -</b></font> </div> <div align="center">   </div> <div align="center"> <font size="2" face="Arial" color="#FFFFFF">"My very first day with less than an hour of my spare time I made over $123.00. My second day I duplicated that in less than 30 minutes."<br> </font> </div> <div align="center"> <font size="2" face="Arial" color="#FFFFFF">Jason Vielhem</font> </div> <div align="center"> <font size="2" face="Arial" color="#FFFFFF">"Mr. Skeptical"</font> </div> <div align="center"> <font color="#FFFFFF"><b>---------------</b></font> </div> <div align="center">   </div> <div align="center"> <font size="2" face="Arial" color="#FFFFFF">"I literally make thousands each month from the comfort of my home, heck my couch! Thank you for changing my life forever!"</font> </div> <div align="center">   </div> <div align="center"> <font size="2" face="Arial" color="#FFFFFF">Jenna Wilson</font> </div> <p align="center"><font color="#FFFFFF"><b>---------------</b></font> </td> </tr> </tbody> </table> </center> </div> <div align="center"> <center> <table bgColor="#000000" border="0" cellPadding="0" cellSpacing="0" width="596" height="1"> <tr> <td align="center" bgColor="#000000" height="1" vAlign="center" width="590"> <font face="Arial" size="1" color="#000000">a</font> </td> </table> </center> </div> <p> </p> <p><br> <br> <br> <br> <br> </p> <p> </p> <p> </p> <p> </p> <p> </p> <div align="center"> <center> <table bgColor="#000000" border="0" cellPadding="0" cellSpacing="0" width="596" height="1"> <tr> <td align="center" bgColor="#3C3C3C" height="1" vAlign="center" width="590"> <p align="center"><font face="Arial" size="2" color="#FFFFFF">Put your email address in body of email and send email to <a href="mailto:vgicncenetcheung@yahoo.com">here</a><b></font> </td> </table> </center> </div> <br>~~~~~~~~~~~~ </BODY> </HTML>

1 0

Re: Information that you have requested
by John L. Ries 04 Jul '01

04 Jul '01

The following unsolicited message was sent to the GNU Pascal mailing list (gpc(a)gnu.de) from inside of your network in violation of your acceptable use policy. The originating host is pm9port12.stmarys.pcidu.com [208.29.114.32]. This is the 3rd spam I have received from stmarys.pcidu.com today and the 4th this week. Please terminate this abuser immediately (see my last complaint from a few minutes ago). ------------------------------------------------------- John L. Ries Salford Systems Phone: (619)543-8880 x25 or (760)765-4738 FAX: (619)543-8888 E-Mail: jries(a)salford-systems.com _______________________________________________________ ---------- Forwarded message ---------- Return-Path: <gpc-owner+M6(a)gnu.de> Received: from adele.gerwinski.de (adele.Gerwinski.de [217.69.76.193]) by scott.salford-systems.com (8.11.1/8.11.1) with ESMTP id f648MBm23728 for <jries(a)salford-systems.com>; Wed, 4 Jul 2001 01:22:12 -0700 (PDT) Received: from localhost ([::ffff:127.0.0.1] helo=gnu.de) by adele.gerwinski.de with smtp (Exim 3.12 #1 (Debian)) id 15HhcK-0005Lq-00; Wed, 04 Jul 2001 10:02:36 +0200 Received: from tiku.hut.fi ([::ffff:130.233.228.86]) by adele.gerwinski.de with esmtp (Exim 3.12 #1 (Debian)) id 15HhcD-0005Lh-00 for <gpc(a)gnu.de>; Wed, 04 Jul 2001 10:02:29 +0200 Received: from chillan.dportales.cl (IDENT:root@[200.28.88.98]) by tiku.hut.fi (8.9.3/8.9.3) with ESMTP id LAA07219; Wed, 4 Jul 2001 11:02:19 +0300 (EET DST) From: kd307(a)hotmail.com Received: from 208.29.114.32 (pm9port12.stmarys.pcidu.com [208.29.114.32]) by chillan.dportales.cl (8.9.3/8.8.7) with SMTP id LAA32171; Thu, 31 May 2001 11:34:19 -0400 Message-ID: <0000433a17af$000038df$000055de(a)208.29.114.32> To: <jwchoe(a)hotmail.com> Subject: Re: Information that you have requested 21982 Date: Fri, 06 Jul 2001 16:40:56 -0400 MIME-Version: 1.0 Content-Type: text/html; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable X-Priority: 3 X-MSMail-Priority: Normal Errors-To: cveuftrgvrs(a)loja.net Precedence: bulk Sender: gpc-owner(a)gnu.de e Earn $1500 Or More Per Week! [IMAGE] This offer is limited to the first 49 people who contact me today! [IMAGE] Let's face it, every business opportunity is not for everyone. You need something that fits your needs, budget, and schedule. That is why we have put together several "Real" Income Opportunities just for you. We have searched and searched and finally found and compiled the best opportunities available. I promise, you will not regret it. You will finally find something you truly can make Money with. You really can make an Extra $200 to $1,500 a Week if you have a few hours a week to work your business! You do not have to pay one dime to find out about these true money making opportunities. Just Call 1(800)234-8190 and we will show you the best, real moneymakers available. It is 100% FREE, so visit us today, do not miss out on a life changing opportunity. This is Absolutely No Risk, so Call 1(800)234-8190 Right Now, and Find The Opportunity of A Lifetime! Call 1(800)234-8190 Immediatly 24 Hrs / 7 Days - Testimonials - "My very first day with less than an hour of my spare time I made over $123.00. My second day I duplicated that in less than 30 minutes." Jason Vielhem "Mr. Skeptical" --------------- "I literally make thousands each month from the comfort of my home, heck my couch! Thank you for changing my life forever!" Jenna Wilson --------------- a Put your email address in body of email and send email to here ~~~~~~~~~~~~

1 0

Re: bug when upgrading bnu210->bnu211 ?
by Maurice Lombardi 04 Jul '01

04 Jul '01

Mark E. wrote: > On Mon, 25 Jun 2001 11:10:32 +0200, you wrote: > > >> Here it is, compiled with >> gpc -g -S -O3 fay.pas >> > > > I get the same error message using 2.11, but none in the patched version of 2.11.2. > It would seem the fix I applied for a different bug reported a few days ago fixes > your case as well. The fix will be in the djgpp version of binutils 2.11.2 available > in a few days from the djgpp mirrors and I'll work on getting it in to a future > version of binutils. OK It works now with bnu2112a/b.zip Many thanks ! Maurice -- Maurice Lombardi Laboratoire de Spectrometrie Physique, Universite Joseph Fourier de Grenoble, BP87 38402 Saint Martin d'Heres Cedex FRANCE Tel: 33 (0)4 76 51 47 51 Fax: 33 (0)4 76 51 45 44 mailto:Maurice.Lombardi@ujf-grenoble.fr

1 0

Re: Information that you have requested 21982
by kd307＠hotmail.com 04 Jul '01

04 Jul '01

1 0

Boost Your Windows Reliability!!!!!!!!!! 14824
by mikeedw＠heybytheway.com 04 Jul '01

04 Jul '01

1 0

ENLARGE YOUR PENIS GUARANTEED 29950
by jb4700＠hotmail.com 04 Jul '01

04 Jul '01

1 0

LEARN HOW YOU CAN LOSE WEIGHT/FEEL GREAT 3752
by imlauf＠hotmail.com 04 Jul '01

04 Jul '01

1 0

Initialisation section of units
by Anuradha 28 Jun '01

28 Jun '01

Hello, Does gpc support initialisation section like: unit <name> interface implementation Begin{initialisation} end. Regards, Anuradha -- S.Anuradha Generic Data Tools, Alcatel Chennai. Alcanet : 2-757-7123

5 7

one failed
by Russ Whitaker 25 Jun '01

25 Jun '01

Hi TEST fjf469.pas failed: ./fjf469.pas:4: referenced type `Undef' undefined. Reading specs from /usr/local/lib/gcc-lib/i586-pc-linux-gnu/2.95.3/specs gpc version 20010605, based on 2.95.3 20010315 (release) No biggy - just thought you'd like to know. Russ

1 0

(no subject)
by Kocherlakota Harikrishna 25 Jun '01

25 Jun '01

1 0

Problem with FILE of RECORD
by david＠tcs01.demon.co.uk 24 Jun '01

24 Jun '01

This very small program demonstrates a bug in handling FILEs of a particular RECORD. It has been cut down from a much larger real-life example, so it looks very artificial. File F (a FILE of TSMALLPOINT) is not written correctly using GPC version 20010516 (based on 2.95.2 19991024 (release)) on Kernel 2.2.16 on an i686 under RedHat Linux 6.2. The behaviour has changed sometime since version 19991030 (based on 2.95.2 19991024 (release)). Here is the program: ==================== program daj23(input,output); const MAXCOMP=5; MAXROUND=2; type TSMALLPOINT=RECORD REGNO:integer; PNTS:ARRAY[1..MAXROUND] OF integer; END; var i,J,cat,count,ordinal:INTEGER; st1:string(255); PROCEDURE SAVE_CAT; VAR I,J:INTEGER; F:FILE OF TSMALLPOINT; BEGIN writeSTR(st1,CAT:1); REWRITE(F,'ch'+ST1); F^.REGNO:=ORDINAL; for j:=1 to maxround do f^.pnts[j]:=0; PUT(F); FOR I:=1 TO MAXCOMP DO BEGIN F^.REGNO:=100+i; FOR J:=1 TO MAXROUND DO BEGIN F^.PNTS[J]:=i+j; END; PUT(F); END; CLOSE(F); END; begin (*daj20*) cat:=1; ordinal:=10; save_cat; end. (*daj20*) od -d ch1 shows the file contains: 0000000 0 0 0 0 0 0 0 0 0000020 0 0 3 0 0 0 0 0 0000040 4 0 0 0 0 0 5 0 0000060 0 0 0 0 6 0 0 0 0000100 0 0 7 0 0000110 Under GPC version 19991030, od -d ch1 shows: 0000000 10 0 0 0 0 0 101 0 0000020 2 0 3 0 102 0 3 0 0000040 4 0 103 0 4 0 5 0 0000060 104 0 5 0 6 0 105 0 0000100 6 0 7 0 0000110 which is the correct contents. -- David James mailto:david@tcs01.demon.co.uk Special Stage Rally results archive <URL:http://www.tcs01.demon.co.uk/>

3 6

bug when upgrading bnu210->bnu211 ?
by Maurice Lombardi 23 Jun '01

23 Jun '01

Hi all, I have recently upgraded binutils, from bnu210 to bnu211 (all on djgpp v2.03) I used it to compile gpc-20010605 and ran the test suite. Everything is OK except for a bug in fay.pas which was not present with bnu210 (with the same gpc sources). C:\djgpp\b\gnu\gcc-2.953\gcc\p\test>gpc -g -O3 --autobuild fay.pas c:/djgpp/tmp\ccdaaaaa: Assembler messages: c:/djgpp/tmp\ccdaaaaa:934: Fatal error: C_EFCN symbol out of scope This is related to COFF debugging: it compiles and runs perfectly without the -g option. Looking into coff.h, I found #define C_EFCN 0xff /* physical end of function */ and line 934 is the last line of fay.s, so this seems consistent. Looking to gpc mail archives I found two occurences of the same error in the same test program fay.pas, in mails from andris when we upgraded from gcc-2.95.2 to gcc-2.95.3, and which disappeared when his suggestions enabled to compile gpc. Nothing I can think about with such an erratic bug. For reference, if somebody has an idea, I have uploaded to agnes in the directory ftp://agnes.dida.physik.uni-essen.de/home/maurice/ gpc compiled with the two versions of bnu (names are explicit), and the modified version of gcc2953s2.zip I used to compile them: modifications include a libiberty/configure.in.diff necessary to use version 2.50 of autoconf and changes in build.bat and djbuild1.sh to compile only gcc and gpc instead of the whole compiler collection. Meanwhile I reverted to bnu210 and the link gpc2953b.zip points to the bnu210 version. Hope this helps (little hope in fact) Maurice. -- Maurice Lombardi Laboratoire de Spectrometrie Physique, Universite Joseph Fourier de Grenoble, BP87 38402 Saint Martin d'Heres Cedex FRANCE Tel: 33 (0)4 76 51 47 51 Fax: 33 (0)4 76 51 45 44 mailto:Maurice.Lombardi@ujf-grenoble.fr

1 0

GNU PASCAL
by Cortelli Paolo 23 Jun '01

23 Jun '01

Hi, I'm trying to run the simple included program, but I receive that error: Internal error: string capacity cannot be negative. I have noticed that the problem start on readln inside the loop. Is there a way to overcome that? Window95, gpc version 2.53. Thanks for your help. Paolo Cortelli program txt2rec; type rmaterie = record m_materia:string[18]; m_esclude:string[78]; m_len: integer; m_esc: array[1..5] of integer; end; tmaterie = array[0..0] of rmaterie; pmaterie = ^tmaterie; var k,len_m: integer; materie: pmaterie; f: text; procedure p_mat(fl:string); begin assign(f,fl); reset(f); readln(f,len_m); getmem(materie,sizeof(rmaterie)*len_m); for k := 1 to len_m do readln(f,materie^[k].m_materia,materie^[k].m_esclude); close(f); freemem(materie,sizeof(rmaterie)*len_m); end; begin p_mat('materie.txt'); end. { This is the contents of MATERIE.TXT 36 BIOLOGIA \LAB.BIOLOG CALCOLO \LAB.CALCOLO CHIMICA \LAB.CHIMICA }

2 1

forward pointers
by Christopher Ferrall 22 Jun '01

22 Jun '01

This is listed in "Other known bugs" > forward referencing pointers generate debug info that appears as generic pointers; no information of `with' > statements is currently given to the debugger; error in debug entries generated for objects Is this the same as this problem: type xptr = ^x_type; x_type = record stuff ... next : xptr; end; var xlist, x : xptr; begin new(xlist); xlist.next:=nil; ... x := xlist; repeat with x^ do begin new(next); x := next; until no_more_to_create; At runtime: Program received signal SIGSEGV, Segmentation fault. Inside gdb: (gdb) print x[0] Attempt to dereference a generic pointer. Obviously next can be "pointer" and xptr can be defined after x_type, but it is inconvenient to change code based on one of the building blocks of Pascal. --Chris

3 2

Speed
by Miklos Cserzo 22 Jun '01

22 Jun '01

Hi Folks, I am optimizing a code for speed in gpc. Let me share some strange observations of mine. I have two vectors of size N and M. I need to perform a not too complex calculation between all the elements (NxM) two times. I thought I dump the result into an array of NxM and second time just read the array back and this should save me time on the expense of memory. In fact this is about 50% slower than generating the result dynamically twice!!! Is it normal in gpc? Why the handling of large arrays are so slow? The speed of the loops are also different by about 50% depending on the following alternative styles: 1) for i:= 1 to 10 do whatever; 2) const one=1; ten=10; .. for i:= one to ten do whatever; 3) var one, ten:integer; .. one:=1; ten:=10; for i:= one to ten do whatever; 4) var one, ten:integer; .. one:=1; ten:=10; for i:= one to ten * one do whatever; The real code use much longer loops in a nested fashion of course, so the speed difference is significant. Are there other speed-related tricks? I am using an outdated version of gpc (2.0) on IRIX. Are these things any better in a more recent release? Cheers, miklos

2 1

gcc 3.0
by Prof. A Olowofoyeku (The African Chief) 20 Jun '01

20 Jun '01

Hi all Now that gcc 3.0 has been officially released, does GPC fully support it now? There was recently a thread about patching GPC for gcc 3.0, but I am not sure what the conclusion of that thread was. Thanks all. Best regards, The Chief --------- Prof. Abimbola Olowofoyeku (The African Chief) Author of Chief's Installer Pro for Win32 Email: African_Chief(a)bigfoot.com http://www.bigfoot.com/~african_chief/

2 2

case labels error
by Christopher Ferrall 17 Jun '01

17 Jun '01

For the code segment below I get the errors listed. An error is not generated for "blank" as a label, so it seems that indexing a constant array of char confuses the compiler. Help would be appreciated. --Chris Ferrall fmopt_client.pas:212: `case' label does not reduce to a constant of ordinal type fmopt_client.pas:213: `case' label does not reduce to a constant of ordinal type fmopt_client.pas:214: `case' label does not reduce to a constant of ordinal type type integer_options = (max_untyp,mxstarts,nfuncmax); const blank = ' '; imn : array[integer_options] of char = ('u','r','n'); var lt : char; ... case lt of imn[mxstarts] : read(x_file,iopts[mxstarts]); imn[nfuncmax] : read(x_file,iopts[nfuncmax]); imn[max_untyp] : read(x_file,iopts[max_untyp]); eooptln : readln(x_file); blank : ; otherwise writeln('invalid integer option ',lt); end;

3 3

Re: Speed
by Miklos Cserzo 17 Jun '01

17 Jun '01

On Sat, 16 Jun 2001, Maurice Lombardi wrote: > I have only the following experience with large arrays on gpc/djgpp > (DOS): There is a 50% - 100% variation in execution times due to > memory cache considerations (this cache is presumably the "level 2" > 256 or 512 kB cache of the Pentiums). Matrices are stored in pascal > row-wise (same for C but the opposite is true for fortran). If you > access elements row after row you minimize cache breaks. In a > So how have you stored and accessed your NxM elements ? The maximal size of my array is 2000x2000. Let's say I have: X:array[1..N,1..M] od real; I access it as: for i:= 1 to N do for j:= 1 to M do bla-bla-bla.. x[i,j]; That's what you call row-wise acces or just the opposite? miklos

3 3

[Fwd: Re: Speed]
by Maurice Lombardi 17 Jun '01

17 Jun '01

Miklos Cserzo wrote: > Hi Folks, > > I am optimizing a code for speed in gpc. Let me share some strange > observations of mine. > > I have two vectors of size N and M. I need to perform a not too complex > calculation between all the elements (NxM) two times. I thought I dump the > result into an array of NxM and second time just read the array back and > this should save me time on the expense of memory. In fact this is about > 50% slower than generating the result dynamically twice!!! Is it normal in > gpc? Why the handling of large arrays are so slow? I have only the following experience with large arrays on gpc/djgpp (DOS): There is a 50% - 100% variation in execution times due to memory cache considerations (this cache is presumably the "level 2" 256 or 512 kB cache of the Pentiums). Matrices are stored in pascal row-wise (same for C but the opposite is true for fortran). If you access elements row after row you minimize cache breaks. In a procedure to diagonalize symmetrical matrices, just swapping the indexes to access memory elements in right order gave that gain. The exact value of the gain depends of course on the size of the matrices (there is no gain for small matrices diagonalized many times), but also apparently on the version of the pentium. It depends also on the optimization switches of the compiler: there is no gain with BP which is not execution-optimized and thus very slow. Similarly in every textbook on these procedures is explained a "clever" trick: you can use only the lower (or higher) half of the matrix (due to symmetry) to store elements and use the remaining to store intermediate results needed later. But this also disrupts the row-wise use of elements. Reorganizing the same algorithm to use the full matrix in order to access as far as possible row-wise and recomputing twice the intermediate results needed gives a gain of the same order of magnitude. The loss in recomputing is only of order N^2, while the gain in better elements access is of order N^3 ! So how have you stored and accessed your NxM elements ? Maurice PS this is different of the "page breaks" you can monitor in linux: these page breaks correspond to breaks due to virtual memory use. Here it is a standalone programm all in real memory (bare DOS with CWSDPMI). -- Maurice Lombardi Laboratoire de Spectrometrie Physique, Universite Joseph Fourier de Grenoble, BP87 38402 Saint Martin d'Heres Cedex FRANCE Tel: 33 (0)4 76 51 47 51 Fax: 33 (0)4 76 51 45 44 mailto:Maurice.Lombardi@ujf-grenoble.fr

1 0

GNU PASCAL
by Cortelli Paolo 17 Jun '01

17 Jun '01

Hi, I have downloaded the GNU Pascal with the DJGPP; I have tried to compile a C program and all is ok. But when I tried to compile a Pascal program, the compilation is ok, while on linking it says it can't find lgcc, which in effect is not in my hard disk. How could I solve my problems? Thanks for your help. Paolo Cortelli

1 0

going over to the dark side...
by Toby Ewing 15 Jun '01

15 Jun '01

Hi, all I need to translate some lovely Pascal code into C. Not my choice, but I need to run it on a parallel supercomputer that can handle C but not Pascal... I'm looking for a translator. I downloaded ptoc, but it crashes on the first type declaration. I've heard of a p2c package, but haven't been able to find it. I'm a C novice, or I'd try doing it all by hand. Any suggestions? Toby

1 0

Re: going over to the dark side...
by Toby Ewing 15 Jun '01

15 Jun '01

Maurice, Adam, and others, Thanks for the pointers. I'll check out the DJGPP translator. For the record, I'm currently working on windows machines, though the parallel machine I'm working towards is linux-based. Toby > Toby Ewing wrote: > > I need to translate some lovely Pascal code into C. Not my choice, but > > I need to run it on a parallel supercomputer that can handle C but not > > Pascal... > > > > I'm looking for a translator. I downloaded ptoc, but it crashes on the > > first type declaration. I've heard of a p2c package, but haven't been > > able to find it. I'm a C novice, or I'd try doing it all by hand. Any > > suggestions? > > "p2c" David Gillespies Pascal to C translator Version 1.02 > has been ported to DJGPP V2.02 > > It is availabe from the Simtel Mirrors > v2gnu/p2c120s.zip Sources (going to %DJDIR%/gnu/p2c-120) > v2gnu/p2c120b.zip Binaries > > <Sigh> (never tried) > Maurice > > > -- > Maurice Lombardi > Laboratoire de Spectrometrie Physique, > Universite Joseph Fourier de Grenoble, BP87 > 38402 Saint Martin d'Heres Cedex FRANCE > Tel: 33 (0)4 76 51 47 51 > Fax: 33 (0)4 76 51 45 44 > mailto:Maurice.Lombardi@ujf-grenoble.fr

1 0

Intalation with crt.
by Opie Pecheux 11 Jun '01

11 Jun '01

Hi, I helped a lot of persons with installation problems, but this time, i don't understand. The PC is a Compaq LTE LITE 4/33c 486 with 12MO of ram under Windows 95. Without uses crt, all's working but with a simple program like: program test; uses crt; begin end. appears the message: c:\djgpp\travail>gpc -o test.exe --autobuild -g test.pas Load error : no DPMI memory gpc1.exe c:/djgpp/bin/gpc.exe exited with status 1 gpc1.exe c:/djgpp/bin/gpc.exe exited with status 1 csdpmi5b vas not installed because of windows. All non crt program works. The installation vas first with the 2.952 version, but it do the same now with the 2.953 with rhide or under a dos windows. The files used are: - djdev203.zip - bnu2951b.zip - mak3791b.zip - rh1478b.zip - gcc2953b.zip - gpc2953b.zip (on ftp://agnes.dida.physik.uni-essen.de/home/maurice/) - pdcur24b.zip The file c:\djgpp\lib\libpdcurses.a was renamed in c:\djgpp\lib\libcurso.a What test do we have to performe? If we do gpc -o test.exe --autobuild -g test.pas -v we have a lot of screens. Is it possible to have a pipe (>> test.txt don't work)? Thank's for your help. Opie

2 1

CStrings
by Oldham, Adam 10 Jun '01

10 Jun '01

Hello again! I have another question. I have a veriable type declared as a CString passing into a pascal function with preceding it with VAR. I can modify the variable in the called function correctly, but after the fuction is complete, what should have been a modified CString is acutally not. I've read some FAQs and apparently the only known problems are when passing a CString in a special circumstance into a C Function.... here is some sample code, the output is in the comments: PROGRAM Main; PROCEDURE MakeVolName ( VAR VolName : CString ); VAR PasVolName : String[5]; BEGIN PasVolName := '7.12'; write("PasVolName in MakeVoldName ="); writeln(Pasvolname); { Prints 7.12 -- correct } Volname := String2CString(PasVolName); write("VolName in MakeVolName = "); {$x+} writeln(VolName); { Prints 7.12 -- correct} END; VAR VolName2 : CString; BEGIN VolName2 := 'test'; write("initially = "); writeln(VolName2); { Prints test -- correct} MakeVolID(VolName2); write("ending = "); {$x+} writeln(VolName2); { Prints garbage -- not correct} END. OUTPUT: initially = test PasVolName in MakeVoldName =7.12 VolName in MakeVolName = 7.12 ending = `4Ã¸Ã¿Â¿Ã¿Ã¿Ã¿Ã¿ Any ideas? I am using gpc version 20010502, gcc 2.95.2 on Mandrake Linux 7.2 running kernel 2.2.17. Thanks, Adam Oldham ----------------------------------------------------------------------- C. Adam Oldham Marconi Commerce Systems Inc. Software Engineer 7300 West Friendly Ave. adam.oldham(a)marconi.com Greensboro, NC 27420-2087 Phone : 336.547.5952 Fax : 336.547.5079 ----------------------------------------------------------------------- This document contains confidential information of Marconi Commerce Systems Inc. In consideration of the receipt of this document, the recipient agrees not to reproduce, copy, use or transmit this document and/or the information contained herein, in whole or in part, or to suffer such actions by others, for any purpose except with written permission, first obtained, of Marconi Commerce Systems Inc., and further agrees to surrender the same to Marconi Commerce Systems Inc. upon demand. -----------------------------------------------------------------------

7 11

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