Source position: objpash.inc line 626
class procedure TMonitor.Exit(
const aObject: TObject
); overload;