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