Gpc February 2003

gpc@gnu.de

38 participants
76 discussions

Accessing command line data
by CBFalconer 23 Feb '03

23 Feb '03

There is no provision in any of the standard Pascals for accessing command line data. The Borland clones provide an analog of the C/Unix world in Paramstr and Paramct. In PascalP I handled this with a system file, called cmdline, much like input and output. It was defined at the encompassing level 0 as a read-only text file, and held a single line. To access it one could use: reset(cmdline); cmdline^ get(cmdline); eoln(cmdline) eof(cmdline) read(cmdline, ch); read(cmdline, intvalue); (* etc *) i.e. absolutely no extensions to the standard system. Note that it could be reset multiple times, to restart reading from the beginning. Since it is a one line file after readln(cmdline) eof(cmdline) will be true. If cmdline is empty eof(cmdline) will be true immediately after reset(cmdline). Naturally the contents of that line depend on whatever shell launched the program. How are the chances of adding this to gpc. The line itself must already be there for the runtime to prepare paramstr and paramct. An advantage of this is that other systems can be source compatible. All the users need do is prepare a one line file, call it cmdline, and run the Pascal program. At the same time gpc users can still access an exterior file call cmdline, by simply defining it themselves. The 'extension' will only kick in when no "VAR cmdline : text" is in user scope. -- Chuck F (cbfalconer(a)yahoo.com) (cbfalconer(a)worldnet.att.net) Available for consulting/temporary embedded and systems. <http://cbfalconer.home.att.net> USE worldnet address!

4 3

GPC into FreeBSD ports tree
by samir namér 22 Feb '03

22 Feb '03

has anyone tried to get gpc into the freebsd ports tree? it would be a great help when trying to install it... // samir namér --- "may the source be with you"

1 0

gpc and gcc-3.3
by Matthias Klose 22 Feb '03

22 Feb '03

I'm currently experiencing problems with gpc builds based on gcc-3.2.[23] on non ix86-linux architectures. These bugs are fixed in the current gcc-3.3 release branch. Did "somebody" already began updating gpc to work with gcc-3.3? Thanks, Matthias PS: Would you mind sending automatic testsuite results to this list for the various Debian architectures (linux, hurd and freebsd)?

1 0

gpc with *bsd
by Juha Korkiakangas 22 Feb '03

22 Feb '03

Have somebody have any luck to compile gpc-3.2.1 for freebsd. What options did you use, if any?

1 0

Web server moving
by Frank Heckenbach 21 Feb '03

21 Feb '03

Hi, the GPC pages are moving to a new web server. If everything goes well, you won't notice any difference, but if you encounter any problems, please drop me a note. Frank -- Frank Heckenbach, frank(a)g-n-u.de, http://fjf.gnu.de/, 7977168E GPC To-Do list, latest features, fixed bugs: http://www.gnu-pascal.de/todo.html GPC download signing key: 51FF C1F0 1A77 C6C2 4482 4DDC 117A 9773 7F88 1707

1 0

Calling libraries from MingW GPC
by Silvio a Beccara 20 Feb '03

20 Feb '03

