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

* range and overflow checks explicitly disabled

git-svn-id: trunk@6538 -
pierre преди 18 години
родител
ревизия
40d9ef1196
променени са 1 файла, в които са добавени 6 реда и са изтрити 0 реда
  1. 6 0
      tests/webtbs/tw1901.pp

+ 6 - 0
tests/webtbs/tw1901.pp

@@ -4,9 +4,15 @@
 {$MODE DELPHI}
 {$endif}
 
+{ Range and overflow checks need to be off }
+
+{$Q-}
+{$R-}
+
 const Inf=1/0;
       NaN=0/0;
       MinusInf=-Inf;
+
 var
   s : string;
   error : boolean;