Gpc May 2000

gpc@gnu.de

34 participants
63 discussions

Re: Help needed, path configuration
by Frank Heckenbach 09 May '00

09 May '00

Ryan K C Wong wrote: > I cannot get GPC working: it always reports missing files. > > I use DJGPP 2.02 and GPC20BB for DOS with GO32V2 support > (please see manifest below) > > Thank you. > > > Description > *************************************** > The first file it says missing is the DJGPP.DJL > the path of the file is C:\DJGPP\LIB\DJGP.DJL > > after I copied this file to the same directory of my > program's source file, it continues to report that > every unit 'CRT0', .... is missing. > > I suspect that the configuration file is corrupted. > I included the DJGPP.ENV here. See below. > > ******************************************* > ***** djgpp.env **************************** > ******************************************* There's no gpc section there. Try adding: [gpc] COMPILER_PATH=%/>;COMPILER_PATH%%DJDIR%/bin LIBRARY_PATH=%/>;LIBRARY_PATH%%DJDIR%/lib 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: - Initialising enumerated types
by Frank Heckenbach 07 May '00

07 May '00

Wren Lee wrote: > DEC-Pascal has the ability to initialise a boolean or an enumerated type > from a text file.The text is case insensitive and is read just as any > other variable. Is there a way to do this with GPC? No. For Booleans, it would not be too difficult to implement, but for enum types, it would require that they're values (which are program identifiers otherwise) be kept in the executable which is not provided for currently (besides debug info). > If not, are there > any good ways to emulate this behaviour? Something like the following. It also illustrates the limitations... program ReadBooleanEnumDemo; uses GPC; procedure ReadWord (var f : Text; var s : String); const WordChars = ['A' .. 'Z', 'a' .. 'z', '_', '0' .. '9']; begin s := ''; while f^ in SpaceCharacters do if EOLn (f) then Readln (f) else Get (f); while not EOF (f) and not EOLn (f) and (f^ in WordChars) do begin s := s + f^; Get (f) end end; function ReadBoolean (var f : Text) : Boolean; var s : TString; begin ReadWord (f, s); LoCaseString (s); if s = 'false' then ReadBoolean := False else if s = 'true' then ReadBoolean := True else begin IOErrorCString (464, FileName (f)); { error when reading from % } ReadBoolean := False end end; function ReadEnum (var f : Text; const IDs : array of PString) : Integer; var s : TString; i : Integer; begin ReadWord (f, s); LoCaseString (s); i := Low (IDs); while (i <= High (IDs)) and (LoCaseStr (IDs [i]^) <> s) do Inc (i); if i <= High (IDs) then ReadEnum := i else begin IOErrorCString (464, FileName (f)); { error when reading from % } ReadEnum := 0 end end; procedure WriteEnum (var f : Text; EnumVal : Integer; const IDs : array [m .. n : Integer] of PString); begin Write (f, IDs [EnumVal]^) end; type TFruit = (Apple, Orange, Banana); const FruitIDs : array [TFruit] of PString = (@'Apple', @'Orange', @'Banana'); var BoolVar : Boolean; FruitVar : TFruit; begin Write ('Enter a boolean and a fruit: '); BoolVar := ReadBoolean (Input); FruitVar := TFruit (ReadEnum (Input, FruitIDs)); { we have to cast the result to the enum type } Writeln ('You entered:'); Writeln (BoolVar); WriteEnum (Output, Ord (FruitVar), FruitIDs) 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

1 0

- Initialising enumerated types
by Wren Lee 05 May '00

05 May '00

DEC-Pascal has the ability to initialise a boolean or an enumerated type from a text file.The text is case insensitive and is read just as any other variable. Is there a way to do this with GPC? If not, are there any good ways to emulate this behaviour? I am currently using GPC v.19991030 based on 2.95.2 19991024 on a LINUX PC. The following program shows the functionallity that I am trying to emulate. Thanks in advance, Lee. --- PROGRAM Read_Enum(input, output); TYPE colour = (red, green, blue); VAR flag : boolean; { Test boolean } mycol : colour; { Test enumerated type } ip_file : TEXT; { input data file } filename : String(80); i : integer; BEGIN filename := "enum.dat"; open(ip_file, filename, history:=old); reset(ip_file); FOR i := 1 to 3 DO BEGIN readln(ip_file, flag); IF (flag) then writeln("Flag is true") ELSE writeln('Flag is false'); END; FOR i := 1 to 3 DO BEGIN readln(ip_file, mycol); CASE mycol OF red : writeln("Your colour is red"); green : writeln("Your colour is green"); blue : writeln("Your colour is blue"); END; END; close(ip_file); END. enum.dat: ======== true False TrUE Red green BLUE output: ====== Flag is true Flag is false Flag is true Your colour is red Your colour is green Your colour is blue -- 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.

1 0

Bombed Compilation on OSF/1
by John L. Ries 04 May '00

04 May '00

