March 2005 - Gpc

Packed array
by loop lopy 12 Mar '05

12 Mar '05

In order to read strings I have defined the following type: String: packed array[0..255] of char; However, when I have the following code: var Test: String; begin readln (Test); end. I get the compil error: only packed array of char may be read from 'Text' files How should I read a string with readln? __________________________________ Do you Yahoo!? Yahoo! Small Business - Try our new resources site! http://smallbusiness.yahoo.com/resources/

1 0

String type
by loop lopy 12 Mar '05

12 Mar '05

It seems there is a string type in turbo pascal. Howver, in gpc it gives a compiler error if something is defined : String; So, there is no type string in gpc --standard-pascal? How do I read a string from the input? I need to use readln? I need to use a Text type variable or is there a predefined variable of text type that is used for standard input? How do I use readln? __________________________________________________ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com

1 0

Compiling errors
by loop lopy 12 Mar '05

12 Mar '05

I omitted the additional type and the first compilation error has been removed. Now I have two additional compilation errors. My code is: program Ex1 (input, output); type NumNode = record Value: integer; pNext: ^ NumNode; end; nNumber = record DigitsAmount: integer; DigitValue:^ NumNode; MSD: integer; DigitBase: integer; end; function nNumberIsEmpty (Num: nNumber): boolean; begin nNumberIsEmpty := (Num.DigitValue=0); end; function nNumberPop (var Number: nNumber): integer; var pNextValue:^ NumNode; begin if (nNumberIsEmpty(Number)) then nNumberPop:=0; else begin Number.DigitsAmount:=Number.DigitsAmount-1; pNextValue := Number.DigitValue^.pNext; dispose (Number.DigitValue); Number.DigitValue:=pNextValue; if (Number.DigitsAmount=0) then begin Number.MSD:=0; nNumberPop:=0; end else begin nNumberPop:=pNextValue^.Value; end; end; end; function nString2nList (String:^ char; var Number:nNumber;):boolean; begin end; begin writeln ('Hello world'); end. The errors I get: ex1.pas: In function 'Nnumberisempty': ex1.pas:17: invalid operands to binary = ex1.pas: At top level: ex1.pas:44: parse error before '^' What causes these errors? --------------------------------- Do you Yahoo!? Yahoo! Small Business - Try our new resources site!

2 1

Another sample of the wrong order of declaration error
by loop lopy 12 Mar '05

12 Mar '05

I have the following code: program Test (input, output); type Num1 = record Value: integer; end; type Num2 = record Value: integer; end; type Num3 = record Value: integer; end; function a (b:integer): integer; begin end; begin end. I get the following errors: test.pas:11: wrong order of declarations according to ISO 7185 Pascal test.pas:15: wrong order of declarations according to ISO 7185 Pascal How do I fix this? --------------------------------- Do you Yahoo!? Make Yahoo! your home page

1 0

Wrong order of declaration
by loop lopy 12 Mar '05

12 Mar '05

If I write the following code: program Ex1 (input, output); type NumNode = record Value: integer; pNext: ^ NumNode; end; function a (b:integer): integer; begin end; begin end. Then the compilation works. So it seems the second record is somehow not accepted. --------------------------------- Do you Yahoo!? Yahoo! Small Business - Try our new resources site!

2 1

Wrong declaration order
by loop lopy 12 Mar '05

12 Mar '05

Hello Here is my code: program Ex1 (input, output); type NumNode = record Value: integer; pNext: ^ NumNode; end; type nNumber = record DigitsAmount:integer; DigitValue:^ NumNode; MSD: integer; DigitBase: integer; end; function a (b:integer): integer; begin end; There is nore code, but I dont think it is needed to understand what causes the compiler error. What might cause this compilation error? P.S.: I didnt see where I can turn off HTML email. --------------------------------- Do you Yahoo!? Yahoo! Mail - Easier than ever with enhanced search. Learn more.

2 1

wrong order of declaration
by loop lopy 12 Mar '05

12 Mar '05

