Source position: exec.pas line 811
type tSemaphore = record
sm_MsgPort: tMsgPort;
sm_Bids: SmallInt;
end;