Gpc

gpc@gnu.de

5400 discussions

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

13 Aug '03

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

2 1

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

13 Aug '03

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

3 5

Question solaris vs alpha
by Mehdi Khaldi 12 Aug '03

12 Aug '03

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

2 1

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

12 Aug '03

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

1 0

--setlimit
by Adriaan van Os 12 Aug '03

12 Aug '03

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

3 3

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

11 Aug '03

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

2 1

--param
by Adriaan van Os 11 Aug '03

11 Aug '03

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

2 1

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

11 Aug '03

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

2 1

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

11 Aug '03

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

4 6

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

11 Aug '03

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

1 0

Jump to page:

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