ThreadManager semaphore handlers are not initialized on win32
Original Reporter info from Mantis: inoussa @inoussa12
-
Reporter name: Inoussa OUEDRAOGO
Original Reporter info from Mantis: inoussa @inoussa12
- Reporter name: Inoussa OUEDRAOGO
Description:
The program below outputs :
SemaphoreInit = nil
SemaphoreDestroy = nil
SemaphorePost = nil
SemaphoreWait = nil
<code>
program thread_manager_sem;
{$mode objfpc}{$H+}
uses
SysUtils;
var
TM : TThreadManager;
begin
if not GetThreadManager(TM) then
WriteLn('GetThreadManager failed.');
if ( TM.SemaphoreInit = nil ) then
WriteLn('SemaphoreInit = nil');
if ( TM.SemaphoreDestroy = nil ) then
WriteLn('SemaphoreDestroy = nil');
if ( TM.SemaphorePost = nil ) then
WriteLn('SemaphorePost = nil');
if ( TM.SemaphoreWait = nil ) then
WriteLn('SemaphoreWait = nil');
end.
</code>
Mantis conversion info:
- Mantis ID: 11206
- Version: 2.3.1