Source position: tos.pas line 368
function Psemaphore(
mode: SmallInt;
id: LongInt;
timeout: LongInt
):LongInt;