February 2005 - Gpc

GPC binding to OpenGL or Mesa
by Rick Engebretson 02 Feb '05

02 Feb '05

I'm a little confused about the GPC approach to binding to C libraries. The documentation is a little sketchy and warns that some changes might occur. Is there some clarification available ? Also, bindings of FPC to OpenGL are available, which are derived from Delphi3D. These are mostly limited to Win32.DLLs . Has anybody started a GPC to OpenGL or Mesa binding for Linux ? Might it be appropriate to simply start from the FPC template ? Thanks, Rick.

3 5

Re: EOF is not true on reset empty file
by Tom Schneider 01 Feb '05

01 Feb '05

> Date: Sat, 29 Jan 2005 14:14:18 +0100 (CET) > From: Waldek Hebisch <hebisch(a)math.uni.wroc.pl> > > You missed an important information. If I type (with `eof.pas' beeing > your file): > ../gpc-3.4.3/gcc/xgpc -B../gpc-3.4.3/gcc/ -O -ftransparent-file-names -fstandard-pascal eof.pas > ./a.out > > I get: > NOT eof of namebook > NOT eof of namelist > > However, if I type: > ../gpc-3.4.3/gcc/xgpc -B../gpc-3.4.3/gcc/ -O --transparent-file-names eof.pas > ./a.out > > I get: > eof of namebook > eof of namelist > > Both with my (modified) copy of gpc-20041218 on Linux. Yes, standard requires > that you get EOF on empty file. Thanks for clarifying the standard for me. I'm using --transparent-file-names and with that get NOT eof. I hope that clarifies the issue for you. Tom

2 1

Re: EOF is not true on reset empty file
by Tom Schneider 01 Feb '05

01 Feb '05

Maurice: > Still please do the cross check. I have no Sun at hand do do it, > and may be nobody in this list has exactly the same system. > I know nothing on the inners of the Sun file system, whether > it stores somewhere the fact that this is a binary or a text file, > if the file length is obtained by looking truly to the file content, > or to some information on the length stored somewhere outside of the > file, etc. In DOS systems when running scandisk, you find sometimes > an error message like "file length as reported by the system is different > from the true file length" Ok. closetest.p: In main program: closetest.p:20: error: undeclared identifier `close' (first use in this routine) closetest.p:20: error: (Each undeclared identifier is reported only once closetest.p:20: error: for each routine it appears in.) The function 'close' is not standard Pascal. Since I'm not set up to avoid standard Pascal (and I don't think it is critical, correct me if I'm wrong please), remove those lines. A rewrite followed by a reset empties the file. ******************************************************************************** strawberry 21% more closetest.p program closetest(namebook, namelist, output); (* Dr. Thomas D. Schneider National Cancer Institute Laboratory of Experimental and Computational Biology Molecular Information Theory Group Frederick, Maryland 21702-1201 toms(a)ncifcrf.gov permanent email: toms(a)alum.mit.edu (use only if first address fails) http://www.lecb.ncifcrf.gov/~toms/ *) const version = 1.00; (* of closetest.p 2005 jan 31 *) var namebook, namelist: text; begin rewrite(namebook); { close(namebook); } reset(namebook); if eof(namebook) then writeln(output,'eof of namebook') else writeln(output,'NOT eof of namebook'); rewrite(namelist); { close(namelist); } reset(namelist); if eof(namelist) then writeln(output,'eof of namelist') else writeln(output,'NOT eof of namelist'); end. ******************************************************************************** NOT eof of namebook NOT eof of namelist The program failed. strawberry 15% ls -l nam* -rw------- 1 toms delila 0 Jan 31 19:40 namebook -rw------- 1 toms delila 0 Jan 31 19:40 namelist strawberry 16% wc nam* 0 0 0 namebook 0 0 0 namelist 0 0 0 total strawberry 17% file nam* namebook: empty file namelist: empty file The files made by the Pascal program are indeed empty by these three tests. Regards, Tom Dr. Thomas D. Schneider National Cancer Institute Laboratory of Experimental and Computational Biology Molecular Information Theory Group Frederick, Maryland 21702-1201 toms(a)ncifcrf.gov permanent email: toms(a)alum.mit.edu (use only if first address fails) http://www.lecb.ncifcrf.gov/~toms/

1 0

Re: [GPC]: daily digest (#614)
by Tom Schneider 01 Feb '05

01 Feb '05

> Date: Sat, 29 Jan 2005 04:42:00 -0600 > From: Rick Engebretson <reng(a)tcq.net> > > I think going to p2c will isolate your fine work. Thanks! However it is always good to have several different compilers around. By looking at p2c, I could see the problem in GPC and (presumably) vice versa. GPC is robust and has an active community. p2c works for standard Pascal (all I really need) but it is not active. Tom Dr. Thomas D. Schneider National Cancer Institute Laboratory of Experimental and Computational Biology Molecular Information Theory Group Frederick, Maryland 21702-1201 toms(a)ncifcrf.gov permanent email: toms(a)alum.mit.edu (use only if first address fails) http://www.lecb.ncifcrf.gov/~toms/

1 0