usr/share/fpcsrc/3.0.0/tests/webtbs/tw13628b.pp · bee / fpc-src v3.0.0 - deb package | Gemfury

Gemfury

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

bee / fpc-src deb

Repository URL to install this package:

Details

fpc-src / usr / share / fpcsrc / 3.0.0 / tests / webtbs / tw13628b.pp

{ %needlibrary }
{ %delfiles=tw13628a }

program loadmodule;

uses
  popuperr,
  dynlibs;

const
  {$ifdef unix}
  libname = './libtw13628a.'+SharedSuffix;
  {$endif unix}

  {$ifdef windows}
  libname = 'tw13628a.dll';
  {$endif windows}

var
  hdl: TLibHandle;
begin
  hdl := loadlibrary(libname);
  if (hdl=nilhandle) then
    halt(1);
  if not UnloadLibrary(hdl) then
    halt(2);;
end.