This commit is contained in:
peter 1999-01-20 13:46:05 +00:00
parent 622f5de03b
commit 2b3022ccba
2 changed files with 18 additions and 0 deletions

17
bugs/bug0202.pp Normal file
View File

@ -0,0 +1,17 @@
program silly;
procedure compare(i,j : integer);
begin
case (i>j) of
true : begin
end;
false : begin
end;
end;
end;
begin
end.

View File

@ -264,3 +264,4 @@ bug0193.pp overflow checking for 8 and 16 bit operations wrong
bug0198.pp calling specifications aren't allowed in class declarations,
this should be allowed
bug0200.pp array of char overloading problem with strings
bug0202.pp flag results not supported with case