* fail added

tests/webtbf/tw3126.pp

@@ -1,3 +1,5 @@
+{ %fail }
+
 { Source provided for Free Pascal Bug Report 3126 }
 { Submitted by "Christian Iversen" on  2004-05-30 }
 { e-mail: [email protected] }

tests/webtbf/tw3158.pp

@@ -1,3 +1,5 @@
+{ %fail }
+
 { Source provided for Free Pascal Bug Report 3158 }
 { Submitted by "Michalis Kamburelis" on  2004-06-11 }
 { e-mail: [email protected] }