mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 11:29:24 +02:00
+ 202
This commit is contained in:
parent
622f5de03b
commit
2b3022ccba
17
bugs/bug0202.pp
Normal file
17
bugs/bug0202.pp
Normal 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.
|
||||
|
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user