瀏覽代碼

Disable expliccitly overlfow and range checks

git-svn-id: trunk@34014 -
pierre 9 年之前
父節點
當前提交
3253711e95
共有 1 個文件被更改,包括 4 次插入0 次删除
  1. 4 0
      tests/tbs/tb0336.pp

+ 4 - 0
tests/tbs/tb0336.pp

@@ -1,3 +1,7 @@
+{ Explicitly disable overflow and range checks }
+{$Q-}
+{$R-}
+
 var
    l : longint;
    d : dword;