Dear Chief, I have one "strange" question: I have some libraries written for Qbasic under DOS: they are used to communicate, via RS232C, with a device which can read analogic and digital inputs and control relais and stepping motors. My question is: do you think it could be possible to link these libraries and write a wrapper unit to control the interface from within GPC in MingW/DJPP? If necessary, I can send you the binaries (the software isn't any longer sold nor supported ). Thank you, best regards Silvio a Beccara

2 1

Re: Dynamic array sizes
by Wood David 20 Feb '03

20 Feb '03

Frank Heckenbach replied: > > >>are particular Pascal structures that shouldn't be zeroed by this > > >>technique (apart from dynamic arrays)? > > > > Any kind of schemata, which include dynamic arrays ans strings > > Also files and objects. > > There is a built-in procedure `Initialize' to (re-)initialize any > variable, so you could theoretically zero out everything, then > initialize it again, but I'm not sure if I should have mentioned > this. ;-) In any case, you'll do some extra work (init, zero, init > again) ... > > But I agree, in this case I'd recommend a `for' loop, too. > > PROCEDURE zero(VAR param; ch : char; size : longint); asmname 'memset'; > > BEGIN > NEW( Test1, a ); > writeln(sizeof(Test1^)); > zero(Test1^,#0,sizeof(Test1^)); > END. > OK - that's helpful. My example was trivial, but in practice I'm trying to zero very large arrays of large records which I very time consuming with loops and type-matched assignments. So I do new(anyvar,x, y); zero(anyvar^,#0,sizeof(anyvar)); initialize(anyvar); .. and because initialize is a built-in, it doesn't need any declaring. BUT ... when I run with electric-fence I get a SIGSEGV in memset. Doing some experimentation, it appears that each dynamic array dimension uses an extra 4 words. So if I amend my zero function call as follows ... zero(anyvar^,#0,sizeof(anyvar)-8); ... the problem goes away. In this case, the Initialize() call doesn't seem to make any difference. Am I right in assuming that the dynamic array sizing is tacked on the end of the storage so deducting 4 words per dimension is the right approach? Is Initialize() only required after I've zeroed a string or a record containing a string? Finally, given that Initialize can very usefully take any variable as a parameter, it's a shame that it doesn't actually do the zeroing. Is there another built-in I haven't spotted that will do this without be having to explicitly worry about the number of dimensions the dynamic arrays have? David Wood, QinetiQ Farnborough. The Information contained in this E-Mail and any subsequent correspondence is private and is intended solely for the intended recipient(s). For those other than the recipient any disclosure, copying, distribution, or any action taken or omitted to be taken in reliance on such information is prohibited and may be unlawful.

3 2

Mingw binaries updated
by Prof. A Olowofoyeku (The African Chief) 20 Feb '03

20 Feb '03

Dear all Updated Mingw binaries for gpc 20030209 are available on the GPC server: http://www.gnu-pascal.de/contrib/chief/win32/mingw32/ There are binaries based on gcc-3.2.2, and gcc-2.95.3-6. Best regards, The Chief --------- Prof. Abimbola Olowofoyeku (The African Chief) Web: http://www.bigfoot.com/~african_chief/

1 0

linker issues
by David Hajoglou 20 Feb '03

20 Feb '03

To Whom It May Concern, I tried to locate any FAQ/manual information about the error I get but did not find any information. I installed MinGW and GNU Pascal on a windows machine and I can compile a program into an object file but I cannot go any further. When using gpcc the linker (ld.exe) fails with the following error: ========================== c:\MinGW\bin\gpcc test.p GPCC (Win32 (Mingw) build), v2.18: BP-compatibility shell for GNU Pascal. (c) 11th May 2002, Prof. A Olowofoyeku (The African Chief). Compiling PROGRAM "test.p" ... CFG file = c:\mingw\bin\gpcc.cfg Args = [gpc --automake -s --no-typed-address --extended-syntax --ignore-function-results --no-io-checking --no-stack-checking -O2 -march=i486 -mcpu=i486 -O2 -mcpu=i686 --executable-file-name test.p] \mingw\lib\gcc-lib\mingw32\2.95.3-6\..\..\..\..\mingw32\bin\ld.exe: cannot find -lgcc ========================== I tried to point at the local copy of ld.exe and this error occured: ========================== c:\MinGW\bin\gpcc test.p --L \mingw\bin\ld.exe GPCC (Win32 (Mingw) build), v2.18: BP-compatibility shell for GNU Pascal. (c) 11th May 2002, Prof. A Olowofoyeku (The African Chief). Compiling PROGRAM "test.p" ... CFG file = c:\mingw\bin\gpcc.cfg Args = [gpc --automake -s --no-typed-address --extended-syntax --ignore-function-results --no-io-checking --no-stack-checking -O2 -march=i486 -mcpu=i486 -O2 -mcpu=i686 \mingw\mingw32\bin\ld.exe --executable-file-name test.p -l ] \mingw\lib\gcc-lib\mingw32\2.95.3-6\..\..\..\..\mingw32\bin\ld.exe: cannot find -l--library=gpc ========================= The program (simple 'hello world' program) complies into an object file just fine with 'gpc -c test.p'. It would appear that gpc can find ld.exe but ld.exe is not responding correctally. I verified that the specs file is correct and tried both the install gpc and the patched gpc. Perhaps this is a problem with my MinGW install, however their mailing list archives are not functioning and I am unable to get any information from them. Below is my install details: -- *MinGW 2.0.0-3 *GPC 2.1 (GNU Pascal version 2.1 (20020510), based on gcc-2.95.3-6 (mingw special) *GPC fix1 (20 sept. 2002 patch) *Windows 2000 Prof (sp3) Any help or documentation would be helpful as I know nothing of this environment and am trying my best to learn it quickly. Regards, David Hajoglou ::David Hajoglou ::Systems Administrator, Department of Computer Science ::Saint Mary's University of Minnesota ::Phone :: 507.457.1415 ::Fax :: 507.457.1401 ::Office :: LaSalle 141C ::Email :: dhajoglo(a)smumn.edu

2 1

Re: Dynamic array sizes
by Wood David 19 Feb '03

19 Feb '03

It's still not that simple... 1. I've now found a variable with a single dynamic dimension (i.e.. an array of 432 byte mixed type records) which adds on 8 bytes for the dynamic size instead of the usual 4 (as I get for all the small record arrays I've tried so far). This makes choosing the correct area of memory to zero even more hazardous. How do I reliably calculate how much space has been added on for the dynamic size info. without meticulous trial and error? 2. If sizeof() reports a dynamic variable (e.g.. an array of 3 doubles) to be, say, 28 bytes, which we understand to be 3 x 8 + 4 for the dynamic size, the total size of the Pascal storage area is 28. So why should linking with efence produce a SIGSEGV anyway when using memset on this area? David Wood QinetiQ, Farnborough The Information contained in this E-Mail and any subsequent correspondence is private and is intended solely for the intended recipient(s). For those other than the recipient any disclosure, copying, distribution, or any action taken or omitted to be taken in reliance on such information is prohibited and may be unlawful.

2 1

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 February 2003