paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-24 09:19:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

* range and overflow checks explicitly disabled

Browse Source 
git-svn-id: trunk@6538 -
This commit is contained in:
pierre 2007-02-18 00:40:28 +00:00
parent 5fc4257482
commit 40d9ef1196
1 changed files with 6 additions and 0 deletions

6
tests/webtbs/tw1901.pp
View File

@ -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;