Hi -
We just got the latest version of gpc:
GNU Pascal version 19990118, based on gcc-2.8.1, compiled Aug 25 1999 09:07:02.
and it is objecting to a line of code in one of my programs:
ftp://ftp.ncifcrf.gov/pub/delila/makelogo.p
I am compiling with:
gpc makelogo.p -o makelogo
The message I get is:
makelogo.p: In function `Themain': makelogo.p:4093: cannot take address of bitfield `B'
Line 4093 is: readln(symvec,map[b].b, map[b].n);
b is defined as:
b: integer; (* index to a symbol *)
map is defined as:
position = 0..mapmax; place = packed record b: char; (* the symbol *) n: integer (* the number of symbols *) end;
so is it getting confused about the "two" uses of b?
I changed b to 'bloop' and made a new variable, but the other b was still around and it still yelled:
makelogo.p: In function `Themain': makelogo.p:4094: cannot take address of bitfield `B'
I even changed the definition so that:
readln(symvec,map[bloop].bsymbol, map[bloop].n);
but *STILL* got:
makelogo.p: In function `Themain': makelogo.p:4094: cannot take address of bitfield `Bsymbol'
since map is used in other places, there seems to be a bug in the use here in the middle of a readln.
So I defined
c: char;
and separated it;
readln(symvec,c, map[bloop].n); map[bloop].bsymbol := c;
and now it compiles.
This program compiles just fine with the Sun compiler and translates into C with p2c and compiles with gcc.
Regards,
Tom
Dr. Thomas D. Schneider National Cancer Institute Laboratory of Experimental and Computational Biology Frederick, Maryland 21702-1201 toms@ncifcrf.gov permanent email: toms@alum.mit.edu http://www.lecb.ncifcrf.gov/~toms/