mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-15 00: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,
|
bug0198.pp calling specifications aren't allowed in class declarations,
|
||||||
this should be allowed
|
this should be allowed
|
||||||
bug0200.pp array of char overloading problem with strings
|
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