Gpc

gpc@gnu.de

5400 discussions

Re: reading from a typed file
by Dr E. Buxbaum 27 Nov '97

27 Nov '97

> program readdata(input, output, inputfile); > > var > inputfile : file of char; > temp : array[1..10] of char; > > begin > reset(inputfile, 'test'); > read(inputfile, temp); > writeln(temp); > close(inputfile); > end. try for i := 1 to 10 do read(InputFile, temp[i]); as your file is of type char, not temp. Also, I am not sure out of hand wether gpc allows writing to a file opend with Reset. Check the docs.

1 0

iso10206 Seek Functions and a couple other little things....
by Kevin A. Foss 27 Nov '97

27 Nov '97

Hi again, While I'm on the topic of exploring the file functions, does anyone want to explain the function of the various Seek* functions in extended Pascal? The descriptions in the standard contain a lot of intelligible text and little in the way of examples. I assumed that Seekread(file, n) would simply take me to the nth record in 'file,' -- which it does, but then it actually seems to stall the file pointer at n until you read two items. Take for example: program readchar(input, output, inputfile); var inputfile : file of char; letter : char; i : integer; begin reset(inputfile, 'data'); seekread(inputfile, 3); writeln(inputfile^); for i := 1 to 5 do begin read(inputfile,letter); writeln(letter); end; close(inputfile); end. Output: coltrane:~/Pascal> cat data ABCDEFGHIJKLMNOPQRSTUVWXYZ coltrane:~/Pascal> gpc readchar.pas -o readchar coltrane:~/Pascal> readchar D D D E F G coltrane:~/Pascal> I would have expected D D E F G H for output? Why does the file pointer stay at 3 for two consecutive reads? Is this a bug or am I misusing seekread()? Also isn't the typechecking of seekread a little harsh to not allow: program indexseek(input, output, inputfile); var inputfile : file [0..25] of char; begin reset(inputfile, 'data'); seekread(inputfile, 3); close(inputfile); end. when it does allow: program indexseek(input, output, inputfile); var inputfile : file [0..25] of char; index : integer = 3; begin reset(inputfile, 'data'); seekread(inputfile, index); close(inputfile); end. Various Miscellany: When I was playing around with all of this I wrote an ugly bit of code that could be reduced to: program test(output); var i : 3..3; begin i := i + 1; writeln(i); end. Why isn't there a warning about i being undefined? This code outputs 1, btw :) Lastly according to iso7185:6.4.2.4, "The first constant of a subrange-type shall specify the smallest value, and this shall be less than or equal to the largest value..." yet gpc happily compiles code like: program test(output); var i: 4..1;begin writeln(i) end. thanks for any explanations about the seekread() stuff, -Kevin -- Kevin A. Foss --- kfoss(a)mint.net --

1 0

binary gpc2.0 for Solaris 2.5.1
by Javier Medina Bautista 26 Nov '97

26 Nov '97

Hi team of gpc. My name is Javier Medina I'am the system manager at Universidad Autonoma Metropolitana in Mexico City. I already compiled the gpc2.0 in a Sparcstation with Solaris 2.5.1 and I have a binary distribution. What can I do for send you this file?, I thing there are many people interested in binary from Solaris operating system. Another thing, I want to build a site gnu mirror can you help me for this porpouse. Greetings from Mexico. ******************* Javier Medina Bautista ** ** Administrador de Sist. ** device ** E-mail:jmb@hp9000a1.uam.mx ** ** Tel: 724-45-05 ******************* Fax: 724-44-54

1 0

reading from a typed file
by Kevin A. Foss 26 Nov '97

26 Nov '97

Hello, I have a couple questions about the code sample at the bottom of this message: 1) is the following legal Pascal code? My gut feeling is that it isn't (my only other Pascal system -- albeit an interpreter, doesn't take it either), but I've never really played with typed files enough to know what to expect. 2) I take it GPC should do something more graceful than dump core (OS/2) or give a fatal signal (Linux), even if the source is invalid? :) This is with the 971001 beta. program readdata(input, output, inputfile); var inputfile : file of char; temp : array[1..10] of char; begin reset(inputfile, 'test'); read(inputfile, temp); writeln(temp); close(inputfile); end. -Kevin -- Kevin A. Foss --- kfoss(a)mint.net --

1 0

Re: Strange Behavior
by Peter Gerwinski 25 Nov '97

25 Nov '97

