--- a/SynHighlighterMindScript.pas
+++ b/SynHighlighterMindScript.pas
@@ -183,7 +183,7 @@
     procedure SetLine({$IFDEF FPC}const {$ENDIF}NewValue: String; LineNumber: Integer); override;
     function GetToken: String; override;
     {$IFDEF SYN_LAZARUS}
-    procedure GetTokenEx(var TokenStart: PChar; var TokenLength: integer); override;
+    procedure GetTokenEx(out TokenStart: PChar; out TokenLength: integer); override;
     {$ENDIF}
     function GetTokenAttribute: TSynHighlighterAttributes; override;
     function GetTokenKind: integer; override;
@@ -1085,8 +1085,8 @@
 end;
 
 {$IFDEF SYN_LAZARUS}
-procedure TSynMindScriptSyn.GetTokenEx(var TokenStart: PChar;
-  var TokenLength: integer);
+procedure TSynMindScriptSyn.GetTokenEx(out TokenStart: PChar;
+  out TokenLength: integer);
 begin
   TokenLength:=Run-fTokenPos;
   TokenStart:=FLine + fTokenPos;