소스 검색

Fix compilation failure for systems that do not have dynlibs

git-svn-id: trunk@37056 -
pierre 8 년 전
부모
커밋
e325284160
1개의 변경된 파일4개의 추가작업 그리고 0개의 파일을 삭제
  1. 4 0
      rtl/objpas/sysutils/sysutils.inc

+ 4 - 0
rtl/objpas/sysutils/sysutils.inc

@@ -718,7 +718,11 @@ begin
 end;
 {$else}
 begin
+{$ifdef FPC_HAS_FEATURE_DYNLIBS}
   Result:=System.SafeLoadLibrary(FileName);
+{$else}
+  Result:=HModule(nil);
+{$endif not FPC_HAS_FEATURE_DYNLIBS}
 end;
 {$endif}