- 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