浏览代码

+ dmmy code for target that do not support library

pierre 25 年之前
父节点
当前提交
f6b9436ebf
共有 1 个文件被更改,包括 14 次插入0 次删除
  1. 14 0
      tests/test/testlib.pp

+ 14 - 0
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}