diff --git a/tests/tbf/tb0122.pp b/tests/tbf/tb0122.pp
index 181d7ff952..6918797936 100644
--- a/tests/tbf/tb0122.pp
+++ b/tests/tbf/tb0122.pp
@@ -1,3 +1,5 @@
+{ %fail }
+
 { %version=1.1}
 {$mode delphi}
 var
diff --git a/tests/tbf/tb0123.pp b/tests/tbf/tb0123.pp
index ce3e89c915..e274902180 100644
--- a/tests/tbf/tb0123.pp
+++ b/tests/tbf/tb0123.pp
@@ -1,3 +1,5 @@
+{ %fail }
+
 type
    smallrange = 5..287;
 const