Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / fpc-pascal / 2003-02

Errors?

1 message · 1 person ·

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Ziegenhorn Tourism Database

Hello,

maybe I have seen two errors in 1.0.6 (Linux):

Program Test;
{$R+}
Var
  ch : 'A'..'C';
begin
  writeln('Hello');
  ch:=char(75);
  writeln(ch);
end.

Should give a range check error, I think.

Function GetType : longint;
Var
  ix : longint;
begin
  {..}
  GetType:=123;
  {...}
  ix:=GetType;     {gives not the result expected}
end; {GetType}

P.S.: Freepascal is GREAT!
Regards
Heinz

*************************************
Ziegenhorn Tourism Database
P.O. Box 16 45
76726 Germersheim, Germany
Tel: +49-7274-2759 Fax: +49-7274-3631
http://www.ziegenhorn.com
*************************************