소스 검색

* avoid failure on dummy test

pierre 22 년 전
부모
커밋
3897bcb765
1개의 변경된 파일5개의 추가작업 그리고 1개의 파일을 삭제
  1. 5 1
      tests/test/tlibrary2.pp

+ 5 - 1
tests/test/tlibrary2.pp

@@ -27,4 +27,8 @@ procedure test;external libname name 'TestName';
 begin
   test;
 end.
-{$endif supported}
+{$else not supported}
+begin
+  Writeln('Dummy test because target does not support libraries');
+end.
+{$endif not supported}