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 / cg / tcppcl2.pp
Size: Mime:
{ %FILES=cpptcl2.o }
{ Test the C++ class renaming }
program tcppcl2;

{$mode objfpc}
{$L cpptcl2.o}

type
  TestClass = cppclass external
  public
    class procedure TestProc;
  end;

  TestClass2 = cppclass external name 'testclass'
  public
    class procedure TestProc;
  end;

begin
  try
    TestClass.TestProc;
    TestClass2.TestProc;
  except
    ExitCode := 1;
    writeln('error');
  end;
end.