Browse Source

* fixed test for non-64 bit platforms

git-svn-id: trunk@43451 -
Jonas Maebe 5 years ago
parent
commit
7bf50d261e
1 changed files with 9 additions and 0 deletions
  1. 9 0
      tests/test/tinlrange1.pp

+ 9 - 0
tests/test/tinlrange1.pp

@@ -1,7 +1,12 @@
 { %fail }
 
 {$mode objfpc}
+
+{$ifdef cpu64}
 {$r+}
+{$else}
+{$q+}
+{$endif}
 
 function test(l1, l2: longint): longint; inline;
 begin
@@ -9,7 +14,11 @@ begin
 end;
 
 { range checking state at caller site should not influence inline evaluation }
+{$ifdef cpu64}
 {$r-}
+{$else}
+{$q-}
+{$endif}
 begin
   test(high(longint), 1);
 end.