The compilation job told me to submit a full bug report, so here goes... Hardware: DEC 3000/800 AXP OS: Digital UNIX 4.0E (aka OSF/1) GCC Version: 2.95.2 GPC Version: 19991030 Where it dies: ../.././xgpc -B../.././ -c -I. -W -Wall -Wpointer-arith -Wwrite-strings -Wmissing-prototypes -Wmissing-declarations -g -O2 -DRTS_RELEASE_STRING="'__GPC_RTS_VERSION_`cat /attila/src/gcc-2.95.2/gcc/p/rts/rts_release`__'" -DBSD_RTS=0 `if [ x@with_shared@ = xyes ] ; then echo -fPIC; fi` --unit-path=/attila/src/gcc-2.95.2/gcc/p/rts --automake /attila/src/gcc-2.95.2/gcc/p/rts/heap.pas /attila/src/gcc-2.95.2/gcc/p/rts/error.pas: In function `Geterrormessage': /attila/src/gcc-2.95.2/gcc/p/rts/error.pas:365: Internal compiler error in `copy_to_mode_reg', at explow.c:669 Please submit a full bug report. See <URL:http://www.gnu.org/software/gcc/faq.html#bugreport> for instructions. gpc1: ../.././xgpc exited with status 1 /attila/src/gcc-2.95.2/gcc/p/rts/heap.pas:30: module/unit `error' could not be compiled gmake[2]: *** [heap.o] Error 1 gmake[2]: Leaving directory `/attila/src/gcc/gcc/p/rts' gmake[1]: *** [pascal.rts] Error 2 gmake[1]: Leaving directory `/attila/src/gcc/gcc' gmake: *** [all-gcc] Error 2 I compiled in a separate directory from the source (per standard advice), ran configure without arguments, followed by gmake (ie GNU make) LANGUAGES=pascal (I installed the other stuff previously). ------------------------------------------------------- John L. Ries Salford Systems Phone: (619)543-8880 x25 or (619)667-0056 FAX: (619)543-8888 E-Mail: jries(a)salford-systems.com _______________________________________________________

1 0

pascal compiler
by Nathalie Jarosz 04 May '00

04 May '00

hello! Today, I manage to install patch so I go on a little with the installation but the step 2 (configuration) is not ok : 2. Configuring and building GNU CC GNU Pascal is automatically configured with GNU CC. Configuration of GNU CC is treated in depth in *Note the GCC installation instructions: (gcc)Installation. Chdir to the GCC object directory. (This can be a directory of your choice, including the GCC source directory.) From there, run the `configure' script in the GCC source directory. If both directories are the same, the command % ./configure is sufficient to configure GCC in most cases When I do this, the following message appears : " creating cache./config.cache checking host system type ... configure : error : can not guess host type ; you must specify one" What does it mean? Thanks a lot for you answer, nathalie

2 1

Help needed, path configuration
by Ryan K C Wong 04 May '00

04 May '00

I cannot get GPC working: it always reports missing files. I use DJGPP 2.02 and GPC20BB for DOS with GO32V2 support (please see manifest below) Thank you. Description *************************************** The first file it says missing is the DJGPP.DJL the path of the file is C:\DJGPP\LIB\DJGP.DJL after I copied this file to the same directory of my program's source file, it continues to report that every unit 'CRT0', .... is missing. I suspect that the configuration file is corrupted. I included the DJGPP.ENV here. See below. My Install path: C:\DJGPP I unzipped everything into this directory, with path reconstruction and long filename support. DOS search path: set DJGPP=C:/DJGPP/DJGPP.ENV ************************************** ******************************************* ****** files in the manifest directory *** ******************************************* BNU281B MFT 525 01-12-98 BNU281B VER 65 07-16-97 DJDEV202 MFT 3,040 12-13-98 DJDEV202 VER 38 12-13-98 GCC2952B MFT 1,133 10-26-99 GCC2952B VER 53 10-25-99 GDB418B MFT 556 08-01-99 GDB418B VER 55 05-06-99 MAK377B MFT 274 08-14-98 MAK377B VER 48 08-14-98 TXI312B MFT 517 05-22-98 TXI312B VER 48 05-22-98 GPC20BB VER 86 01-18-99 GPC20BB MFT 1,964 01-18-99 ****************************************** ******************************************* ***** 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 [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 C_INCLUDE_PATH=%/>;C_INCLUDE_PATH%%DJDIR%/include OBJCPLUS_INCLUDE_PATH=%/>;OBJCPLUS_INCLUDE_PATH%%DJDIR%/include;%DJDIR%/lang/objc OBJC_INCLUDE_PATH=%/>;OBJC_INCLUDE_PATH%%DJDIR%/include;%DJDIR%/lang/objc [gcc] COMPILER_PATH=%/>;COMPILER_PATH%%DJDIR%/bin LIBRARY_PATH=%/>;LIBRARY_PATH%%DJDIR%/lib [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=%LESS% -h5$y5$Dd2.0$Du14.0$Ds4.7$Dk9.0$ +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% [sh] PATH=%/>PATH% [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 ******************************************* ****end of DJGPP.ENV**************** *******************************************

1 0

Re: GPC on Solaris (fwd)
by Frank Heckenbach 04 May '00

04 May '00

Veselic wrote: > Dear Dr. Heckenbach, ^^^ Not yet. ;-) > thanks for your prompt answer. One more information: > among my sources there are other such 'pairs' i.e. > programs that differ only in the precision 'single' > and 'extended', respectively. All those compile OK > on my Sun, however. > > If this is really a bug in the compiler then I think > it should be repaired with certain priority. I've verified now that my fix indeed cures the problem, as well as a problem with `Complex/Real', reported by Maurice Lombardi some time ago. So it will be fixed in the next release or snapshot. 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 on Solaris (fwd)
by Frank Heckenbach 04 May '00

