fpc/bugs/bug0063.pp
1998-03-25 11:26:49 +00:00

14 lines
171 B
ObjectPascal

{ may also crash/do weird error messages with the compiler }
var
min: char;
max: char;
i: char;
begin
min:='c';
max:='z';
if i in [min..max] then
Begin
end;
end.