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

beefree / fpc-src deb

Repository URL to install this package:

Version: 
3.2.0  ▾
Details    
fpc-src / usr / share / fpcsrc / 3.2.0 / tests / webtbs / tw4427.pp
Size: Mime: 
{$inline on}

procedure test(p: pchar);
begin
  if pchar(p)^ <> 'a' then
    halt(1);
end;

procedure test(const p); inline;
begin
  test(pchar(@p));
end;

begin
  test('abc');
end.

Products

About

Resources

Contact Gemfury