04 May '00

Veselic wrote: > Dear Dr. Gerwinski, dear GPC-ers, > > After having installed the new version of gpc all > my sources (originally written for Turbo Pascal, > hundreds of them) are compiled smoothly, BUT ONE. > Here is the story: > > System description: > > SunOS mph 5.7 Generic_106541-08 sun4u sparc SUNW,Ultra-2 > > GPC description: > > GNU Pascal version 19991030, based on 2.95.2 19991024 (release), > compiled Nov 1$ > Copyright (C) 1987, 89, 92-97, 1998 Free Software Foundation, Inc. > > Here I try compiling: > > gpc --borland-pascal -o sj sj.p > sj.p: In function `Gjgt_dec_new': > sj.p:466: Internal compiler error in `emit_library_call_value', at calls.c:3198 > Please submit a full bug report. > See <URL:http://www.gnu.org/software/gcc/faq.html#bugreport> for instructions. > > Additional information: > > 1. The corresponding area in the source is: > > 465 x := sqrt( beta * w ) ; > 466 y := 0.5 * alfa / x ; > 467 z := 0.5 * gama / x ; > > 2. another source (named ej.p) which differs from sj.p ONLY in having > 'extended' whenever sj.p has 'single', COMPILES AND EXECUTES SMOOTHLY. > > 3. On my PC-Linux with the gpc version > > GNU Pascal version 19990118, based on gcc-2.8.1, compiled Jul 6 1999 > 16:08:58. > Copyright (C) 1987, 89, 92-97, 1998 Free Software Foundation, Inc. > > all sources, including the incriminated sj.p, compile OK. Yes, that's a known bug, under exactly the circumstances you observed (one operand is Single or Double, and only on Sparc). I think I found the cause of the bug, and if so, it will be fixed in the next release, but I've yet to test it 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

GPC: how to patch gcc 2.95.2 ?
by Martin Maechler 04 May '00

04 May '00

I've downloaded the current GPC tar file, unpacked it, and moved (actually symlinked) the p/ directory into gcc-2.95.2/ (which is the unpacked source of the current gcc). Now your INSTALL file tells me to patch gcc with the appropriate p/diffs/*** Which one do I need? There are only ones for old gcc's.. Or is it unnecessary to patch 2.95.x at all ? {{if not, couldn't you have the gcc developers adopt your patches? it would make gpc MUCH MORE reputable if one wouldn't have to patch such a widely used and approved piece of software as gcc .... }} {Your FAQ dates from 1997, which made me not look at it, at all..} Thank you for GPC (and your answers..)! -- Martin Maechler <maechler(a)stat.math.ethz.ch> http://stat.ethz.ch/~maechler/ Seminar fuer Statistik, ETH-Zentrum LEO D10 Leonhardstr. 27 ETH (Federal Inst. Technology) 8092 Zurich SWITZERLAND phone: x-41-1-632-3408 fax: ...-1228 <><

3 3

pascal compiler
by Nathalie Jarosz 04 May '00

04 May '00

Hello! I still have a problem with the pascal compiler installation but now I have more informations... And it is more a problem with linux than with the installation itself. Here is the generic procedure for installing GNU Pascal : 1. Unpack the source distributions. From a directory of your choice (e.g. `/usr/local/src'), unpack the GNU CC and GNU Pascal source distributions. This will create separate subdirectories for GCC and GPC. `cd' to the GPC directory (`/usr/local/src/gpc' in the example above) and move the contents (a subdirectory `p') to the GCC directory (for instance `usr/local/src/gcc-2.8.1'). At this point, all is ok. Next, go to the GCC source directory and apply the GCC patch required by GNU Pascal: % patch -s -p1 < p/diffs/gcc-2.8.1.diff The problem arise at this moment when I do "cd gcc-2.8.2; patch -s -p1 <p/diffs/gcc-2.8.1.diff", the following message appears : "bash : patch : command not found". So, I understand that it is not a problem with the installation but with my linux configuration. The command patch is missing and I have no idea of how to get it. let me know if my understanding is correct and if you can help me, thanks a lot in advance, Nathalie

2 1

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 May 2000