According to Pismo: > > > I've run into some strange behavior accessing > > > environment variables using GPC. Accessing certain > > > environment variables before others appears to clear > > > the value of others returning an empty value. > > > By shuffling the order that the following variables > > > are accessed returns all of the values. > > > > Which version of the "System" unit are you using? > > Maybe its `GetEnv' is broken and modifies the > > environment variables. > > > > It is probably best if you post the source of your > > `GetEnv' function here. > > It's the GetEnv that came in the BPCOMPAT unit. Yes, of course. :-I There are three versions of it ... Okay, I checked all their `GetEnv's, and they all seem okay for me. If you are in hurry and just want to get rid of the error, you can try and upgrade your GPC and your BPcompat library at ftp://agnes.dida.physik.uni-essen.de/gnu-pascal/beta/ and ftp://agnes.dida.physik.uni-essen.de/gnu-pascal/contrib/. If you want this bug really be fixed, you can help us by examining what happens to your `Gpc_envp' variable while your program calls `GetEnv'. This variable holds the address of an array of C-style strings - pointers to zero-terminated arrays of characters. * Declare it as a pointer to an array of CStrings. Type CStrArray = array [ 0..42 ] of __CString__; CStrArrayPtr = ^CStrArray; Var EnvP: __AsmName__ 'Gpc_envp' CStrArrayPtr; * While your program calls `GetEnv', examine the contents of this array - both the addresses and the values pointed to. Either use a debugger or additional `writeln' statements ... well, you know ... Good luck, Peter Dipl.-Phys. Peter Gerwinski, Essen, Germany, free physicist and programmer peter.gerwinski(a)uni-essen.de - http://home.pages.de/~peter.gerwinski/ [971005] maintainer GNU Pascal [971001] - http://home.pages.de/~gnu-pascal/ [971005]

1 0

Re: Strange Behavior
by Peter Gerwinski 24 Nov '97

24 Nov '97

According to Pismo: > > I've run into some strange behavior accessing > environment variables using GPC. Accessing certain > environment variables before others appears to clear > the value of others returning an empty value. > By shuffling the order that the following variables > are accessed returns all of the values. Which version of the "System" unit are you using? Maybe its `GetEnv' is broken and modifies the environment variables. It is probably best if you post the source of your `GetEnv' function here. Later, Peter Dipl.-Phys. Peter Gerwinski, Essen, Germany, free physicist and programmer peter.gerwinski(a)uni-essen.de - http://home.pages.de/~peter.gerwinski/ [971005] maintainer GNU Pascal [971001] - http://home.pages.de/~gnu-pascal/ [971005]

1 0

Re: `Delay' for Linux
by Frank Heckenbach 23 Nov '97

23 Nov '97

Peter Gerwinski wrote: > > am i in > > trouble with many other > > built in functions..e.g I do need the DELAY function (i think it's built > > in) (* In BP, it's not built-in, but it's in the unit Crt. Besides, it's buggy, but that's another story... *) > > to wait a given delay time > > is this available in gpc? > > Not yet for Linux. You can use the `select' function from the > system library to implement it: Wouldn't it be easier to use usleep(3), like: procedure usleep (usec: MedCard); C; inline procedure Delay (msec: Integer); begin usleep (1000 * msec) end; This is for Linux. Other platforms may vary... -- Frank Heckenbach, Erlangen, Germany fjf(a)gmx.de http://home.pages.de/~fjf/links.htm

1 0

Bill Currie has left us :-(
by Jeremy Taylor 21 Nov '97

21 Nov '97

I understand Bill has already said his goodbyes, but he asked me to make sure that he was removed from a couple of mailing lists. Bill Currie has now, sadly, left our company and so his account billc(a)blackmagic.tait.co.nz is closed. Bill would have removed himself from the lists himself but we had a wee internet connection outage right about the time he was walking out the door. I don't have detailed instructions for the list servers, but he gave me your address as someone that could remove his name from a list. If you have any questions please feel free to ask me or Bill (his new addr is bcurrie(a)tssc.co.nz)

1 0

unsubscribe & subscribe
by Achim Kalwa 20 Nov '97

20 Nov '97

Hello! Please remove my old address <achim.kalwa(a)do.netsurf.de> and add my new address <a_kalwa(a)osnabrueck.netsurf.de> Thank you! -- Achim Kalwa Tel.: +49(0)5483/74265 Hofbreede 8 Fax: +49(0)5483/74266 D-49536 Lienen mailto:achim.kalwa@osnabrueck.netsurf.de PGP Public Key available! Send mail with "send pgp key" as subject.

1 0

Re: BP string compatibility
by Peter Gerwinski 19 Nov '97

19 Nov '97

According to The African Chief: > > > and must be prevented. The Length > > field of a string should only be accessible read-only. > > I can think of many uses for this facility. Okay, but nevertheless I will fix this bug and provide a procedure to set the length instead. > BTW: the new function you refer to (AssignLength) exists in > 32-bit Delphi as "SetLength" - any chance of renaming your > function to "SetLength"? (for compatibility with Delphi). While I like the name `AssignLength' (in analogy to `AssignType') for this function, I agree that it is reasonable to rename it to `SetLength' if this means increased compatibility to other compilers (Delphi in this case). (Hmm ... maybe I should rename `AssignType' to `SetType' as well?) Greetings, Peter Dipl.-Phys. Peter Gerwinski, Essen, Germany, free physicist and programmer peter.gerwinski(a)uni-essen.de - http://home.pages.de/~peter.gerwinski/ [971005] maintainer GNU Pascal [971001] - http://home.pages.de/~gnu-pascal/ [971005]

2 1

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