t_id
59
t_adddate
2003/10/03
t_result
0
Flag
t_needlibrary
set
t_knownrunerror
0
t_opts
-Fl.
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
524557978 | 948036 | True | False | Successfully run |
Record count: 1
{ %OPT=-Fl. } { %NEEDLIBRARY } { Test program to test linking to fpc library } {$ifdef win32} {$define supported} {$endif win32} {$ifdef Unix} {$define supported} {$endif Unix} {$ifndef fpc} {$define supported} {$endif} {$ifdef supported} const {$ifdef win32} libname='tlibrary1.dll'; {$else} libname='libtlibrary1.so'; {$endif} procedure test;external libname name 'TestName'; begin test; end. {$else not supported} begin Writeln('Dummy test because target does not support libraries'); end. {$endif not supported}