paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-06 05:07:20 +01:00
Code Issues Packages Projects Releases Wiki Activity

+ new test that should fail to compile, but doesn't yet

Browse Source 
git-svn-id: trunk@17034 -
This commit is contained in:
Jonas Maebe 2011-02-27 18:03:04 +00:00
parent b0bd6a13ec
commit e78f195422
2 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
.gitattributes vendored
View File

@ -8283,6 +8283,7 @@ tests/tbf/tb0216.pp svneol=native#text/plain
tests/tbf/tb0217.pp svneol=native#text/plain tests/tbf/tb0217.pp svneol=native#text/plain
tests/tbf/tb0218.pp svneol=native#text/plain tests/tbf/tb0218.pp svneol=native#text/plain
tests/tbf/tb0219.pp svneol=native#text/pascal tests/tbf/tb0219.pp svneol=native#text/pascal
tests/tbf/tb0220.pp svneol=native#text/plain
tests/tbf/ub0115.pp svneol=native#text/plain tests/tbf/ub0115.pp svneol=native#text/plain
tests/tbf/ub0149.pp svneol=native#text/plain tests/tbf/ub0149.pp svneol=native#text/plain
tests/tbf/ub0158a.pp svneol=native#text/plain tests/tbf/ub0158a.pp svneol=native#text/plain

8
tests/tbf/tb0220.pp Normal file
View File

@ -0,0 +1,8 @@
{ %fail }
type
tset = set of byte;
begin
if 2 in tset then
writeln('should not compile')
end.