Преглед на файлове

disable explicitly overflow checks

pierre преди 25 години
родител
ревизия
7f52cfc571
променени са 1 файла, в които са добавени 2 реда и са изтрити 1 реда
  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.