Gpc September 1997

gpc@gnu.de

28 participants
85 discussions

Re: Help running GPC on Linux 2.0.30.
by Peter Gerwinski 22 Sep '97

22 Sep '97

According to AuX: > > I keep receiving an error when trying to compile a program I just > finished. I run: 'gpc new.pas -o new' and receive 'cannot open -lgpc.' You obviously have an installation problem: The `gpc' compiler driver program cannot locate the libraries `crt0.o' and `libgpc.a'. (This is the common source of both problems you posted to this list.) It seems as if you have installed an "a.out" compiler on your ELF system. Please check whether the following directories (… [View More]

1 0

Re: Looking for some random-functions ... and maybe a bug report
by Peter Gerwinski 22 Sep '97

22 Sep '97

According to Frank Heckenbach: > > Kevin A. Foss wrote: > > > Unfortunately, I know of no easy way to test for what operating system > > EMX is currently using. > > Neither do I, that's the problem... You can get this information at run-time - and *only* at run-time since one and the same executable can run both on DOS (with and without DPMI) and on OS/2. If the variable `__osmode' contains a nonzero value, it is OS/2; if it is DOS and the variable `__emx_env' … [View More]

1 0

unsubscribe
by e1097963＠ceng.metu.edu.tr 22 Sep '97

22 Sep '97

help

1 0

String comparisons
by Frank Heckenbach 21 Sep '97

21 Sep '97

I just noticed that GPC ignores trailing spaces when comparing strings with the usual operators ("=" and so on). I see that this seems to be required by the standard, and that there are othere operators ("eq" or such) for exact comparisions. However, I find this behaviour quite inconsistent and annoying (took me quite some time to figure out why s='' was true when s wasn't empty...)-:, and it would cause much trouble when porting BP programs. When using "--borland-pascal", GPC says "warning: … [View More]

1 0

Re: Looking for some random-functions ... and maybe a bug report
by Kevin A. Foss 21 Sep '97

21 Sep '97

On Sun, 21 Sep 1997 17:50:53 +0200, Frank Heckenbach wrote: >File Rand.Pas: [...] > IMPORTANT NOTES: > > - This unit is only intended for BP compatibility. While it should be > portable (if not, please report) Okay... >{$IFDEF __DJGPP__}{$DEFINE DOS}{$ENDIF} >{$IFDEF __EMX__}{$DEFINE DOS}{$ENDIF} IMHO, this isn't a good way to do things in a portable unit. Remember that the EMX version of GCC also works under OS/2. Trying to DOS-ish things won't go over well if you … [View More]

1 0

Help running GPC on Linux 2.0.30.
by AuX 21 Sep '97

21 Sep '97

I keep receiving an error when trying to compile a program I just finished. I run: 'gpc new.pas -o new' and receive 'cannot open -lgpc.' What do I need to do to fix this?

1 0

GPC assembler
by cagliostro 21 Sep '97

21 Sep '97

hello everybody ! I want to use the inline assembler of GPC in a function, such as function fct:integer; begin asm(" mov $10,%%eax {just an example } : : :"eax"); end; ( I learned that in the excellent GPCASM of Dario "-PrEdAtOrZ-" Anzani ) I want to set the result of the function, directly from the asm part.Is it possible ? Is there something like the @result of turbo pascal in GPC ? If no ,what is the adress of the result ? ( %esp+x, … [View More]

1 0

Re: Looking for some random-functions ...
by Frank Heckenbach 21 Sep '97

21 Sep '97

Achim Kalwa wrote: > You can use the following external function declaration: > > FUNCTION Rand : Integer; C; > > and do the following example: > > FOR i := 1 TO 10 DO WriteLn(Rand); > > Alternatively, there is a random number generator unit called "Rand" written by > Frank Heckenbach (heckenb(a)mi.uni-erlangen.de). > > To Frank: Would you post your unit again, please? Im interested, too. The unit follows below. I did some minor changes since last time. … [View More]But please note: - The changes might rely on some bug fixes in GPC that were done after the last beta release, so the unit might not work with the currently available version. But that'll not be a big problem, since the next beta will be available real soon now, and the unit should work with it then... :-) - See the notes at the beginning of the unit. -- Frank Heckenbach, Erlangen, Germany heckenb(a)mi.uni-erlangen.de http://home.pages.de/~fjf/links.htm File Rand.Pas: { Random unit for GPC for BP compatibility This package is released as part of the GNU Pascal project. IMPORTANT NOTES: - This unit is only intended for BP compatibility. While it should be portable (if not, please report), it's *not* meant to be GPC's default random generator. Especially, the range for integer randoms is only 16 bits, as in BP. OTOH, it provides the RandSeed variable, and if it's set to the same value, it produces the exact same sequence of random numbers as BP's random generator does (whoever might need this... ;-) If you don't care for such kind of compatibility, you might prefer to use the Rand/SRand C functions. (BTW: This unit uses them to initialize RandSeed on non-Dos systems, you can take that as an example on how to use them.) - Since function overloading doesn't work yet, you have to use "RandReal" instead of "Random" for real numbers. This library is a free library; you can redistribute and/or modify it under the terms of the GNU Library General Public License, version 2, as published by the Free Software Foundation. This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License for more details. You should have received a copy of the GNU Library General Public License along with this library (see the file COPYING.LIB); if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. v1.0, September 1997, Frank Heckenbach, heckenb(a)mi.uni-erlangen.de } UNIT Rand; INTERFACE TYPE Card8 =Cardinal(8); Card16=Cardinal(16); Card32=Cardinal(32); Card64=Cardinal(64); Int32 =Integer(32); VAR RandSeed:Int32 VALUE 0; FUNCTION Random(Range:Card16):Card16; FUNCTION RandReal:Real; PROCEDURE Randomize; IMPLEMENTATION {### LOCAL $R-}{$W-,R-,W+} PROCEDURE NextRand; BEGIN RandSeed:=$8088405*RandSeed+1 END; {### END LOCAL $R} FUNCTION Random(Range:Card16):Card16; BEGIN NextRand; Random:=(Card64(RandSeed)*Range) DIV $100000000 END; FUNCTION RandReal:Real; BEGIN NextRand; RandReal:=RandSeed/$100000000+0.5 END; {$IFDEF __DJGPP__}{$DEFINE DOS}{$ENDIF} {$IFDEF __EMX__}{$DEFINE DOS}{$ENDIF} {$IFDEF DOS} TYPE PDPMIRegs=^TDPMIRegs; TDPMIRegs=RECORD CASE (d,x,h) OF d:(edi,esi,ebp,res,ebx,edx,ecx,eax:Card32); x:(di,di_hi,si,si_hi,bp,bp_hi,res_lo,res_hi,bx,bx_hi,dx,dx_hi, cx,cx_hi,ax,ax_hi,flags,es,ds,fs,gs,ip,cs,sp,ss:Card16); h:(edi_b,esi_b,ebp_b,res_b:ARRAY[0..3] OF Card8; bl,bh,ebx_b2,ebx_b3, dl,dh,edx_b2,edx_b3, cl,ch,ecx_b2,ecx_b3, al,ah,eax_b2,eax_b3:Card8) END; {$W-} FUNCTION __DPMI_Simulate_Real_Mode_Interrupt(Vector:Integer;VAR Regs:TDPMIRegs):Integer; C; {$W+} PROCEDURE Randomize; TYPE Card32LoHi=RECORD Lo,Hi:Card16 END; VAR DPMIRegs:TDPMIRegs; BEGIN DPMIRegs.ah:=$2C; {$X+} __DPMI_Simulate_Real_Mode_Interrupt($21,DPMIRegs); {$X-} WITH Card32LoHi(RandSeed) DO BEGIN Lo:=DPMIRegs.cx; Hi:=DPMIRegs.dx END END; {$ELSE} FUNCTION Rand:Integer; C; PROCEDURE SRand(Seed:Cardinal); C; FUNCTION GetPID:Integer; C; PROCEDURE Randomize; BEGIN SRand(GetPID); RandSeed:=Rand END; {$ENDIF} END. [View Less]

1 0

Re: Upgrading GPC (was: Looking for some random-functions ...)
by Orlando Llanes 21 Sep '97

21 Sep '97

>What's that - 2.01b? The last official beta version that came with >binaries was gpc-970714; after that there were some (inofficial) >patches. Doh! I goofed, I was trying to compile the sources *after* 970714, the diff file named: gpc-970714-970809.diff or soemthing like that. See ya! Orlando Llanes

1 0

Re: Upgrading GPC (was: Looking for some random-functions ...)
by Orlando Llanes 21 Sep '97

21 Sep '97

>You mean: DJGPP binaries? Linux runs on the PC, too. Compiling the PC binaries as in compiling the source to GPC for the DOS port. >What's that - 2.01b? The last official beta version that came with >binaries was gpc-970714; after that there were some (inofficial) >patches. For me, the latest executable binaries are 2.01b, the latest sources are gpc-970714. Meaning that I can't compile the sources under DOS. I have GPC in the same directory as DJGPP. I'm beyond the patch … [View More]

1 0

← Newer
1
2
3
4
5
6
7
8
9
Older →

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 September 1997