Sfoglia il codice sorgente

* range and overflow checks explicitly disabled

git-svn-id: trunk@6538 -
pierre 18 anni fa
parent
commit
40d9ef1196
1 ha cambiato i file con 6 aggiunte e 0 eliminazioni
  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;