Browse Source

* make Lazarus' CodeTools happy

Sven/Sarah Barth 1 year ago
parent
commit
244d3df869
1 changed files with 3 additions and 3 deletions
  1. 3 3
      rtl/win/sysos.inc

+ 3 - 3
rtl/win/sysos.inc

@@ -365,9 +365,9 @@ var
 
 
 var
 var
    OleAut32Dll: THandle = 0; { Unloaded at win32 & win64 system_exit. }
    OleAut32Dll: THandle = 0; { Unloaded at win32 & win64 system_exit. }
-   SysAllocStringLen: function(psz:pointer;len:dword):pointer; stdcall; = @FirstSysAllocStringLen;
-   SysFreeString: procedure(bstr:pointer); stdcall; = @FirstSysFreeString;
-   SysReAllocStringLen: function(var bstr:pointer;psz: pointer;len:dword): Integer; stdcall; = @FirstSysReAllocStringLen;
+   SysAllocStringLen: function(psz:pointer;len:dword):pointer; stdcall = @FirstSysAllocStringLen;
+   SysFreeString: procedure(bstr:pointer); stdcall = @FirstSysFreeString;
+   SysReAllocStringLen: function(var bstr:pointer;psz: pointer;len:dword): Integer; stdcall = @FirstSysReAllocStringLen;
 
 
    function EnsureOleAut32Dll: THandle;
    function EnsureOleAut32Dll: THandle;
    begin
    begin