소스 검색

* Fix compilation in unicode rtl

Michaël Van Canneyt 1 년 전
부모
커밋
9bb1cda8b5
1개의 변경된 파일7개의 추가작업 그리고 3개의 파일을 삭제
  1. 7 3
      packages/wasmedge/src/libwasmedge.pp

+ 7 - 3
packages/wasmedge/src/libwasmedge.pp

@@ -613,9 +613,13 @@ WasmEdge_ExecutorExperimentalRegisterPostHostFunction : procedure(Cxt:PWasmEdge_
 
 implementation
 
-  uses
-    SysUtils, dynlibs;
-
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.SysUtils, System.DynLibs;
+{$ELSE}
+uses
+   SysUtils, dynlibs;
+{$ENDIF}
   var
     hlib : tlibhandle;