Hello I have compiled my program with gpc --standard-pascal ex1.pas -o ex1.aout I got the following error: ex1.pas:15:Wrong order of declerations according to ISO 7158 Pascal in function 'A' : My code at line 15 is: function a (b:integer): integer; What is wrong with it? --------------------------------- Do you Yahoo!? Yahoo! Mail - Helps protect you from nasty viruses.

3 2

Wrong order of declaration
by loop lopy 12 Mar '05

12 Mar '05

Hello I have compiled my program with gpc --standard-pascal ex1.pas -o ex1.aout I got the following error: ex1.pas:15:Wrong order of declerations according to ISO 7158 Pascal in function 'A' : My code at line 15 is: function a (b:integer): integer; What is wrong with it? --------------------------------- Do you Yahoo!? Yahoo! Mail - You care about security. So do we.

1 0

building cross compiler for PowerPC using 20050217 version
by Igor Marnat 11 Mar '05

11 Mar '05

Hello, all! I'm trying to build cross-compiler to build the programs for PowerPC processor. Host is Fedora Core 3, i686, kernel of 2.6.10 version. GPC is of 20050217 version, is being built together with GCC 3.3.3. I've configured it with ../configure --prefix=/usr --mandir=/usr/share/man --infodir=/usr/share/info --enable-shared --enable-threads=posix --disable-checking --with-system-zlib --enable-__cxa_atexit --with-newlib --enable-languages=c,pascal --disable-libgcj --target=ppc-linux. Compiler itself (xgpc) has been built successfully but it doesn't want to build rts and tells me that c compiler cannot create executables. In the <build>/gcc/p/rts there is the only one file, config.log (attached) where cc1 (of just built xgcc) tells that arch=i686 is an invalid option for him (sounds reasonable since it's the compiler for ppc platform). So, could you please make some clarifications for me: 1. why GPC didn't see that it's being built as a cross compiler (there is nothing about it in config.log, it even doesn't try to determine it). 2. what should be done to avoid passing of the CFLAGS of the native host compiler to cross compiler xgcc which has been just built. 3. as I can see from configure script from rts directory of 20050217 version, it's used another way to determine if it's being built the cross-compiler (there was used other method to determine it in 20030830 version). It's written "FIXME: to remove some days" in current "rts/configure" script near this lines. Is it really wrong and needs to be fixed? Current method uses the value of host_alias variable. As I can see from the config.log file, host_alias variable of "rts/configure" script is empty - how should it get its value? In the same script we try to assign it the value using the options entered by user but "rts/configure"script is called automatically during p/rts/Makefile target building and there is no --host parameter. How should it get its value? It will be really nice if somebody can give me any hint or point to any source to read about. Regards, Igor Marnat marny(a)rambler.ru

3 4

const keyword: problems migrating code from gpc on Linux to gpc on OsX
by Stefano Carpin 11 Mar '05

11 Mar '05

Hi all. The follwing three files reproduce an error I've encountered while porting some code from gpc on Linux to gpc on OsX. ----------- file p1.pas -------- module p1; export p1 = all; const P = 155; function Something() :boolean; end; function Something: boolean; begin Something := false; end; end. ------------ file p2.pas --------- module p2; export p2 = all; const P = 155; function SomethingElse :boolean; end; function SomethingElse: boolean; begin SomethingElse := false; end; end. ----------- file testconst.pas ------- program test(input, output); import p1;p2; var a,b : boolean; c : integer; begin a := Something; b := SomethingElse; c := P; writeln('test'); end. --------------------------------------------------- If I try gpc --automake testconst.pas on my linux box it works fine. If I try the same command on my Mac I receive the following output: p2.pas:5: error: redeclaration of `P' p1.pas:5: error: previous declaration Please note that if you change both P and c to boolean type, everything works fine both on Linux and OsX Precisely, on Linux I am running gpc 20041218 based on gcc-3.3.3. On the Mac I run GNU Pascal version 20041218, based on gcc-3.4.3, i.e. the one currently available on microbizz. Any hint? Thanks, Stefano

2 1