Gpc

gpc@gnu.de

5400 discussions

RE: Syntax Question
by Oldham, Adam 10 Feb '01

10 Feb '01

OK, maybe I need a little more detail. I have some C functions called from Pascal that write to a pointer to packed array of chars. Alot of what they write is 0x80 0x3a, etc. When it comes back into pascal, I would like to run the result through an IF statement to check the hex value in the character. With the old compiler we were allowed to do this: IF (character = '/8a') THEN blah; But I can't seem to get anythign like this to work here, and I think its because it is actually comparing a hex value to / (at least that is what I can gather from all the assignments I made from my early post and how Pascal stored those values). Any suggestions? Thanks, Adam -----Original Message----- From: Steve Loft [mailto:steve@nybbles.co.uk] Sent: Friday, February 09, 2001 11:21 AM To: gpc(a)gnu.de Subject: Re: Syntax Question On Friday 09 February 2001 3:54 pm, Oldham, Adam wrote: > Hello, > I'm currently switching compilers from an old proprietary Pascal > compiler to GPC. I've got a problem assigning a hex value to a > character. This is easy in c, you can say char a ='0xa0'; and be I think what you want is CHR(16#a0). -- Steve

3 2

Syntax Question
by Oldham, Adam 09 Feb '01

09 Feb '01

Hello, I'm currently switching compilers from an old proprietary Pascal compiler to GPC. I've got a problem assigning a hex value to a character. This is easy in c, you can say char a ='0xa0'; and be done with it. The syntax for our old compiler was character := '/a0'; I've tried many things trying to assign a hex value to a character but have come up only the hex value of the first charcter: character := '/a0' results in 0x2f which is just the / character := '\a0' results in 0x5c which is the \ character := '16#a0' results in 0x31 which is the 1 character := '$82' results in 0x24, which is the $ I've tried all without the single quotes and get sytnax errors upon compile. Any suggestions? Thanks, Adam Oldham ----------------------------------------------------------------------- C. Adam Oldham Marconi Commerce Systems Inc. Software Engineer 7300 West Friendly Ave. adam.oldham(a)marconi.com Greensboro, NC 27420-2087 Phone : 336.547.5952 Fax : 336.547.5079 ----------------------------------------------------------------------- This document contains confidential information of Marconi Commerce Systems Inc. In consideration of the receipt of this document, the recipient agrees not to reproduce, copy, use or transmit this document and/or the information contained herein, in whole or in part, or to suffer such actions by others, for any purpose except with written permission, first obtained, of Marconi Commerce Systems Inc., and further agrees to surrender the same to Marconi Commerce Systems Inc. upon demand. -----------------------------------------------------------------------

3 2

Bug in StrReadWord?
by Steve Loft 07 Feb '01

07 Feb '01

I'm using StrReadWord to parse a line of input to my program. If the last 'word' is a single character, then it doesn't get read. Is this behaviour intentional? Example: program test(output); uses StringUtils; var src : string ="abc xy"; dest : string; i : integer; begin i := 1; while StrReadWord(src,i,dest) do writeln(i,dest:10) end. This produces, as I expected: 4 abc 7 xy But if the last character of the string is removed: src : string ="abc x"; the output becomes: 4 abc What happened to the 'x'? I'm using gpc 20010115. -- Steve

2 2

A little new to the language
by Siberdemon＠aol.com 07 Feb '01

07 Feb '01

Well, anybody that can help, here's a newbie question about GPC and regular Pascal... I know what ordinal types are, but is it possible to use a case statement with a string type, and how... I need this for a M.U.D. I'm building in Pascal, it would really help... If you wish to help me, please email me, because I'm not a member of the list... Justin (siberdemon(a)aol.com) RPG Developer (on Unix ofcourse)

3 4

Re: Using arrays in macros
by Frank Heckenbach 06 Feb '01

06 Feb '01

Eike Lange wrote (to me personally, forwarded here with his permission): > On Tue, Feb 06, 2001 at 12:36:03AM +0100, Frank Heckenbach wrote: > > Should this be changed? Using parentheses, as Eike suggested, works, > > but perhaps it would be more convenient if the above works. OTOH, it > > would (slightly) reduce the functionality of macros since it would > > then not be possible to use unbalanced brackets in arguments (though > > this is probably not useful unless in very strange situations)... > > Is there a standard available for writing macros with Pascal? Nope. None of the various standards and de-facto standard specify macros at all, AFAIK, and I don't even know if any other Pascal compiler supports them. GPC's macros are basically taken from GCC, somewhat Pascal-ized (#define -> {$define}, support for case-insensitive macros, etc.) > If not, I would suggest to make this work with > multidimensional arrays. That was my first thought too (even though, as you have shown, it works using parantheses). OTOH, as Russ noted, "changing the rules might cause more problems then it solves". I'm not sure what to do... > I never thought that unbalanced expressions work with macros and IMO > they decrease readability. Definitely. (I personally think macros is general decrease readablility, but even more so for macros that don't contain complete syntactical items.) Frank -- Frank Heckenbach, frank(a)g-n-u.de http://fjf.gnu.de/ PGP and GPG keys: http://fjf.gnu.de/plan

1 0

Using arrays in macros
by Steve Loft 06 Feb '01

06 Feb '01

I want to use an element of a multi-dimensional array as a parameter to a macro, e.g.: ------------------------------------------------ program test(output); {$define THING(a,b) writeln(a*b)} var num : array [0..1,0..1] of integer = ((1,2), (3,4)); begin THING(num[1,1], 6) end. ------------------------------------------------ But this gives me an error: test.pas:8: macro `THING' used with too many (3) args Presumably it's taking the first comma as an argument delimiter. Can I get around this? -- Steve

4 4

what is the status?
by bpn 05 Feb '01

05 Feb '01

hi all I am wondering, what is the status of the gpc? How much time is it to the next stable release? /BjÃ¶rn Persson

1 0

Pascal GNU Compiler for Solaris 8 ?
by br＠is.informatik.uni-kiel.de 30 Jan '01

30 Jan '01

Hello, I'm not used to Sun Solaris but I need to work with an Ultra10 for my new projects. Can somebody give me a short reply about: Does the Pascal GNU Compiler work with Solaris 8 ? I saw some 'extra binaries' on a polish website and all other releases only for Solaris 2.x or 7. Thanks Bernd -- Bernd Rehling Institut fuer Informatik Christian-Albrechts-Universitaet Kiel

3 2

[Fwd: Re: memset]
by George Shapovalov 29 Jan '01

29 Jan '01

In Borland Pascal you would use fillchar(var x;value:word [size:word]); so the invoking would look exactly like your example: fillchar(x,0,sizeOf(x)); However with BP you can do it to the <64K in size variables (as this is a maximal size for "regular" variable in BP). Does this work for gpc as well? George Steve Loft wrote: > Is there a fast way to zero a large array, e.g. an equivalent to the > following C fragment? > > int x[100,100]; > memset(x, 0, sizeof(x)); > > -- > Steve

3 4

memset
by Steve Loft 28 Jan '01

28 Jan '01

Is there a fast way to zero a large array, e.g. an equivalent to the following C fragment? int x[100,100]; memset(x, 0, sizeof(x)); -- Steve

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