[fpc-pascal] [HOW TO] Create a shared object (SO) with FP

[Jilani Khaldi]

{$linklib c}

uses
  dynlibs;
procedure hello(const x: double); cdecl; external 'libmylib.so';

var
  lHandle: TLibHandle;
  v: double;
begin
  lHandle := LoadLibrary('./libmylib.so');
  if lHandle <> nilHandle then
  begin
    v := 3.14159;
    hello(v);
  end else
    writeln('Cannot load "mylib.so"')
end.

It is compiled without error but when I run it it throws:
./testlib: error while loading shared libraries: libmylib.so: cannot 
open shared object file: No such file or directory.

What I did I miss?.
Thank you.

--
Jilani KHALDI
** Architectura Vindex
http://www.vindexa.org
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal