Source position: pthreadtypesh.inc line 90
type pthread_barrierattr_t = record
__pshared: LongInt;
end;