git-svn-id: trunk@20597 -
@@ -1,3 +1,7 @@
+
+{ This test requires overflow check to be off }
+{$O-}
var
error: boolean;
@@ -1,4 +1,7 @@
procedure error(n: longint);
begin
writeln('Test failed: ', n);