Gpc

gpc@gnu.de

5400 discussions

Re: binary gpc2.0 for Solaris 2.5.1
by Peter Gerwinski 28 Nov '97

28 Nov '97

Hello, everybody! I moved the binary compiled by Javier in place. It can be downloaded now from ftp://kampi.hut.fi/jtv/gnu-pascal/binary/ and from ftp://agnes.dida.physik.uni-essen.de/gnu-pascal/binary/ 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]

1 0

Unsubscscribe
by m00g0s01＠email.mcmail.com 28 Nov '97

28 Nov '97

Please Unsubscribe me from your mailing lists

1 0

Interfacing DJGPP C with Pascal
by Stanislaw Kozlowski 28 Nov '97

28 Nov '97

Hello I am trying to link a Pascal unit DJGPP C. It links OK but Pascal run time library seems to be unitialized so writeln would not work. The error is: ?GPC runtime error: File is not open for writing (#9) Is there any possibility to initalize it properly either from this unit of from C main ? Best regards Stanislaw Kozlowski

1 0

Interfacing GNU Pascal with GNU C
by Stanislaw Kozlowski 28 Nov '97

28 Nov '97

Hello ! I tried calling GNU Pascal procedure (compiled as separate unit) from GNU DJGPP C main program. Everything worked fine except that Pascal run time output seems to be uninitialized so writeln would not work. How can I initialize it (from initialization of the Pascal unit or C main program) ? Best regards Stanislaw Kozlowski

1 0

Sockets
by RHS Linux User 27 Nov '97

27 Nov '97

I am not a part of the mailing list as of now, but I have subscribed. anyway, I was trying to open a socket, but the problem I kept running into was that connect wants a sockaddr struct, and in C you just casted it... (struct sockaddr *)&address but, I don't think that that is possible in pascal, so if anyone has successfully done this or knows how. please email me, lithium(a)lumni.com matthew wiggins

1 0

Re: binary gpc2.0 for Solaris 2.5.1
by Frank Heckenbach 27 Nov '97

27 Nov '97

Javier Medina Bautista wrote: > 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. Great! We have such machines at our university, and I'd like to try GPC on them! (Up to now, I haven't had the chance to build one myself.) When you've uploaded it, I'll be happy to try some programs on these machines. I hope, when GPC 2.1 comes out soon, you can make a sparc-sun-solaris binary for it, too. Greetings, Frank -- Frank Heckenbach, Erlangen, Germany fjf(a)gmx.de http://home.pages.de/~fjf/links.htm

1 0

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

27 Nov '97

On Thu, 27 Nov 1997 12:06:27 +0100 (MET), Peter Gerwinski wrote: >I consider this a bug in GPC, but in fact I am not sure either what the >EP standard really means. Prospero's Extended Pascal compiler (PEP) >rejects your code but it accepts the following: [...] (seekrd.pas) >To fix GPC so it produces 'OK' from this source, edit the >file `rts/rts-random.c' and comment out the `if' statement >after "Seek back to the place ..." in `_p_seekread()' and >in `_p_seekupdate()'. Actually it works without patching the source because you are doing non-continuous reads -e.g. using seekread() before each read(). >(* BTW, EP experts, if I write `Program Test ( Output, Data );', >the program does *not* ask me for a file name for `Data' when >compiled with PEP. It works anyway, but I do not detect the >data file on my hard disk afterwards. What is the legal way >to produce an external file in EP? *) My understanding is that you have to bind a file name. Program Test ( Output, Data ); Var Data: bindable File [ 0..25 ] of Char; b : BindingType; C: Char; begin b := binding (data); b.Name := 'data'; bind(data, b); [... rest of seekrd.pas] But then again, I'm shooting in the dark, as I was with the seek* calls, not having played around with extended Pascal features before. -Kevin -- Kevin A. Foss --- kfoss(a)mint.net --

1 0

Re: iso10206 Seek Functions and a couple other little things....
by Peter Gerwinski 27 Nov '97

27 Nov '97

According to Kevin A. Foss: > 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 have the same problem. > 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. > [...] > 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()? I consider this a bug in GPC, but in fact I am not sure either what the EP standard really means. Prospero's Extended Pascal compiler (PEP) rejects your code but it accepts the following: Program Test ( Output ); Var Data: File [ 0..25 ] of Char; C: Char; begin rewrite ( Data ); for C:= 'A' to 'Z' do write ( Data, C ); reset ( Data ); SeekRead ( Data, ord ( 'O' ) - ord ( 'A' ) ); read ( Data, C ); write ( C ); SeekRead ( Data, ord ( 'K' ) - ord ( 'A' ) ); read ( Data, C ); writeln ( C ); end. (seekrd.pas) To fix GPC so it produces 'OK' from this source, edit the file `rts/rts-random.c' and comment out the `if' statement after "Seek back to the place ..." in `_p_seekread()' and in `_p_seekupdate()'. (* BTW, EP experts, if I write `Program Test ( Output, Data );', the program does *not* ask me for a file name for `Data' when compiled with PEP. It works anyway, but I do not detect the data file on my hard disk afterwards. What is the legal way to produce an external file in EP? *) (* sqr ( BTW ), UCSD/BP's `Seek' is now in GPC, too. *) (* BTW pow 3, I see it's time for the next beta ... *) > Also isn't the typechecking of seekread a little harsh to not allow: > [...] > reset(inputfile, 'data'); > [...] > when it does allow: > [...] > index : integer = 3; > [...] > seekread(inputfile, index); The problem was that, in order to avoid arithmetical overflow, GPC assigned the largest possible type to integer constants (either `LongestInt' or `LongestCard') and converted it to something smaller when the constant is used together with something of known type. This is fixed now, too: Integer constants in GPC are now `Integer'. Only if this does not fit, `Cardinal', `LongestInt', and `LongestCard' are used (in this order). > 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 :) A good question. Maybe the GCC backend initializes global variables to zero, so it has a defined value (out of range)? I will have to investigate it (kevin2.pas) ... > 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. Fixed. :-) Thanks for the bug reports, 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: reading from a typed file
by Peter Gerwinski 27 Nov '97

27 Nov '97

According to Kevin A. Foss: > > 1) is the following legal Pascal code? [...] No. A type `file' variable does not accept arrays of the type it was declared with for reading and writing. > 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. (kevin3.pas) Yes, that's a bug. Thanks for the report! 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: binary gpc2.0 for Solaris 2.5.1
by Peter Gerwinski 27 Nov '97

27 Nov '97

Hi, Javier! Hi, everybody! > 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. Please upload it to ftp://agnes.dida.physik.uni-essen.de/incoming/ and send me an e-mail when you have done that, so I can move it in place. > Another thing, I want to build a site gnu mirror can you help me for this > porpouse. See the GNU site for instructions, topic "Help GNU" - "mirroring". Thanks for your contribution! 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

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