paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-06-19 12:38:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* the test made compilable also on other platforms than only Unix and Windows

Browse Source 
git-svn-id: trunk@29699 -
This commit is contained in:
Tomas Hajny 2015-02-15 01:34:47 +00:00
parent 90aeabb439
commit e1b37dcc46
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
tests/webtbs/tw6822b.pp
View File

@ -12,12 +12,10 @@ var
const const
{$ifdef unix} {$ifdef unix}
libname = './libtw6822a.'+SharedSuffix; libname = './libtw6822a.'+SharedSuffix;
{$else unix}
libname = 'tw6822a.' + SharedSuffix;
{$endif unix} {$endif unix}
{$ifdef windows}
libname = 'tw6822a.dll';
{$endif windows}
begin begin
writeln('hello from loader program'); writeln('hello from loader program');
h:= loadlibrary(libname); h:= loadlibrary(libname);