Explorar o código

* Fix compilation in unicode rtl

Michaël Van Canneyt hai 1 ano
pai
achega
9bb1cda8b5
Modificáronse 1 ficheiros con 7 adicións e 3 borrados
  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;