Browse Source

* Fix compilation in unicode rtl

Michaël Van Canneyt 1 year ago
parent
commit
9bb1cda8b5
1 changed files with 7 additions and 3 deletions
  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
 implementation
 
 
-  uses
-    SysUtils, dynlibs;
-
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+  System.SysUtils, System.DynLibs;
+{$ELSE}
+uses
+   SysUtils, dynlibs;
+{$ENDIF}
   var
   var
     hlib : tlibhandle;
     hlib : tlibhandle;