Why Gemfury? Push, build, and install  RubyGems npm packages Python packages Maven artifacts PHP packages Go Modules Debian packages RPM packages NuGet packages

Repository URL to install this package:

Details    
fpc-src / usr / share / fpcsrc / 3.2.0 / tests / test / tinlrange2.pp
Size: Mime:
{ %norun }

{$mode objfpc}

{$r-}
function test(l1, l2: longint): longint; inline;
begin
  result:=l1+l2;
end;

{ range checking state at caller site should not influence inline evaluation }
{$r+}
begin
  test(high(longint), 1);
end.