diff --git a/tests/tbs/tb0447.pp b/tests/tbs/tb0447.pp
index 0ece353a05..e7313a3da5 100644
--- a/tests/tbs/tb0447.pp
+++ b/tests/tbs/tb0447.pp
@@ -1,3 +1,5 @@
+{ %KNOWNRUNERROR=201 v1.0 computes cardinal > longint as cardinal values }
+
 {$R+}
 var
   a : cardinal;
diff --git a/tests/tbs/tb0447a.pp b/tests/tbs/tb0447a.pp
new file mode 100644
index 0000000000..fe3b92a7f4
--- /dev/null
+++ b/tests/tbs/tb0447a.pp
@@ -0,0 +1,22 @@
+{ %KNOWNRUNERROR=2 v10 computes cardinal > longint as cardinals }
+{$R-}
+var
+  a : cardinal;
+  b : longint;
+begin
+  a := 0;
+  b := -1;
+  if a > b then
+    writeln ('OK')
+  else
+{$ifdef VER0}
+    halt(2);
+{$else not VER0}
+{$ifdef VER1_0}
+    halt(2);
+{$else}
+    halt(1);
+{$endif}
+{$endif}
+end.
+