- Gpc - gnu.de

gpc-20001122 test results
by Russ Whitaker 30 Nov '00

30 Nov '00

Hi here's the test results here for latest snapshot: TEST fjf165a.pas: SKIPPED: only for German locale TEST gpctest.pas: 28800 -27900 943841988 True True 1999 1999 11 11 29 29 1 1 2 2 4 19 48 48 False Error in UnixTimeToTimeStamp: TEST regextest.pas: SKIPPED: librx not installed # of GPC tests 1290 # of GPC tests passed 1287 # of GPC tests skipped 2 # of GPC tests failed 1 good that's the best yet Russ

2 1

Re: using C routines in pascal
by Anuradha 28 Nov '00

28 Nov '00

Hello, Thankyou for the response. whe i link the library file, it gives me the following errors. $ gpc -L/usr/local/psql/lib -lbtrvif -DBTI_DEC_UNIX sqlnew2.pas reqsamp1.o: In function `__btrid': reqsamp1.o(.text+0x5e): undefined reference to `Handler' collect2: ld returned 1 exit status $ But a C program compiled like this works well. Can you tell me what the reason could be? Thanks and Regards, Anuradha eike.lange(a)uni-essen.de wrote: > Hi! > > On Mon, Nov 27, 2000 at 04:40:06PM +0530, Anuradha wrote: > > My problem is like this : > > I have the C procedure in a .so file. > > I have the prototype declaration in a header file. > > How should the declaration of the procedure be given in my pas file?What will > > be the types of the parameters(C or pascal)? > > Maybe you want to write a wrapper arround your C-Function: > > mycfunctions.c: > --------------- > #include <whatever you need> > int _p_myfunction(int x) > { > calls the routine, you want to use > ... > return (y); > } > > In your Pascal-Unit > myfunctions.pas: > ---------------- > ... > Interface > > Function myfunction(x : Integer) : Integer; > asmname '_p_myfunction'; > > ... > Implementation > > {$L mycfunctions.c} > {$L a library, where the routine used in _p_myfunction resides} > > Then write your Pascal-Program, using this unit: > myprogram.pas: > -------------- > Program myprogram; > Uses myfunction; > ... > Begin > z := myfunction(33); > End. > > And then call > gpc --automake myprogram.pas -L/path-to/Libs/ > -I/path-to/Includes/ -lused_libs > > If you need some more examples (and a source), > feel free to contact me. > > Eike -- S.Anuradha Generic Data Tools, Alcatel Chennai. Alcanet : 2-757-7123

2 1

2 small problems with compiler
by Sven Sahle 27 Nov '00

27 Nov '00

Hi, I use "gpc version 19991030, based on 2.95.2 19991024 (release)" on an Intel-Linux computer (suse 7.0) and have encountered the following problems: 1. When I accidentally have a pascal source code with a uses-statement that includes a unit with the name of the sourcecode file itself I get an endless loop when compiling it with --automake or --autobild. The compiler uses all memory available. example: A file called "test.pas" containing "uses test;" statement. 2. When I upgraded to the above mentioned version of the compiler I got an "Internal compiler error: program gpc1 got fatal signal 11" when I compiled without --autobuild and had old gpi- and object-files around. A more descriptive error message would be nice. Sven -- Z * Sven Sahle (tel ++49 721 8100 1002, fax ++49 721 8100 1139) K * Zentrum fuer Kunst und Medientechnologie M * Lorenzstr. 19, D-76135 Karlsruhe, Germany

2 1

using C routines in pascal
by Nathalie Jarosz 27 Nov '00

27 Nov '00

Hello all, Is someone could help me about using C routines in pascal? I think I am close to the right solution but I can't manage to get it!... So I will try to summurize all I made until now... At first, I have downloaded randlibc-1.3.tar.gz. After having unpacked this file, a randlib.c directory was created and it contains: HOWTOGET* README* doc/ src/ test/ In src, I have compiled com.c, linpack.c and randlib.c and put them in a library lirandlib.a Then, I have move librandlib.a into /usr/local/lib and randlib.h in /usr/local/include. Actually, I would like to use a fonction named "genbet" in the randlib.c. For that, I have made a little program beta.pas: unit beta; interface {$L /usr/local/include/randlib.h} function genbet(x,y:shortreal):shortreal;C; implementation end. and test.pas: uses beta; begin writeln(genbet(100,150)); end. When I compile the first one, the following message appears: Undefined first referenced symbol in file main /usr/local/lib/gcc-lib/sparc-sun-solaris2.7/ 2.95.2/crt1.o ld: fatal: Symbol referencing errors. No output written to beta collect2: ld returned 1 exit status And for the second one: test.p:4: object file `/usr/local/include/randlib.o' not found test.p:4: object file `/usr/local/include/randlib.o' not found "extern float genbet(float aa,float bb)" is in randlib.h and the program is written in randlib.c. I really need your help, Nathalie ________________________________________________________________________ Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com

6 6

Memory use problem
by Martin Liddle 24 Nov '00

24 Nov '00

This is not a bug report but just a heads up to see if anybody else has seen a similar problem. Some of our gpc programs are what I would term as server processes. By that I mean that they are intended to run in the background for several days at a time serving requests that are passed to them in various ways. We have recently realised that these programs are steadily increasing their memory usage with cpu time used such that the system, in the worst case, runs out of swap space. The problem may well be in our own code but we have not yet isolated it. I just wondered if there was any other possible explanation eg something in the run time system or whether anybody else had seen similar problems? Any advice on strategies for isolating the problem would also be appreciated. -- Martin Liddle, Tynemouth Computer Services, 27 Garforth Close, Cramlington, Northumberland, England, NE23 6EW. Phone: 01670-712624. Fax: 01670-717324.

3 3

keywords of gpc
by Thorsten Hindermann 22 Nov '00

22 Nov '00

Hi! I have a special question to Frank and/or Peter: can you tell me a place (in the Web or in the gpc-sources) where I can find all supported keywords of gpc. The best way are they sorted to any supported dialect by gpc (e.g. UCSD,Borland,ISO7186 ...). I need this information for the pindent project. Thanx Thorsten

2 3

RH7.0
by Marius Onica 19 Nov '00

19 Nov '00

Hi everybody, What about using gpc under RH7.0 . As I've read gpc is working with gcc 2.95, but under RH7.0 I have gcc 2.96. Now what to do ? I've tried to compile gcc 2.95+gpc but it failed so I don't know what to do. Any suggestion is welcomed! TIA, Marius

3 4

build problems with gcc-2.95.2 and gpc on the Hurd
by Matthias Klose 18 Nov '00

18 Nov '00

Did somebody succeed in building gpc on the Hurd?

2 1

Recent gpc alpha releases fail to build on linux archs other i386/m68k
by Matthias Klose 18 Nov '00

18 Nov '00

[Sent this report to Peter in private, but he may be busy with the German LinuxTag?] Currently gpc does not bootstrap with gcc-2.95.2 on Linux (glibc-2.1.94) on architectures other than i386 and m68k. This report is from the alpha arch. ../.././xgcc -B/usr/alpha-linux/bin/ -B../.././ -I/usr/alpha-linux/include -c -I. -W -Wall -Wpointer-arith -Wwrite-strings -Wmissing-prototypes -Wmissing-declarations -g -O2 -DRTS_RELEASE_STRING="'`cat /src/gcc/2.95.2-16/gcc-2.95.2/src-native/gcc/p/rts/rts-version`'" -Wno-unused -Wno-missing-declarations -Wno-missing-prototypes /src/gcc/2.95.2-16/gcc-2.95.2/src-native/gcc/p/rts/rts-va.c /src/gcc/2.95.2-16/gcc-2.95.2/src-native/gcc/p/rts/rts-va.c:51: macro `va_start' used with just one arg /src/gcc/2.95.2-16/gcc-2.95.2/src-native/gcc/p/rts/rts-va.c:247: macro `va_start' used with just one arg /src/gcc/2.95.2-16/gcc-2.95.2/src-native/gcc/p/rts/rts-va.c:289: macro `va_start' used with just one arg /src/gcc/2.95.2-16/gcc-2.95.2/src-native/gcc/p/rts/rts-va.c:434: macro `va_start' used with just one arg /src/gcc/2.95.2-16/gcc-2.95.2/src-native/gcc/p/rts/rts-va.c:482: macro `va_start' used with just one arg make[5]: *** [rts-va.o] Error 1 make[5]: Leaving directory `/src/gcc/2.95.2-16/gcc-2.95.2/build-native/gcc/p/rts' make[4]: *** [pascal.rts] Error 2 make[4]: Leaving directory `/src/gcc/2.95.2-16/gcc-2.95.2/build-native/gcc' make[3]: *** [boot_stage_c] Error 2 make[3]: Leaving directory `/src/gcc/2.95.2-16/gcc-2.95.2/build-native/gcc' make[2]: *** [bootstrap-lean] Error 2 make[2]: Leaving directory `/src/gcc/2.95.2-16/gcc-2.95.2/build-native' s=`cat status`; rm -f status; test $s -eq 0 make[1]: *** [stamps/05-build-stamp-native] Error 1 make[1]: Leaving directory `/src/gcc/2.95.2-16/gcc-2.95.2' make: *** [stamps/05-build-stamp-native] Error 2

2 2

Cast Function to Procedure
by Eike Lange 17 Nov '00

17 Nov '00

Hi! I'm trying to cast a Function to a procedure, but my little program fails with a "Segmentation fault". Could anyone please tell me, what is wrong? 8<------- (snip) ---------------- Program TestIt; Type bar = Procedure(a:Integer); Var BarFunc : bar; Function FooFunc(a:Integer) : Integer; Begin Writeln('I am of foo with:', a); FooFunc := a+1 End; Begin Writeln('FooFunc(3) is ', FooFunc(3)); Writeln('now bar(FooFunc(2))'); BarFunc := bar(FooFunc(2)); BarFunc(2) End. ------- (snap) ---------------->8 Thank you Eike

5 6

Bye
by Menno Schaap 16 Nov '00

16 Nov '00

Later I will unsubscribe from this list. The project we had in mind will not continue yet. It will later, so perhaps you will see me back in this list. I appreciate the help, and I wish you all the best. Greetings, Menno Schaap

1 0

Linking with C
by Nic Webb 16 Nov '00

16 Nov '00

