mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-06 20:47:53 +02:00
9 lines
103 B
ObjectPascal
9 lines
103 B
ObjectPascal
{ %fail }
|
|
|
|
type
|
|
tset = set of byte;
|
|
begin
|
|
if 2 in tset then
|
|
writeln('should not compile')
|
|
end.
|