Source position: pthreadh.inc line 259
function EnterCriticalSection(
var lpCriticalSection: TRTLCriticalSection
):Integer;