git-svn-id: trunk@43451 -
@@ -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 }
{$r-}
+{$q-}
test(high(longint), 1);
end.