1 files changed, 8 insertions, 2 deletions
diff --git a/plugins/SDK/StrUtils.pas b/plugins/SDK/StrUtils.pas
index a5735b8f..069c89c3 100644
--- a/plugins/SDK/StrUtils.pas
+++ b/plugins/SDK/StrUtils.pas
@@ -2,7 +2,9 @@ unit StrUtils;
 
 interface
 
-{$I switches.inc}
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 uses ModiSDK;
 
@@ -12,6 +14,10 @@ procedure FreeStr(Str: PChar);
 
 implementation
 
+{$IFDEF FPC}
+  {$ASMMODE Intel}
+{$ENDIF}
+
 {function StrToAChar(Str: String): AChar;
 var
   L, I: Integer;
@@ -70,4 +76,4 @@ begin
   FreeMem(Str);
 end;
 
-end.
-\ No newline at end of file
+end.