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 / tbs / tb0359.pp
Size: Mime:
{ %version=1.1 }
{ %TARGET=linux,freebsd,darwin,solaris,aix,haiku }

{$linklib c}

type
  tprintfproc=procedure(t:pchar);varargs;cdecl;

procedure printf(t:pchar);varargs;cdecl;external;

var
  t : tprintfproc;
begin
  printf('Proc test %d %s %lf'#10,1,'test',1234.5678);

  t:=@printf;
  t('Procvar test %d %s %lf'#10,2,'test',1234.5678);
end.