From f6b9436ebf8f686b074d386b22181b9a9587a85c Mon Sep 17 00:00:00 2001
From: pierre <pierre@freepascal.org>
Date: Fri, 17 Mar 2000 11:27:47 +0000
Subject: [PATCH]  + dmmy code for target that do not support library

---
 tests/test/testlib.pp | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

diff --git a/tests/test/testlib.pp b/tests/test/testlib.pp
index f04f59d745..fa1687543f 100644
--- a/tests/test/testlib.pp
+++ b/tests/test/testlib.pp
@@ -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}