Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* remove semicolon to make Lazarus happy

Sven/Sarah Barth 1 year ago
parent
9ee2eee293
commit
38ca4f9157
1 changed files with 1 additions and 1 deletions
Unified View Show Diff Stats
  1. 1 1
      rtl/win/systhrd.inc

+ 1 - 1
rtl/win/systhrd.inc
View File 

@@ -545,7 +545,7 @@ function FirstCoWaitForMultipleHandles(dwFlags, dwTimeout: DWORD; cHandles: uint
 
 
 
 var
 
 var
 
   Ole32Dll: THandle = 0; { Unloaded at win32 & win64 system_exit. }
 
   Ole32Dll: THandle = 0; { Unloaded at win32 & win64 system_exit. }
 
-  CoWaitForMultipleHandlesImpl: function(dwFlags, dwTimeout: DWORD; cHandles: uint32; pHandles: PWOHandleArray; out lpdwindex: DWORD): HRESULT; stdcall;
 
+  CoWaitForMultipleHandlesImpl: function(dwFlags, dwTimeout: DWORD; cHandles: uint32; pHandles: PWOHandleArray; out lpdwindex: DWORD): HRESULT; stdcall
 
     = @FirstCoWaitForMultipleHandles;
 
     = @FirstCoWaitForMultipleHandles;
 
 
 
 function FirstCoWaitForMultipleHandles(dwFlags, dwTimeout: DWORD; cHandles: uint32; pHandles: PWOHandleArray; out lpdwindex: DWORD): HRESULT; stdcall;
 
 function FirstCoWaitForMultipleHandles(dwFlags, dwTimeout: DWORD; cHandles: uint32; pHandles: PWOHandleArray; out lpdwindex: DWORD): HRESULT; stdcall;