Browse Source

* add test for wrong code that should generate an error

git-svn-id: trunk@7113 -
pierre 18 years ago
parent
commit
d7e6f9f701
3 changed files with 20 additions and 0 deletions
  1. 2 0
      .gitattributes
  2. 9 0
      tests/tbf/tb0199.pp
  3. 9 0
      tests/tbf/tb0199a.pp

+ 2 - 0
.gitattributes

@@ -5746,6 +5746,8 @@ tests/tbf/tb0195.pp svneol=native#text/plain
 tests/tbf/tb0196.pp svneol=native#text/plain
 tests/tbf/tb0197.pp svneol=native#text/plain
 tests/tbf/tb0198.pp svneol=native#text/plain
+tests/tbf/tb0199.pp -text
+tests/tbf/tb0199a.pp -text
 tests/tbf/ub0115.pp svneol=native#text/plain
 tests/tbf/ub0149.pp svneol=native#text/plain
 tests/tbf/ub0158a.pp svneol=native#text/plain

+ 9 - 0
tests/tbf/tb0199.pp

@@ -0,0 +1,9 @@
+{%NORUN}
+{%FAIL}
+type
+  test = record
+    f3,,,f5,,, : Boolean;
+  end;
+
+begin
+end.

+ 9 - 0
tests/tbf/tb0199a.pp

@@ -0,0 +1,9 @@
+{%NORUN}
+{%FAIL}
+type
+  test = record
+    f3,f5, : Boolean;
+  end;
+
+begin
+end.