aboutsummaryrefslogtreecommitdiffstats
path: root/plugins/SDK/StrUtils.pas
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--plugins/SDK/StrUtils.pas10
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.