Kaynağa Gözat

* Fix compilation in unicode rtl

Michaël Van Canneyt 1 yıl önce
ebeveyn
işleme
9bb1cda8b5
1 değiştirilmiş dosya ile 7 ekleme ve 3 silme
  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;