Ver Fonte

disable explicitly overflow checks

pierre há 25 anos atrás
pai
commit
7f52cfc571
1 ficheiros alterados com 2 adições e 1 exclusões
  1. 2 1
      tests/test/testi642.pp

+ 2 - 1
tests/test/testi642.pp

@@ -1,3 +1,4 @@
+{$Q-} { this is necessary to avoid an overflow error below }
 {$mode objfpc}
 uses
    sysutils
@@ -1186,4 +1187,4 @@ begin
    writeln('                Int64 test successful');
    writeln('------------------------------------------------------');
    halt(0);
-end.
+end.