I'm using the example I saw in the GNU pascal documentation on how to link pascal with C (calling a C function from pascal). The example uses "asmname", which I know very little about. When I compile the .pas file, I get a slew of errors saying: comma missing after identifier `Asmname' parse error before character constant (that shows up once for every line I have asmname on... when I add the --automake option to the gpc command line, it also tells me that it can't execute my program (no such file or directory). I can't compile without automake because for some reason gpc isn't able to find any valid units without it (omitting it gives me "module/unit interface `Gpc' could not be imported"). can anyone help out? -Nic

4 9

Re: Gnu-DBM
by Eike Lange 15 Nov '00

15 Nov '00

Hi Phil and all. On Tue, Nov 14, 2000 at 08:57:28AM -0800, Phil Nelson wrote: > >Well, I think I have to care on my own for the truth > >about this topic and ask the FSF for details. > I happen to be the author of gdbm. Jason Downs > (downsj(a)downsj.com) is the current maintainer. > He hasn't done much since 1999, but here is the > last ChangeLog entry: [...] > Now, it is certainly true that Berkeley DB has more features and works > cross platform better than gdbm. There is no question there. But > there is still a maintainer for gdbm and there has been a recent > release. (May 1999.) Thank you Phil. So I am sorry for this topic. I trusted the documentaton of my distribution. Ok, I maintain Gnu DBM - Unit furthermore. Eike

2 1

Problem configuring gpc
by Joe Hartley 15 Nov '00

15 Nov '00

I'm trying to install gpc 2.0 (20001113) on my Sparc 2 running SunOS 4.1.4 and gcc 2.95.2. Gcc installed with no trouble at all, but during the configure process, I run into a problem. Here's the command I used: zappa:~/source/p% /usr3/source/gcc-2.95.2/configure --enable-languages=pascal I get to the "Configuring gcc..." section, and the process dies with the following message: checking assembler alignment features... checking assembler subsection support... checking assembler instructions... /usr3/source/gcc-2.95.2/gcc/configure: test: argument expected Configure in /usr3/source/p/gcc failed, exiting. Has anyone seen this particular problem? The GCC is the version from the gpc site, and it configured, compiled and installed with no problem at all. Thanks! -- ====================================================================== Joe Hartley - UNIX/network Consultant - jh(a)brainiac.com 12 Emma G Lane, Narragansett, RI 02882 - vox 401.782.9042 Without deviation from the norm, "progress" is not possible. - FZappa

2 2

Val
by Frank Heckenbach 15 Nov '00

15 Nov '00

The GPC reference claims that the 3rd parameter of Val is optional: : procedure Val (const Source: String; var x: INTEGER OR REAL); : or : procedure Val (const Source: String; var x: INTEGER OR REAL; : var ErrorCode: Integer); However, that's not the case in GPC (neither in BP from which the Val procedure comes). Thanks to Nicola Girardi for pointing out this discrepancy. Though there are cases where one might want to ignore the 3rd parameter (such as if it was checked before calling Val that the string consists only of digits, or at least has a starting digit and one is willing to ignore trailing "garbage"), but IMHO they're rare enough that they don't justify another syntax extension. So I suggest to "fix" the documentation by removing the first part. -- Of course, I could've just done that, but perhaps someone disagrees... Also, maybe someone interested in writing/maintaining documentation might want to take this as a start (and perhaps write some words about Val in the reference while they're at it :-)... Minor note: The name of the parameter should by `ErrorPosition' rather than `ErrorCode' (the BP documentation also calls it `Code', but we shouldn't copy their mistakes, it's not a code, just a position)... 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

using pascal procedures in C
by Nic Webb 14 Nov '00

14 Nov '00

I've got two programs: hello.pas, and uhello.c ... hello.pas defines a procedure called hello which simply writes "hello" to STDOUT... I compiled it and got the .o file, and made a header file for it defining: extern void Hello; then i use the .h file in uhello.c: #include "hello.h" and try a call to Hello in the main block of uhello.c... The program works without errors, but the Hello procedure isn't writing anything to the screen like it should... The Documentation pointed out that gpc will compile the procedure name with the first letter being capitalized, which is why I did the external declaration for Hello... Also, like in the example I saw, thge pascal file defined: procedure hello; asmname 'hello'; before actually defining the procedure with a being and end; statement... That's what I did.. Does the example mean that I should put asmname on the actual procedure declaration, or should it be separate like that? any ideas as to why the procedure isn't getting called? -Nic

1 0

Warnings pindent beim Compelieren
by Thorsten Hindermann 14 Nov '00

14 Nov '00

HI Eike! Habe gerade mal die Warnings-Problematik getestet: in meinem Makefile lÃ¶sen die Compiler-Switch-Kombination -Wall und -O die Warnigs aus. Wenn ich -O wegnehme bleibt nur noch >pglobtls.pas:247: warning: excess elements in array initializer after >'Tclongopts' > aus meiner Unit Ã¼brig. Hierbei handelt es um ein echtes Warning, da ich bestimmt eine Array-Element weniger habe als der Array-Initializer. Das bekomme ich aber heraus, wenn ich das Array bearbeite. Habe mir eben mal deine GTKUNIT heruntergeladen und werde mir diese mal ansehen. Thorsten

1 0

Gnu-DBM, gtk-Unit
by Eike Lange 14 Nov '00

14 Nov '00

Hi! I do not maintain the unit "dbatgdbm" no longer since Gnu-DBM is no more maintained by the FSF (for years, I didn't know). There is a small gtkunit available. GTK+ is "The Gimp Toolkit" and its a toolkit for writing X-Applications. The unit is based on libgtk1.2 and is available via anonymous ftp from: ftp://agnes.dida.physik.uni-essen.de/~lange/gtkunit-20001112.tar.gz where "20001112" is replaced by the actual date (YearMonthDay). The unit can't do more than shown in the examples (taken from the libgtk1.2-tutorial). Eike

3 3

bug in array's
by Rudy Moddemeyer 08 Nov '00

08 Nov '00

Hello, There is a small bug in the implementation of array's. See the following example program: PROGRAM test(input, output); TYPE RealVectorT(b,e:integer) =ARRAY[b..e] OF Real; RealMatrixT(br,er,bc,ec:integer) =ARRAY[br..er] OF RealVectorT(bc,ec); VAR x:RealMatrixT(1,5,1,5); BEGIN x[1,1]:=0; { error: test.p: In function `pascal_main_program': test.p:10: subscripted object is not an array or string } x[1][1]:=0; { this is O.K. } END. Both implementations of addressing an array element x[1,1] and x[1][1] should be equivalent. In the first case the compiler does not interpret x as an array. The latter version is correctly interpreted and executed. I have used the relase 2.95.2 19991024 of gpc. With kind regards, Rudy Moddemeijer --------------------------------------------------------------------- | R. Moddemeijer | Department of Computing Science | | | University of Groningen | | Phone +31/50 - 363 3940 | Blauwborgje 3 room IWI 228 | | Telefax +31/50 - 363 3800 | P.O. Box 800 | | e-Mail rudy(a)cs.rug.nl | NL-9700 AV Groningen | | r.moddemeijer(a)cs.rug.nl | The Netherlands | | | | ---------------------------------------------------------------------

3 2

gtk???
by Leon 07 Nov '00

07 Nov '00

Hi, Is there also a X-window unit like qtk or similair available for GPC?? -- Leon +-+-

1 0

[egbert: Re: help writing documentation]
by Egbert Seibertz 07 Nov '00

07 Nov '00

Cc forgotten ... Egbert

1 0

help writing documentation
by Eike Lange 07 Nov '00

07 Nov '00

Hi! I would like to help writing documentation for gpc. My project, writing german documentation for gpc died because nobody was interested helping me and its too much for just one man. I would prefer to discuss documentation-related topics on the gpc-doc-mailinglist (gpc-doc(a)gnu.de) . There are still some questions left: - Is Texinfo 4.0 ok? - Which options do you use to create the diffs - Are there any documentation-standards, I have to recognize? Eike

2 1

Re: Cardinal ranges ...
by j.logsdon＠lancaster.ac.uk 07 Nov '00

07 Nov '00

Thanks to Marco for pointing out a stupidity (and for not sending it to the list!) but I was also checking on the subranges (really!) where the values are not trapped it seems and I don't seem to be able to check them (apart from in the coding of course). Is there a way to do this? It seems the Borland {$r+} is not recognised. John On Tue, 7 Nov 2000, Marco van de Voort wrote: > > Maybe I am using a slightly old version (2.95.2 19991024 (release)) but > > the following little program indicates there is something awry with the > > upper limits of cardinals. > > > > At least cardinal(32) and cardinal(64) should be able to calculate up to > > 4294967296 and 18446744073709551616 respectively. Note if I try and > > assign these directly within the program, the program doesn't compile > > with errors: > > You name even numbers here? The highest number in a cardinal is always odd! > > The biggest number in a cardinal(n) is 2^n MINUS ONE!!! >

1 0

Re: Problems installing
by renkema26＠zonnet.nl 04 Nov '00

04 Nov '00

> On Tue, 31 Oct 2000, you wrote: > > On Tue, 31 Oct 2000, you wrote: > > > This might be a consequence of previous compilation attempts without > > > `--automake' (GPC doesn't handle this situation well, > > > unfortunately). Please try removing all *.o, *.gpi and *.gpm files > > > created by them. > > > > > > 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 > > > > I've deleted all the *.o ,*.gpi and *.gpm and tried it again > > but now this happens: > > > > bash-2.03# gpc --automake test.pas > > cpp: -lang-c: linker input file unused since linking not done > > gpc: installation problem, cannot exec `cc1': No such file or directory > > gpc1: gpc exited with status 1 > > gpc1: gpc exited with status 1 > > > > And all the unit files are in the correct dir (as saved in the tar-file) >Please copy or symlink cc1, cpp and possibly other files from the >GCC installation. E.g. do: > >ln -s `gcc --print-file-name=.`/* `gpc --print-file-name=.` > >and ignore errors about files that already exist. > >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 >------------------------------------------------------- Thank you for your help. It works fine now. I can compile all the units who're included. Thanks very much, -- Leon <-<-<-<-<-<-<-<-<-<-<-< ->->->->->->->->->->->-

1 0

Help Needed
by Montaz Ali 03 Nov '00

03 Nov '00

Dear Colleagues I am a pascal programmer and used to do programming in Unix environment. Now I am in a new place where it has only Linux machine. I would like to call a fortran routine from a main pascal program. I used to do this in Sun machine using the following command pc -o output pf.p ff.o where ff.o is made using f77 -c ff.f; out is executable file. In side my pascal program I defined (declared) the fortran subroutine as follows: function xx(var ...; var ...) :double; external fortran OR function xx(var ...; var ...) :double; external; (I believe here is my problem; above lines) In my current machine I have g77 (fortran equivalent) and gpc. I can get ff.o but when I use on-line commamd : gpc -o output pf.p ff.o. It gave me problems. There is not enough document in man pages to help me? Your help will be highly appciated? Best Regards Dr M Ali ----------------------------------------------- Centre for Control Theory and Optimization Department of Computational and Applied Mathematics University of the Witwatersrand Private Bag 3, Wits, 2050, Johannesburg, South Africa Tel: +27 (0)11 7176139 (W), Tel: +27 (0)11 403 0250 (H) Fax: +27 (0)11 403-9317 (W), http://www.cam.wits.ac.za/~mali/ Email : mali(a)cs.wits.ac.za

2 1

Event driven etc ...
by j.logsdon＠lancaster.ac.uk 01 Nov '00

01 Nov '00

Does anyone know/use GNU Pascal for interrupt driven events so that input comes from, say, different controllers completely asynchronously? There may be a better language (Ada?) and may need some C interface of course to handle the actual hardware. Clues? John

1 0

Re: Problems installing
by Leon Renkema 31 Oct '00

31 Oct '00

On Tue, 31 Oct 2000, you wrote: > On Tue, 31 Oct 2000, you wrote: > > This might be a consequence of previous compilation attempts without > > `--automake' (GPC doesn't handle this situation well, > > unfortunately). Please try removing all *.o, *.gpi and *.gpm files > > created by them. > > > > 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 > > I've deleted all the *.o ,*.gpi and *.gpm and tried it again > but now this happens: > > bash-2.03# gpc --automake test.pas > cpp: -lang-c: linker input file unused since linking not done > gpc: installation problem, cannot exec `cc1': No such file or directory > gpc1: gpc exited with status 1 > gpc1: gpc exited with status 1 > > And all the unit files are in the correct dir (as saved in the tar-file) -- Leon <-<-<-<-<-<-<-<-<-<-<-< ->->->->->->->->->->->-

2 1

RE: Problems installing
by Winand Renkema 31 Oct '00

31 Oct '00

On Tue, 31 Oct 2000, J Blakeney wrote: > If you unsing any libraries/units > you are you have to include them in > the gpc command line, for example > > gpc program.p -lgpc > > to build a program that uses the > gpc unit > That neither work. I've got the following program 'test.pas': program test; uses Crt; begin gotoXY(1,1); write('hello'); end. Then save it and trie to compile it: bash-2.03# gpc test.pas -lcrt # like you wrote # then i get this message /usr/bin/ld: cannot find -lcrt collect2:ld returned 1 exit status Even when I trie it in the units directory I get this message. I also tried gpc --automake test.pas : I get the following messages.... /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. /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.2/units/crt.o: In function `Textmode': /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.2/units/crt.o(.text+0xf2): undefined reference to `crt_check_winchanged' /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.2/units/crt.o(.text+0x177): undefined reference to `crt_SetMonochrome' /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.2/units/crt.o(.text+0x18a): undefined reference to `crt_SetScreenSize' /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.2/units/crt.o(.text+0x1a7): undefined reference to `crt_window' These are only a vew lines! That doesn't seem to work. Maybe it's because of my Linux version or My gnu c compiler. I don't know.

2 1

RE: Problems installing
by J Blakeney 31 Oct '00

31 Oct '00

I remeber someone else having the same problem, but I can't find it in my archive. From memory I think someone had untarred GPC onto to wrong directory so the LIBRARY_PATH symbol was pointing to the wrong place and the linker looking in the wrong place - I don't know enough about GPC to be any more helpfull, but I'm sure someone else who reads this will. ---------- From: Winand Renkema Sent: 31 October 2000 16:44 To: gpc(a)gnu.de Subject: RE: Problems installing On Tue, 31 Oct 2000, J Blakeney wrote: > If you unsing any libraries/units > you are you have to include them in > the gpc command line, for example > > gpc program.p -lgpc > > to build a program that uses the > gpc unit > That neither work. I've got the following program 'test.pas': program test; uses Crt; begin gotoXY(1,1); write('hello'); end. Then save it and trie to compile it: bash-2.03# gpc test.pas -lcrt # like you wrote # then i get this message /usr/bin/ld: cannot find -lcrt collect2:ld returned 1 exit status Even when I trie it in the units directory I get this message. I also tried gpc --automake test.pas : I get the following messages.... /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. /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.2/units/crt.o: In function `Textmode': /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.2/units/crt.o(.text+0xf2): undefined reference to `crt_check_winchanged' /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.2/units/crt.o(.text+0x177): undefined reference to `crt_SetMonochrome' /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.2/units/crt.o(.text+0x18a): undefined reference to `crt_SetScreenSize' /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.2/units/crt.o(.text+0x1a7): undefined reference to `crt_window' These are only a vew lines! That doesn't seem to work. Maybe it's because of my Linux version or My gnu c compiler. I don't know.

1 0

division by zero
by Sven Sahle 31 Oct '00

31 Oct '00

Hi, I just came across the following problem: In a program for numerical computations I use constants for variables with a fixed value because I hope the compiler can produce faster code then. This gives me compiletime errors (division by zero) in code like that: *********************************** CONST a=0; VAR b: double; BEGIN IF a<>0 THEN b:=10/a; END. *********************************** I tried to look this up in the extended pascal standard and found nothing that would make the above code fragment illegal. But the standard is not quite easy to read, so it is very possible I just didnÂ´t understand it. Is this behaviour dependent on compiler switches? -- Z * Sven Sahle (tel ++49 721 8100 1002, fax ++49 721 8100 1139) K * Zentrum fuer Kunst und Medientechnologie M * Lorenzstr. 19, D-76135 Karlsruhe, Germany

3 2

Problems installing
by Winand Renkema 31 Oct '00

31 Oct '00

I've downloaded the GNU-pascal compiler and installed it correctly. The compiler works fine but if i want to use units in a program, i get a lot 'undefind reference' errors. Can anyone help me??? I'm using Suse Linux 6.4 on a dual-pentium 90Mhz with kernel 2.2.14-SMP Thanks, Leon

2 1

Registers
by Maurice Lombardi 27 Oct '00

27 Oct '00

Hi all, In gpc.pas, in the declaration { 8086 CPU registers -- only used by the unportable Dos routines } Registers = record case Boolean of False : (AX, BX, CX, DX, BP, SI, DI, DS, ES, Flags : Word); True : (AL, AH, BL, BH, CL, CH, DL, DH : Byte) end; Word should be replaced by Word16. It is the same if one defines __BP_TYPE_SIZES__ but not otherwise. The alignment between X and H+L is then lost, and this triggered a bug in a program for which I prefer gpc type sizes for mainstream computations, but which uses incidentally a unit which comes from old BP stuff and calls a msdos interrupt. 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 2

Pascal for Atari platform
by Sikor 27 Oct '00

27 Oct '00

Hallo! I search for Turbo Pascal or compatible for Atari TT (ST). Some people written to me, to search for GNU PASCAL. Please, give me answer for this question: Find I Gnu Pascal on my computer? Thanks You! Pawel Sikorski e-mail:sikor_soft@poczta.fm

2 1

portable programming
by Eike Lange 25 Oct '00

25 Oct '00

Hi! Thorsten and I use a very (possibly, depending on the source-size) large stack for the "pindent"- program. Are there any limitations for stack-size on some systems, gpc runs on? Eike

1 0

Bug report. Problems with initialising sets to the empty set.
by Martin Liddle 25 Oct '00

25 Oct '00

I believe that I have mentioned this problem previously but have not been confident that it was a bug. I am now. I have repeatedly been hit by the problem that initialising a set to the empty set will work correctly for many versions of a program then recompiling the source without changing anything will produce a version where the set is not initialised (I think but am not certain that it is left with whatever value it had previously). A typical code snippet might be Const Maxcomp=180; Type TSetComp=Set of 1..Maxcomp; Var SetComp:TSetComp; begin SetComp:=[]; ... Usually this will result in SetComp being the empty set. Our code uses sets quite extensively and every so often we will build a version of the code where one or other of the sets is not initialised. The behaviour is then repeatable until we build a new version. This makes testing a complete nightmare as we have to test everything each time we build a new version even if nothing has changed. The workaround that I have not seen fail, is to use SetComp:=[1]-[1]; This is with gpc version 19991030 based on 2.95.2 running under RedHat Linux 6.2 on a Pentium PC. To me this smells like an uninitialised variable in the compiler that only gives problems when it picks up a limited range of values. Apologies if this is a known problem (and more apologies if it is fixed in a later snapshot) but I couldn't immediately see it in the bug lists. Could somebody recommend a strategy for using the daily snapshots? Is it a case of taking pot luck or are their particular releases that are known to work tolerably well? Is their likely to be a beta in the near future? -- Martin Liddle, Tynemouth Computer Services, 27 Garforth Close, Cramlington, Northumberland, England, NE23 6EW. Phone: 01670-712624. Fax: 01670-717324.

2 2

Re: portable programming
by Nick Burrett 25 Oct '00

25 Oct '00

Eike Lange <eike.lange(a)uni-essen.de> writes: > Thorsten and I use a very (possibly, depending > on the source-size) large stack for the > "pindent"- program. Are there any limitations > for stack-size on some systems, gpc runs on? Stack sizes can be set by ulimit on some systems. On such systems, it may be set as low as 2Mb. It is set at either 4Mb or 8Mb on all the servers we use here though. For large allocations, it is usually better to use a more permanent storage mechanism Nick.

4 4

Re: rts.c:326: `T_RESADFLT' undeclared
by Nick Burrett 25 Oct '00

25 Oct '00

Frank Heckenbach <frank(a)g-n-u.de> writes: > Nick Burrett wrote: > > > Frank Heckenbach <frank(a)g-n-u.de> writes: > > > > > Honda Hirotaka wrote: > > > > > > > I'm trying to build gpc-20001019 on an old i486DX2 DECpc running > > > > FreBSD 2.2.8 , but I get the error message of > > > > "gcc-2.95.2/gcc/p/rts/rts.c:326: `T_RESADFLT' undeclared here (not in > > > > a function)" . > > > > > > > > I can't find the word "T_RESADFLT" in rts.c. > > > > I want to know what is happenning. > > > > > > No, this word doesn't occur. However, the line refers to > > > ILL_RESAD_FAULT (and two lines below to ILL_RESOP_FAULT). > > > > > > So, it may be that these symbols are defined to T_RESADFLT and > > > T_RESOPFLT in some system header, but the latter symbols are not > > > defined. Now, why would one define something to something undefined? > > > I don't know, I guess only a C programmer can understand this... > > > > FreeBSD doesn't use T_RESADFLT or T_RESOPFLT and therefore doesn't > > define them. > > > > The ILL_* macros are defined as placeholders for a time when they might > > be used. > > So, they define them so #ifdef ILL_... is true, but ILL_... still > can't be used. Very strange, IMHO... It is usually done as a placeholder. If people use them, then they get a compile error. Although simply not defining them at all would make no difference either. > > So for FreeBSD, you will need to check that the definitions of T_RESADFLT > > and T_RESOPFLT exist and then fix the definition of ILL_RESAD_FAULT > > and ILL_RESOP_FAULT accordingly. > > I'd consider this a last resort. I mean we want to use ILL_... -- > why should we check whether T_... is defined? Perhaps the next > system defined them to BLAH_... and whatever, what then? Yeah, I know what you mean. I can't think of a decent answer to this one either. > > The ILL_RESAD_FAULT and ILL_RESOP_FAULT are defined by FreeBSD in > > machine/trap.h if you are curious. > > We don't include this. We include signal.h if it exists, and if not, > bsd/signal.h if that exists. Probably machine/trap.h is included by > one of them (or some other header we use). signal.h includes sys/signal.h, which in turn includes machine/trap.h. > > This is also where the corresponding T_* > > macros are defined. > > Now I don't understand. You said above they're not defined, didn't > you? So, should we explicitly include machine/trap.h, would that > help? I think this is best explained by simply including a chunk of the file: /* * Trap type values * also known in trap.c for name strings */ #define T_PRIVINFLT 1 /* privileged instruction */ #define T_BPTFLT 3 /* breakpoint instruction */ #define T_ARITHTRAP 6 /* arithmetic trap */ #define T_ASTFLT 7 /* system forced exception */ #define T_PROTFLT 9 /* protection fault */ #define T_TRCTRAP 10 /* debug exception (sic) */ #define T_PAGEFLT 12 /* page fault */ #define T_ALIGNFLT 14 /* alignment fault */ #define T_DIVIDE 18 /* integer divide fault */ #define T_NMI 19 /* non-maskable trap */ #define T_OFLOW 20 /* overflow trap */ #define T_BOUND 21 /* bound instruction fault */ #define T_DNA 22 /* device not available fault */ #define T_DOUBLEFLT 23 /* double fault */ #define T_FPOPFLT 24 /* fp coprocessor operand fetch fault */ #define T_TSSFLT 25 /* invalid tss fault */ #define T_SEGNPFLT 26 /* segment not present fault */ #define T_STKFLT 27 /* stack fault */ #define T_MCHK 28 /* machine check trap */ #define T_RESERVED 29 /* reserved (unknown) */ /* XXX most of the following codes aren't used, but could be. */ /* definitions for <sys/signal.h> */ #define ILL_RESAD_FAULT T_RESADFLT #define ILL_PRIVIN_FAULT T_PRIVINFLT #define ILL_RESOP_FAULT T_RESOPFLT #define ILL_ALIGN_FAULT T_ALIGNFLT #define ILL_FPOP_FAULT T_FPOPFLT /* coprocessor operand fault */ > More generally: Is there any point in supporting these things > (subcodes of numeric error signals) at all? AFAICS, they're > remainings from the signal handler in ancient versions of the RTS > (which had been disabled for a long time). This handler was labeled > "BSD style", but if these things are not even supported on FreeBSD, > perhaps we should simply drop them. Does any other system support > them? For the SIGILL, I don't think it is worth it. An illegal instruction is an illegal instruction, it isn't going to make much difference to the end user whether it was a privileged instruction or simply an undefined operation. I think many systems define them, but in usually unportable ways. The SIGFPE error codes are useful though. Nick.

2 1

Installation problem: Assembler
by Michael Höhle 25 Oct '00

25 Oct '00

Hiya, This is definitely a FAQ/newbie question, but so far I have not been able to find the answer in the FAQ or on the net. :( I'm trying to get gpc running on my ntbox+cygwin. I'm using cygwin 1.1 with gcc v2.95. After downloading gpc-20001024.tar I followed the steps described in http://agnes.dida.physik.uni-essen.de/~gnu-pascal/gpc_49.html#SEC49 This all worked fine, and gpc runs, but when I try to compile a file I receive the following error: $ gpc helloworld.pas Assembler messages: for reading.open : No such file or directory Hmm, what seems to be the problem here - and even more important - how to fix it? Best regards, Michael HÃ¶hle

3 3

Re: rts.c:326: `T_RESADFLT' undeclared
by Nick Burrett 25 Oct '00

25 Oct '00

Frank Heckenbach <frank(a)g-n-u.de> writes: > Honda Hirotaka wrote: > > > I'm trying to build gpc-20001019 on an old i486DX2 DECpc running > > FreBSD 2.2.8 , but I get the error message of > > "gcc-2.95.2/gcc/p/rts/rts.c:326: `T_RESADFLT' undeclared here (not in > > a function)" . > > > > I can't find the word "T_RESADFLT" in rts.c. > > I want to know what is happenning. > > No, this word doesn't occur. However, the line refers to > ILL_RESAD_FAULT (and two lines below to ILL_RESOP_FAULT). > > So, it may be that these symbols are defined to T_RESADFLT and > T_RESOPFLT in some system header, but the latter symbols are not > defined. Now, why would one define something to something undefined? > I don't know, I guess only a C programmer can understand this... FreeBSD doesn't use T_RESADFLT or T_RESOPFLT and therefore doesn't define them. The ILL_* macros are defined as placeholders for a time when they might be used. So for FreeBSD, you will need to check that the definitions of T_RESADFLT and T_RESOPFLT exist and then fix the definition of ILL_RESAD_FAULT and ILL_RESOP_FAULT accordingly. The ILL_RESAD_FAULT and ILL_RESOP_FAULT are defined by FreeBSD in machine/trap.h if you are curious. This is also where the corresponding T_* macros are defined. Regards, Nick.

2 1

rts.c:326: `T_RESADFLT' undeclared
by Honda Hirotaka 24 Oct '00

24 Oct '00

I'm trying to build gpc-20001019 on an old i486DX2 DECpc running FreBSD 2.2.8 , but I get the error message of "gcc-2.95.2/gcc/p/rts/rts.c:326: `T_RESADFLT' undeclared here (not in a function)" . I can't find the word "T_RESADFLT" in rts.c. I want to know what is happenning. ==== gmake[2]: Entering directory `/usr/local/src/gcc/gpc_objir/gcc/p/rts' /usr/local/src/gcc/gpc_objir/gcc/xgcc -B/usr/local/src/gcc/gpc_objir/gcc/ -B/usr/local/i386-unknown-freebsd2.2.8/bin/ -I/usr/local/i386-unknown-freebsd2.2.8/include -c -I. -W -Wall -Wpointer-arith -Wwrite-strings -Wmissing-prototypes -Wmissing-declarations -g -O2 -DRTS_RELEASE_STRING="'`cat /usr/local/src/gcc/gcc-2.95.2/gcc/p/rts/rts-version`'" /usr/local/src/gcc/gcc-2.95.2/gcc/p/rts/rts.c /usr/local/src/gcc/gcc-2.95.2/gcc/p/rts/rts.c:326: `T_RESADFLT' undeclared here (not in a function) /usr/local/src/gcc/gcc-2.95.2/gcc/p/rts/rts.c:328: `T_RESOPFLT' undeclared here (not in a function) /usr/local/src/gcc/gcc-2.95.2/gcc/p/rts/rts.c: In function `_p_c_strsignal': /usr/local/src/gcc/gcc-2.95.2/gcc/p/rts/rts.c:741: warning: return discards qualifiers from pointer target type gmake[2]: *** [rts.o] Error 1 gmake[2]: Leaving directory `/usr/local/src/gcc/gpc_objir/gcc/p/rts' gmake[1]: *** [pascal.rts] Error 2 gmake[1]: Leaving directory `/usr/local/src/gcc/gpc_objir/gcc' gmake: *** [all-gcc] Error 2 $ ==== Built and Installed files for preparation to build gpc make-3.79.1 sed-3.02 bzip2-1.0.1 gettext-0.10.35 bison-1.28 gcc-2.95.2 (installed already. It took me 11 hours !) gawk-3.0.6 m4-1.4 autoconf-2.13 -- Honda, Hirotaka LL.M. hirotaka(a)jca.apc.org PGP public key: http://www.jca.apc.org/~hirotaka/public.asc jcanet-beginners: http://www.jca.apc.org/jca-net/beginners/

2 1

Bug report on nonstatic types at HP systems
by Rudy Moddemeyer 21 Oct '00

21 Oct '00

Hello, I have tried to execute the simple program PROGRAM test(input, output); TYPE s(a,b:integer) = ARRAY[a..b] OF real; VAR x:s(5,6); i:integer; BEGIN writeln(x.a:3,x.b:3); END. It should write "5 6" on the output. At a HP system it writes "0 0". I am sorry but i am using a rather old version of gpc: version 19980830, based on gcc-egcs-2.91.57 19980901 (egcs-1.1 release) on a HP-system: HP-UX rug102 B.10.20 A 9000/735 2011278599 The Linux implementation, which I have also checked, does not suffer from this bug. I have not found this bug in neither the list of known bugs nor the list of fixed bugs. With kind regards, Rudy Moddemeijer --------------------------------------------------------------------- | R. Moddemeijer | Department of Computing Science | | | University of Groningen | | Phone +31/50 - 363 3940 | Blauwborgje 3 room IWI 228 | | Telefax +31/50 - 363 3800 | P.O. Box 800 | | e-Mail rudy(a)cs.rug.nl | NL-9700 AV Groningen | | r.moddemeijer(a)cs.rug.nl | The Netherlands | | | | ---------------------------------------------------------------------

2 1

Re: X11, tty7, Debian
by U. Bauermann 19 Oct '00

19 Oct '00

Eike Lange wrote: > > Hi zusammen. > Hallo Eike Ich benutzeschon laenger Debian. > Ich mÃ¶chte gerne die Ausgabe von X11 nicht auf > der Konsole 7 haben (mit Alt+F7 komme ich so in X) Der X-Server wird automatisch auf die erste freie virtuelle Console gelegt: Hier ein Ausszug aus meiner /etc/inittab: # <id>:<runlevels>:<action>:<process> 1:2345:respawn:/sbin/getty 38400 tty1 2:23:respawn:/sbin/getty 38400 tty2 3:23:respawn:/sbin/getty 38400 tty3 4:23:respawn:/sbin/getty 38400 tty4 5:23:respawn:/sbin/getty 38400 tty5 6:23:respawn:/sbin/getty 38400 tty6 7:23:respawn:/sbin/getty 38400 tty7 #8:23:respawn:/sbin/getty 38400 tty8 9:23:respawn:/sbin/getty 38400 tty9 10:23:respawn:/sbin/getty 38400 tty10 11:23:respawn:/sbin/getty 38400 tty11 12:23:respawn:/sbin/getty 38400 tty12 13:23:respawn:/sbin/getty 38400 tty13 14:23:respawn:/sbin/getty 38400 tty14 Damit habe ich die Anzahl meiner vituellen Consolen auf 14(-1) erhoeht. Da die vituelle Console tty8 auskommentiert ist benutzt der X-Server diese Position. Du kannst damit dann bei Dir die entsprechende virtuelle Console frei halten. Hoffe geholfen zu haben Uwe -- Zu Fragen, Risiken und Nebenwirkungen wenden Sie sich bitte an: Email: uwe(a)bauermann.de Homepage: http://www.bauermann.de

1 0

None
by Peter Ulrich Kruppa 18 Oct '00

18 Oct '00

Hi, does anyone know who wrote the gpc-port for FreeBSD? There are two small bugs in it, which (I believe) can easily be corrected by someone, who knows how to. But they should be fixed, because they might keep people off using gpc. Thanks for your answer! Uli. ======================================================================= www.pukruppa.de www.2000d.de =======================================================================

3 4

Re: StringUtils, FileUtils
by Stuart Pope 17 Oct '00

17 Oct '00

Dear Mr. Heckenbach, I apologize for belaboring my issue, but hopefully, your answers are of benefit to others as well as myself. I took your suggestion and used the --automake flag when compiling my test program and your solution worked great! There is one additional twist, though. Real numbers are only output correctly if there is no precision needed beyond the decimal point. For example, this test code, program testprog(input,output); uses GPC; var x : real; fieldwidth : integer; fieldprec : integer; begin x := 1000.909; fieldwidth := 0; fieldprec := 0; writeln('The value of x is ', longReal2Str (x,fieldwidth,fieldprec)); fieldwidth := 0; fieldprec := 3; writeln('The value of x is ', longReal2Str (x,fieldwidth,fieldprec)); end. produces the following output: The value of x is 1001 The value of x is 10091009 Is there a solution for the case where decimal precision is needed? Thanks again for your help. --- Frank Heckenbach <frank(a)g-n-u.de> wrote: > Ernst-Ludwig Bohnen wrote: > > > On Wed, 13 Sep 2000, Frank Heckenbach wrote: > > > > > in the current GPC version, I've included a StringUtils unit for > > > general string handling routines (on a higher level than the > > > built-in and RTS routines). > > > > > > Up to now, it only contains routines for a string hash table, but > > > I'm planning to add some more routines. Perhaps some of you also > > > have some routines to contribute (or features to request). > > > > May be a unit in my tool box is a candidate. Everybody can read it at: > > http://www.desy.de/~bohnen/gpc/dictionary.pas > > I think this unit is good as a standalone unit. Be welcome to > contribute it to GPC (if you agree to release it under some free > license). If you like to upload it to some "official" place, > Peter Gerwinski can arrange for that. > > 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 ===== --------------------------------------------------------- ! Stuart Pope ! ! GEOLAB/Computer Sciences Corporation ! ! Hampton, VA (757) 864-5775 ! ! ! ! This email was generated without any harm ! ! whatsoever to laboratory animals. ! __________________________________________________ Do You Yahoo!? Get Yahoo! Mail - Free email you can access from anywhere! http://mail.yahoo.com/

3 2

[Fwd: Re: Novice question]
by Maurice Lombardi 14 Oct '00

14 Oct '00

Nicola Girardi a Ã©crit : > > Hi fine GPC hackers, please take a look at this foolish code, I, as > a novice, have a little problem with pointers in Pascal ;-) (I > wonder why I don't just keep using C:)) > > : type > : PStrList = ^TStrList; > : TStrList = record > : Next : PStrList; > : S : TString; > : end; > : > : var > : StringList : PStrList; > : > : procedure Foobar; > : var > : Str : PStrList = StringList; > : begin > : repeat > : New(Str); > : Readln(F (* : Text *), Str^.S); > : if Length(Hdr^.S) = 0 then > : break; > : Str := Str^.Next; Here Str^.next contains only garbage and you put this garbage into Str... > : until False; > : end; > > Due to the assignment of StringList to Str, at the end of Foobar I'd > get StringList not to be the head of the list but the last element. > How can I keep a pointer which always points to the first element? > Maybe that's really easily done, but of course in Pascal it doesn't > seem that it works like in C, and I'm out of manuals ;-) Look to iteratordemo.pas in the demo programs which come with gpc, especially the procedure ReadList which does exactly what you want. You need an extra level of indirection. 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

3 2

Novice question
by Nicola Girardi 11 Oct '00

11 Oct '00

Hi fine GPC hackers, please take a look at this foolish code, I, as a novice, have a little problem with pointers in Pascal ;-) (I wonder why I don't just keep using C:)) : type : PStrList = ^TStrList; : TStrList = record : Next : PStrList; : S : TString; : end; : : var : StringList : PStrList; : : procedure Foobar; : var : Str : PStrList = StringList; : begin : repeat : New(Str); : Readln(F (* : Text *), Str^.S); : if Length(Hdr^.S) = 0 then : break; : Str := Str^.Next; : until False; : end; Due to the assignment of StringList to Str, at the end of Foobar I'd get StringList not to be the head of the list but the last element. How can I keep a pointer which always points to the first element? Maybe that's really easily done, but of course in Pascal it doesn't seem that it works like in C, and I'm out of manuals ;-) TIA Nicola

1 0

informacion
by Juan Pablo Rumie Vittar 09 Oct '00

09 Oct '00

hola, me llamo juan pablo y me gustaria saber donde puedo obtener el compilador de pascal para linux conectiva 4.0 de la licencia gnu. _________________________________________________________ Do You Yahoo!? Obtenga su direcciÃ³n de correo-e gratis @yahoo.com en http://correo.espanol.yahoo.com

2 1

CVS overhead
by Matthias Klose 08 Oct '00

08 Oct '00

Having CVS read access is nice, but currently, there seems to be something wrong with the configuration. Doing a daily update, you get every day all files; do they get touched when making the daily snapshot releases?

3 2

Problem with writing real numbers
by Stuart Pope 07 Oct '00

07 Oct '00

Sirs, I am puzzled. I am using gpc on a unix system (Irix 6.5). When the compiler was built, we had to turn off the -g flag everywhere in the Makefiles(which, we understand, is a common problem) in order to complete the build. Below is a small program which simply writes out a real number using 'writeln'. It compiles fine, but generates garbage output: program testprog(input,output); var x : real; begin x := 10.0; writeln('The value of x is ',x); end. This code produces the following line of output on my machine(SGI): The value of x is /// /////////e-//8//8 What's up with this???? Thanks for any help you can give. Stuart Pope ***************************************************************************** Stuart Pope Mail Stop 931 COMPUTER SCIENCES CORP. (757) 864-5775 (Voice) GEOLAB/ISSD (757) 864-8910 (FAX) Hampton, VA Email: d.s.pope@larc Check out our webpage at http://geolab.larc.nasa.gov/ (No animals were harmed or killed in the generation of this mail message) *****************************************************************************

3 2

Re: Problem with writing real numbers
by Stuart Pope 07 Oct '00

07 Oct '00

Hello Peter Gerwinski, Thanks for responding to my request. Per your request, when typing 'gpc -v', I get the following display: gpc version 20000917, based on 2.95.2 19991024 (release) Thanks for your interest! Stuart Pope --- Peter Gerwinski <peter(a)gerwinski.de> wrote: > Hello, Stuart Pope, > > you wrote: > > writeln('The value of x is ',x); > > [...] > > The value of x is /// /////////e-//8//8 > > Which version of GPC are you running? This information is important > for us if we want to give useful help. (If you are not sure, please > type `gpc -v'.) > > 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-20001006 > GnuPG key fingerprint: 9E7C 0FC4 8A62 5536 1730 A932 9834 65DB 2143 9422 > keys: http://www.gerwinski.de/pubkeys/ - AntiSpam: http://spam.abuse.net ===== --------------------------------------------------------- ! Stuart Pope ! ! GEOLAB/Computer Sciences Corporation ! ! Hampton, VA (757) 864-5775 ! ! ! ! This email was generated without any harm ! ! whatsoever to laboratory animals. ! __________________________________________________ Do You Yahoo!? Yahoo! Photos - 35mm Quality Prints, Now Get 15 Free! http://photos.yahoo.com/

1 0

pindent features
by Eike Lange 07 Oct '00

07 Oct '00

Hi! Thorsten Hindermann and I are doing a lot of work with pindent, a small program to format Pascal-Source-Files by adding or deleting whitespaces and changing the appearance of comments etc. If you like, you may add some features you would like to have in the program. You can download our actual ideas via anonymous ftp: mond.dida.physik.uni-essen.de/pub/pindent/README.OPTIONS.0005a.bz2 (bzip2-compressed) Ideas not in this file are: - Support for "FIXME"-comments (*@@ Fixme *) - .pindentrc with favourite options If you have any ideas or suggestions, please send them via E-Mail to: pindent(a)mond.dida.physik.uni-essen.de Eike Lange

1 0

Re: GPC - Manual
by Jose' M. Perez 05 Oct '00

05 Oct '00

The format looks good, but I would suggest several changes. First, if "Reference-Card" is the version number, put the version number in the page footer. Second, replace "Theme" with "Subject" or "Command", "Function", or something more suitable. The syntax section uses a notation that I am not familiar with. You might need an explanation of how to interpret the syntax. Good luck and thank you for volunteering! -----Original Message----- From: U. Bauermann <uwe(a)bauermann.de> To: gpc(a)gnu.de <gpc(a)gnu.de> Date: Sunday, September 17, 2000 12:12 PM Subject: GPC - Manual >Hi. > >The GPC-manual is most uncomplete. >Especialy the refence. >I will help to make the reference complete. >I must teach my students 'how to programming in Pascal'. >And i almost make my own scripts. >I can make my docs like a format, that they fit in the GPC-manual. >Today, i am learning LaTeX, and the GPC-manual must be in TeXInfo. >Is this right? >Is there a tool to convert LaTeX to TeXInfo? >(Sorry, i don't know anything about TeXInfo. But when it >is necessary i will learn it.) >In my docs (my scipts) i have a basicly layout. >When it is possilbe to use this layout for the GPC-reference >i'm verry happy, and i will help to make it complete. >('Uff' was this really my words?) >There is a haeder and a footer. >I have made an example in LaTeX. You can take a look: >http://www.bauermann.de/GPC/manual/reference/ >(Several formats: LaTeX, dvi, ps and/or jpg) >This basicly form looks good in my eyes. >Please, think about it and tell me your ideas. >It's only an example. >Then we can change it to make it perfect. >Sorry my english-grammar. I use my english only for reading, now. > >Greetings > Uwe > >PS.:BTW: Sorry my LaTeX-Code. I'm a beginner. Please send me > suggestions, corrections, optimum, ... Thanx > >-- >Zu Fragen, Risiken und Nebenwirkungen wenden Sie sich bitte an: >Email: uwe(a)bauermann.de >Homepage: http://www.bauermann.de >

2 1

Re: Styles
by Eike Lange 05 Oct '00

05 Oct '00

Hi! On Mon, Oct 02, 2000 at 03:36:35PM +0200, Frank Heckenbach wrote: > Eike Lange wrote: > > While discussing about different Pascal-styles for > > the pindent-program there came up a question my books > > can't answer: > > array [1..3] <===> array (.1..3.) > > { comment } <===> (* Comment *) > The standard calls the latter "lexical alternatives". > BTW, another alternative is `@' for `^' (really!)... :-/ Ok, we are going to support this, too ;-) > With the comment delimiters, there seem to be different opinions. > I personally prefer `{ }' (analogous to `[ ]'), but Peter prefers > `(* *)' so that comments are more visible. We are going to support a switch to support both variants. Later, we will ask you for a set of suggestions for our switch --gpc-team or something like that. :-) > Oh yeah, another thing to complicate the issue: To indicate > "FIXME"s, we're currently using two or more (depending on the > urgency) `@'s in a comment -- then, of course, always `(* *)' > comments because they obviously require special attention. So, e.g.: > (*@@ This procedure is a temporary kludge. It will disappear when > foobar has been done correctly. *) > procedure foobar_kludge; > This comment should, of course, not be converted to `{@@ }', even if > it's before a declaration, but for a program it's also not hard to > recognize the `@'... Well, some tools for C/C++/Java support "Doc-Comments" (KDoc, Doc++, JavaDoc, ...) They are bild like this /** This is a Doc-Comment */ and the char '@' indicates a command like /** This is a command for KDoc @author someone, someone(a)somewhere.in.universe */ We would like to write a pdoc after pindent and also want to support some "@"-commands like: (** This might be a pdoc-comment some time @author me, me(a)somewhere.in.universe *) Do these commands conflict with you comments for "FIXME"s ? Eike

2 1

Re: Styles
by Olivier Lecarme 04 Oct '00

04 Oct '00

>>>>> "EL" == Eike Lange <eike.lange(a)uni-essen.de> writes: EL> Hi! EL> While discussing about different Pascal-styles for EL> the pindent-program there came up a question my books EL> can't answer: EL> How are the different styles called, EL> which one can use for coding: EL> array [1..3] <===> array (.1..3.) EL> and EL> { comment } <===> (* Comment *) EL> BTW: EL> Why did these styles came up? EL> Is one of them "old-fashioned"? Pascal was first implemented on a CDC 6600 computer. Characters were coded on 6 bits, and thus there were only 64 different characters, including end-of-line. There were no square brackets, no circumflex, but there were curly brackets, an up arrow and a Â« not equal Â» operator. Thus, {} is as old as the first implementation, but [] is less old. ^ for pointers and <> for comparison are newer than the old characters, which no longer exist on most existing character codes. Olivier Lecarme

1 0

GPC - Manual
by U. Bauermann 03 Oct '00

03 Oct '00

Hi. The GPC-manual is most uncomplete. Especialy the refence. I will help to make the reference complete. I must teach my students 'how to programming in Pascal'. And i almost make my own scripts. I can make my docs like a format, that they fit in the GPC-manual. Today, i am learning LaTeX, and the GPC-manual must be in TeXInfo. Is this right? Is there a tool to convert LaTeX to TeXInfo? (Sorry, i don't know anything about TeXInfo. But when it is necessary i will learn it.) In my docs (my scipts) i have a basicly layout. When it is possilbe to use this layout for the GPC-reference i'm verry happy, and i will help to make it complete. ('Uff' was this really my words?) There is a haeder and a footer. I have made an example in LaTeX. You can take a look: http://www.bauermann.de/GPC/manual/reference/ (Several formats: LaTeX, dvi, ps and/or jpg) This basicly form looks good in my eyes. Please, think about it and tell me your ideas. It's only an example. Then we can change it to make it perfect. Sorry my english-grammar. I use my english only for reading, now. Greetings Uwe PS.:BTW: Sorry my LaTeX-Code. I'm a beginner. Please send me suggestions, corrections, optimum, ... Thanx -- Zu Fragen, Risiken und Nebenwirkungen wenden Sie sich bitte an: Email: uwe(a)bauermann.de Homepage: http://www.bauermann.de

2 1

Styles
by Eike Lange 02 Oct '00

02 Oct '00

Hi! While discussing about different Pascal-styles for the pindent-program there came up a question my books can't answer: How are the different styles called, which one can use for coding: array [1..3] <===> array (.1..3.) and { comment } <===> (* Comment *) BTW: Why did these styles came up? Is one of them "old-fashioned"? Eike Lange

2 1

converter (*.c => *.pas)
by Gregor Schlosser 28 Sep '00

28 Sep '00

Hallo, i am looking for a program to convert c-files into pascal-files. Can anybody help me,please? Thanks Gregor Schlosser

2 1

Compilation Problems with Native sun-sparc compiler
by Anuradha 27 Sep '00

27 Sep '00

Hello , Even When i compile the program with the included file pge4aa in the working directory itself , PROGRAM TEST; uses pge4aa; var i : integer; Begin writeln('trial'); writeln(i); end. I get the error, $ gpc -o anu --automake test.pas pge4aa.pas:618: warning: empty input file tst.pas:3: module/unit interface `Pge4aa' could not be imported $ What do i do? Thank you. Regards, Anu

1 0

Compilation Problems with Native sun-sparc compiler
by Anuradha 26 Sep '00

26 Sep '00

Hello , Even When i compile the program with the included file pge4aa in the working directory itself , PROGRAM TEST; uses pge4aa; var i : integer; Begin writeln('trial'); writeln(i); end. I get the error, $ gpc -o anu --automake test.pas pge4aa.pas:618: warning: empty input file tst.pas:3: module/unit interface `Pge4aa' could not be imported $ What do i do? Thank you. Regards, Anu

2 1

Test
by Dafi Yondra 22 Sep '00

22 Sep '00

newbie

1 0

Error cannot exec 'mips-tfile'
by Dafi Yondra 22 Sep '00

22 Sep '00

I have installed a binaries version of GPC on DEC OSF 4.0. when I try to compile a simple source code below : program hello; begin writeln('Helo World'); end. i got the error like this : Sisfo:yondra> gpc test.pas gpc: installation problem, cannot exec `mips-tfile': No such file or =directory Do I need to install any library othe than including in the binaries =distribution. Regards DAFI YONDRA

1 0

Re: test results
by Frank Heckenbach 20 Sep '00

20 Sep '00

Russ Whitaker wrote: > > Could you please post the complete error message (only one if > > they're all the same)? > > edited output to one msg: > > TEST abso1.pas: > /usr/local/lib/gcc-lib/i586-pc-linux-gnu/2.95.2/libgpc.a(randfile.o): > In function `do_seek': > /usr/local/src/gcc-2.95.2/gcc/p/rts/randfile.c:327: > the `llseek' function may be dangerous; use `lseek64' instead. > OK Thanks. I'll look into it. For a quick fix, you can try inserting the line: #undef HAVE_LLSEEK into rts/rts.h, after the line: #include "rts-config.h" This will disable 64 bit file access, until we can do this right. 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 4

crtbegin.o
by Huge Rademaker 20 Sep '00

20 Sep '00

This is the trouble I encounter with gpc: +++ bash-2.03# pc hello.p ld: cannot open crtbegin.o: No such file or directory bash-2.03# locate crtbegin.o /usr/lib/gcc-lib/i486-suse-linux/2.95.2/crtbegin.o bash-2.03# +++ How can I tell gpc to locate the requested file? regards, Huge Rademaker

1 0

Indent program for the GPC
by Thorsten Hindermann 19 Sep '00

19 Sep '00

Hello, I try to develop a `CÂ´-like indent progam for GPC and Pascal written in pascal with the GPC. I read in the ToDo-List for the GPC that there is no indent program. So I have two questions: 1. If there is anybody who is creating such a program like this now, and ... 2. How can I contribute to the GPC project with my program? Of course, please don't think the program is ready. I was born yesterday night and there are nothing more as a few lines (program ... begin ... end. ;-)))) ). But they will grow up. The name for the ready program is 'pindent' with serval command-line switches (they will coming up step-by-step) and in the future I will try to port the program into a FreeVision- and/or GTK-style where the user can see the result of the original file in a second window after processing with pindent. Thorsten Hindermann <Thorsten.Hindermann(a)arcormail.de>

2 1

Compilation error: TOC overflow
by Gerhard Olejniczak 19 Sep '00

19 Sep '00

When I try to compile gpc on my RS/6000 I do the following: home> CFLAGS="-mno-fp-in-toc" ../gcc-2.95.2/configure --enable-language=pascal ... ... ... home> make ... ... ... (compilation without errors so far) gcc -c -DIN_GCC -DGPC -mfp-in-toc -DHAIFA -Wall -I. -I.. \ -I../../../gcc-2.95.2/gcc/p -I../../../gcc-2.95.2/gcc/p/..\ -I../../../gcc-2.95.2/gcc/p/../config \ -I../../../gcc-2.95.2/gcc/p/../../include \ ../../../gcc-2.95.2/gcc/p/setop.c rm -f ../gpc1 gcc -DIN_GCC -DGPC -mfp-in-toc -DHAIFA -Wall -o ../gpc1 \ `cat stamp-gbe` ../c-aux-info.o ../c-iterate.o ../c-pragma.o \ gpc-common.o gpc-convert.o gpc-decl.o lang.o gpc-lex.o gpc-typeck.o\ module.o gpi-hash.o circle-buf.o memfiles.o objects.o parse.o \ rts.o types.o util.o setop.o `if [ xobstack.o != x ]; \ then echo ../obstack.o; else true; fi` `case "gcc" in "cc") \ if [ xalloca.o != x ]; then echo ../alloca.o; else true; fi ;; esac`\ `if [ x != x ]; then echo ../; else true; fi` \ -lld ../../libiberty/libiberty.a ld: 0711-781 ERROR: TOC overflow. TOC size: 68508 Maximum size: 65536 collect2: ld returned 12 exit status make[2]: *** [../gpc1] Error 1 make[2]: Leaving directory `/usr/local/src/gpc-build/gcc/p' make[1]: *** [gpc1] Error 2 make[1]: Leaving directory `/usr/local/src/gpc-build/gcc' make: *** [all-gcc] Error 2 The manpage tells that setting -mfp-in-toc should avoid this error (TOC overflow) on a RS/6000. IBM RS/6000, AIX 4.3.3.0 gcc-2.95.2 gpc-20000917 Has someone an idea what goes wrong? Gerhard -- "We all know Linux is great...it does infinite loops in 5 seconds." - Linus Gerhard Olejniczak Tel: +49-9128-12090 Mozartstr.1 E-Mail: gerhard.olejniczak(a)odn.de D-90592 Schwarzenbruck Fax: +49-911-9342807527

2 1

Here I am.
by U. Bauermann 17 Sep '00

17 Sep '00

Hi, all together. My name is Uwe Bauermann, i'm 36 years old, and i'm using Linux since Kernel 1.2.xxxx. I'm a trainer for computer-science in germany (Velbert). Once upon a time, i have learned programming in Pascal while my study-time in Berlin (germany). Now, i am the man at the blackboard to teach Computer-Science for adults. In nearest future my topic is 'Programming with Pascal' and i decided to use GPC on Linux. I think i would have thousants of questions soon. ;-) And hope i get some answers from this discussion group. The first follows up ..... Greeting Uwe -- Zu Fragen, Risiken und Nebenwirkungen wenden Sie sich bitte an: Email: uwe(a)bauermann.de Homepage: http://www.bauermann.de

1 0

StringUtils, FileUtils
by Ernst-Ludwig Bohnen 14 Sep '00

14 Sep '00

>Date: Wed, 13 Sep 2000 00:30:52 +0200 >From: Frank Heckenbach <frank(a)g-n-u.de> >To: gpc(a)gnu.de >Subject: StringUtils, FileUtils > >Hi, > >in the current GPC version, I've included a StringUtils unit for >general string handling routines (on a higher level than the >built-in and RTS routines). > >Up to now, it only contains routines for a string hash table, but >I'm planning to add some more routines. Perhaps some of you also >have some routines to contribute (or features to request). >Conditions for inclusion into this unit should be, IMHO: May be a unit in my tool box is a candidate. Everybody can read it at: http://www.desy.de/~bohnen/gpc/dictionary.pas I can't give anwers next 3 weeks, will be back online on Oct 7. Ernst-Ludwig Bohnen

1 0

CVS is back
by Frank Heckenbach 12 Sep '00

12 Sep '00

Hi all, as some of you might have noticed, there haven't been any new GPC versions for a few weeks. This was due to some inconsistencies in our working code base. Furthermore, the CVS server had an unplanned downtime after a system upgrade. Both problems have been resolved now, so you can find a new alpha and CVS release at the usual places. 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

Indent program for the GPC
by Thorsten Hindermann 11 Sep '00

11 Sep '00

Hello, I read in the ToDo-List, that the GPC-project needs a `CÂ´-like indent program. So I want realise this program and I would ask 1: if there is anybody who writes a same program? 2: how must I contribute to GPC or is my email contribute enough? (this is my first try to contribute to a GNU project) I will create this program in pascal with the GPC :-)). The first program lines are born yesterday night and will grow up step by step. And for the future, I have a few ideas for the program (FreeVision/GTK-style) but the first steps are reserved for the command-line version. Thorsten Hindermann <Thorsten.Hindermann(a)arcormail.de>

1 0

Re: thanks plus question: "egcs or gcc"
by Menno Schaap 11 Sep '00

11 Sep '00

> Check the Lazarus and fpgui/fpgfx widget sets for FPC. > > They are more or less what you want to do, (independant library to qt, gtk, > some also xlib and win32 GDI) and maybe you can convert them to > GPC objects style. Thanks, looks good. But for me it is no problem to write in another language then Pascal since the graphical layer is written as a sub-layer. > > www.freepascal.org/fpgui > www.freepascal.org/lazarus > > > Personally, I think that you'll have to switch to GTK because of the reason > nearly everybody uses GTK: because of the license of QT (not free!) Maybe, but it is for a company. And I think it is no problem for them to pay. It will be non open source, non-free software. Do you know how this works in according with GCC, GPC an GTK+ (GPL?). > > Borland uses QT, but paid the fee's. (so if you buy Delphi for Linux, you > have a license to use QT, and develop and deploy programs), so that is a > different category.

5 5

Octal string to Number
by Prof Abimbola Olowofoyeku 10 Sep '00

10 Sep '00

Hi all Does anyone have any code for converting an octal string to a numeric value? Thanks. Best regards, The Chief -------- Prof. Abimbola A. Olowofoyeku (The African Chief) Author of: Chief's Installer Pro v5.22.1 for Win32 http://www.bigfoot.com/~African_Chief/chief32.htm Email: African_Chief(a)bigfoot.com

2 3

GDB pascal support.
by Pierre Muller 05 Sep '00

05 Sep '00

I now have committed into GDB CVS tree my main patches to add pascal support into the GNU Debugger. To test it out, simply go to sourceware.cygnus.com/gdb and see the CVS checkout instructions. I have an unsubmitted patch that would handle GNU Pascal TP like Strings better, but as my GNU Pascal knowledge is close to zero, I would like to know if someone is working with the CVS tree of GDB? Currently, only Free Pascal strings are printout in a pascalisch way, whereas GNU pascal strings are printed out as records. 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

3 2

using c++ libraries in pascal (NEWBIE)
by Menno Schaap 05 Sep '00

05 Sep '00

Hello, I am new to this list, so "HELLO TO EVERYBODY" About my programming subject: I am investigating for a small naval architectural bureau, If they can port their DOS/WIN pascal programs to linux. I am a student of naval architecture with small programming experience under Pascal and C++. The company also asked me to have a look at GUI toolkits and write a graphical subsystem for their pascal program. I would like to use QT for this purpose. I made some small tests already, and found out that the compatibility with GPC and Prospero extended pascal is sufficient (small problems). My problem is that I can not use a c++ library in my pascal program. For C everything works allright, but as soon as I compile with g++ I get errors. I also noticed that the assembler output of the compiler is different when compiling C or C++ sources. I tried compiling with gpc -x, etc. Still I run into problems. I use gpc based on egcs 1.1.2 as well as based on gcc 2.95.2 (on two different pc's). Attached is a small, very dumb test program, partially stolen from the excellent info pages of gpc. It consists of two files: add_one.c and test.pas test.pas is the program; it writes the number five, and lets the function number_pp add one (+1) to the number. It then displays number again. I compiled it in several ways, of which this one is the simplest: gcc -c add_one.c gpc -o test test.pas add_one.o If the first line is replaced with: g++ -c add_one.c line number two fails linking. Does anybody have an idea of how to use c++ libraries in pascal? Help is very much appreciated. Greetings, Menno Schaap

7 12

From C To Pascal, Files
by Eike Lange 05 Sep '00

05 Sep '00

Hi alltogether! Its for the PostgreSQL-Unit. In C, I have a function: void printSomethingToFile(File* file); for which I want to write a wrapper. What I did was: ----------------- snip -------------- In C: void _p_printSomethingToFile(int file_descriptor) { FILE *myfile; myfile = fdopen(file_descriptor, "w"); /* if (errno != 0) printf("errno is %d\n"errno); */ printSomethingToFile(myfile); /* fflush(myfile); */ } Pascal (Unit-Part): Procedure CprintSomethingToFile(int file_descriptor); asmname '_p_printSomethingToFile'; Procedure PrintSomethingToFile(aFile : Text); Var fd : Integer; Begin fd := FileHandle(aFile); CprintSomethingToFile(fd) End; Pascal (Program) Var f : Text; Begin ... Assign(f, 'filename.out'); Rewrite(f); PrintSomethingToFile(f); Close(f); ... End. ----------------- snip -------------- Sometimes this works (especially, if I write a line of text _before_ I use PrintSomethingToFile) and sometimes it fails because errno is set to a value <> 0 after calling fdopen. If I use fflush(myfile) after (in C) printSomethingToFile(myfile) it seems to work. The text is written propely, but errno is <>0 ! errno is mostly set to "Bad File Descriptor". Is there something, I did wrong? Eike Lange

2 1

Pascal-documentation in german language
by Eike Lange 05 Sep '00

05 Sep '00

Hi! I'm writing a documentation about "Pascal under Linux" and I think, I need some help :-) If you would like to join me, please try out http://www.eliotic.de/pasdoc/ and contact me: eike.lange(a)uni-essen.de Eike Lange

1 0

Problem with ncurses 5.0
by Martin Liddle 31 Aug '00

31 Aug '00

We have some software written in gpc that uses ncurses and panel for screen output. Mainly for historical reasons we have our own GPC to C interface unit. All this worked at RedHat Linux 6.1. We have recently upgraded to RedHat 6.2 and it no longer works. The cursor sits somewhere in the bottom line of the screen (which is defined as a panel of height 1 line). The change that I suspect is significant between RedHat 6.1 and RedHat 6.2 is that 6.1 used ncurses 4.2 and 6.2 uses ncurses 5.0. I am afraid my knowledge of C is pretty much zero. However by using diff on the header files I only see one change that looks as though it might matter. In panel.h from ncurses 4.2 the definition is: extern PANEL *new_panel(WINDOW *) the corresponding ncurses 5.0 definition is extern PANEL* new_panel(WINDOW *) Our interface unit has function new_panel(win:WINDOW_PTR):PANEL_PTR; C_language; Is this correct for ncurses 5.0? Has anybody else had any problems with ncurses 5.0? -- Martin Liddle, Tynemouth Computer Services, 27 Garforth Close, Cramlington, Northumberland, England, NE23 6EW. Phone: 01670-712624. Fax: 01670-717324.

3 2

GPC-20000813 snapshot fails to compile
by Andrew Stribblehill 31 Aug '00

31 Aug '00

Here's the tail end of the compile: /home/jeeves/package/gcc/gcc-2.95.2/gcc/p/gpi-hash.c:408: failed assertion rni == num_items' /home/jeeves/package/gcc/gcc-2.95.2/gcc/p/rts/error.pas:38: Internal compiler error in checked_mread', at gpi-hash.c:408 Please submit a full bug report. See <URL:http://www.gnu.org/software/gcc/faq.html#bugreport> for instructions. make[3]: *** [error.o] Error 1 make[3]: *** Waiting for unfinished jobs.... make[3]: Leaving directory /tmp/gcc-2.95.2-obj/gcc/p/rts' make[2]: *** [pascal.rts] Error 2 make[2]: Leaving directory /tmp/gcc-2.95.2-obj/gcc' make[1]: *** [bootstrap] Error 2 make[1]: Leaving directory /tmp/gcc-2.95.2-obj/gcc' make: *** [bootstrap] Error 2 % uname -a SunOS deneb 5.6 Generic_105181-06 sun4u sparc SUNW,Ultra-4 Thanks, Andrew Stribblehill Systems programmer, IT Service, University of Durham, England

1 0

compiled units
by Haluk DUMAN 31 Aug '00

31 Aug '00

where i found compiled units(all) in /djgpp/lib/gcc-lib/djgpp/2.952/units/*.pas and/or how i can compile all units in /djgpp/lib/gcc-lib/djgpp/2.952/units/*.pas thanks. _________________________________________________ Haluk DUMAN Electric-Electronic Engineer Email: HalukDUMAN(a)go.to, HalukDUMAN(a)come.to (* Sorry for my English ; How can I help you? *)

2 1

callow, GPC unit !
by Haluk DUMAN 30 Aug '00

30 Aug '00

i can't compile GPC unit in crtdemo.pas i make this := md \djgpp cd \djgpp pkunzip -d djdev203.zip pkunzip -d bnu2951.zip pkunzip -d gcc2952.zip pkunzip -d gpc-20000813.i586-pc-msdosdjgpp.zip set djgpp=c:\djgpp\djgpp.env cd \djgpp\bin copy \djgpp\doc\gpc\demos\crtdemo.pas {program CRTDemo; uses GPC, CRT; ...} gpc --automake -v crtdemo.pas -o crtdemo.exe results output error string := .............. /djgpp/lib/gcc-lib/djgpp/2.952/units/crtc.c:74: curses.h: no such file or directory (ENOENT) /djgpp/lib/gcc-lib/djgpp/2.952/units/crtc.c:75: panel.h: no such file or directory (ENOENT) i can't find curses.h and panel.h in any directory? what this error and how i can compile all units in /djgpp/lib/gcc-lib/djgpp/2.952/units/*.pas thanks. _________________________________________________ Haluk DUMAN Electric-Electronic Engineer Email: HalukDUMAN(a)go.to, HalukDUMAN(a)come.to (* Sorry for my English ; How can I help you? *)

2 1

Upgrading agnes today
by Anja Drewitz 30 Aug '00

30 Aug '00

Hello, just wanted to let you know that we are going to upgrade Peter's computer agnes.dida.physik.uni-essen.de this evening (who is also the primary FTP server for gpc). Agnes will probably be offline for an hour or two. Best wishes, Anja -- Dipl.-Phys. Anja Drewitz * Universitaet Essen * Germany GnuPG: 0B8C 25A9 5A1B 8AA5 0235 E1E6 AD73 DC74 3504 B31F

1 0

msdos
by Haluk DUMAN 28 Aug '00

28 Aug '00

somebody there? where i can download latest version GPC(pascal) for msdos (or windows box). and what latest version number? _________________________________________________ Haluk DUMAN Electric-Electronic Engineer Email: HalukDUMAN(a)go.to, HalukDUMAN(a)come.to (* Sorry for my English ; How can I help you? *)

2 2

error message
by jens＠irs-net.com 27 Aug '00

27 Aug '00

-----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 I'm using gpc on a Debian (Potato/Woody) Box and I get this error message: prog_1.pas:3: module/unit interface 'Crt' could not be imported - -- with friendly regards.... jens luedicke <jens(a)irs-net.com> Support the Theory of Evolution; 400 Billion Amphibians can't be wrong! -----BEGIN PGP SIGNATURE----- Version: PGP 6.5.1i iQA/AwUBOaa9EqFxQTtRrRT1EQJenQCglLP4VSIN4IrqbHrFqpI3w83WOFgAoNti TrvVHV2MvJKGO4kQr5YIop6F =1RPZ -----END PGP SIGNATURE-----

2 1

Address operator(s)
by Peter Gerwinski 27 Aug '00

27 Aug '00

Hello, there are currently two address operators in GNU Pascal, the BP-compatible `@', and `&' which was present in old versions of GPC (I don't know where this comes from;-). Any objections against dropping the `&'? 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-20000821 GnuPG key fingerprint: 9E7C 0FC4 8A62 5536 1730 A932 9834 65DB 2143 9422 keys: http://www.gerwinski.de/pubkeys/ - AntiSpam: http://spam.abuse.net

2 1

From C to Pascal (Part II)
by Eike Lange 21 Aug '00

21 Aug '00

Hi! Again, I have some questions about porting from C to Pascal. - Is there a GNU-Pascal extension, which allows to implement such thing like a union in C ? - Is there a FILE* ("Pointer to FILE") compatible type available for GNU-Pascal? Thanks Eike Lange

2 1

RE: Graphical resolution with GPC
by Klaus Friis Østergaard 18 Aug '00

18 Aug '00

Hello, again, Peter Gerwinski, writes that: ... Nope. It depends on your graphics card, your operating system and your setup which resolution you can get. ... If I have a windows 98 system with a graphic controller and monitor capabal of a resolution of 1280x1024 x256 colors on a intel 586 pc, then I should be able to run this mode with grx and gpc (cygwin). But only if the windows98 is set to 1280x1024 resolution? kind regards, klaus -----Original Message----- From: Peter Gerwinski [mailto:peter@gerwinski.de] Sent: 8. august 2000 21:55 To: =?iso-8859-1?Q?Klaus_Friis_=D8stergaard_=3CKFO=40LASERTECH=2EDK=3E?=@esm eralda.gerwinski.de Cc: GPC; GRX Subject: Re: Graphical resolution with GPC Hello, everyone, Klaus Friis Ãstergaard wrote: > I need to convert a program written in turbo pascal version 7.0 which uses a > resolution of 1024x768 pixels. > When I look at the GRX packed it seems like the high resolution is 640x400 > standard svga is this right? Nope. It depends on your graphics card, your operating system and your setup which resolution you can get. > I need to use a mouse to control something in the program. GRX has mouse support - please have a look at the functions `GrMouseGetEvent' and `GrMouseGetEventT'. > Would it be possible to convert this program/ make a new program that uses > GPC, with grx and a graphical interface at 1024x768 or maybe 1280x1024, I > only need 16 colours? Yes. No problem. > I have the newest gpc-alpha version compiled on a red-hat linux and also a > cygwin working on Windows, the primary end platform for the program should > be Windows (unfortunately). > > If it is possible to get a resolution of 1024X768 or greater it would be > great if there was a sample code on how to initialise/invoke the graphics > rather than a YES this can be done. GrSetMode (GR_width_height_color_graphics, 1024, 768, 256, 0, 0); Hope this helps, 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-20000808 GnuPG key fingerprint: 9E7C 0FC4 8A62 5536 1730 A932 9834 65DB 2143 9422 keys: http://www.gerwinski.de/pubkeys/ - AntiSpam: http://spam.abuse.net

2 1

Install gnu pascal for dummies - can I install now?
by leegold 18 Aug '00

18 Aug '00

1. CRT Dos, MS-Windows PDCurses (2) what's this? do I need this? 2. what's GRX? do i need it? 3. So far I have downloaded: djdev202.zip bnu281b.zip mak377b.zip gdb416b.zip faq211b.zip gpc-20000727.i586-pc-msdosdjgpp.zip 4. Am I all set for DOS? Do I need anything related to 1. or 2.? Am i ready to install? I will not use an IDE right now - just a text editor and I'll complie and run w/commands typed and entered from the DOS cmd line. Anything else I need? Thanks

3 2

packed array bug? or spec?
by takashi yamanoue 18 Aug '00

18 Aug '00

Hi all. I'm Takashi Yamanoue, in Japan. (http://www.tobata.isc.kyutech.ac.jp/~yamanoue) (http://www.tobata.isc.kyutech.ac.jp/~yamanoue/researches/complang.html) The output of the following program seems strange. Is it the specification? or a bug? I've searched the archives of this list, and I've found out a similar bug in the Borland Pascal Format, and I've also found out the article which said that it was fixed. I've updated the gcc and gpc. However, the following phenomenon was not fixed. Thank you in advance. Takashi, yamanoue(a)isc.kyutech.ac.jp ------------------------------------------------------- program exercise28(input, output); const smax = 8; smax2 = 9; n = 10; type str = packed array[1..smax] of char; str2 = packed array[1..smax2] of char; var i, j: integer; s: array[1..n] of str; tmp: str; s2: array[1..n] of str2; tmp2: str; begin { the following part uses the 8 chars packed array} s[1]:='abababab'; s[2]:='babababa'; s[3]:='12121212'; s[4]:='21212121'; s[5]:='cdcdcdcd'; s[6]:='dcdcdcdc'; s[7]:='56565656'; s[8]:='65656565'; s[9]:='bcbcbcbc'; s[10]:='cbcbcbcb'; for i := 1 to n - 1 do for j := n - 1 downto i do if s[j] > s[j + 1] then begin tmp := s[j]; s[j] := s[j + 1]; s[j + 1] := tmp end; for i := 1 to n do writeln('s[', i:2, '] = ', s[i]); { the following part uses the 9 chars packed array} s2[1]:='abababab'; s2[2]:='babababa'; s2[3]:='12121212'; s2[4]:='21212121'; s2[5]:='cdcdcdcd'; s2[6]:='dcdcdcdc'; s2[7]:='56565656'; s2[8]:='65656565'; s2[9]:='bcbcbcbc'; s2[10]:='cbcbcbcb'; for i := 1 to n - 1 do for j := n - 1 downto i do if s2[j] > s2[j + 1] then begin tmp := s2[j]; s2[j] := s2[j + 1]; s2[j + 1] := tmp end; for i := 1 to n do writeln('s2[', i:2, '] = ', s2[i]) end. { the following is the output of this program. yamanoue% gpc gpcbug.pas yamanoue% a.out s[ 1] = 21212121 s[ 2] = 12121212 s[ 3] = 65656565 s[ 4] = 56565656 s[ 5] = babababa s[ 6] = abababab s[ 7] = cbcbcbcb s[ 8] = bcbcbcbc s[ 9] = dcdcdcdc s[10] = cdcdcdcd s2[ 1] = 12121212 s2[ 2] = 21212121 s2[ 3] = 56565656 s2[ 4] = 65656565 s2[ 5] = abababab s2[ 6] = babababa s2[ 7] = bcbcbcbc s2[ 8] = cbcbcbcb s2[ 9] = cdcdcdcd s2[10] = dcdcdcdc yamanoue% gpc -v Reading specs from /usr/local/lib/gcc-lib/i686-pc-linux-gnu/2.95.2/specs gpc version 20000808, based on 2.95.2 19991024 (release) yamanoue% The desired output is s[ 1] = 12121212 s[ 2] = 21212121 s[ 3] = 56565656 s[ 4] = 65656565 s[ 5] = abababab s[ 6] = babababa s[ 7] = bcbcbcbc s[ 8] = cbcbcbcb s[ 9] = cdcdcdcd s[10] = dcdcdcdc s2[ 1] = 12121212 s2[ 2] = 21212121 s2[ 3] = 56565656 s2[ 4] = 65656565 s2[ 5] = abababab s2[ 6] = babababa s2[ 7] = bcbcbcbc s2[ 8] = cbcbcbcb s2[ 9] = cdcdcdcd s2[10] = dcdcdcdc }

4 6

Announcement: MysqlUnit
by Eike Lange 15 Aug '00

15 Aug '00

I am pleased to announce the version 0.7 of DBATMS (DataBase Access Toy or Toolkit or whatever you like) for MySql. DBATMS is a unit, that allows you to access to mysql-server and query some data out of your databases. Please read at least the top of dbatms.pas carefully. Not all of the Myql-API Functions are implemented. Nearly 70% are usable. I have tested the Unit under Linux with mysql Version 3.22.X. Please send bug-reports and comments directly to Eike Lange, eike.lange(a)uni-essen.de You can get dbatms0.7.tar.gz via anonymous ftp from: ftp://agnes.dida.physik.uni-essen.de/home/lange/ Eike Lange

1 0

linking units bug
by Russ Whitaker 13 Aug '00

13 Aug '00

Hi Last year I could precompile the units with -c and then go to the demos directory and, for instance, gpc -o pi pi.pas and it worked. (gpc-19991030) Not now. Precompile the units and go to the demos directory and gpc -o pi pi.pas gives two link errs. gpc --automake -o pi pi.pas works fine, but if I do gpc -o pi pi.pas right afterwards I get the link errs again. (gpc-200007xx but don't know when the change occurred) crtdemo does same, just more errs. Thanks Russ

2 1

Re: packed types and comparison operators bugs
by Couperin 11 Aug '00

11 Aug '00

Le 30 Jul 2000, Ã 21:11, Russ Whitaker a Ã©crit: > Hi > > In the first email the problem centers around "packed" > and I don't know what's it doing. > > In the 2nd email, 4 followed by 9 zeros as an integer is a negative > number, -294967296 > > Without typecasting the comparisons are expecting integers > So if you change X in the comparisons to longint(X) you get the right > results > > Perhaps this narrows the problem a little > > Russ > Hello The thing I don't understand is the output : X = 4000000000 X > 63 : False but it doesn't really matter : the input was wrong, since it was out of range [0..125]. But about the packed type, I found another problem. I can't compile this little program : -------------------------------------------- Program Bug05; Const XValMax : Byte = 125; Type T_XVal = Packed 0..XValMax; Var X : T_XVal = 64; Begin End. -------------------------------------------- Here is the output : Reading specs from c:/djgpp/lib/gcc-lib/djgpp/2.952/specs gpc version 20000727, based on 2.95.2 19991024 (release) [...] Bug05.pas:8: constant out of range -- "Couperin"

3 2

sets bug report
by Couperin 09 Aug '00

09 Aug '00

Here is a new problem I get. It seems to be a new bug :-( I can't compile this simple program : --------------------------------------- Program Bug08; Type T_ScreenLimits = Set Of ShortCard; Const XLimits : T_ScreenLimits = [0,1279]; Var X : ShortCard; Begin X := 1279; If X In XLimits Then WriteLn('OK'); End; --------------------------------------- Here is the full message of the compiler : Reading specs from c:/djgpp/lib/gcc-lib/djgpp/2.952/specs gpc version 20000727, based on 2.95.2 19991024 (release) c:/djgpp/lib/gcc-lib/djgpp/2.952/gpcpp.exe -lang-pascal -v - famtmpfile=c:/djgpp/tmp\ccaqgwvh -fautobuild -fdelphi-comments - D__GNU_PASCAL__ -undef -D__GNUC__=2 -D__GNUC_MINOR__=95 - D__GPC__=2 -D__GPC_MINOR__=0 -D__GPC_RELEASE__=20000727 - 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) -g -Acpu(i386) -Amachine(i386) -Di386 -D__i386 - D__i386__ -D__tune_pentium__ -imacros c:/djgpp/lib/../include/sys/version.h - remap Bug08.pas c:/djgpp/tmp\ccbqgwvh.i GNU Pascal Compiler PreProcessor version 2.95.2 19991024 (release) (80386, BSD syntax) #include "..." search starts here: #include <...> search starts here: c:/djgpp/lang/pascal c:/djgpp/include c:/djgpp/contrib/grx232/include /usr/local/include JDIR/i586-pc-msdosdjgpp/include $DJDIR/lib/gcc-lib/djgpp/2.952/include $DJDIR/include End of search list. c:/djgpp/lib/gcc-lib/djgpp/2.952/gpc1.exe c:/djgpp/tmp\ccbqgwvh.i -quiet - dumpbase Bug08.pas -g -version -famtmpfile=c:/djgpp/tmp\ccaqgwvh -fautobuild - o c:/djgpp/tmp\ccbqgwvh.s GNU Pascal version 2.95.2 19991024 (release) (djgpp) compiled by GNU C version 2.95.2 19991024 (release). Bug08.pas:4: warning: integer set size limited to 256 elements from low bound Bug08.pas:4: warning: use -fsetlimit:NUMBER to change the limit at compile time Bug08.pas:9: Internal compiler error in `get_set_constructor_bits', at tree.c:5016 Please submit a full bug report. See <URL:http://www.gnu.org/software/gcc/faq.html#bugreport> for instructions. I also tried this other one, with the same result in compilation : --------------------------------------- Program Bug10; Type T_ScreenLimits = Set Of ShortCard; Var XLimits : T_ScreenLimits; Var X : ShortCard; Begin XLimits := [0,1279]; X := 1279; If X In XLimits Then WriteLn('OK'); End. --------------------------------------- I thought that by adding these definitions : Type T_ScreenLimits = Set Of ShortCard; Const XLimits : T_ScreenLimits = [0,1279]; I could overcome the impossibility to compile something like this : --------------------------------------- Program Temp; Var X : ShortCard; Begin X := 1279; If X In [0,1279] Then WriteLn('OK'); End. --------------------------------------- How can I define this simple set [0,1279] ? Last question : To who may I submit test programs If I think it could be added to the Test Suite of GPC sources ? Thanks in advance -- "Couperin"

2 1

Re: sets bug report
by Couperin 09 Aug '00

09 Aug '00

I wrote : ... > Here is the full message of the compiler : ... > Please submit a full bug report. > See <URL:http://www.gnu.org/software/gcc/faq.html#bugreport> for > instructions. ... Is it a GPC bug or a GCC bug ? Do I really have to report it at {HYPERLINK "mailto:gcc-bugs@gcc.gnu.org"}gcc-bugs(a)gcc.gnu.org ? -- "Couperin"

1 0

Graphical resolution with GPC
by Klaus Friis Østergaard 08 Aug '00

08 Aug '00

Hi Everyone at GPC/GRX I need to convert a program written in turbo pascal version 7.0 which uses a resolution of 1024x768 pixels. When I look at the GRX packed it seems like the high resolution is 640x400 standard svga is this right? I need to use a mouse to control something in the program. Would it be possible to convert this program/ make a new program that uses GPC, with grx and a graphical interface at 1024x768 or maybe 1280x1024, I only need 16 colours? I have the newest gpc-alpha version compiled on a red-hat linux and also a cygwin working on Windows, the primary end platform for the program should be Windows (unfortunately). If it is possible to get a resolution of 1024X768 or greater it would be great if there was a sample code on how to initialise/invoke the graphics rather than a YES this can be done. Thanks Klaus F. Ãstergaard farremosen(a)mail.tele.dk

2 1

From C to GNU-Pascal
by Eike Lange 08 Aug '00

08 Aug '00

Hi! I have a structure called MYSQL_ROW, which I want to port to Pascal (Access to Mysql). In the C-Header, MYSQL_ROW is defined like this: typedef char**MYSQL_ROW; In Pascal, I have defined MYSQLROW like: type MYSQLROW = ^CString; Is this OK? How do I access the follwowing: Var row : MYSQLROW; C PASCAL row[0] row^ row[1] ?? row[2] ?? row[3] ?? In C, it is possible to give an enumeration some predefined values like: enum my_type { first, second, third=44}; How do I do that in Pascal? type MyType = ( first; second; third); Thanks, Eike Lange

5 7

[Bug] GPC_EXEC_PREFIX doesn't take precedence
by J. David Bryan 08 Aug '00

08 Aug '00

This report is for gpc-20000805. The "Invoking GPC" section of the GPC manual states: "In addition, GPC recognizes GPC_EXEC_PREFIX with the same meaning that GCC_EXEC_PREFIX has to GCC. GPC also recognizes GCC_EXEC_PREFIX, but GPC_EXEC_PREFIX takes precedence." Actually, GCC_EXEC_PREFIX takes precedence. Lines 2919-2922 of "gpc.c" are: gcc_exec_prefix = getenv ("GCC_EXEC_PREFIX"); #ifdef GPC if (! gcc_exec_prefix) gcc_exec_prefix = getenv ("GPC_EXEC_PREFIX"); #endif Note that GPC_EXEC_PREFIX is not used if GCC_EXEC_PREFIX is defined. One possible fix to this code would be: #ifdef GPC gcc_exec_prefix = getenv ("GPC_EXEC_PREFIX"); if (! gcc_exec_prefix) #endif gcc_exec_prefix = getenv ("GCC_EXEC_PREFIX"); (The behavior stated in the manual is the desired one. When running GPC, the GPC-specific environment variable should take precedence over any existing GCC-specific variable.) -- Dave

2 1

at last!
by Robert P. Ewing 04 Aug '00

04 Aug '00

Hello, all. Maurice wrote (paraphrased): ... but first I have to copy grx20.pas to the $DJDIR$ directory, or I need to add the option --unit-path=grx232/pascal to enable gpc to locate this file. That was the key! The programs compile fine now. I had also written about the new data types. I like the clean, systematic shortCard, medCard (sounds like what a doctor carries), and so on. I'll note that the web page http://agnes.dida.physik.uni-essen.de/~gnu-pascal/gpc_73.html#SEC73 (7.2, data types) doesn't have a link to a page on reals, so I had to guess. But fortunately the reals seems to be systematic and similar to the integers. Many thanks to all the comments and help I've received over the last week! No on to some actual programming! Toby

2 1

Re: help w/DOS gnupascal install
by Nicola Girardi 04 Aug '00

04 Aug '00

> I need newbie step by step help installing gnu Pascal for DOS. I have seen > the docs. on the gnu Pascal site but have not been able to glean from the > site exactly what files I need. > > 1. what files should I download for a minimum working DJGPP DOS install? http://www.delorie.com/ Choose DJGPP and then Zip-Picker; you just have to fill in a form :)

3 3

Linking Fortran (Lapack)
by Mike Reid 04 Aug '00

04 Aug '00

Dear gpc list, I have tried searching through the archives and my conclusion is that I will have difficulty linking Fortran into my pascal programs on Linux/Intel. However, any clues would be most welcome. This is my situation: I am using the current linux gpc rpms on intel systems (RedHat 6.1) as well as using it on an Alpha. The main thing I'm needing to do with my (rather old) pascal programs involves matrix diagonalization, which is blindingly fast on Alpha with the optimized BLAS and Lapack. On the Alpha (running True64 Unix, i.e. Digital (AKA Compaq :-()) I can link the Fortran routines just fine. However, on intel I can't link the gnu fortran libraries successfully, presumably because gpc is based on one version of gcc and our current g77 is based on another. I don't particularly care about efficiency (the Alpha code is 10x faster due to the optimized matrix libraries) but it would be very useful to be able to develop and check the programs on my Linux boxes. So any clues as to how to just make it run would be very much appreciated. Since the primary platform is the Alpha Lapack/BLAS the obvious alternative of using the C version of Lapack is not really a solution. -- Dr. Michael F. Reid, M.Reid(a)phys.canterbury.ac.nz Physics and Astronomy, University of Canterbury Christchurch, New Zealand. Phone: + 64 3 364 2548 Fax: + 64 3 364 2469

2 1

help w/DOS gnupascal install
by leegold 04 Aug '00

04 Aug '00

I need newbie step by step help installing gnu Pascal for DOS. I have seen the docs. on the gnu Pascal site but have not been able to glean from the site exactly what files I need. 1. what files should I download for a minimum working DJGPP DOS install? Thanks - after this I'll post w/questions about the install procedure -step by step, but let me get the files download first.

1 0

Newbie question
by Michael Worsley 03 Aug '00

03 Aug '00

Hi all, Apologies for the newbie question but... I'm having problems installing and compiling GPC under Cygwin32 I've got a nice clean cygwin installation, downloaded the gcc-2.95.2 source and the gpc source and, after several trials and tribulations relating to include paths, patch files and so on, make gets as far as: cd p/rts && \ CC="`echo /usr/local/src/build/gcc/xgcc -B/usr/local/src/build/gcc/ -B/usr/local/i686-pc-cygwin32/bin/ -I/usr/local/i686-pc-c ygwin32/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. make[1]: *** [p/rts/Makefile] Error 1 make[1]: Leaving directory `/usr/local/src/build/gcc' make: *** [all-gcc] Error 2 Any suggestions as to why GCC appears to be fritzed? Is it Cygwin's gcc that is at fault here, or somethig generated while making gpc? Any help would be appreciated. -- Michael Worsley Praxis Critical Systems Ltd. ********************************************************************** This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. **********************************************************************

2 1

still trying to compile
by Robert P. Ewing 01 Aug '00

01 Aug '00

Hello, all I am still having trouble with the RHIDE and gpc setup. I have fixed my problems with environment space, so the path is now fine. But I am not getting programs with grx20 to compile. Here is some output, with commentary: When I compile from bash, at the command line, in the $DJDIR$ directory, I write: gpc --automake -v -o taste.exe contrib/grx232/pascal/taste.p -lgrx20 2> outfile Outfile then contains: Reading specs from c:/djgpp/lib/gcc-lib/djgpp/2.952/specs gpc version 20000725, based on 2.95.2 19991024 (release) c:/djgpp/lib/gcc-lib/djgpp/2.952/gpcpp.exe -lang-pascal -v -famtmpfile=c:/djgpp/tmp/RHcaaaaa\ccaqs0wh -fautomake -fdelphi-comments -D__GNU_PASCAL__ -undef -D__GNUC__=2 -D__GNUC_MINOR__=95 -D__GPC__=2 -D__GPC_MINOR__=0 -D__GPC_RELEASE__=20000725 -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/../include/sys/version.h -remap contrib/grx232/pascal/taste.pas c:/djgpp/tmp/RHcaaaaa\ccbqs0wh.i GNU Pascal Compiler PreProcessor version 2.95.2 19991024 (release) (80386, BSD syntax) #include "..." search starts here: #include <...> search starts here: c:/djgpp/LANG/PASCAL [**] c:/djgpp/include c:/djgpp/contrib/grx232/include /usr/local/include [**] JDIR/i586-pc-msdosdjgpp/include [**] $DJDIR/lib/gcc-lib/djgpp/2.952/include $DJDIR/include [*@] End of search list. c:/djgpp/lib/gcc-lib/djgpp/2.952/gpc1.exe c:/djgpp/tmp/RHcaaaaa\ccbqs0wh.i -quiet -dumpbase taste.pas -version -famtmpfile=c:/djgpp/tmp/RHcaaaaa\ccaqs0wh -fautomake -o c:/djgpp/tmp/RHcaaaaa\ccbqs0wh.s GNU Pascal version 2.95.2 19991024 (release) (djgpp) compiled by GNU C version 2.95.2 19991024 (release). c:/djgpp/bin/as.exe -o c:/djgpp/tmp/RHcaaaaa\ccbqs0wh1.o c:/djgpp/tmp/RHcaaaaa\ccbqs0wh.s c:/djgpp/lib/gcc-lib/djgpp/2.952/collect2.exe -o taste.exe c:/djgpp/lib/crt0.o -Lc:/djgpp/lib -Lc:/djgpp/contrib/grx232/lib/dj2 -Lc:/djgpp/lib/gcc-lib/djgpp/2.952 -Lc:/djgpp/bin -Lc:/djgpp/lib c:/djgpp/tmp/RHcaaaaa\ccbqs0wh1.o -lgrx20 -lgpc -lm -lgcc -lc -lgcc -Tdjgpp.djl c:/djgpp/tmp/RHcaaaaa\ccbqs0wh1.o(.text+0x9cb):taste.pas: undefined reference to `init_Grx20' collect2: ld returned 1 exit status Some comments on this: Why am I still getting an "undefined reference to init_Grx20, when I am linking in libgrx20.a? What more can I do about it? How can I remove the directories flagged with [**] above from the include list, seeing as they don't exist? How can I remove a duplicate directory (marked [*2] above)? Output from within RHIDE is essentially identical, with a few slightly different compiler options. The same result and error, though. On a more positive note, I have succeeded in compiling grx20.pas, so now I have a $DJDIR$/bin/grx20.o file. Finally, I've started playing with some of my .pas files from an older version of gpc. Several contain the following, because I need to be particular about data types (in one program, I need a roughly 128MB 3D array of byte, so I can't afford to use 2-byte integers instead!): Type shortint = __byte__ integer; byte = __unsigned__ shortint; int16 = __short__ integer; word = __unsigned__ int16; UI = __unsigned__ integer; {32-bit unsigned integer for MT} LI = __long__ integer; {64-bit integer for statistics} Quad = __long__ real; The compiler complains about this: identifiers should not start with an underscore, should not end with an underscore, and should not have two consecutive underscores in them. But this is what I've done ever since I started using gpc, and it is what the example programs did! Has the syntas changed? Also, why is "real" no longer accepted as a type? thanks in advance, Toby

3 2

packed types and comparison operators bugs
by Couperin 01 Aug '00

01 Aug '00

I get false results when I use comparison operators with Packed subrange types. For example if X is of a packed user defined type, and is equal to 64, then "X > 63" yields false ! And when I try to solve it, the packed subrange type I define is no longer really packed ! Here is a program to illustrate this problem : (The bug appears if X > 63) --------------------------------------------------------------------------- Program Bug01; Const XValueMax = 125; Type T_XValue = Packed 0..XValueMax; Var X : T_XValue; Begin Writeln; Write('X ? '); Readln(X); Writeln('X = ',X); Writeln('X > 63 : ',X > 63); {BUG} Writeln('X < 63 : ',X < 63); {BUG} Writeln('X = 63 : ',X = 63); Writeln('X >= 63 : ',X >= 63); {BUG} Writeln('X <= 63 : ',X <= 63); {BUG} Writeln('X <> 63 : ',X <> 63); {BUG} Writeln('Real(X) > 63 : ',Real(X) > 63); Writeln('Real(X) < 63 : ',Real(X) < 63); Writeln('Real(X) = 63 : ',Real(X) = 63); Writeln('Real(X) >= 63 : ',Real(X) >= 63); Writeln('Real(X) <= 63 : ',Real(X) <= 63); Writeln('Real(X) <> 63 : ',Real(X) <> 63); Writeln('X > Real(63) : ',X > Real(63)); Writeln('X < Real(63) : ',X < Real(63)); Writeln('X = Real(63) : ',X = Real(63)); Writeln('X >= Real(63) : ',X >= Real(63)); Writeln('X <= Real(63) : ',X <= Real(63)); Writeln('X <> Real(63) : ',X <> Real(63)); Writeln('Integer(X) > 63 : ',Integer(X) > 63); {BUG} Writeln('X > Integer(63) : ',X > Integer(63)); {BUG} End. --------------------------------------------------------------------------- Here is the surprising output if I enter the value "64" : X ? 64 X = 64 X > 63 : False X < 63 : False X = 63 : False X >= 63 : True X <= 63 : True X <> 63 : True Real(X) > 63 : True Real(X) < 63 : False Real(X) = 63 : False Real(X) >= 63 : True Real(X) <= 63 : False Real(X) <> 63 : True X > Real(63) : True X < Real(63) : False X = Real(63) : False X >= Real(63) : True X <= Real(63) : False X <> Real(63) : True Integer(X) > 63 : False X > Integer(63) : False The difference between: "Integer(X) > 63 : False" and "Real(X) > 63 : True" is really surprising. There is another bug. If I define : ---------- Const XValueMax :Byte = 125; Type T_XValue = Packed 0..XValueMax; ---------- or ---------- Const XValueMax = 125; Type T_XValue = 0..XValueMax; ---------- then the results are good but "T_XValue" is now the 32 bits Integer type ! You can give to X a very large value (and a negative one if compiled with an older version of GPC). (Unsigned integer if compiled with "gpc version 20000718, based on 2.95.2 19991024 (release)" ; signed integer when compiled with "gpc version 19990503, based on gcc-2.8.1") I suppose it is a known bug ["There are some bugs with mathematical functions." (more details in the bugs list would be helpful)] and maybe it's related to the following one : "Files of integer subranges that would fit in a byte do not; instead they are handled as files of integer." But I read no details about this problem in the documentation. What do you think of it ? Hope this helps -- "Couperin"

3 3

gpc20000727 compiles ok on djgpp and cygwin32
by Joachim Falk 01 Aug '00

01 Aug '00

Success the latest gpc20000727 compiles ok for both djgpp and my cygwin installation. Yup :-) Joachim Falk

1 0

Re: packed types and comparison operators bugs
by Couperin 31 Jul '00

31 Jul '00

Maurice Lombardi wrote : >> I can't compile this little program : >> -------------------------------------------- >> Program Bug05; >> Const >> XValMax : Byte = 125; >> Type >> T_XVal = Packed 0..XValMax; >> Var >> X : T_XVal = 64; >> Begin >> End. >> -------------------------------------------- >> Here is the output : >> >> Reading specs from c:/djgpp/lib/gcc-lib/djgpp/2.952/specs >> gpc version 20000727, based on 2.95.2 19991024 (release) >> [...] >> Bug05.pas:8: constant out of range >??? For me it works ??? >I have the same version of the compiler and djgpp I don't understand what happened earlier today : now it compiles without problems. A possible explanation (?) : I write my programs under Windows, in a text editor, I have a lot of programs opened at the same time, and I run GPC in a DOS window : maybe the source wasn't fully saved... (but I made several tries...) He also wrote : > I suppose that you have indeed found a bug. > To understand what is going on I have added a declaration > > var Y: byte absolute X; > > which enables to examine the binary contents of X. > It is the same (at least for x=64) > and all tests work as expected if you replace X by Y > > ??? I made another attempt : I wrote X into a File [ XFile : File Of T_XValue; ] : there is no problem, it wrote a byte with value 64 (40h). But I tried to read this value back into a program [ Read(XFile,X); ], the output is always the same [ 64 < 63 :-( ]. -- "Couperin" Unrelated P.S. Great thanks for your work on GRX. I downloaded it and installed it : everything is fine.

1 0

RE: GRX and gpc
by Mason Ip 27 Jul '00

27 Jul '00

OK, Maurice, my apology; I didn't clean up the old objects before I rebuild the lib. After a clean rebuild of libgrx20X.a, those grx sample app's ( blt_test, modetest, etc) were built OK and run OK. I just ignore my (still) failure to build the dynamic lib. Thank you so much > ---------- > From: Mason Ip > Sent: Thursday, July 27, 2000 11:40 AM > To: 'Maurice Lombardi' > Subject: RE: GRX and gpc > > OK, I put INCLUDE_GPC_SUPPORT=y into makedefs.gnu and rebuilt the > libraries. > The static lib was built OK, the dynamic lib couldn't be built with > numerous un-resolved symbols like these. > > _gr_selectmode 0x930 vdrivers/vd_xwin.o > _gr_selectmode 0x9d4 vdrivers/vd_xwin.o > _XGrWindow 0x4 vdrivers/vd_xwin.o > _XGrWindow 0x8 vdrivers/vd_xwin.o > > Anyway, put the static lib to my gcc lib and used the static lib to buid > those examples, as in: > gpc --automake -g -o blt_test blt_test.pas /opt/gcc-2.95.2/lib/libgrx20X.a > -lX11 > > They still all dumped cores. > > grx-2.3.2/pascal> blt_test > Segmentation Fault (core dumped) > > Have you tried on Sun Sparc? > > ---------- > From: Maurice Lombardi[SMTP:Maurice.Lombardi@ujf-grenoble.fr] > Sent: Thursday, July 27, 2000 10:47 AM > To: Mason Ip > Subject: Re: GRX and gpc > > Mason Ip a Ã©crit : > > > > I used makefile.x11 instead; it had the flag turned on already. > > > > grx-2.3.2> grep INCLUDE_GPC * > > makedefs.gnu:INCLUDE_GPC_SUPPORT=n > > makefile.dj2:ifeq ($(INCLUDE_GPC_SUPPORT),y) > > makefile.dj2:ifeq ($(INCLUDE_GPC_SUPPORT),y) > > makefile.lnx:ifeq ($(INCLUDE_GPC_SUPPORT),y) > > makefile.lnx:ifeq ($(INCLUDE_GPC_SUPPORT),y) > > makefile.x11:ifeq ($(INCLUDE_GPC_SUPPORT),y) > > makefile.x11:ifeq ($(INCLUDE_GPC_SUPPORT),y) > > No the test ifeq in makefile.x11 checks the value of > INCLUDE_GPC_SUPPORT to make a decision. > Since it is set to n (it is only set in makefefs.gnu), it decides > not to include the gpc support. And this cause > problems because two files gpc_init and gpc_test (contained in > grx232/src/bgi) are not compiled / included in the > library libgrx20 > > Hope this helps > > Maurice > >

1 0

closer
by Robert P. Ewing 27 Jul '00

27 Jul '00

Hello, all Thanks for the input. I'm getting very close now. I can compile taste.pas at the command line, but not within RHIDE. At the command line, I give gpc --automake -v -o taste.exe taste.pas -lgrx20 and it works fine. Within RHIDE, I have set options/libraries #0 to [x] grx20, and also [x] Standard Libraries. The message window reads: Compiling c:/djgpp/contrib/grx232/pascal/taste.pas Ignoring Automake options '-I../contrib/grx232/include'; (Using automake options '-L../contrib/grx232/lib/dj2 -I../contrib/grx232/include') taste.pas: undefined reference to Init_grx20 ld returned 1 exit status There were some errors How can I alter RHIDE to give me the full output (-v) on the message screen? That would give me more to work with. Why isn't RHIDE doing as well as the command line? What interfering message is creeping in to spoil the compilation? Or what options do I need to set that I haven't? I checked my djgpp.env file against Maurice's, and except for his name, ours are (and were) identical. An aside for those (!) win9x experts out there: why is the PATH command in the autoexec.bat file ignored? I set path c:\djgpp;c:\djgpp\bin, but when I open a DOS shell and ask for the path, it is c:\; c:\windows; c:\windows\command. (yes, I can feel linux in my future, but not at work :-( ) Toby

2 1

fuller output
by Robert P. Ewing 27 Jul '00

27 Jul '00

Hello, all. Using bash, I can capture the full output :-) I think bash and I are going to be friends. Toby Reading specs from c:/gpc/lib/gcc-lib/djgpp/2.952/specs gpc version 20000725, based on 2.95.2 19991024 (release) c:/gpc/lib/gcc-lib/djgpp/2.952/gpcpp.exe -lang-pascal -v -famtmpfile=c:/gpc/tmp\ccaan0li -fdelphi-comments -D__GNU_PASCAL__ -undef -D__GNUC__=2 -D__GNUC_MINOR__=95 -D__GPC__=2 -D__GPC_MINOR__=0 -D__GPC_RELEASE__=20000725 -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:/gpc/lib/../include/sys/version.h -remap taste.pas c:/gpc/tmp\ccban0li.i GNU Pascal Compiler PreProcessor version 2.95.2 19991024 (release) (80386, BSD syntax) #include "..." search starts here: #include <...> search starts here: c:/gpc/lang/pascal c:/gpcinclude c:/gpc/contrib/grx20/include /usr/local/include JDIR/i586-pc-msdosdjgpp/include $DJDIR/lib/gcc-lib/djgpp/2.952/include $DJDIR/include End of search list. c:/gpc/lib/gcc-lib/djgpp/2.952/gpc1.exe c:/gpc/tmp\ccban0li.i -quiet -dumpbase taste.pas -version -famtmpfile=c:/gpc/tmp\ccaan0li -o c:/gpc/tmp\ccban0li.s GNU Pascal version 2.95.2 19991024 (release) (djgpp) compiled by GNU C version 2.95.2 19991024 (release). c:/gpc/bin/as.exe -o c:/gpc/tmp\ccban0li1.o c:/gpc/tmp\ccban0li.s c:/gpc/lib/gcc-lib/djgpp/2.952/collect2.exe -o taste.exe c:/gpc/lib/crt0.o -Lc:/gpc/lib -Lc:/gpc/lib/gcc-lib/djgpp/2.952 -Lc:/gpc/bin -Lc:/gpc/lib c:/gpc/tmp\ccban0li1.o -lgpc -lm -lgcc -lc -lgcc -Tdjgpp.djl c:/gpc/tmp\ccban0li1.o(.text+0x839):taste.pas: undefined reference to `GrBlack' c:/gpc/tmp\ccban0li1.o(.text+0x841):taste.pas: undefined reference to `GrWhite' c:/gpc/tmp\ccban0li1.o(.text+0x875):taste.pas: undefined reference to `GrTextXY' c:/gpc/tmp\ccban0li1.o(.text+0x904):taste.pas: undefined reference to `GrSetMode' c:/gpc/tmp\ccban0li1.o(.text+0x916):taste.pas: undefined reference to `GrBlack' c:/gpc/tmp\ccban0li1.o(.text+0x91e):taste.pas: undefined reference to `GrWhite' c:/gpc/tmp\ccban0li1.o(.text+0x92f):taste.pas: undefined reference to `GrTextXY' c:/gpc/tmp\ccban0li1.o(.text+0x937):taste.pas: undefined reference to `GrMouseDetect' c:/gpc/tmp\ccban0li1.o(.text+0x947):taste.pas: undefined reference to `GrMouseEventMode' c:/gpc/tmp\ccban0li1.o(.text+0x94f):taste.pas: undefined reference to `GrMouseInit' c:/gpc/tmp\ccban0li1.o(.text+0x954):taste.pas: undefined reference to `GrMouseDisplayCursor' c:/gpc/tmp\ccban0li1.o(.text+0x988):taste.pas: undefined reference to `GrMouseGetEvent' c:/gpc/tmp\ccban0li1.o(.text+0x9cb):taste.pas: undefined reference to `init_Grx20' collect2: ld returned 1 exit status

3 4

RE: GRX and gpc
by Mason Ip 26 Jul '00

26 Jul '00

OK, thanks Peter, they all compiled OK. But .... they all dump cores :( grx-2.3.2/pascal> gpc -v Reading specs from /opt/gcc-2.95.2/lib/gcc-lib/sparc-sun-solaris2.8/2.95.2/specs gpc version 20000725, based on 2.95.2 19991024 (release) grx-2.3.2/pascal> modetest Segmentation Fault (core dumped) grx-2.3.2/pascal> vir_test Segmentation Fault (core dumped) grx-2.3.2/pascal> blt_test Segmentation Fault (core dumped) grx-2.3.2/pascal> taste Segmentation Fault (core dumped) grx-2.3.2/pascal> txt_test Segmentation Fault (core dumped) == They were OK when I used an earlier version of gpc. gpc -v Reading specs from /opt/GCC2951/lib/gcc-lib/sparc-sun-solaris2.7/2.95.1/specs gpc version 19991030, based on 2.95.1 19990816 (release) Any clue? -----Original Message----- From: Peter Gerwinski [mailto:peter@gerwinski.de] Sent: Wednesday, July 26, 2000 3:41 PM To: 'gpc(a)gnu.de' Subject: Re: GRX and gpc Mason Ip wrote: > > grx-2.3.2/pascal% gpc -o blt_test blt_test.pas --automake (Or at least --autolink, if you have compiled `grx.pas' manually.) ((Or you can mention `grx.o' and `-lgrx' explicitly on the command line.)) Hope this helps,

1 0

GRX and gpc
by Mason Ip 26 Jul '00

26 Jul '00

I had difficulties compiling the pascal demo files under grx-2.3.2. grx-2.3.2/pascal% gpc -v Reading specs from /opt/gcc-2.95.2/lib/gcc-lib/sparc-sun-solaris2.8/2.95.2/specs gpc version 20000725, based on 2.95.2 19991024 (release) grx-2.3.2/pascal% ls *pas blt_test.pas modetest.pas txt_test.pas grx20.pas taste.pas vir_test.pas grx-2.3.2/pascal% gpc -o blt_test blt_test.pas /opt/gcc-2.95.2/lib/libgrx20X.a -lX11 Undefined first referenced symbol in file init_Grx20 /var/tmp/cc7kaWFm1.o ld: fatal: Symbol referencing errors. No output written to blt_test collect2: ld returned 1 exit status grx-2.3.2/pascal% nm /opt/gcc-2.95.2/lib/libgrx20X.a | grep init_Grx20 <-- this return nothing! Basically, non of {blt_test, modest, txt_test, taste, vir_test} were built. I believe that grx-2.3.2 is still not working with the latest gpc :( > From: Maurice Lombardi [Maurice.Lombardi(a)ujf-grenoble.fr] > Sent: Wednesday, July 26, 2000 6:55 AM > To: gpc > Subject: GRX and gpc > Hi all, > I have uploaded to agnes slightly corrected versions of grx-2.3.2 > ftp://agnes.dida.physik.uni-essen.de/home/maurice/grx-2.3.2.tar.gz for unix

2 1

progress
by Robert P. Ewing 26 Jul '00

26 Jul '00

Hello, all. Maurice wrote: > Wosh what a mess ! I agree. I started over, following his directions, and made a completely new install in a new directory. Much better. New all the way around, and the grx package compiled just fine. Thank you, Maurice, for putting together a nice improved grx232, also. The makefile worked beautifully. I can compile programs that don't use the grx, like a basic "hello, world". But when I try to compile something that uses grx, I don't succeed. From the command line (and sorry, Frank, but redir simply doesn't work on my system: it creates the file, and puts nothing into it), error messages fly past, telling me I have undefined references to 'GrWhite' and other things defined in grx20. (I issued gpc --automake -o taste.exe taste.pas) >From within RHIDE, the message window shows: compiling: c:\djgpp\contrib\grx232\pascal\taste.pas ignoring Automake options `'; taste.pas: undefined reference to 'Init_Grx20' ld returned 1 exit status There were some errors So apparently the compiler isn't finding the necessary grx20 files? But my djgpp.env iss full of them (appended below). Sorry to give you such a moving target, but I do think I'm quite a bit closer than before. Toby --------------------------------------------------- djgpp.env: #= Don't edit this line unless you move djgpp.env outside #= of the djgpp installation directory. If you do move #= it, set DJDIR to the directory you installed DJGPP in. #= DJDIR=%:/>DJGPP% +USER=dosuser +GROUP=root +TMPDIR=%DJDIR%/tmp +EMU387=%DJDIR%/bin/emu387.dxe +LFN=y +TEXMFMAIN=%DJDIR%/share/texmf +GO32STUB=%DJDIR%/bin/stubify.exe [bison] BISON_HAIRY=%DJDIR%/lib/bison.hai BISON_SIMPLE=%DJDIR%/lib/bison.sim [cpp] CPLUS_INCLUDE_PATH=%/>;CPLUS_INCLUDE_PATH%%DJDIR%/lang/cxx;%DJDIR%/include;%DJDIR%/contrib/grx232/include C_INCLUDE_PATH=%/>;C_INCLUDE_PATH%%DJDIR%/include;%DJDIR%/contrib/grx232/include OBJCPLUS_INCLUDE_PATH=%/>;OBJCPLUS_INCLUDE_PATH%%DJDIR%/include;%DJDIR%/lang/objc OBJC_INCLUDE_PATH=%/>;OBJC_INCLUDE_PATH%%DJDIR%/include;%DJDIR%/lang/objc [gcc] LIBRARY_PATH=%/>;LIBRARY_PATH%%DJDIR%/lib;%DJDIR%/contrib/grx232/lib/dj2 [gpcpp] C_INCLUDE_PATH=%/>;C_INCLUDE_PATH%%DJDIR%/LANG/PASCAL;%DJDIR%/include;%DJDIR%/CONTRIB/GRX232/include [gpc] COMPILER_PATH=%/>;COMPILER_PATH%%DJDIR%/bin LIBRARY_PATH=%/>;LIBRARY_PATH%%DJDIR%/lib;%DJDIR%/contrib/grx232/lib/dj2 [info] INFOPATH=%/>;INFOPATH%%DJDIR%/info;%DJDIR%/gnu/emacs/info +INFO_COLORS=0x1f.0x31 +INFO_LINES=40 [emacs] INFOPATH=%/>;INFOPATH%%DJDIR%/info;%DJDIR%/gnu/emacs/info [less] +LESSBINFMT=*k<%%X> +LESSCHARDEF=8bcccbcc12bc5b95.b127.b LESS=-h5$y5$Dd2.0$Du14.0$Ds4.7$Dk9.0$%LESS% +LESSSEPARATOR=/ [ispell] +ISPELL_HOME=%DJDIR%/lib +ISPELL_DICTDIR=%DJDIR%/lib +ISPELL_COLORS=0x1e.0x74 +LINES=40 [locate] +LOCATE_PATH=%DJDIR%/lib/locatedb.dat [ls] +LS_COLORS=no=00:fi=00:di=36:lb=37;07:cd=40;33;01:ex=32:*.cmd=32:*.tar=01;31:*.tgz=01;31:*.arj=01;31:*.taz=01;31:*.lzh=01;31:*.zip=01;31:*.z=01;31:*.Z=01;31:*.gz=01;31:*.deb=01;31:*.jpg=01;34:*.gif=01;34:*.bmp=01;34:*.ppm=01;34:*.tga=01;34:*.xbm=01;34:*.xpm=01;34:*.tif=01;34:*.mpg=01;37:*.avi=01;37:*.gl=01;37:*.dl=01;37:*~=08:*.bak=08: [dir] +LS_COLORS=no=00:fi=00:di=36:lb=37;07:cd=40;33;01:ex=32:*.cmd=32:*.tar=01;31:*.tgz=01;31:*.arj=01;31:*.taz=01;31:*.lzh=01;31:*.zip=01;31:*.z=01;31:*.Z=01;31:*.gz=01;31:*.deb=01;31:*.jpg=01;34:*.gif=01;34:*.bmp=01;34:*.ppm=01;34:*.tga=01;34:*.xbm=01;34:*.xpm=01;34:*.tif=01;34:*.mpg=01;37:*.avi=01;37:*.gl=01;37:*.dl=01;37:*~=08:*.bak=08: [vdir] +LS_COLORS=no=00:fi=00:di=36:lb=37;07:cd=40;33;01:ex=32:*.cmd=32:*.tar=01;31:*.tgz=01;31:*.arj=01;31:*.taz=01;31:*.lzh=01;31:*.zip=01;31:*.z=01;31:*.Z=01;31:*.gz=01;31:*.deb=01;31:*.jpg=01;34:*.gif=01;34:*.bmp=01;34:*.ppm=01;34:*.tga=01;34:*.xbm=01;34:*.xpm=01;34:*.tif=01;34:*.mpg=01;37:*.avi=01;37:*.gl=01;37:*.dl=01;37:*~=08:*.bak=08: [enscript] ENSCRIPT_LIBRARY=%DJDIR%/share/enscript [bash] PATH=%/>PATH% +CONFIG_SITE=%DJDIR%/share/config.site [sh] PATH=%/>PATH% +CONFIG_SITE=%DJDIR%/share/config.site [groff] +GROFF_TMAC_PATH=.;%DJDIR%/share/groff/tmac +GROFF_TYPESETTER=ascii +GROFF_FONT_PATH=.;%DJDIR%/share/groff/font [eqn] +GROFF_TMAC_PATH=.;%DJDIR%/share/groff/tmac +GROFF_TYPESETTER=ascii [grodvi] +GROFF_FONT_PATH=.;%DJDIR%/share/groff/font [grolj4] +GROFF_FONT_PATH=.;%DJDIR%/share/groff/font [grops] +GROFF_FONT_PATH=.;%DJDIR%/share/groff/font +GROFF_TMPDIR=%DJDIR%/tmp [grotty] +GROFF_FONT_PATH=.;%DJDIR%/share/groff/font [indxbib] +GROFF_EIGN=%DJDIR%/share/groff/eign [lkbib] +REFER=%DJDIR%/share/Ind [refer] +REFER=%DJDIR%/share/Ind +GROFF_TMPDIR=%TMPDIR% [troff] +GROFF_TMAC_PATH=.;%DJDIR%/share/groff/tmac +GROFF_TYPESETTER=ascii +GROFF_FONT_PATH=.;%DJDIR%/share/groff/font [gawk] +AWKPATH=.;%DJDIR%/share/awk [awk] +AWKPATH=.;%DJDIR%/share/awk [man] MANPATH=%/>;MANPATH%%DJDIR%/man;%DJDIR%/info +PAGER=%DJDIR%/bin/less.exe [rhide] RHIDE_TYPED_LIBS_DJGPP.cc=stdcxx RHIDE_TYPED_LIBS_DJGPP.cxx=stdcxx RHIDE_TYPED_LIBS_DJGPP.cpp=stdcxx RHIDE_TYPED_LIBS_DJGPP.f=g2c m [grep] +GREP_OPTIONS=--directories=skip [fgrep] +GREP_OPTIONS=--directories=skip [egrep] +GREP_OPTIONS=--directories=skip

2 1

Re: build problem with cygwin and gpc20000724 and before
by Frank Heckenbach 26 Jul '00

26 Jul '00

Prof Abimbola Olowofoyeku wrote: > On 25 Jul 00, at 17:44, Frank Heckenbach wrote: > > > > On 25 Jul 00, at 0:02, Joachim Falk wrote: > > > > > > > Ah yes i have forgotten to report another problem with rts.{h,c} in > > > > rts.h if HAVE_STRSIGNAL is defined it does declare the function char > > > > *strsignal( int ) witch conflicts with the strsignal definition in > > > > the cygwin include file string.h const char *_EXFUN(strsignal, (int > > > > __signo)); => compiler abort > > > > > > Funny - I have never experienced this problem, and I have been > > > compiling GPC under Cygwin since last summer. > > > > Perhaps you have a slightly different version of the header (the > > only difference I think is the `const', and this might not be there in > > other versions)... > > I have (I think) the latest (or at least one of the latest) versions of the > header (dated 15 May 2000) - and the declaration seems to be just > the same as the one reported: > char *_EXFUN(strsignal, (int __signo)); There's no `const' there which was the only difference to the other declaration and was causing the problem. > Also, Frank, do you think that I should put 'os-hacks.h' on agnes for > those who want to compile GPC under Windows? I think so (also libos-hacks if there's anything going into it now). 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

2 3

installation difficulties
by Robert P. Ewing 26 Jul '00

26 Jul '00

Hello, all. Following Maurice's suggestion, I acquired the 2.95.2 build, downloading from agnes' /home/maurice directory. I also put in the new grx23s stuff, reconciling directories by putting ../contrib/grx232 subdirectory contents into the respective ../ subdirectories, always updating. Now when I go to c:/gpc and issue gpc --automake -v -o diffus.exe diffus/diffus12.pas I get the (vast) command line, some information on include directories, then gpcpp.exe: ../include/sys/version.h: no such file or directory (ENOENT) In fact, there is no ../include/sysdirectory at all, nor is there a version.h file on my hard drive. I must point out that I don't have djgpp at all: I am programming only in Pascal, not in C. Do I need to grab some other files that gpc is assuming it can access from gcc? many thanks, Toby

2 4

Re: installation difficulties
by Frank Heckenbach 26 Jul '00

26 Jul '00

Robert P. Ewing wrote: > Other information available upon request, > though it would help if I knew how to redirect StdOut to a file in DOS - > so far my attempts aren't working. StdOut can be redirected simply with `>', but I suppose you mean StdErr. If you're using bash (available for DJGPP), you can do it with `2>' (StdErr only) or `&>' (StdOut and StdErr). Otherwise, you can use the `redir' utility (part of DJGPP) like this: # Redirect StdErr to foo redir -e foo command args # Redirect StdOut and StdErr to foo redir -e foo -oe command foo 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

How to generate correct Makefile for pascal installation?
by George L. Yang 26 Jul '00

26 Jul '00

Dear All: I tried to install pascal on my Solaris computer. I followed the INSTALL under subdirectory p however I got an error message which said there was no rule to make pascal. I hope some one will help me to fix my problem. Thanks in advance. George Yang

2 1

GRX and gpc
by Maurice Lombardi 26 Jul '00

26 Jul '00

Hi all, I have uploaded to agnes slightly corrected versions of grx-2.3.2 ftp://agnes.dida.physik.uni-essen.de/home/maurice/grx-2.3.2.tar.gz for unix ftp://agnes.dida.physik.uni-essen.de/home/maurice/grx232s.zip for djgpp With respect to the official grx-2.3.1 contained elsewhere (gnu-pascal/libs) on agnes this tentative version contains only corrections to the gpc interface, grx20.pas and bcc2grx.pas and some pascal test programs, and includes makefiles to build pascal test programs simultaneously with C test programs. Simply do not forget to edit makedefs.gnu to have INCLUDE_GPC_SUPPORT=y (it is n by defaults). This means that there should be no problem to use the versions in the gnu-pascal/libs/binary directory which contain only the C interface. In this corrected version I have provided for the new asmname syntax (In fact I have checked that it compiles/executes both with the old and new asmname syntax), corrected for a couple of errors in grx20.pas (^ forgotten in pointer declarations), and for an error in the manifest file (djgpp version) which did not enable to uninstall properly. 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

installation difficulties
by Robert P. Ewing 26 Jul '00

26 Jul '00

Hi, all. I'm trying to install gpc on a new machine. I've used it for years, but somehow this new installation is giving me fits. So I've got some nice GPC programs, but no way to modify them - and deadlines creeping up! I'd like to work under PENG, but for now I'm just working on the command line. But it isn't going so well: When I type gpc --automake -g -v diffus12.pas, I get a nice screenful of messages, then eventually gpc1.exe reports: module 'grx20' could not be compiled. but when I try to compile grx20.pas independently, I get a different message, this time from ld.exe: cannot open linker script file djgpp.djl: no such file or directory (ENOENT) and sure enough, in the specs file, it shows that ld should get a string -Tdjgpp.djl, but there is no such file (djgpp.djl) on my computer, or in the manifest lists, or indeed anywhere I could find on the entire internet! So obviously a lot of pieces are working well, but some not. I am using GPC 2.8.1, just downloaded a month ago from the GPC home, and compiled with GCC 2.8.1. Other information available upon request, though it would help if I knew how to redirect StdOut to a file in DOS - so far my attempts aren't working. I'd appreciate any help... Toby

2 1

Delphi-compatible SYSUTILS unit (beta) released!
by Prof Abimbola Olowofoyeku 25 Jul '00

25 Jul '00

Hi all I have just released the first public beta of a Delphi-compatible "sysutils" unit to agnes. It has been tested under Cygwin, Mingw, Linux (Mandrake 7.0), and Solaris 7. As far as I know, there are no general portability or endian issues - but there may well be bugs. Please download the file: ftp://agnes.dida.physik.uni-essen.de/home/chief/sysutils-20000725.zip The package contains a test program, which you can try out. The program's output is fairly self explanatory, and you can see from it what has succeeded/failed, without looking at the sources in most cases. Please send all bug reports/fixes to me. Please note that this is not a complete implementation of the sysutils unit, but it is a fairly comprehensive port. Some things (e.g., exceptions) cannot be implemented until some new features (e.g., classes) are added to GPC. Others have not been implemented, either because there is no time, or because I simply am incapable of implementing them. Frank has helped with many of the more difficult routines that have already been implemented. If anybody else wants to help, please feel free to do so! Please let me have all your success (or otherwise) stories! I am particularly interested to know the OS platforms that the unit compiles and works correctly under. Thanks. Watch this space for portable unzip and Huffman compression libraries! Best regards, The Chief -------- Prof. Abimbola A. Olowofoyeku (The African Chief) Author of: Chief's Installer Pro v5.22.1 for Win32 http://www.bigfoot.com/~African_Chief/chief32.htm Email: African_Chief(a)bigfoot.com

1 0

Re: build problem with cygwin and gpc20000724 and before
by Frank Heckenbach 25 Jul '00

25 Jul '00

Prof Abimbola A Olowofoyeku wrote: > On 25 Jul 00, at 0:02, Joachim Falk wrote: > > > Ah yes i have forgotten to report another problem with rts.{h,c} > > in rts.h if HAVE_STRSIGNAL is defined it does declare > > the function char *strsignal( int ) witch conflicts with > > the strsignal definition in the cygwin include file string.h > > const char *_EXFUN(strsignal, (int __signo)); => compiler abort > > Funny - I have never experienced this problem, and I have been > compiling GPC under Cygwin since last summer. Perhaps you have a slightly different version of the header (the only difference I think is the `const', and this might not be there in other versions)... > > If we have defined HAVE_STRSIGNAL does it mean we have a > > strsignal function defined in string.h or does it only mean > > the lib has one ? > > AFAICS it means that it is defined in one of the standard headers. It means the lib has one. But the new test STRSIGNAL_DECLARED means that it's declared (in string.h or signal.h). 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

2 1

Re: Bug-report
by Frank Heckenbach 25 Jul '00

25 Jul '00

Christian Neumann wrote: > I'm running Linux 2.2.13 out of the Suse distribution. After recompilng the > gcc > with pascal options (gcc.rpm.source packages of the 6.4 dist). compiler > version > is 2.95.2 19991024 (release). > > The following file produce errors in the provided test-suite: > > TEST constovfl.pas: failed: failed: 0 > TEST fjf149.pas: Failed: 64 > TEST fjf83.pas: failed: Failed > /tmp/ccqm2gyD.s: Assembler messages: > /tmp/ccqm2gyD.s:110: Error: suffix or operands invalid for `mov' > TEST goto4.pas: failed > > I hope this helps. Otherwise the compiler works just fine. You might want to try the latest releases (see http://home.pages.de/~GNU-Pascal/) where a number of bugs have been fixed. However, the bugs mentioned above are relatively minor and won't affect most programs (unless you want to do an inter-procedural goto or such things, in which case you'll need the latest release). 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: Compiling GCC under Irix 6.5
by Frank Heckenbach 25 Jul '00

25 Jul '00

Jean-Marc Ottorini wrote: > I am still trying to build the gpc-20000719 / gcc-2.95.2 suite on > top of Irix 6.5. > > Following Frank Heckenbach advice to replace BYTES_BIG_ENDIAN by 0 > in line 64 of stor-layout.c, the compilation process has progressed > but is again stopped many steps further by the following error: > > -- > > /usr/people/ottorini/pascal/gcc-2.95.2/gcc/p/rts/string.pas:224: > Internal compiler error in `add_bound_info', at > gcc-2.95.2/gcc/dwarf2out.c:7376 > > Please submit a full bug report. > > See <URL:http://www.gnu.org/software/gcc/faq.html#bugreport> for instructions. > gmake[2]: *** [string.o] Error 1 > gmake[2]: Leaving directory `/usr/people/ottorini/pascal/gpc-build/gcc/p/rts' > gmake[1]: *** [pascal.rts] Error 2 > gmake[1]: Leaving directory `/usr/people/ottorini/pascal/gpc-build/gcc' > gmake: *** [all-gcc] Error 2 > ---- > > > Function `Memcompcase' reads: > > function MemCompCase (const s1, s2; Size : SizeType) : Boolean; > var > i : Integer; > a1 : array [1 .. Size] of Char absolute s1; > a2 : array [1 .. Size] of Char absolute s2; > begin > for i := 1 to Size do > if (a1 [i] <> a2 [i]) and (LoCase (a1 [i]) <> LoCase (a2 [i])) then > return False; > MemCompCase := True > end; > > > Personnally, I cannot see what is harmful here (the problem persists > after consistently replacing BYTES_BIG_ENDIAN by 0 in dwarf2out.c) I don't think you should've done that. What I meant was that the initialization of the variable set_words_big_endian doesn't matter, but the value of BYTES_BIG_ENDIAN elsewhere does matter, and might explain the problem described. Since it's not used as an initialization in dwarf2out.c, I don't suppose there are compiling problems when leaving BYTES_BIG_ENDIAN there. It's just the one place in stor-layout.c where it should be changed. 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

Which gpc version
by Ernst-Ludwig Bohnen 25 Jul '00

25 Jul '00

Hi, on ftp://agnes.dida.physik.uni-essen.de/gnu-pascal/alpha/ I found several brand new gpc versions, last one is 20000724. Questions to the gpc designers: 1) Which version is recommended to work with SuSe 6.x ? 2) Which version is planned to come with SuSe 7.0 on CD? Thank you in advance Ernst-Ludwig Bohnen

2 1

Re: Compiling GCC under Irix 6.5
by Jean-Marc Ottorini 25 Jul '00

25 Jul '00

I am still trying to build the gpc-20000719 / gcc-2.95.2 suite on top of Irix 6.5. Following Frank Heckenbach advice to replace BYTES_BIG_ENDIAN by 0 in line 64 of stor-layout.c, the compilation process has progressed but is again stopped many steps further by the following error: --- gmake[2]: Entering directory `/usr/people/ottorini/pascal/gpc-build/gcc/p/rts' ../.././xgpc -B../.././ -c -I. -W -Wall -Wpointer-arith \ -Wwrite-strings -Wmissing-prototypes -Wmissing-declarations \ -g -O2 -DRTS_RELEASE_STRING="'`cat \ /usr/people/ottorini/pascal/gcc-2.95.2/gcc/p/rts/rts-version`'" \ --unit-path=/usr/people/ottorini/pascal/gcc-2.95.2/gcc/p/rts \ --automake /usr/people/ottorini/pascal/gcc-2.95.2/gcc/p/rts/string.pas /usr/people/ottorini/pascal/gcc-2.95.2/gcc/p/rts/string.pas: In function `Memcompcase': /usr/people/ottorini/pascal/gcc-2.95.2/gcc/p/rts/string.pas:224: Internal compiler error in `add_bound_info', at gcc-2.95.2/gcc/dwarf2out.c:7376 Please submit a full bug report. See <URL:http://www.gnu.org/software/gcc/faq.html#bugreport> for instructions. gmake[2]: *** [string.o] Error 1 gmake[2]: Leaving directory `/usr/people/ottorini/pascal/gpc-build/gcc/p/rts' gmake[1]: *** [pascal.rts] Error 2 gmake[1]: Leaving directory `/usr/people/ottorini/pascal/gpc-build/gcc' gmake: *** [all-gcc] Error 2 ---- Function `Memcompcase' reads: function MemCompCase (const s1, s2; Size : SizeType) : Boolean; var i : Integer; a1 : array [1 .. Size] of Char absolute s1; a2 : array [1 .. Size] of Char absolute s2; begin for i := 1 to Size do if (a1 [i] <> a2 [i]) and (LoCase (a1 [i]) <> LoCase (a2 [i])) then return False; MemCompCase := True end; Personnally, I cannot see what is harmful here (the problem persists after consistently replacing BYTES_BIG_ENDIAN by 0 in dwarf2out.c) I would be grateful to know whether someone has faced this this problem and has got a workaround. Jean-Marc _________________________________________________________________ | Jean-Marc Ottorini (MailTo://ottorini@nancy.inra.fr) | | Institut National de la Recherche Agronomique - Centre de Nancy | | 54280 Champenoux | | FRANCE | | tel. [+33] 03 83 39 40 46 | | fax 03 83 39 40 34 | |_________________________________________________________________|

1 0

Bug-report
by Christian Neumann 25 Jul '00

25 Jul '00

Hi everyone. I'm running Linux 2.2.13 out of the Suse distribution. After recompilng the gcc with pascal options (gcc.rpm.source packages of the 6.4 dist). compiler version is 2.95.2 19991024 (release). The following file produce errors in the provided test-suite: TEST constovfl.pas: failed: failed: 0 TEST fjf149.pas: Failed: 64 TEST fjf83.pas: failed: Failed /tmp/ccqm2gyD.s: Assembler messages: /tmp/ccqm2gyD.s:110: Error: suffix or operands invalid for `mov' TEST goto4.pas: failed I hope this helps. Otherwise the compiler works just fine. sincerly Christian Neumann christian.neuann(a)nrw-online.de ________________________________________________________________________ Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com

1 0

build problem with cygwin and gpc20000724 and before
by Joachim Falk 25 Jul '00

25 Jul '00

Ah yes i have forgotten to report another problem with rts.{h,c} in rts.h if HAVE_STRSIGNAL is defined it does declare the function char *strsignal( int ) witch conflicts with the strsignal definition in the cygwin include file string.h const char *_EXFUN(strsignal, (int __signo)); => compiler abort If we have defined HAVE_STRSIGNAL does it mean we have a strsignal function defined in string.h or does it only mean the lib has one ? In any case you can put a #ifndef __CYGWIN__ around the strsignal definition in rts.h

2 1

Re: build problem with cygwin and gpc20000724 and before
by Frank Heckenbach 25 Jul '00

25 Jul '00

Joachim Falk wrote: > Ah yes i have forgotten to report another problem with rts.{h,c} > in rts.h if HAVE_STRSIGNAL is defined it does declare > the function char *strsignal( int ) witch conflicts with > the strsignal definition in the cygwin include file string.h > const char *_EXFUN(strsignal, (int __signo)); => compiler abort > If we have defined HAVE_STRSIGNAL does it mean we have a > strsignal function defined in string.h or does it only mean > the lib has one ? > In any case you can put a #ifndef __CYGWIN__ around the > strsignal definition in rts.h We don't use system checks because they are unportable, but rather autoconf checks for certain properties. I will add checks whether strsignal() (and a few other functions and variables) are declared. You might want to test if it works with them. 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: Compiling GCC under Irix 6.5
by Frank Heckenbach 24 Jul '00

24 Jul '00

Jean-Marc Ottorini wrote: > While trying to build the gpc-20000719 / gcc-2.95.2 suite on top of > Irix 6.5 (), the following command is issued by gmake: > > gcc -c -DIN_GCC -DGPC -g -O2 \ > -I. -I.. \ > -I../../../gcc-2.95.2/gcc/p \ > -I../../../gcc-2.95.2/gcc/p/.. \ > -I../../../gcc-2.95.2/gcc/p/../config \ > -I../../../gcc-2.95.2/gcc/p/../../include \ > ../../../gcc-2.95.2/gcc/p/../stor-layout.c > > > This command results in a compiling error: > > ../../../gcc-2.95.2/gcc/p/../stor-layout.c:64: initializer element is > not constant > > > Indeed, line 64 of stor-layout.c reads: > > int set_words_big_endian = BYTES_BIG_ENDIAN; /* @@@ Needn't be a constant! */ > > > Where is the truth ? I've talked with Peter about this problem, and it turned out that this variable is not really used currently. Until he'll fix the problem, you can just replace BYTES_BIG_ENDIAN by 0. 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: p/scripts/find-sed problem with djgpp and gpc20000723
by Frank Heckenbach 24 Jul '00

24 Jul '00

Maurice Lombardi wrote: > > I think the default DJGPP installation creates this directory > > because DJGPP's goal is to be as Unix compatible as possible, and > > the typical Unix script may assume /tmp to exist. > > Unfortunately no. But I had previously to compile a unix package which needed /tmp. > So I created it and never removed it afterwards. Oh right, what I meant was $DJDIR/tmp, not /tmp... 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: p/scripts/find-sed with djgpp; cygwin rts.c; problem building rts gpc
by Frank Heckenbach 24 Jul '00

24 Jul '00

Joachim Falk wrote: > the find-sed script assumes that the temp dir is /tmp witch isnt always > true under djgpp. > instead you should use the TMPDIR var witch is set in djgpp.env I'll change it (also in two other scripts, but those are not normally needed for building GPC). If TMPDIR isn't set, they'll default to /tmp -- or should they rather use /var/tmp? > The Problem is that the latest version of cygwin downloaded just 3 days > ago doesnt have MAP_FAILED in /usr/include/sys/mman.h > this prevents rts.c to compile > I dont know if this is a bug in the cygwin header files or in > gpc I don't know either, but it seems easy enough to change in GPC. Just to be sure: It does have mmap, but not MAP_FAILED? What does mmap return on failure? If it's either NULL or ((void *) -1), it should be alright after my change. If it's something else, let me know. > The problem is the `echo $CC | sed 's/gcc/gpc/'` in p/rts/Makefile.in > if $CC contains gcc in more than one position > patched attached > I havent tested this on the djgpp system but it schould work > i have test dos style path with the sed script and it works Good point, I'll apply your patch. (BTW, inside `[]' you don't need to quote the backslash. A single `\' is enough, but of course, `\\' also works, it's just redundant.) Thanks for the reports and fixes. 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

2 1

Re: p/scripts/find-sed problem with djgpp and gpc20000723
by Frank Heckenbach 24 Jul '00

24 Jul '00

Maurice Lombardi wrote: > Joachim Falk a Ã©crit : > > > > the find-sed script assumes that the temp dir is /tmp witch isnt always > > true under djgpp. > > instead you should use the TMPDIR var witch is set in djgpp.env > > Indeed I did not notice this because y have a /tmp dir in my tree I think the default DJGPP installation creates this directory because DJGPP's goal is to be as Unix compatible as possible, and the typical Unix script may assume /tmp to exist. But of course, it's safer to check $TMPDIR, and as I said, the GPC scripts do so now (and the GPC function GetTempDirectory has always done so as well). 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

2 1

Compiling GCC under Irix 6.5
by Jean-Marc Ottorini 24 Jul '00

24 Jul '00

While trying to build the gpc-20000719 / gcc-2.95.2 suite on top of Irix 6.5 (), the following command is issued by gmake: gcc -c -DIN_GCC -DGPC -g -O2 \ -I. -I.. \ -I../../../gcc-2.95.2/gcc/p \ -I../../../gcc-2.95.2/gcc/p/.. \ -I../../../gcc-2.95.2/gcc/p/../config \ -I../../../gcc-2.95.2/gcc/p/../../include \ ../../../gcc-2.95.2/gcc/p/../stor-layout.c This command results in a compiling error: ../../../gcc-2.95.2/gcc/p/../stor-layout.c:64: initializer element is not constant Indeed, line 64 of stor-layout.c reads: int set_words_big_endian = BYTES_BIG_ENDIAN; /* @@@ Needn't be a constant! */ Where is the truth ? I would be grateful to have a hint to possibly fix this problem Jean-Marc Ottorini _________________________________________________________________ | Jean-Marc Ottorini (MailTo://ottorini@nancy.inra.fr) | | Institut National de la Recherche Agronomique - Centre de Nancy | | 54280 Champenoux | | FRANCE | | tel. [+33] 03 83 39 40 46 | | fax 03 83 39 40 34 | |_________________________________________________________________|

1 0

Re: Copy function
by Frank Heckenbach 24 Jul '00

24 Jul '00

Couperin wrote: > After spending a long time to find why my program didn't work, I discovered > something which seems to be a bug. > > It's about the "Copy" function. > > Here is a test program : > > Program TestCopy; > > Var > Chaine : String(1296); {That's the value I need in my real program} > SousChaine : String(9); > LongueurChaine : MedWord; > IndexPosition : MedWord; > > Begin > Chaine := '1000000000'; > LongueurChaine := Length(Chaine); > > SousChaine := Copy(Chaine,LongueurChaine - 8,9); {Here is the problem} > Writeln('SousChaine : ',SousChaine); {Writes nothing !} > Writeln('Length(SousChaine) : ',Length(SousChaine)); {Writes 0} > > IndexPosition := LongueurChaine - 8; > SousChaine := Copy(Chaine,IndexPosition,9); {Now it works} > Writeln('SousChaine : ',SousChaine); {Writes 000000000} > Writeln('Length(SousChaine) : ',Length(SousChaine)); {Writes 9} > > {There is no problem with the "Delete" procedure :} > Delete(Chaine,LongueurChaine - 8,9); > Writeln('Chaine : ',Chaine) {Writes 1} > End. > > I can't understand why "Copy" works with "IndexPosition" as parameter, but not > with "LongueurChaine - 8". > Is there something wrong in : Copy(Chaine,LongueurChaine - 8,9) ? Or is this > really a bug ? > > I must confess I use GPC 2.8.1 (I need GRX and BGI2GRX that I failed to install > with the newest version). > If it's a bug, maybe it's solved now. In this case, excuse me for this somewhat > useless message. It is a GPC bug. In fact, it's a special case of the following bug listed on the To-Do list (most other cases have been fixed by now, but this one with `Copy' still exists in the latest GPC version): * integer parameters to built-in routines are not always converted to the right type (fjf349.pas) The difference between the two cases is that `IndexPosition' is of type MedWord which is probably the same size as Integer on your machine and therefore happens to work, while `LongueurChaine - 8' is internally of type LongInt (the smallest type that can hold a MedInt and negative values because the difference might be negative), and that triggers the bug. So, a work-around is to type cast the difference, i.e. `Integer (LongueurChaine - 8)'. 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

Copy function
by Couperin 24 Jul '00

24 Jul '00

After spending a long time to find why my program didn't work, I discovered something which seems to be a bug. It's about the "Copy" function. Here is a test program : Program TestCopy; Var Chaine : String(1296); {That's the value I need in my real program} SousChaine : String(9); LongueurChaine : MedWord; IndexPosition : MedWord; Begin Chaine := '1000000000'; LongueurChaine := Length(Chaine); SousChaine := Copy(Chaine,LongueurChaine - 8,9); {Here is the problem} Writeln('SousChaine : ',SousChaine); {Writes nothing !} Writeln('Length(SousChaine) : ',Length(SousChaine)); {Writes 0} IndexPosition := LongueurChaine - 8; SousChaine := Copy(Chaine,IndexPosition,9); {Now it works} Writeln('SousChaine : ',SousChaine); {Writes 000000000} Writeln('Length(SousChaine) : ',Length(SousChaine)); {Writes 9} {There is no problem with the "Delete" procedure :} Delete(Chaine,LongueurChaine - 8,9); Writeln('Chaine : ',Chaine) {Writes 1} End. I can't understand why "Copy" works with "IndexPosition" as parameter, but not with "LongueurChaine - 8". Is there something wrong in : Copy(Chaine,LongueurChaine - 8,9) ? Or is this really a bug ? I must confess I use GPC 2.8.1 (I need GRX and BGI2GRX that I failed to install with the newest version). If it's a bug, maybe it's solved now. In this case, excuse me for this somewhat useless message. -- "Couperin"

1 0

p/scripts/find-sed problem with djgpp and gpc20000723
by Joachim Falk 24 Jul '00

24 Jul '00

the find-sed script assumes that the temp dir is /tmp witch isnt always true under djgpp. instead you should use the TMPDIR var witch is set in djgpp.env MfG Joachim Falk

2 1

problem building rts gpc for gpc20000723
by Joachim Falk 23 Jul '00

23 Jul '00

The problem is the `echo $CC | sed 's/gcc/gpc/'` in p/rts/Makefile.in if $CC contains gcc in more than one position patched attached I havent tested this on the djgpp system but it schould work i have test dos style path with the sed script and it works # Generated automatically from Makefile.in by configure. # Makefile to generate the GNU Pascal Run Time System. # Copyright (C) 1995-2000 Free Software Foundation, Inc. # # Authors: J.J. van der Heijden <j.j.vanderheijden(a)student.utwente.nl> # Frank Heckenbach <frank(a)pascal.gnu.de> # # This file is part of GNU Pascal. # # GNU Pascal is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2, or (at your option) # any later version. # # GNU Pascal is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with GNU Pascal; see the file COPYING. If not, write to the # Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA # 02111-1307, USA. # $(srcdir) is the RTS source directory VPATH = ../../../../gcc/p/rts srcdir = ../../../../gcc/p/rts # Reasonable default values, toplevel Makefile overrides them. # CC needs to be the GNU C compiler. CC = /cygdrive/d/cygwin/gcc-2.95.2-2/build/gcc/xgcc -B/cygdrive/d/cygwin/gcc-2.95.2-2/build/gcc/ -B/usr/bin/i586-pc-cygwin32/bin/ -I/usr/bin/i586-pc-cygwin32/include => problem here substitution gcc => gpc wont do here patched sed => commandline PC = `echo $(CC) | sed 's@^$[^ ]*[/\\][^/\\]*$gcc@\1gpc@'` CFLAGS = -O2 AR = ar AR_FLAGS = rc RANLIB = ranlib RANLIB_TEST = true DESTDIR = . --- p/rts/Makefile.in.old Mon Jul 24 01:31:26 2000 +++ p/rts/Makefile.in Mon Jul 24 01:33:16 2000 @@ -28,7 +28,7 @@ # Reasonable default values, toplevel Makefile overrides them. # CC needs to be the GNU C compiler. CC = @CC@ -PC = `echo $(CC) | sed 's/gcc/gpc/'` +PC = `echo $(CC) | sed 's@^$[^ ]*[/\\][^/\\]*$gcc@\1gpc@'` CFLAGS = -O2 AR = @AR@ AR_FLAGS = rc

1 0

build problem with gpc20000723 on cygwin rts.c
by Joachim Falk 23 Jul '00

23 Jul '00

The Problem is that the latest version of cygwin downloaded just 3 days ago doesnt have MAP_FAILED in /usr/include/sys/mman.h this prevents rts.c to compile I dont know if this is a bug in the cygwin header files or in gpc MfG Joachim Falk

1 0

gpc
by David Kredba 23 Jul '00

23 Jul '00

How can I distribute binaries of Gpc for gcc 2.95.2 (under DJGPP) ? The latest version of the Gpc at ftp.simtel.net and other mirrors is from 1996. I build version 20000707 under the gcc 19991024 and it is fully functional. Thank you for support. David Kredba

2 1

output message
by Tom Schneider 23 Jul '00

23 Jul '00

Hi! I'm going through my programs and was puzzled by this one: listerG.p: In function `Report': (irrelevant error) It turns out that the code is: procedure report( ... So gpc is calling this a function when it is really a procedure. Is this unavoidable or can it be made smarter? Of course I am still having trouble with the capitalization that gpc insists on because it prevents me from doing cut and paste to search. No other compiler has ever done this of the 4 or more others I've worked with. 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/

2 1

Re: Compiling GPC under Irix 6.5
by Frank Heckenbach 22 Jul '00

22 Jul '00

Jean-Marc Ottorini wrote: > I am currently in the process of compiling GPC on an SGI O2 station > under Irix 6.5, and an error is occurring in the buiding of the > compiler (after a successful configuration). > > This compilation is based on gcc-2.95.2 (the core version) and gpc-20000719. Have you tried to build GCC without GPC first? The error message > [...] > > gmake[1]: *** [stmp-multilib] Error 1 > gmake[1]: Leaving directory `/usr/people/ottorini/pascal/gpc-build/gcc' > gmake: *** [install-gcc] Error 2 looks like the problem is not in the GPC code, but in the general GCC code. Did you check the section on Irix in the install/specific.html file, and perhaps the URL at sgi.com given there? 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: gpc-20000707 djgpp native compilation
by Frank Heckenbach 22 Jul '00

22 Jul '00

Maurice Lombardi wrote: > OK I have downloaded gpc-20000719. > Everythings (demos and test suite) works now both with gmp 2.2 and gmp 3.01 downloaded from djgpp > site. > fjf119 and fjf120 also work now. Fine. > There is a problem to run the test suite on djgpp. > It is the same that forced djgpp maintainers to split the build process with a build.bat. > For a too large number of compilations, program stops or crashes do to lost dpmi handles. > This is fortunately reset when going back to dos (even within a bat file). > The solution is thus to split the running of tests in chunks (of 250 files). > The attached files dostest.bat which calls dodostst.sh and makefile.dos, > to be put in the test directory do that automatically. > type > dostest > the result are concatenated into a file test_sum.out and typed at end. I'm a bit concerned with the changes to the Makefile (two similar versions of the same file are always harder to maintain -- and there will probably more changes to the Makefile in the future). First, I think you don't have to comment out MASK because the command line setting in dodostst.sh should override it, anyway. Then, SHELL should probably be set to /bin/sh (which `make' under DJGPP will change to the correct path automagically). I think we can do this in the main Makefile if it doesn't break things on other systems. On Unix, it's no problem, but I don't know about Cygwin and Mingw. Chief, you might want to test it -- perhaps it'll be necessary to set SHELL to the full path of sh.exe before calling make (if you don't already have to do this, anyway). Finally, I think the output redicrection can also be done in the shell file, i.e.: make SHELL=sh MASK="$FILES" >> test_sum.out If you're concerned about the messages ("Running the test suite..."), I can add another target, say `pascal.check-nomsg' which will not write the messages, together with a target `msg' which will just output the messages, in case you want to run this first. -- Or wait, perhaps even better: run `pascal.check-long' in the loop, and pipe the concatenated results through test_sum at the end -- this should be more convenient as the results will be listed as a total. BTW, what does the for loop in dodostst.sh do? Doesn't make SHELL=sh MASK="`cat $1`" pascal.check-long >> test_sum.out work already? Then, you could probably get by without dodostst.sh at all, by just inserting it into the batch file (don't worry about the `` -- command.com will not expand them, of course, but sh called by make later will do so). Finally, I suggest to change test_sum.out to make.out because "sum" is then no more appropriate, and other scripts already use make.out, and the Makefile will remove make.out in the `extraclean' target. Likewise, renaming list.* to dtlist.* might avoid conflict with possible later list* test programs... This results in the following file (provided you agree to release it under the GPL). I'm testing it under DosEmu, and it seems to work. I'll upload it already -- if it doesn't work for you, let me know. @echo off rem Script to run the GPC Test Suite under DJGPP on a system that rem suffers from losing DPMI handles (such as MS-Windows). rem rem Copyright (C) 2000 Free Software Foundation, Inc. rem rem Authors: Maurice Lombardi [Maurice.Lombardi(a)ujf-grenoble.fr] rem Frank Heckenbach [frank(a)pascal.gnu.de] rem rem This file is part of GNU Pascal. rem rem GNU Pascal is free software; you can redistribute it and/or modify rem it under the terms of the GNU General Public License as published by rem the Free Software Foundation; either version 2, or (at your option) rem any later version. rem rem GNU Pascal is distributed in the hope that it will be useful, rem but WITHOUT ANY WARRANTY; without even the implied warranty of rem MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the rem GNU General Public License for more details. rem rem You should have received a copy of the GNU General Public License rem along with GNU Pascal; see the file COPYING. If not, write to the rem Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA rem 02111-1307, USA. if exist make.out del make.out if exist dtlist.* del dtlist.* make msg ls -1 *.pas | split -l 250 - dtlist. for %%f in (dtlist.*) do make MASK="`cat %%f`" pascal.check-long >> make.out sh test_sum < make.out 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: Compiling GPC under Irix 6.5
by Jean-Marc Ottorini 21 Jul '00

21 Jul '00

>It looks to me as if there is a '\' mising on the line ending -DCRT_END, >so I presume the xgcc produced a file called "a.out" and then after >that make tried to execute the command "-o tcrtend.o". > > >| >| gmake[1]: Entering directory >`/usr/people/ottorini/pascal/gpc-build/libiberty' >| if [ x"no" = xyes ] && [ ! -d pic ]; then \ >| mkdir pic; \ >| etc... >| ...................................................................... >| ............. >| >| /usr/people/ottorini/pascal/gpc-build/gcc/xgcc \ >| -B/usr/people/ottorini/pascal/gpc-build/gcc/ \ >| -B/usr/freeware2/mips-sgi-irix6.5/bin/ \ >| -I/usr/freeware2/mips-sgi-irix6.5/include -DIN_GCC \ >| -g -O2 -I./include -I. \ >| -I/usr/people/ottorini/pascal/gcc-2.95.2/gcc \ >| -I/usr/people/ottorini/pascal/gcc-2.95.2/gcc/config \ >| -I/usr/people/ottorini/pascal/gcc-2.95.2/gcc/../include -g0 \ >| -finhibit-size-directive -fno-inline-functions -fno-exceptions -g1 \ >| -c /usr/people/ottorini/pascal/gcc-2.95.2/gcc/crtstuff.c -DCRT_END >| -o tcrtend.o >| gmake[3]: Leaving directory `/usr/people/ottorini/pascal/gpc-build/gcc' >| tcrtend.o - No such file or directory >| gmake[2]: *** [stmp-multilib-sub] Error 2 >| gmake[2]: Leaving directory `/usr/people/ottorini/pascal/gpc-build/gcc' >| gmake[1]: *** [stmp-multilib] Error 1 >| gmake[1]: Leaving directory `/usr/people/ottorini/pascal/gpc-build/gcc' >| gmake: *** [install-gcc] Error 2 >| stat-sgi 24% Many many thanks for your answer, Richard, but this lack of "\" is due to a mail system reformating process. Nethertheless, you have pointed in a direction where I am going to check some items. Jean-Marc

1 0

Compiling GPC under Irix 6.5
by Jean-Marc Ottorini 21 Jul '00

21 Jul '00

I am currently in the process of compiling GPC on an SGI O2 station under Irix 6.5, and an error is occurring in the buiding of the compiler (after a successful configuration). This compilation is based on gcc-2.95.2 (the core version) and gpc-20000719. I am listing below the error messages (the binary file tcrtend.o is not found): ---------------------------------------------------------------------- ---------- gmake gmake[1]: Entering directory `/usr/people/ottorini/pascal/gpc-build/libiberty' if [ x"no" = xyes ] && [ ! -d pic ]; then \ mkdir pic; \ etc... ...................................................................... ............. /usr/people/ottorini/pascal/gpc-build/gcc/xgcc \ -B/usr/people/ottorini/pascal/gpc-build/gcc/ \ -B/usr/freeware2/mips-sgi-irix6.5/bin/ \ -I/usr/freeware2/mips-sgi-irix6.5/include -DIN_GCC \ -g -O2 -I./include -I. \ -I/usr/people/ottorini/pascal/gcc-2.95.2/gcc \ -I/usr/people/ottorini/pascal/gcc-2.95.2/gcc/config \ -I/usr/people/ottorini/pascal/gcc-2.95.2/gcc/../include -g0 \ -finhibit-size-directive -fno-inline-functions -fno-exceptions -g1 \ -c /usr/people/ottorini/pascal/gcc-2.95.2/gcc/crtstuff.c -DCRT_END -o tcrtend.o gmake[3]: Leaving directory `/usr/people/ottorini/pascal/gpc-build/gcc' tcrtend.o - No such file or directory gmake[2]: *** [stmp-multilib-sub] Error 2 gmake[2]: Leaving directory `/usr/people/ottorini/pascal/gpc-build/gcc' gmake[1]: *** [stmp-multilib] Error 1 gmake[1]: Leaving directory `/usr/people/ottorini/pascal/gpc-build/gcc' gmake: *** [install-gcc] Error 2 stat-sgi 24% ---------------------------------------------------------------------- ---------- I would be the most grateful if somenone could give me a hint as to how possibly fix this problem. Jean-Marc Ottorini

1 0

Re: gpc-20000707 djgpp native compilation
by Frank Heckenbach 20 Jul '00

20 Jul '00

I wrote: > Maurice Lombardi wrote: > > > same problem with gmp. The new gmp 3 is incompatible with the gmp 2.2 used by gpc for a stupid > > reason: all names in the library have been prepended by a g. It is probably only necessary to update > > accordingly the interface gmp.pas > > I'm aware of this problem, and working on it. It's a little tricky > to do it in such a way that GMP 2.x will still work, but Peter and I > have found a way how to do it. Should be fixed now. Patch will be uploaded soon. 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

2 1

Re: gpc-20000707 djgpp native compilation
by Frank Heckenbach 19 Jul '00

19 Jul '00

Peter Gerwinski wrote: > > Var Go32_Info_Block: AsmName '_go32_info_block' T_Go32_Info_Block; > > The syntax of `asmname' has changed. The new syntax reads: > > Var Go32_Info_Block: T_Go32_Info_Block; AsmName '_go32_info_block'; Almost. It should be: Var Go32_Info_Block: T_Go32_Info_Block; AsmName '_go32_info_block'; external; 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

gpc-20000707 djgpp native compilation
by Maurice Lombardi 19 Jul '00

19 Jul '00

Hi all I have made a native compilation of gpc-20000707 and uploaded it into: ftp://agnes.dida.physik.uni-essen.de/home/maurice/gpc-20000707-i586-pc-msdosdjgpp-v203.zip It needs only very minor changes to the sources to work. They are contained in the two attached diffs to apply to gpc-20000707 and gcc-2952 source directories. - the gpc-20000707.diff corrects for an already reported problem with djgpp where pwd under command.com respond c:\djgpp\ garbling ADD_RTS_PARENT_DIR in make-lang.in - the gcc-2952 - includes --enable-languages=pascal in build.djg\djbuild1.sh - comments out unneeded lines in build.djg\build.bat - puts a manifest file in installs.djg\manifest needed to automatically generate the zip in summary, since this will have to be done several times (twp new alphas are already on agnes): supposing you have all downloaded in c:\installs cd c:\djgpp unzip32 \installs\gcc2952s.zip cd gnu\gcc-2.952 patch -p1 < \installs\gcc-2.952.diff cd .. tar -xvzhf \installs\gpc-2000070.tar.gz #do not forget the h parameter: it dereferences the links in the diffs, giving non-zero gcc-2.95.2.diff files cd gpc-20000707 patch -p1 < \installs\gpc-20000707.diff cd .. mv gpc-20000707\p gcc-2.952\gcc cd gcc-2.952\build.djg build It runs blindly since it outputs to several .log files. Watch a moment... when everything stops it means that gpc is asking whether you want to apply the patch. Just hit return (you can control what you are doing with an editor which looks to the file djconfig.log, but take an editor which automatically updates when the edited file is changed by an other process) and have a coffee ... You can then install the usual way the file gpc20bb.zip produced in installs.djg When running the demos I have found - gpc-in-c.h in the unit directory is not in a standard search directory for C header files, I moved it manually (in the zip) into the %DJGPP%\lib\gcc-lib\djgpp\2.952\include - intfiledemo.pas does not work. Cannot rewrite a non assigned file under djgpp The testsuite is now still running. Failures come mostly from the same cause. All this is made on a W98se dos box with LFN=y 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

4 6

Re: gpc-20000707 djgpp native compilation
by Frank Heckenbach 18 Jul '00

18 Jul '00

Maurice Lombardi wrote: > [...] > > OK but the error comes afterwards: > > internal file name: (null) > internal file name: (null) > internal file name: (null) > internal file name: c:\djgpp\tmp\GPaaa14287 > c:/lombardi/djgpp/gpc/bug2.exe: permission denied to erase internal file `F' (er > ror #472 at 1597) > > This file is indeed created, and it has zero length > > > If this still works, you might want to make sure it really isn't a > > LFN problem. You could change rts/filename.pas, function > > GetTempFileName, so it return a name not longer than 8+3 (e.g., just > > return a constant name for testing), and rebuild the RTS. If the > > problem still exists then, it's no LFN problem... > > Same result > > internal file name: (null) > internal file name: (null) > internal file name: (null) > internal file name: c:\djgpp\tmp\aaa12508 > c:/lombardi/djgpp/gpc/bug2.exe: permission denied to erase internal file `F' (er > ror #472 at 1597) I think I found the bug now. The problem was that I can't reproduce it well -- Dos doesn't seem to like unlinking an opened file, but running under DosEmu (like I do when testing GPC), it works because it calls the Linux file routines and they just do it. After simulating a failure, I could see the problem and hopefully fix it. The patch will be uploaded to CVS soon. Thanks for helping to find it. 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 3

Re: gpc-20000707 djgpp native compilation
by Frank Heckenbach 18 Jul '00

18 Jul '00

Maurice Lombardi wrote: > fjf119 and fjf120: may be a relation with the previous bug ? > failure related to reset(input) I think there was an error in the test program themselves -- blame the one who wrote them (I won't tell you it was me ;-). It's quite possible the error didn't show until now due to some recent changes in the RTS. But now I've fixed the test programs (hopefully -- you might want to test them on your system). > Anyway the compiler seems quite good now. > Time to make a release ? We've got some items on our list to do before the release, but we're getting close. 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

Linking without automake/autobuild
by Mariusz Zynel 18 Jul '00

18 Jul '00

Hi All, I'm trying to link a program, that uses a couple of my own units already precompiled. So, I'm not specifying neither --automake nor --autobuild. Link editor ld reports error it can't find referenced symbols. There are two ways to go through this: 1. use autobuild facility - everything builds fine, or 2. supply object file names for gpc when linking - nightmare in case of advanced projects, though C works that way. I'm using 20000714 version on Solaris 8 x86. I remember I had similar problems with unofficial April version. I didn't find that in documentation, is it an unfixed bug? On the other hand, Pascal units works different than C modules and special make tool is necessary. I remember Frank's posting on that. So, automake seems quite natural as default. Maybe there should be an option to turn it off instead? E.g. Free Pascal works so that it always runs in autobuild mode, at least one of its older versions I had. Regards -- . Mariusz Zynel Institute of Mathematics | phone: +48 (85) 745 75 52 University of Bialystok | Akademicka 2 St | mailto:mariusz@math.uwb.edu.pl 15-267 Bialystok | Poland | http://math.uwb.edu.pl/~mariusz/

4 4

Re: constant out of range
by Nathalie Jarosz 18 Jul '00

18 Jul '00

Hello all! It works with an array of longint. By the way, what is comp? Nathalie ________________________________________________________________________ Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com

2 1

Re: time stamp problem? timebug.p
by Frank Heckenbach 18 Jul '00

18 Jul '00

Tom Schneider wrote: > timebug.p: In function `pascal_main_program': > timebug.p:57: TimeStamp record type parameter required > > What did I do wrong? Don't declare TimeStamp yourself. The type is already built-in. The manual just describes how it looks like. In Pascal, two different records, even if the fields are the same, are not compatible. 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: gpc-20000707 djgpp native compilation
by Frank Heckenbach 18 Jul '00

18 Jul '00

Maurice Lombardi wrote: > same problem with gmp. The new gmp 3 is incompatible with the gmp 2.2 used by gpc for a stupid > reason: all names in the library have been prepended by a g. It is probably only necessary to update > accordingly the interface gmp.pas I'm aware of this problem, and working on it. It's a little tricky to do it in such a way that GMP 2.x will still work, but Peter and I have found a way how to do it. 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

time stamp problem? timebug.p
by Tom Schneider 18 Jul '00

18 Jul '00

program timebug(output); (* 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/ According to: 8.255 TimeStamp http://agnes.dida.physik.uni-essen.de/~gnu-pascal/gpc_389.html#SEC389 and 7.10.8 Date And Time Routines http://agnes.dida.physik.uni-essen.de/~gnu-pascal/gpc_109.html#SEC109 and also http://agnes.dida.physik.uni-essen.de/~gnu-pascal/gpc_114.html#SEC114 (TIME HANDLING ROUTINES) but timebug.p: In function `pascal_main_program': timebug.p:57: TimeStamp record type parameter required What did I do wrong? *) const version = 1.00; (* of timebug.p 2000 July 17 origin 2000 Jul 17 *) type TimeStamp = {@@packed} record DateValid, TimeValid : Boolean; Year : Integer; Month : 1 .. 12; Day : 1 .. 31; DayOfWeek : 0 .. 6; { 0 means Sunday } Hour : 0 .. 23; Minute : 0 .. 59; Second : 0 .. 61; { to allow for leap seconds } MicroSecond : 0 .. 999999 end; var t: TimeStamp; begin GetTimeStamp(t); end.

1 0

constant out of range
by Nathalie Jarosz 18 Jul '00

18 Jul '00

Hello everybody! As I already have had a problem with compilation under unix, I would like to know if this following error is something related to or something else: bathy.p: In function `Principal': bathy.p:977: constant out of range The line in question is: for ii:=1 to nsites do begin larves[ii]:=round(0.7*pop_max*fec*sex*ferti); and the constant: const r = 1000000; pop_max = 750000; max = 10000; sex = 0.5; fec = 1000000; ferti = 0.8; I don't really understand because if I run a little program only with these lines, it works, but not in the whole program. And, the whole program with lower values works. So, do I have to declare the constants with something else?... Or what?... Thanks a lot in advance, Nathalie ________________________________________________________________________ Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com

2 1

Re: gpc-20000707 djgpp native compilation
by Frank Heckenbach 17 Jul '00

17 Jul '00

Couperin wrote: > I worry about those ancient files that I don't find in > gpc-20000707-i586-pc-msdosdjgpp-v203.zip : pc.exe, epc.exe, > bpc.exe, gpc-cpp.exe. Are they no more needed ? pc, epc, bpc have been dropped. They were just equivalent to `gpc --standard-pascal', `gpc --extended-pascal' and `gpc --borland-pascal', respectively, and these forms can be used now if necessary. gpc-cpp was renamed to gpcpp. > Previously, I had libcurso.a in the /lib directory and it seems > the Crt unit needed it. Is it the same now ? (I installed PDCurses > 2.4 but it doesn't produce a libcurso.a file) The file is called differently when PDCurses is built (curses.a or such I think). You can manually rename it (the `lib' prefix is so that it's found by the linker the normal way, and the `curso' rather than `curses' is to fit in 8+3). Same with libpanel.a (panel.a) probably. (In the PDCurses binary on agnes, the files are renamed already.) 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: gpc-20000707 djgpp native compilation
by Frank Heckenbach 17 Jul '00

17 Jul '00

Maurice Lombardi wrote: > It needs only very minor changes to the sources to work. They are contained in the two attached > diffs to apply to gpc-20000707 and gcc-2952 source directories. > - the gpc-20000707.diff corrects for an already reported problem with djgpp where pwd under > command.com respond c:\djgpp\ garbling ADD_RTS_PARENT_DIR in make-lang.in > > ! ADD_RTS_PARENT_DIR = sed -e 's,-B$[^/]$,-B../../\1,g;s,^$[^/][^ ]*$,../../\1,'` > ! ADD_RTS_PARENT_DIR = sed -e 's,-B$[^/][^:]$,-B../../\1,g;s,^$[^/][^:][^ ]*$,../../\1,'` I think this should be: ADD_RTS_PARENT_DIR = sed -e 's,-B$[^/][^:]$,-B../../\1,g;s,^$[^/][^ :]*$,../../\1,' But I'm wondering what the space is about, anyway (can the name of the compiler ever be a single character?), so I think the following is also ok: ADD_RTS_PARENT_DIR = sed -e 's,-B$[^/][^:]$,-B../../\1,g;s,^$[^/][^:]*$,../../\1,' Another problem is that your change would miss, e.g., `-B.' if it's at the end of the string. I think the easiest way to fix it is where ADD_RTS_PARENT_DIR is used: # The ' ' is there so, e.g., `-B.' will be replaced by ADD_RTS_PARENT_DIR RTS_COMPILERS = CC="`echo $(GCC_FOR_TARGET)' ' | $(ADD_RTS_PARENT_DIR)`" \ PC="`echo $(GPC_FOR_TARGET)' ' | $(ADD_RTS_PARENT_DIR)`" I'm changing this in the official sources now. The gcc patch is Peter's area. However, I'm skeptical about the manifest files since they would have to be updated often. I've written a script mkdjgppgpczip which automatically creates manifest etc. It's included in the script directory. It works for cross-building from Linux, might need adjustments for native DJGPP building (never tried that). > When running the demos I have found > > - gpc-in-c.h in the unit directory is not in a standard search directory for C header files, > I moved it manually (in the zip) into the %DJGPP%\lib\gcc-lib\djgpp\2.952\include Peter, can we just install it there by default, or do we need permission from the GCC developers? > - intfiledemo.pas does not work. Cannot rewrite a non assigned file under djgpp This should work (works for me in DosEmu). Does GetTempFileName return a valid name? program Foo; uses GPC; begin Writeln (GetTempFileName); Writeln (GetTempDirectory); CheckInOutRes end. 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

4 8

Re: GPC FAQ bug (shr)
by Frank Heckenbach 17 Jul '00

17 Jul '00

Couperin wrote: > I discovered a small bug in GPC FAQ (Reference : shr) : > It give as an example : "a:= -127 shr 4; (* yields -7 *)" which is > false, it yields -8 ! > > I think we have to take care when manipulating bits of negative > integers. > A ShortInt with value-1 is coded 11111111b ! (-2 is 11111110b, -3 is > 11111101b and so on) > If the last bit is 1 (that means the number is negative), the 'shr' > operator replaces the right new bits by 1. > Examples (Considering ShortInt type (8 bits)) : > -127 (coded 10000001b) shr 4 yields -8 (coded 11111000b) > -1 (coded 11111111b) shr 1 yields -1 ! You're right, `shr 4' is different from `div 16' in that `div' rounds towards minus infinity while `div' round towards 0. I'm fixing it in the manual (the compiler's behaviour is correct), thanks for the hint. 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

New user on gpc but 12 years with Tubo Pascal
by Jean-Philippe Combe 17 Jul '00

17 Jul '00

Hello, I would to work with Gnu Pascal on Linux Mandrake 7.02 I have downloaded several files : gpc-19990118-1.i386-pc-linux-gnu.rpm gpc-19990118.i586-pc-linux-gnulibc1.tar.gz gpc-19990118.tar.gz gpc-2.0.tar.gz gpc-extras-19990118-1.i386-pc-linux-gnu.rpm install-gpc-binary Can somebody say to me which file is the better to install ? (i know how to install them) Can somebody say to me what environment variables to define to access to the units because i have installes GPC on another compiler but i coudn't compile programs with the crt or other included units ? Thank you Jean-Philippe

5 7

GPC FAQ bug (shr)
by f.couperin＠online.fr 17 Jul '00

17 Jul '00

I discovered a small bug in GPC FAQ (Reference : shr) : It give as an example : "a:= -127 shr 4; (* yields -7 *)" which is false, it yields -8 ! I think we have to take care when manipulating bits of negative integers. A ShortInt with value-1 is coded 11111111b ! (-2 is 11111110b, -3 is 11111101b and so on) If the last bit is 1 (that means the number is negative), the 'shr' operator replaces the right new bits by 1. Examples (Considering ShortInt type (8 bits)) : -127 (coded 10000001b) shr 4 yields -8 (coded 11111000b) -1 (coded 11111111b) shr 1 yields -1 ! -- "Couperin"

1 0

Sun Drops Pascal?
by Tom Schneider 17 Jul '00

17 Jul '00

Dear GPC Folks: GPC is poised to become even more important. My Sysadmin found out the following: "I sent an online query using SunSolve about the status of the Pascal compiler. A Sun support person just called and said it was no longer a SUN product. He said its last ship date was 1997 and SUN's End-of-Service life policy says some support 4-5 years after last ship date." "SUN apparently has decided to drop the product and someone purchasing a new SUN may not be able to purchase the compiler from SUN. The SUN web site refers to the Edinburgh Portable Compilers and their EPC Pascal-E product. www.epc.co.uk/pce.html" "Best hope is probably the "gpc" effort." I agree with him ... Keep up the good work!! (I'll continue to help when I can.) 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

Re: constant out of range
by Frank Heckenbach 17 Jul '00

17 Jul '00

Nathalie Jarosz wrote: > Hello everybody! > > As I already have had a problem with compilation under unix, I would like to > know if this following error is something related to or something else: > bathy.p: In function `Principal': > bathy.p:977: constant out of range > > The line in question is: > for ii:=1 to nsites do > begin > larves[ii]:=round(0.7*pop_max*fec*sex*ferti); > > and the constant: > const > r = 1000000; > pop_max = 750000; > max = 10000; > sex = 0.5; > fec = 1000000; > ferti = 0.8; > > I don't really understand because if I run a little program only with these > lines, it works, but not in the whole program. Please, when reporting bugs, always post *complete* test programs. Otherwise, we have incomplete information and can only guess. The following "little program only with these lines" gives the same error message on my system. That's correct since the value of the constant is larger than MaxInt (2^31-1), and therefore cannot be stored in an integer (if you're on a 64 bit system, it might work). If you declare larves as `LongInt' which has a larger range than `Integer' (-2^63 .. 2^63-1), it should work. If that's still not enough for you, you can look at the GMP unit... program foo; const r = 1000000; pop_max = 750000; max = 10000; sex = 0.5; fec = 1000000; ferti = 0.8; nsites = 10; var ii : Integer; larves : array [1 .. nsites] of Integer; begin for ii:=1 to nsites do larves[ii]:=round(0.7*pop_max*fec*sex*ferti); end. 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

2 1

Re: gpc-20000707 djgpp native compilation
by Frank Heckenbach 14 Jul '00

14 Jul '00

Maurice Lombardi wrote: > > > - intfiledemo.pas does not work. Cannot rewrite a non assigned file under djgpp > > > > This should work (works for me in DosEmu). Does GetTempFileName > > return a valid name? > > > > program Foo; > > > > uses GPC; > > > > begin > > Writeln (GetTempFileName); > > Writeln (GetTempDirectory); > > CheckInOutRes > > end. > > c:\djgpp\tmp\GPaaa13491 > c:\djgpp\tmp\ > > This directory exists. With LFN=y a 10 chars filename should work as expected. > > Hope this helps Just to be sure, does the following program work? program foo; var f : Text; s : String (4096); begin Rewrite (f, 'c:\djgpp\tmp\GPaaa13491'); Writeln (f, 'OK'); Reset (f); Readln (f, s); Writeln (s) end. If this works, could you please try inserting the following line: fprintf (stderr, "internal file name: %s\n", filename); into rts/file.c after the line: filename = _p_nameit (File, mode); rebuild the RTS and compile and run the following test program: program Foo; var f : Text; begin Rewrite (f); end. It should write `internal file name: (null)' 3 times -- that's ok (for Input, Output and StdErr), and then the temp name which should be a valid, but non-existing file name. If this still works, you might want to make sure it really isn't a LFN problem. You could change rts/filename.pas, function GetTempFileName, so it return a name not longer than 8+3 (e.g., just return a constant name for testing), and rebuild the RTS. If the problem still exists then, it's no LFN problem... 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

2 1

Re: It works
by Frank Heckenbach 14 Jul '00

14 Jul '00

Khimenko Victor wrote: > >> More like problem with *nix design (not even *nix exacly bu more like > >> old unix terminals design - it's stupid, ugly and unneeded but it's used > >> by SUCH big number of systems all around the world now that it's really not > >> worth trying to fix). > > > One could probably fix it (under Linux at least) by changing the > > keymap (or the kernel) and the termcap and terminfo entries. > > What about xterm, kterm and bunch of VT100 emulators ? If you have the source, you can change it. I never said it would be easy or even practical... ;-) > God knows. I've looked on few programs where ESC works "just fine" like ViM > and/or minicom. Minicom is using "console approarch" explained above (and > works without delays only for console) while ViM is goeing even further: > if it gets ESC it will wait for VERY short time and then will react just as > ESC should do (will go out of insert mode, for example) BUT will remember > that ESC was just pressed AND if later it'll find valid code for arrows and > such it will undo ESC work and do what whould be done for left-arrow or > right-arrow. Both solutions hardly look partable to me :-/ Wow, what a hack! ;-) But most programs can't do it like vim, I guess... > Looks like it's all what can be done: give CRT user all the information about > ESC problems and let him decide what to do with it. Looks like there no > universal solution anyway. Doesn't seem so. But as I said, setting ESCDELAY appropriately, I get along fine on various terminals, emulators and consoles, even across networks. > P.S. A lot of programs (like Emacs or bash) just use ESC as prefix and do not > assign ANY meaning by itself: ESC,1,2,3 is the same as Meta-1,2,3 and is > "repeat next command 123 times", Esc,* is the same as Meta-* (put names of > files with common prefix in command line) and so on. It's REAL handy when you > are using dumb terminal (like Microsoft's built-in telnet :-) Oh yeah, that's very dumb. I once had to use it... > without Meta- > support and (on other hand) it's most reliable way to handle ESC. It looks > like most natural thing to do if you'll think about it... I'm not so sure. I like the meaning of ESC to abort an operation, and I don't like the idea of two different keys (ESC and Alt/Meta) doing basically the same. But that's probably a matter of taste, let's not get into an vi vs. Emacs flame war (I'm a fan of neither, anyway ;-). 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: gpc-20000707 djgpp native compilation
by Frank Heckenbach 14 Jul '00

14 Jul '00

Peter Gerwinski wrote: > > > - gpc-in-c.h in the unit directory is not in a standard search directory for C header files, > > > I moved it manually (in the zip) into the %DJGPP%\lib\gcc-lib\djgpp\2.952\include > > > > Peter, can we just install it there by default, or do we need > > permission from the GCC developers? > > I see no problems to install it there. We are also installing lots > of binaries one directory higher. OK, I'll change it. 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: It works
by Frank Heckenbach 13 Jul '00

13 Jul '00

Khimenko Victor wrote: > > The gpc works now on my Linux Mandrake, > > it is GREAT, it has many more functionality than Borland Pascal 7 > > > In the crtdemo the ESC key doesn't work to quit, is it a problem of my config ? > > More like problem with *nix design (not even *nix exacly bu more like > old unix terminals design - it's stupid, ugly and unneeded but it's used > by SUCH big number of systems all around the world now that it's really not > worth trying to fix). One could probably fix it (under Linux at least) by changing the keymap (or the kernel) and the termcap and terminfo entries. However, this would break: - programs run remotely unless you install the new termcap/terminfo on the host as well, - programs that hard-code escapes sequences (but such programs are broken by design, anyway). > ESC key is used as prefix for other keys (like arrows > and functional keys - it was even used this way in Turbo Pascal 2.x and 3.x > if you recall). And there are NO reliable way to distinguish sequence of keys > ESC,[,U from Left arrow, for example (I'm not remember well what exactly > sequence is for left arrow but it's not relevant). Plus not all keyboards > on teminals have F1-F10 keys, for example and then sequences ESC,1 ... ESC,9 > ESC,0 are used instead. Thus for ESC to work you must be patient: just wait > few seconds and it'll close program. > > Perhaps we should go MC way and use double-ESC as "true" ESC so you can use > ESC,ESC when needed and still can use ESC,1 ESC,A and so on without worry ? Unfortunately (but consequently) double-ESC is the sequence for Alt- (or Meta-)ESC. So, a program could recognize Alt-ESC (kbAltEsc in the CRT unit) as equivalent to ESC. I'm doing it in CRTDemo now, but each program has to do it for itself -- and this could be many places. Alternatively, I could add a flag to CRT which, if set, will cause CRT to transparently translate Alt-ESC to ESC (if the flag is not set, Alt-ESC can be distinguished from ESC for programs that want this). Should I do so? But even worse, there are sequences that start with double-ESC, e.g. Alt-function key, so the code has to wait further after reading double-ESC. So, if you press ESC three times, you get an Alt-ESC and (after some delay) a plain ESC. So, if Alt-ESC terminates the program (like CRTDemo with my next changes), that works, since Alt-ESC terminates the program and it won't get to the delay... But generally, on a local console, I have no problems with a small ESCDELAY -- if you set it larger than ~30, repeated ESC keys (i.e. holding down the key) will get converted to Alt-ESC, but 10 is fine for me. I'm adding a comment about it in the CRT unit. 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

2 1

Re: gpc-20000707 djgpp native compilation
by Frank Heckenbach 13 Jul '00

13 Jul '00

Maurice Lombardi wrote: > Maurice Lombardi a Ã©crit : > > > > Frank Heckenbach a Ã©crit : > > > > > > Maurice Lombardi wrote: > > > > ! ADD_RTS_PARENT_DIR = sed -e 's,-B$[^/]$,-B../../\1,g;s,^$[^/][^ ]*$,../../\1,'` > > > > ! ADD_RTS_PARENT_DIR = sed -e 's,-B$[^/][^:]$,-B../../\1,g;s,^$[^/][^:][^ ]*$,../../\1,'` > > > I need a great supply of asprin nearby when trying to decipher those sed scripts > > Got the asprin. The logics is (extracted from rx.info) > > For example, the character `*' is used > to indicate that the preceeding element of a regexp may be repeated 0, > 1, or more times. > > 0 is the problem. It does not excludes the case where : is the second character. You're right, I overlooked the `*'. But I still don't see what the `[^ ]*' was for -- after all, it's inserted back in the same place, so it's irrelevant whether the parentheses match a few spaces more or less. So let's try it simply without the `*': ADD_RTS_PARENT_DIR = sed -e 's,-B$[^/][^:]$,-B../../\1,g;s,^$[^/][^:]$,../../\1,' > And IIRC the + which would mean at least 1 is not understood by all sed's (notably the > djgpp one whe had sometimes ago when I tried to figure that out. Sun's sed doesn't understand it, either. But since `x+' is equivalent to `xx*', that's easy to work around. Not so with `|' :-(but that's OT here)... > May be a more recent release ...) A recent GNU sed on DJGPP should understand it (the regex syntax is not system dependent, after all)... However, note that `+' is extended regex syntax. In a basic regex (which is what sed expects), it's `\+'. 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

2 1

Re: gpc-20000707 djgpp native compilation
by Frank Heckenbach 13 Jul '00

13 Jul '00

Tom Schneider wrote: > Dear Maurice: > > I noticed your complex expression: > > > The relevant part of the output is (with some air interspersed) > > > cd p/rts && c:/djgpp/bin/make.exe CC="`echo c:/djgpp/gnu/gcc-2.952/build.djg/gcc > /xgcc -Bc:/djgpp/gnu/gcc-2.952/build.djg/gcc/ -Bc:/djgpp/i586-pc-msdosdjgpp/bin/ > -Ic:/djgpp/i586-pc-msdosdjgpp/include' ' | sed -e 's,-B$[^/][^:]$,-B../../\1, > g;s,^$[^/][^:]*$,../../\1,'`" PC="`echo ./xgpc -B./' ' | sed -e 's,-B$[^/][^: > ]$,-B../../\1,g;s,^$[^/][^:]*$,../../\1,'`" SHELL="c:/djgpp/bin/bash.exe" CFL > AGS="-O2" AR="ar" AR_FLAGS="rc" RANLIB="ranlib" RANLIB_TEST="[ -f ranlib ] || ( > [ "i586-pc-msdosdjgpp" = "i586-pc-msdosdjgpp" ] && [ -f /usr/bin/ranlib -o -f /b > in/ranlib ] )" RTSFLAGS="" DESTDIR="../.." all > > Even with the space it is hard to get through! > > So I thought of mentioning a trick I use: the backslash > to break the lines into logical units: > > cd p/rts && c:/djgpp/bin/make.exe CC="`echo c:/djgpp/gnu/gcc-2.952/build.djg/gcc > /xgcc -Bc:/djgpp/gnu/gcc-2.952/build.djg/gcc/ -Bc:/djgpp/i586-pc-msdosdjgpp/bin/ > -Ic:/djgpp/i586-pc-msdosdjgpp/include' ' |\ > cat |\ > sed -e 's,-B$[^/][^:]$,-B../../\1, > g;s,^$[^/][^:]*$,../../\1,'`" PC="`echo ./xgpc -B./' ' |\ > cat |\ > sed -e 's,-B$[^/][^: ]$,-B../../\1,g;s,^$[^/][^:]*$,../../\1,'`" SHELL="c:/djgpp/bin/bash.exe" CFLAGS="-O2" AR="ar" AR_FLAGS="rc" RANLIB="ranlib" RANLIB_TEST="[ -f ranlib ] || ( [ "i586-pc-msdosdjgpp" = "i586-pc-msdosdjgpp" ] && [ -f /usr/bin/ranlib -o -f /b > in/ranlib ] )" RTSFLAGS="" DESTDIR="../.." all > > Well, that's not much better (yet) but the idea is to do things like this: > > cat my.file |\ > tr -d 0-9 |\ > sort |\ > uniq |\ > sed -e "s/this/that/g" |\ > cat > my.result > > The nice thing about this method is that one can easily see the steps, and it > is easy to rearrange and modify. Unfortunately, that's the make output and make swallows \/newline in variables (and most of the command above is stored in variables).. 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: It works
by Frank Heckenbach 13 Jul '00

13 Jul '00

Jean-Philippe Combe wrote: > The gpc works now on my Linux Mandrake, > it is GREAT, it has many more functionality than Borland Pascal 7 > > In the crtdemo the ESC key doesn't work to quit, is it a problem of my config ? Probably -- the problem is that escape sequences of function keys unfortunately start with an escape code as well, so the code has to wait for some time until it can assume it was only an ESC key. You can set this time (in ms) in the environment variable ESCDELAY. E.g., 10 is fine for me on the local console, OTOH over a slogin through a slow network I sometimes need as much as 1000. If you set the value too low, function keys won't work. > I know only Turbo pascal dialect end to understant everything, i need to learn > the other dialects used by gpc. Who knows a good documentation for that ?. The GPC manual contains documentation of some of the features -- unfortunately, a lot is still missing there. But it's worth a look, in particular the "Programming" and "Borland Pascal" chapters. The latter also describes a number of non-BP features and how they are similar to or different from the BP counterparts. > I have some great units.When fully ported and tested under gpc, i will give > them to the gpc community (if you accept ). Looking forward to it. 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

It works
by Jean-Philippe Combe 13 Jul '00

13 Jul '00

Hello, The gpc works now on my Linux Mandrake, it is GREAT, it has many more functionality than Borland Pascal 7 In the crtdemo the ESC key doesn't work to quit, is it a problem of my config ? I know only Turbo pascal dialect end to understant everything, i need to learn the other dialects used by gpc. Who knows a good documentation for that ?. I have some great units.When fully ported and tested under gpc, i will give them to the gpc community (if you accept ). Thanks a lot to all the one that help me Jean-Philippe Combe

2 1

Error in util.c 3rd
by David Kredba 13 Jul '00

13 Jul '00

I apply sed -f $(srcdir)\config\msdos\top.sed to makefiles (created by configure shell) in $(srcdir) and $(srcdir)/gcc directories and after this I run manually configure shell in $(srcdir)/gcc/p/rts. After this I run make CFLAGS="-O2" LDFLAGS="-s" LANGUAGES=pascal and I obtained xgcc, xgpc, cc1, gpcpp, gpc1, libgcc.a and libgpc.a with some non fatal make or cc1, gcc errors. But gpc1 fails when compiling some files from $(srcdir)/gcc/p/test. It got internal compiler error. I don't now what to do. Debugging ? David Kredba

2 2

Corrections of my precedent message (sorry)
by Jean-Philippe Combe 12 Jul '00

12 Jul '00

Hello, I would to work with Gnu Pascal on Linux Mandrake 7.02 I have downloaded several files : gpc-19990118-1.i386-pc-linux-gnu.rpm gpc-19990118.i586-pc-linux-gnulibc1.tar.gz gpc-19990118.tar.gz gpc-2.0.tar.gz gpc-extras-19990118-1.i386-pc-linux-gnu.rpm install-gpc-binary Can somebody say to me which file is the better to install ? (i know how to install them) Can somebody say to me what environment variables to define to access to the units because i have installed GPC on another computer but i coudn't compile programs with the crt or other included units ? Thank you Jean-Philippe

1 0

gpc on HP-UX
by S. Achterop IWI-120 3932 12 Jul '00

12 Jul '00

Hello, Regrettably the new gpc-20000705 still does not compile on HP-UX 10-20. The problem from the buglist still seems to exist. The make now ends with: make[2]: Entering directory `/rug104/home6/users/sietse-tijdelijk/gpc-build/gcc/p/rts' ../.././xgpc -B../.././ -c -I. -W -Wall - ........... /rug103/home3/users/sietse/tijdelijk/gcc-2.95.2/gcc/p/rts/error.pas gpc1: warning: -g is only supported when using GAS on this processor, gpc1: warning: -g option disabled. ... gcc-2.95.2/gcc/p/rts/error.pas: In function `Formatstr': ... gcc-2.95.2/gcc/p/rts/error.pas:538: internal error--unrecognizable insn: (insn 17 16 19 (set (zero_extract:SI (reg:SI 98) (const_int 32 [0x20]) (const_int 0 [0x0])) (reg:SI 99)) -1 (insn_list 14 (insn_list 16 (nil))) (expr_list:REG_DEAD (reg:SI 99) (nil))) make[2]: *** [error.o] Error 1 make[2]: Leaving directory `/rug104/home6/users/sietse-tijdelijk/gpc-build/gcc/p/rts' make[1]: *** [pascal.rts] Error 2 make[1]: Leaving directory `/rug104/home6/users/sietse-tijdelijk/gpc-build/gcc' make: *** [all-gcc] Error 2 Regards, Sietse

1 0

Re: nestbug: bugs in gpcc with the use of --nested-comments
by Frank Heckenbach 12 Jul '00

12 Jul '00

Tom Schneider wrote: > This code demonstrates a bug in gpc: > > GNU Pascal version 20000707, based on gcc-2.95.2 19991024 (release). > > which when called on this program as: > > gpc --standard-pascal --nested-comments --transparent-file-names $nestbug.p -o $nestbug > > will object as follows: > > nestbug.p:54: parse error before `Documentation' > > because, although the --nested-comments is on, it still can't handle > this unbalanced right curlie bracket: } What was called `--nested-comments' in previous GPC versions, is now called (more precisely, IMHO) `--no-mixed-comments'. The option `--nested-comments' now means really nested comments like `{ { } }'. BTW, this *is* described prominently in the NEWS file or the News chapter in the GPC manual. > 2. ADDITIONAL BUG: Note also that GPC capitalizes the word > "Documentation", which is confusing and it should not do. Someone doing a > case sensitive search would not find the problem! That's why a case-sensitive search through Pascal code is a bad idea, I guess... > This occurs in other > places in the code. GPC should NEVER change cases!!!! (Oh, I see. In > German one capitalizes nouns. Perhaps this is why you thought to do it. > The rest of the world does not and it will cause confusion and trouble. > How about creating a --German command line option? :-) It's not about German at all, as you should've noted from the following facts: - The original GPC was created in Finland. - GPC also capitalizes verbs, adverbs, perpositions, non-words, etc. Seriously, I think we've discussed this matter before, in connection with `--transparent-file-names'. It's about avoiding conflicts with (e.g.) libc identifiers. When GPC supports some other form of name mangling, we can get away with this capitalization. If you like to offer your help, be welcome, otherwise this will be done according to our time schedules... > { > I infer that when comments are parsed gpc does not remember the kind of > starting comment. It does with `--no-mixed-comments'. > 4. If the curlies around the above paragraph are deleted, the message is: > > nestbug.p:92: unterminated string or character constant > nestbug.p:83: possible real start of unterminated constant > > The program is sensitive to single quote marks! Of course. Since the comment was closed (though unintentionally, see above), GPC expects Pascal code, and a single quote in Pascal code is quite significant. > The whole comment skipping code needs a careful overhaul! Quite the opposite: It's just had a careful overhaul which implied a redefinition of one option. Please change your command-line accordingly. > The program does a successful goto to the end of the code from > the halt routine, so that bug is FIXED. :-) :-) Thank you! Fine. (But you are aware that a Halt routine which does exactly this is already built in?) 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

nestbug: bugs in gpcc with the use of --nested-comments
by Tom Schneider 11 Jul '00

11 Jul '00

program nestbug(output); (* nestbug: bugs in gpcc with the use of --nested-comments 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/ *) label 1; (* end of program *) const (* begin module version *) version = 1.00; (* of nestbug.p 2000 July 11 1.00; 2000 July 11 origin *) updateversion = 1.00; (* defines lowest acceptable current parameter file *) (* end module version *) (* begin module describe.nestbug *) (* name nestbug: bugs in gpcc with the use of --nested-comments synopsis nestbug(output: out) files output: messages to the user description This code demonstrates a bug in gpc: GNU Pascal version 20000707, based on gcc-2.95.2 19991024 (release). which when called on this program as: gpc --standard-pascal --nested-comments --transparent-file-names $nestbug.p -o $nestbug will object as follows: nestbug.p:54: parse error before `Documentation' because, although the --nested-comments is on, it still can't handle this unbalanced right curlie bracket: } examples documentation see also {GPC will also object to the } shell.p {program at} http://www.lecb.ncifcrf.gov/~toms/delila/shell.html author Thomas Dana Schneider bugs 1. See above. 2. ADDITIONAL BUG: Note also that GPC capitalizes the word "Documentation", which is confusing and it should not do. Someone doing a case sensitive search would not find the problem! This occurs in other places in the code. GPC should NEVER change cases!!!! (Oh, I see. In German one capitalizes nouns. Perhaps this is why you thought to do it. The rest of the world does not and it will cause confusion and trouble. How about creating a --German command line option? :-) 3. The use of the unbalanced bracket was legitimate in the shell program as part of a quoted string inside the documentation comments. { I infer that when comments are parsed gpc does not remember the kind of starting comment. It should recall that the comment of this documentation began with a left-parenthesis-astrisk, and so should ignore everything until it encounters an astrisk-right parenthesis. Apparently it doesn't and is sensitive to the curlie brackets. (The reverse should hold inside a curlie bracket comment of course.) } 4. If the curlies around the above paragraph are deleted, the message is: nestbug.p:92: unterminated string or character constant nestbug.p:83: possible real start of unterminated constant The program is sensitive to single quote marks! I had the word "doesn't" in the bugs section, and it blocked the case mentioned above! The curlie brackets above protect the single quote! The whole comment skipping code needs a careful overhaul! It should not be looking at quotes at all during comment skipping! technical notes The program does a successful goto to the end of the code from the halt routine, so that bug is FIXED. :-) :-) Thank you! *) (* end module describe.nestbug *) (* begin module halt *) procedure halt; (* stop the program. the procedure performs a goto to the end of the program. you must have a label: label 1; declared, and also the end of the program must have this label: 1: end. examples are in the module libraries. this is the only goto in the delila system. *) begin writeln(output,' program halt.'); goto 1 end; (* end module halt version = 'delmod 6.16 84 mar 12 tds/gds'; *) (* begin module nestbug.themain *) procedure themain; (* the main procedure of the program *) var parameterversion: real; (* parameter version number *) begin writeln(output,'nestbug ',version:4:2); halt; end; (* end module nestbug.themain *) begin themain; 1: end.

1 0

error in util.c 2nd
by David Kredba 10 Jul '00

10 Jul '00

I found, that the file gcc-2.95.2.diff and gcc-2.95.1.diff has zero byte size. After patching (patch is automatically made by ./configure) to the file stor-layout.c there in the stor-layout.c is not declared "size_volatile". While linking gpc1.exe ld returns error. I copy gcc-2.95.diff to gcc-2.95.2.diff and run ./configure again, after removing all new files. ./Configure preciously find gcc-2.95.2 and apply patch. In stor-layout.c is now present missing declaration. The file util.c is after patching OK. Gpc1.exe, xgpc.exe and gpc-cpp.exe are succesfuly created. But after, while make building libgcc2.a I obtain this error message : In file included from ./libgcc2.c:48: include/sttdef.h:255: conflicting types for ' wchar_t' d:/dj/include/stdlib.h:39: previous declaration of ' wchar_t' Program cc1 got fatal signal 33. I have djdev203 header files. David Kredba

1 0

Re: test results
by Frank Heckenbach 10 Jul '00

10 Jul '00

Prof Abimbola A Olowofoyeku wrote: > I can't run the test suite as presented (under Mingw and Cygwin), > because I keep getting an error "*.pas: no such file" or something > like that. Of course I can compile the source files singly or run a "for" > loop at the command line - but presumably, you want the test suite > to run on all platforms ... I'm making use of filename quoting and expansion in a non-trivial way in the tests script, and that's probably the reason for the failure because Dos shells have some problems with (read: no support for ;-) filename expansion... Interestingly enough, it works well under DJGPP... but only if I set SHELL to the path of bash (which I do by default). So, does it work if you set SHELL (I assume you have bash and GNU make installed), or add the line SHELL = /bin/sh to p/test/Makefile (or maybe `SHELL = <full_path_to>sh.exe' -- but at least under DJGPP that's not necessary because make does this automagically)? 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: 'include' and 'lib' files
by Nick Burrett 10 Jul '00

10 Jul '00

Anuradha <Anuradha(a)adcc.alcatel.be> writes: > When i try to build a cross-compiler for > target i386-solaris machine with host :sparc-solaris, > > it asks me for the lib and the include files of i386-solaris . > > I don't have an i386-solaris machine here.Can you tell me where i can > find these 'lib' and 'include' files? You can only get these from a i386-solaris installation. If you don't have such an installation, then you can't get them. Regards, Nick.

1 0

GPC alpha release and GPC CVS server
by Peter Gerwinski 10 Jul '00

10 Jul '00

Hello, folks! This is the announcement of a new alpha version of GPC: gpc-20000705 We also have set up a CVS server where you can always check out the current development snapshot. Alpha snapshots are now going to be released much more frequently. At the same time we have updated the GPC WWW pages. They now contain the GPC documentation in HTML, DVI and PS format which are updated automatically with the GPC source. The instructions below are an extract from the new `INSTALL' file. For a list of new features in this release, see the section `news' on the GPC WWW pages and/or in the GPC documentation. For fixed bugs, see the GPC TODO list at the same places. Have fun, the GNU Pascal development team Where and what to download ========================== The master server for GNU Pascal is `agnes.dida.physik.uni-essen.de'. Official and beta releases of the compiler with sources and binaries for many platforms as well as other GNU Pascal related files can be found in `ftp://agnes.dida.physik.uni-essen.de/gnu-pascal/' You can find binary distributions for many platforms in the subdirectory `binary'. The archive files are named `gpc-VERSION.PLATFORM.EXTENSION' - for example `gpc-2.1.alpha-unknown-linux-gnu.tar.gz' for GPC version 2.1 on an Alpha workstation running the Linux kernel with GNU C Library, or `gpc-20000616.i586-pc-djgppv201.zip' for GPC version 20000616 on an i586 PC running DOS with DJGPP version 2.01. After you have downloaded the correct archive file for your platform, please read the installation notes on how to install such a binary distribution. If you are running Dos or MS Windows, you will need additional tools - see "What else to download and where" below. Current snapshots ----------------- GNU Pascal is subject to steady development. You can download the current snapshot (source only, use at your own risk) via anonymous FTP from: `ftp://agnes.dida.physik.uni-essen.de/gnu-pascal/alpha/' or via anonymous CVS from: CVS root: :pserver:anonymous@agnes.dida.physik.uni-essen.de:/usr/local/cvsroot Password: anonymous Command: checkout gpc Please read the installation notes on how to compile the source from a distribution or a CVS checkout. Compiling GPC ============= The preferred way to distribute GNU software is distribution of the source code. However, it can be a non-trivial exercise to build GNU Pascal on some non-Unix systems, so we also provide ready-to-run binaries for a number of platforms. (See above for how to install a binary distribution.) GPC is based on the GNU Compiler Collection, GNU CC or GCC. You will need the GCC sources to build it. It must be the same version as the one GPC is implemented with - `version 2.95.x' as of this writing. Although you need GCC to build the GNU Pascal compiler, you don't need GCC to compile Pascal programs once GNU Pascal is installed. (However, using certain libraries will require compiling C wrappers, so it is a good idea to install the C compiler as well.) Because GNU Pascal shares its back-end with GCC, it should run on any system supported by GCC. A full list of platforms supported by GCC can be found in the GCC installation instructions. The GCC source can be obtained from any mirror of the GNU FTP site, `ftp://ftp.gnu.org/gnu/gcc/'. The "core" distribution is sufficient for GPC. Here is the generic procedure for installing GNU Pascal on a Unix system. See below for extra information needed to install GPC on DOS-like platforms. 1. Checking the prerequisites Make sure that GNU make is installed. (In the following, we will simply speak of `make' when invoking GNU make; you might need to call `gmake' instead.) For extracting the example programs from the documentation to the `doc/docdemos' directory a non-crippled `sed' is needed. GNU sed is known to work. If you have checked out the GPC source from CVS, you will have to rebuild most derived files, so you will need additional tools: `bison', `flex', `makeinfo', `gperf', and `autoconf'. Make sure that these are installed. If you want to build the GPC WWW pages you will also need: `texi2html' version 1.61 (older versions are missing some needed features; newer versions suffer from a bug), `texi2dvi', TeX, `gzip', `dvips', `dviselect', and `dviconcat'. If you run into trouble during the installation process, please check whether you are using outdated versions of the required utilities and upgrade if necessary. The GNU versions of the packages above are available from the GNU FTP server (ftp://ftp.gnu.org) or any of its mirrors. Package PACKAGE is usually located in the directory `gnu/PACKAGE'. 2. Unpacking the source From a directory of your choice (e.g. `/home/fred'), unpack the GCC and GNU Pascal source distributions. This will create separate subdirectories for GCC and GPC. Let us assume `gcc-2.95.1' and `gpc-20000535' in this example. % cd /home/fred % gzip -c -d gcc-core-2.95.1.tar.gz | tar xf - % gzip -c -d gpc-20000535.tar.gz | tar xf - `cd' to the GPC directory and move the contents (a subdirectory `p') to the subdirectory `gcc' of the GCC directory: % cd /home/fred/gpc-20000535 % mv p /home/fred/gcc-2.95.1/gcc/ It is recommended, though not required, to use a separate directory for building the compiler, rather than compiling in the source directory. In this example, let us create `/home/fred/gpc-build' for this purpose: % mkdir /home/fred/gpc-build If you use a separate directory, you do not need to write into the GCC source directory once you have patched the GCC source (see below), and can build GPC for more than one platform from the same source tree. In case you are re-using a directory where you have already built GCC and/or GPC for a different target machine, do `make distclean' to delete all files that might be invalid. One of the files this deletes is `Makefile'; if `make distclean' complains that `Makefile' does not exist, it probably means that the directory is already suitably clean. 3. Configuring and building GCC GNU Pascal is automatically configured with GCC. Configuration of GCC is treated in depth in the GCC installation instructions. The normal procedure is as follows: `cd' to the GPC build directory. From there, run the `configure' script in the GCC source directory: % cd /home/fred/gpc-build % /home/fred/gcc-2.95.1/configure --enable-languages=pascal This creates all the necessary config files, links and Makefile in the GCC object directory. Note 1: The configuration will prompt you for patching the GCC source for GPC support, so you need write access to that directory. All changes to GCC are surrounded by `#ifdef GPC ... #endif', so they should not interfere when you build a C compiler from this source tree. Note 2: The `--enable-languages=pascal' option means that we only want to build the Pascal compiler and not, for instance, the C++ compiler. Note 3: The standard directory for installing GCC and GPC is `/usr/local/lib'. If you want to install files to an alternate directory DIR, specify `--prefix=DIR' when you run `configure'. 4. Putting other GNU tools in place Some environments require other GNU tools (such as the GNU assembler or linker) instead of the standard system tools for GCC to work. (See the GCC installation instructions for details.) If this is the case for your system, install the required tools in the GPC build directory under the names `as', `ld', or whatever is appropriate. This will enable the compiler to find the proper tools for compilation of the program `enquire' (a part of GCC) and to install the GNU tools to a place where they are found by GCC but do not interfere with the standard system tools. Alternatively, you can do subsequent compilation using a value of the `PATH' environment variable such that the necessary GNU tools come before the standard system tools. 5. Compiling GPC Once you are satisfied with the configuration as determined by `configure', you can build the compiler: % make Notice that this procedure will build the C compiler (and maybe some other compilers) too, because that is used to compile the GPC runtime library. Optionally, you may supply CFLAGS, LDFLAGS or RTSFLAGS. CFLAGS is used for compiler and RTS, RTSFLAGS are for RTS only, i.e.: `make CFLAGS="-O2" RTSFLAGS=-Wall' 6. Completing the installation When everything has been compiled, you can check the installation process with: % make -n install To complete the installation, run the command `make install'. You need write access to the target directories (`/usr/local/bin', `/usr/local/lib', `/usr/local/info', `/usr/local/doc', and `/usr/local/man' in this example), so this is usually done as `root': % su -c "make install" If you want to install *only* the Pascal compiler (for example if you already have the correct version of GCC installed), `cd' to the `gcc' subdirectory of the build directory (e.g. `/home/fred/gpc-build/gcc') and run `make pascal.install'. This installation process does *not* overwrite existing copies of `libgcc.a' or `specs', should they exist. Also from the `gcc' subdirectory you can do some more "exotic" builds. For instance, you can build the GPC WWW pages by typing `make pascal.html' or a binary distribution by typing `make pascal.bindist'. See the `Makefile' in that directory for more examples. Have fun with GPC!

3 4

Re: test results
by Frank Heckenbach 10 Jul '00

10 Jul '00

Russ Whitaker wrote: > Hi > > Installed the newest release today. > Ran test suite. Results: > > total 1271 > pass 192 > skip 2 > fail 1077 > > But that's somewhat misleading. almost all the error msgs were > " ... is dangerous. Use lseek64 instead". > > Is there a simple fix? Which OS and libc version? Could you please post the complete error message (only one if they're all the same)? 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

2 1

GPC 20000705 (Win32 binaries released)
by Prof Abimbola A Olowofoyeku 09 Jul '00

09 Jul '00

Hi all I have uploaded Win32 binaries for the latest GPC beta (20000705) to agnes. There are two packages - one for Mingw (msvcrt version) and one for Cygwin (v1.x). Take your pick, but I recommend the Mingw release. You can get a copy from here: ftp://agnes.dida.physik.uni-essen.de/home/chief/ Enjoy! Best regards, The Chief -------- Prof. Abimbola A. Olowofoyeku (The African Chief) Author of: Chief's Installer Pro v5.22.1 for Win32 http://www.bigfoot.com/~African_Chief/chief32.htm Email: African_Chief(a)bigfoot.com

1 0

test results
by Russ Whitaker 09 Jul '00

09 Jul '00

Hi Installed the newest release today. Ran test suite. Results: total 1271 pass 192 skip 2 fail 1077 But that's somewhat misleading. almost all the error msgs were " ... is dangerous. Use lseek64 instead". Is there a simple fix? Thanks, Russ

1 0

Error at util.c
by David Kredba 08 Jul '00

08 Jul '00

While I am compiling binaries of the GPC from its sources under the W98 =SE on Celeron 400Mhz I gave this error message from the gcc in the file =util.c : in function pascal_init : (2301) set_word_size undeclared (2303) set_words_big_endian undeclared. Before I started make (CFLAGS="-O2 -w") I use sh ./configure =--host=i586-msdosdjgpp --enable-language=pascal --prefix=d:/djgpp:

1 0

(no subject)
by xp2 07 Jul '00

07 Jul '00

Dear, The GNU Pascal documentation is also availeble as "pdf", "doc", ASCII =file or not ? Best regards MH henyk(a)tu-cottbus.de

3 2

Re: New release and the "--version" switch
by Frank Heckenbach 07 Jul '00

07 Jul '00

Marinier, M. Claude, G. wrote: > After building the 20000705 release on Solaris 2.7 with gcc 2.95.2, I do a > > gpc --version > > and I get > > 2.95.2 19991024 (release) > > However, I can find 20000705 with > > strings /usr/local/bin/gpc | grep 2000 Did you check if an older version is still installed earlier in your $PATH, perhaps in /usr/bin (try `which gpc')? 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: using C routines in pascal
by Frank Heckenbach 07 Jul '00

07 Jul '00

Marinier, M. Claude, G. wrote: > Would it be sufficient to put > function genbet(x,y:shortreal):shortreal;C; > in the calling program? Is it necessary to have the wrapper unit? If yes, > why is a wrapper needed? The advantage of a "wrapper" unit is, if you have (or plan to have) several programs using the library, you'll have only one place which depends on the C code (i.e., only one place to change if the C interface changes). (And it's better modularization, anyway.) The run-time efficiency will be the same for a wrapper unit with external declarations (unlike wrapper routines which suffer from a small overhead -- it depends on the routines if the overhead is relevant or neglectible). 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: using C routines in pascal
by Nathalie Jarosz 07 Jul '00

07 Jul '00

Thanks a lot, it works now!... ________________________________________________________________________ Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com

2 1

Re: 'include' and 'lib' files
by Frank Heckenbach 07 Jul '00

07 Jul '00

Anuradha wrote: > Hello, > > When i try to build a cross-compiler for > target i386-solaris machine with host :sparc-solaris, > > it asks me for the lib and the include files of i386-solaris . > > I don't have an i386-solaris machine here.Can you tell me where i can > find these 'lib' and 'include' files? Since Solaris is proprietary, we cannot copy these files for you. So you'll have to either get access to an i386-solaris machine or order Solaris from Sun -- they distribute it for free (in the money, not freedom, sense), except for S&H. See http://www.sun.com/software/solaris/source/ or http://www.sun.com/software/solaris/binaries/ 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

'include' and 'lib' files
by Anuradha 07 Jul '00

07 Jul '00

Hello, When i try to build a cross-compiler for target i386-solaris machine with host :sparc-solaris, it asks me for the lib and the include files of i386-solaris . I don't have an i386-solaris machine here.Can you tell me where i can find these 'lib' and 'include' files? Regards, anu

1 0

Re: graphic
by Nathalie Jarosz 07 Jul '00

07 Jul '00

Hello all! >From: Maurice Lombardi <Maurice.Lombardi(a)ujf-grenoble.fr> >To: Nathalie Jarosz <jarosz_n(a)hotmail.com>, gpc(a)gnu.de >Subject: Re: graphic >Date: Fri, 07 Jul 2000 10:46:32 +0200 >font directory at this level. What have you done ? I suspect you have >unpacked grx-2.3 instead of >grx-2.3.1 No, I have unpacked grx-2.3.1 and I have just unpacked grx23fnt as you recommend me just before... So?... Nathalie ________________________________________________________________________ Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com

1 0

Re: graphic
by Nathalie Jarosz 07 Jul '00

07 Jul '00

>From: Peter Gerwinski <peter(a)gerwinski.de> >To: "Nathalie Jarosz" <njarosz(a)fr.packardbell.org> >CC: <gpc(a)gnu.de>, <grx(a)gnu.de> >Subject: Re: graphic >Date: Fri, 23 Jun 2000 10:32:57 +0200 > >For Unix (optional): Put into your `.profile' something like: > > set GRX20DRV=xwin > set GRXFONT=/usr/local/lib/grx/fonts I am sorry but what is '.profile'? Actually I don't know where GRX fonts has been installed... When I unpack GRW archive, I have a directory 'grx-2.3.1' which is created as follow: addons/ lib/ makedefs.gnu makefile.lnx test/ bin/ makedefs.bcc makedefs.x11 makefile.wat compat/ makedefs.dec makefile.bcc makefile.x11 doc/ makedefs.dj1 makefile.dj1 pascal/ include/ makedefs.dj2 makefile.dj2 src/ and the GRX fonts directory (?) is in /src/fonts. Is it this path I ahve to put for setting the font? Point 3. Compiling GRX I do: %cd src %make -f makefile.x11 make: Fatal error in reader: ../makedefs.gnu, line 38: Unexpected end of line seen What does it mean? Thanks in advance for your help, Nathalie ________________________________________________________________________ Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com

2 2

LOCAL: GPC workshop in Essen, Germany
by Peter Gerwinski 07 Jul '00

07 Jul '00

Hello, GPC folks, the Essener Linux User Group (ELUG) is organising a workshop on GNU Pascal: Weekend 29./30. July 2000 Villa Vogelsang, Antonienallee 1 45279 Essen Steele-Horst, Germany http://www.villa-vogelsang.de ("Linux Hotel") The primary language will be German. (However the speaker (myself;-) and probably most of the participants can also speak English.) Details will be published (in German) on the ELUG web site (http://www.elug.de). For even more details, please ask the Essener Linux User Group on their mailing list <elug(a)elug.de> or Anja Drewitz <anja(a)drewitz.de> who organises the event. See you, 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-19990118 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

digest version of mailing list?
by John Oram 06 Jul '00

06 Jul '00

Is there a digest version of this mailing list? I'm looking for a single email once every 24-hour instead of multiple email's per day. Thanks in advance, John Oram Sacramento, CA

2 1

Re:
by Frank Heckenbach 06 Jul '00

06 Jul '00

J. David Bryan wrote: > On 6 Jul 2000, at 16:06, xp2 wrote: > > > The GNU Pascal documentation is also availeble as "pdf", "doc", ASCII file > > or not ? > > As far as I know, the documentation is available only in GNU Texinfo format > as part of the source distribution. You can convert Texinfo to PDF or > Postscript with MiKTeX: It's also available in GNU Info (mostly ASCII, but with markup and cross-references) in source and binary distributions. DVI, PostScript and HTML versions will be made available on the WWW home page starting from the next release. 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

grx-2.3.1 and gpc 20000705
by Mason Ip 06 Jul '00

06 Jul '00

I have some problems compiling some grx-2.3.1 pascal sample test programs using the latest gpc 20000705. My system is Sun Sparc Solaris 7. Currently I have two versions of gpc on my system. A) Old GPC (and GCC) /opt/GCC2951/bin/gpc -v Reading specs from /opt/GCC2951/lib/gcc-lib/sparc-sun-solaris2.7/2.95.1/specs gpc version 19991030, based on 2.95.1 19990816 (release) B) New GPC (and GCC) /opt/GCC2952/bin/gpc -v Reading specs from /opt/GCC2952/lib/gcc-lib/sparc-sun-solaris2.7/2.95.2/specs gpc version 20000705, based on 2.95.2 19991024 (release) I have fetched GRX (Graphics) source from the URL below. http://www.gnu.de/software/GRX/download/grx-2.3.1.tar.gz. grx-2.3.1 were compiled and (manually) installed to the "Old" and "New" dir's using "Old" and "New" GCC respectively; so far no problem. Problems come when building the sample pascal programs under grx-2.3.1's pascal directory. grx-2.3.1/pascal> ls ./ build-examples* modetest.pas vir_test.pas ../ grx20.gpi taste.pas bgi/ grx20.o txt_test* blt_test.pas grx20.pas txt_test.pas Here I have my tiny script "build-examples" to build the *.pas. grx-2.3.1/pascal> cat build-examples #!/bin/sh for pgm in `echo blt_test modetest taste txt_test vir_test` do echo compiling $pgm echo /opt/GCC2952/bin/gpc -o $pgm $pgm.pas /opt/GCC2952/lib/libgrx20X.a -lX11 /opt/GCC2952/bin/gpc -o $pgm $pgm.pas /opt/GCC2952/lib/libgrx20X.a -lX11 echo ----- done If I use the "Old" gpc from the script (keeping /opt/GCC2952/lib/libgrx20X.a the same), building were OK. With the "New" gpc, *no pascal programs were built*; the following were the script output (see below). I have no idea why the "init_Grx20" sysmol was not resolved by the "New" gpc, using the *same* library (/opt/GCC2952/lib/libgrx20X.a). <-- logging begin ---> compiling blt_test /opt/GCC2952/bin/gpc -o blt_test blt_test.pas /opt/GCC2952/lib/libgrx20X.a -lX11 blt_test.pas:26: type name expected, identifier `Grfont' given blt_test.pas:27: warning: type defaults to `int' in declaration of `F' ----- compiling modetest /opt/GCC2952/bin/gpc -o modetest modetest.pas /opt/GCC2952/lib/libgrx20X.a -lX11 Undefined first referenced symbol in file init_Grx20 /var/tmp/ccsjaOcV1.o ld: fatal: Symbol referencing errors. No output written to modetest collect2: ld returned 1 exit status ----- compiling taste /opt/GCC2952/bin/gpc -o taste taste.pas /opt/GCC2952/lib/libgrx20X.a -lX11 Undefined first referenced symbol in file init_Grx20 /var/tmp/ccXDaydV1.o ld: fatal: Symbol referencing errors. No output written to taste collect2: ld returned 1 exit status ----- compiling txt_test /opt/GCC2952/bin/gpc -o txt_test txt_test.pas /opt/GCC2952/lib/libgrx20X.a -lX11 txt_test.pas:28: type name expected, identifier `Grfont' given txt_test.pas:29: warning: type defaults to `int' in declaration of `F' txt_test.pas: In function `pascal_main_program': txt_test.pas:51: missing `^' in indirect function call txt_test.pas:51: called object is not a procedure or function txt_test.pas:61: assignment from incompatible pointer type txt_test.pas:65: missing `^' in indirect function call txt_test.pas:65: called object is not a procedure or function ----- compiling vir_test /opt/GCC2952/bin/gpc -o vir_test vir_test.pas /opt/GCC2952/lib/libgrx20X.a -lX11 vir_test.pas: In function `pascal_main_program': vir_test.pas:140: called object is not a procedure or function -----

1 0

Re: Calling GNU Pascal procedures from Fortran
by Frank Heckenbach 05 Jul '00

05 Jul '00

Marinier, M. Claude, G. wrote: > I am using GNU Pascal 2.1 (19991030) on Solaris 2.7 from a package. > > I am porting a graphics package from DEC Pascal on VMS to GNU Pascal on > Solaris. The package is used with many Fortran programs. The conversion is > almost complete. All five levels of the package compile and all the Pascal > test programs I have build so far run OK. I cannot get the Fortran test > programs to link. The linker cannot find the graphics package entry > points. For example > > 'undefined reference to init_' > > I have found a lot of information about calling from Pascal but nothing so > far that help me to call from Fortran to Pascal. > > Can someone point me to the appropriate documentation? In the upcoming release, the mechanism for including Pascal code into C programs is changed and documented with examples. For Fortran, it should be similar (if you know how to call C code from Fortran, you should get along -- I don't know Fortran, so I can't give any details). 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

fatal signal 6
by claude.marinier＠dreo.dnd.ca 05 Jul '00

05 Jul '00

Hi, I am trying to port a 3D graphics package from VMS/Alpha with DEC Pascal to Solaris 7 (a.k.a. Solaris 2.7). I have installed version 19990119 of gpc with version 2.8.1 of gcc. I have successfully compiled the first three levels of the graphics package. When compiling level4.pas, I get a 'fatal error 6' message, a .gpi file but no .o file. I systematically trimmed code (whole functions and procedures) off the end of the source file until is compiled. Most of the implementation section was gone at that point. I tried commenting out the same code with '(*' and '*)' with the same result: it compiled. I then tried to remove only the code on the border, i.e. the compilation failed, I removed another procedure, and it compiled; that last procedure is the one I removed from the full source. This was based on the assumption that some code triggered the failure. The compilation failed with the 'offending' code removed. I abandonned that avenue of research. Then I tried gcc debug options. I specifed '-da' and got about a dozen debug files (.sched2 & .dbr were empty). Specifying '-dJ' did not produce the expected .sched2 file. What is the next step? Try using the latest gcc as a base? Use Modules instead of Units? I would need documentation of those. Convert to Modula2? Is this even possible? How different are the languages? Is there a free compiler out there? Switch to C (use p2c, the Pascal to C translator) and abandon Pascal entirely? Help. Thanks. P.S. I joined the list a few minutes ago. To ensure that I get your reply, please 'cc' to me directly. Thanks. -- Claude Marinier, Information Technology Group claude.marinier(a)dreo.dnd.ca Defence Research Establishment Ottawa (DREO) (613) 998-4901 FAX 998-2675 3701 Carling Avenue, Ottawa, Ontario K1A 0Z4 http://www.dreo.dnd.ca

3 7

Re: Internal compiler error - bug
by Frank Heckenbach 05 Jul '00

05 Jul '00

Clyde Meli wrote: > I'm compiling a PASCAL program under Solaris with gpc version > 19991030 based on gcc 2.95.2. > > > gpc --automake sgamain.pas > generate.pas: In function `Prescale': > generate.pas:33: Internal compiler error in `emit_library_call_value', at gcc-2. > 95.2/gcc/calls.c:3198 > Please submit a full bug report. > See <URL:http://www.gnu.org/software/gcc/faq.html#bugreport> for instructions. > gpc1: gpc exited with status 1 > report.pas:9: module/unit `generate' could not be compiled > > The code which caused the problem looks like: > > Procedure Prescale(umax,uavg,umin:real;VAR a,b:real); > { Calculate scaling coefficients for linear scaling } > CONST > fmultiple = 2.0; { fitness multiple is 2 } > VAR > delta:real; { divisor } > Begin > if umin > (fmultiple * uavg - umax) / (fmultiple - 1.0) { Non-Negative Test } > > then > Begin { Normal Scaling } > Delta:=umax-uavg; > a:=(fmultiple - 1.0) * uavg / delta; > b:=uavg * (umax - real(2) {fmultiple} * uavg) / delta; > End else > > > I fixed the problem termporarily by commenting out (fmultiple - 1.0) as it is > equal to 1.0 currently, and by replacing fmultiple in the other > assignment (b:=uavg*(umax- etc.) by real(2) instead. It seems writing the > constant there triggered a problem with the compiler. Indeed, this was a GPC bug that has been fixed meanwhile. According to the `Fixed Bugs' section in the To-Do list <http://agnes.dida.physik.uni-essen.de/~gnu-pascal/todo.html>: 20000503: Sparc: division by reals (fjf237.pas, matt1.pas) or `Round (real_constant)' (chaput1.pas) make the compiler crash <199911040915.KAA11168@@humulus.daimi.au.dk> Unfortunately, there's been no GPC release since 2000-05-03, so please either wait for the next release, or use the type-casting workaround in the first assignment as well (this should work, I think -- can't verify it, since my development compiler doesn't have this bug anymore): a:= (Real (fmultiple) - 1.0) * uavg / delta; 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

4 4

Re: beta distribution
by Nathalie Jarosz 05 Jul '00

05 Jul '00

>From: Frank Heckenbach <frank(a)g-n-u.de> >To: gpc(a)gnu.de >Subject: Re: beta distribution >Date: Wed, 5 Jul 2000 13:22:37 +0200 > > >You need to link the C code. For a simple C file, you can insert > > >`{$L foo.c}' into the unit, and GPC will automatically compile the C > > >file. For a library libbar.a, you can use `{$L bar}' in the source > > >which is equivalent to `-lbar' on the command line. > > > > I am not sure to understand. Do I have to put {$L randlib.c} in beta.p >like > > this: > >If you have a self-contained file randlib.c. If randlib.c requires >other C files, say baz.c, add `{$L baz.c}' as well. However, if you >have librandlib.a instead, read on. > > > unit beta; > > interface > > {$L randlib.c} > > function genbet(x,y:shortreal):shortreal;C; > > implementation > > end. > > > > and keep my program called 'test' like this: > > > > program betadev; > > uses > > beta; > > begin > > writeln(genbet(100,150)); > > end. > > > > and after if I compile the first one, the following message appears: > > beta.p:5: file `randlib.c' not found > > > > and for the second one: > > Undefined first referenced > > symbol in file > > genbet /var/tmp/cc5OaGYv1.o > > ld: fatal: Symbol referencing errors. No output written to test > > collect2: ld returned 1 exit status > > > > When you say "For a library libbar.a, you can use `{$L bar}' in the >source > > which is equivalent to `-lbar' on the command line.", what is the source >in > > this case? > >GPC doesn't care. For libraries, it expects them to be compiled >already. I.e., if you have librandlib.a (a compiled library), add >`{$L randlib}' in the Pascal source. > >If you have the sources for librandlib, compile them first >(according to the (hopefully) accompanying instructions), to get >librandlib.a (or librandlib.so, a shared library, which can also be >used by `{$L randlib}'). So I will try to summurize all steps I made before still trying to be understood... At first, I have downloaded randlibc-1.3.tar.gz. After having unpacked this file, a randlib.c directory was created and it contains: HOWTOGET* README* doc/ src/ test/ I have received help from Maurice Lombardi to install this randlib routines: ------------------------------------------------------------------ > >From: Maurice Lombardi <Maurice.Lombardi(a)ujf-grenoble.fr> > >To: Nathalie Jarosz <jarosz_n(a)hotmail.com> > >CC: gpc(a)gnu.de > >Subject: Re: beta distribution > >Date: Fri, 30 Jun 2000 16:24:07 +0200 > > > >Have you read these two text files and those contained in the doc folder >? > >Usually they contain > >instructions on whet do do to install the package. >Yes of course but nothing clear to me: > > INSTALLATION > >Directory src contains the C source for most of the routines. The >files com.c and randlib.c constitute RANDLIB. The file randlib.h >contains prototypes for the RANDLIB routines that should be used (and >not for a few internal routines). The C code from these directories >should be compiled and placed in a library. Directory test contains >three test programs for this code. The file randlib.h in directory >test is a copy of that in src. > > >Where have you gotten randlibc-1.3.tar.gz from ? >I get from: >http://odin.mdacc.tmc.edu/anonftp/page_2.html#RANDLIB Well it is simple enough to be made by hand (there are no dependencies). With GNU tools type: cd src gcc -c -O2 com.c gcc -c -O2 linpack.c gcc -c -O2 randlib.c # ^uppercase: meand Optimize # at this point you have created com.o linpack.o randlib.o # to put them in a library librandlib.a type: ar -rv librandlib.a com.o linpack.o randlib.o ranlib librandlib.a # ^ no d: it is a system function #then move librandlib.a into a system wide library directory e.g. /usr/local/lib # randlib.h include /usr/local/include #to check the result cd ../test gcc -O2 -o tstbot tstbot.c -lrandlib ^lowercase: means output ./tstbot #etc..." ----------------------------------------------------------------------- So I did all this but I still don't understand how to use the famous betadev function I would like to use in a pascal program and which is in these randlib routines written in C... Thanks in advance for your help, Nathalie ________________________________________________________________________ Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com

1 0

Re: beta distribution
by Nathalie Jarosz 05 Jul '00

05 Jul '00

>From: Frank Heckenbach <frank(a)g-n-u.de> >To: gpc(a)gnu.de >Subject: Re: beta distribution >Date: Fri, 30 Jun 2000 20:35:04 +0200 >You need to link the C code. For a simple C file, you can insert >`{$L foo.c}' into the unit, and GPC will automatically compile the C >file. For a library libbar.a, you can use `{$L bar}' in the source >which is equivalent to `-lbar' on the command line. I am not sure to understand. Do I have to put {$L randlib.c} in beta.p like this: unit beta; interface {$L randlib.c} function genbet(x,y:shortreal):shortreal;C; implementation end. and keep my program called 'test' like this: program betadev; uses beta; begin writeln(genbet(100,150)); end. and after if I compile the first one, the following message appears: beta.p:5: file `randlib.c' not found and for the second one: Undefined first referenced symbol in file genbet /var/tmp/cc5OaGYv1.o ld: fatal: Symbol referencing errors. No output written to test collect2: ld returned 1 exit status When you say "For a library libbar.a, you can use `{$L bar}' in the source which is equivalent to `-lbar' on the command line.", what is the source in this case? Thanks in advance, Nathalie ________________________________________________________________________ Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com

1 0

Re: beta distribution
by Frank Heckenbach 05 Jul '00

05 Jul '00

Nathalie Jarosz wrote: > >You need to link the C code. For a simple C file, you can insert > >`{$L foo.c}' into the unit, and GPC will automatically compile the C > >file. For a library libbar.a, you can use `{$L bar}' in the source > >which is equivalent to `-lbar' on the command line. > > I am not sure to understand. Do I have to put {$L randlib.c} in beta.p like > this: If you have a self-contained file randlib.c. If randlib.c requires other C files, say baz.c, add `{$L baz.c}' as well. However, if you have librandlib.a instead, read on. > unit beta; > interface > {$L randlib.c} > function genbet(x,y:shortreal):shortreal;C; > implementation > end. > > and keep my program called 'test' like this: > > program betadev; > uses > beta; > begin > writeln(genbet(100,150)); > end. > > and after if I compile the first one, the following message appears: > beta.p:5: file `randlib.c' not found > > and for the second one: > Undefined first referenced > symbol in file > genbet /var/tmp/cc5OaGYv1.o > ld: fatal: Symbol referencing errors. No output written to test > collect2: ld returned 1 exit status > > When you say "For a library libbar.a, you can use `{$L bar}' in the source > which is equivalent to `-lbar' on the command line.", what is the source in > this case? GPC doesn't care. For libraries, it expects them to be compiled already. I.e., if you have librandlib.a (a compiled library), add `{$L randlib}' in the Pascal source. If you have the sources for librandlib, compile them first (according to the (hopefully) accompanying instructions), to get librandlib.a (or librandlib.so, a shared library, which can also be used by `{$L randlib}'). 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:
by Nathalie Jarosz 05 Jul '00

05 Jul '00

>From: Frank Heckenbach <frank(a)g-n-u.de> >To: gpc(a)gnu.de >Subject: Re: >Date: Tue, 4 Jul 2000 19:33:48 +0200 > > Here is the routine which is involved: > > > > function travel(djk:real;md:mat;A:minitable;Ak:real;ns,j:integer):real; > > {probability of an individual leaving patch j to reach patch k} > > const > > alpha = 4.910; > > zim = 0.263; > > lambda = 0.175; > > var > > Sj,t : real; > > begin > > Sj:=connect(md,A,ns,j); > > t:=(exp(-alpha*djk)*pow2(Ak,zim))/((lambda/Sj)+Sj); > > travel:=t; > > end; > >This is exactly the same GPC bug that Clyde Meli has just reported. >As I wrote last night, this bug has been fixed meanwhile. According >to the `Fixed Bugs' section in the To-Do list ><http://agnes.dida.physik.uni-essen.de/~gnu-pascal/todo.html>: > >20000503: Sparc: division by reals (fjf237.pas, matt1.pas) or >`Round (real_constant)' (chaput1.pas) make the compiler crash ><199911040915.KAA11168@@humulus.daimi.au.dk> > >(Sparc is the processor used in Sun's machines.) > >Until there is a new GPC release with this bug fixed, you can work >around by type-casting the constants to Real: > >const > alpha = Real (4.910); > zim = Real (0.263); > lambda = Real (0.175); Ok, but I need these true values, so?... Nathalie ________________________________________________________________________ Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com

2 1

Re: fatal signal 6
by Frank Heckenbach 05 Jul '00

05 Jul '00

Marinier, M. Claude, G. wrote: > Frank, > > Thank you for your help. > > Could you be more specific with the release date? It would help me decide > whether to wait or try something else. Peter is just doing final tests. If nothing fails unexpectedly, the release should come out today. 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

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