22 Dec
1999
22 Dec
'99
5:31 p.m.
Frank Heckenbach wrote:
Alfredo Cesar Fontana wrote:
Hello:
In this example:
PROGRAM STR; {$IFDEF BAD} TYPE P=PROCEDURE(S:STRING); {$ENDIF} VAR S:STRING; BEGIN S:='123'; DELETE(S,1,1); WRITELN(S) END.
with GPC v 19990118 (DJGPP and Linux) and GPC v 19990609
when I "gpc -o str str.pas" I get: "23", the delete procedure works fine. But if I "gpc -o str str.pas -DBAD" then I get: "123". I lost my delete procedure :'-(
Just 0.02$ in that thread... I tried to compile this program with GPC 19991030 on Sparc Solaris7 (based on GCC 2.95) as described by original author. In both cases it works for me flawlesly.
Regards
--
.
Mariusz Zynel
Institute of Mathematics | phone: +48 (85) 745 75 52
University of Bialystok |
Akademicka 2 St | mailto:mariusz@math.uwb.edu.pl
15-267 Bialystok |
Poland | http://math.uwb.edu.pl/~mariusz/