* adapt test to range check

git-svn-id: trunk@6535 -

tests/test/cg/tneg.pp

@@ -103,6 +103,9 @@ Begin
    int64val := 1;
    int64val := - int64val;
    Write('Value should be -1...');
+
+   { the following test give range check errors }
+   {$R-}
    test(int64val and $FFFFFFFF, -1);
 
    { CURRENT NODE : REGISTER }