paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 23:09:18 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ dmmy code for target that do not support library

Browse Source
This commit is contained in:
pierre 2000-03-17 11:27:47 +00:00
parent 17d4e0c500
commit f6b9436ebf
1 changed files with 14 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
tests/test/testlib.pp
View File

@ -1,3 +1,12 @@
{$ifdef win32}
{$define supported}
{$endif win32}
{$ifdef linux}
{$define supported}
{$endif linux}
{$ifdef supported}
library bug;
const
@ -16,3 +25,8 @@ exports
begin
end.
{$else supported}
begin
Writeln('No library for that target');
end.
{$endif supported}