Source position: pthrlinux.inc line 294
procedure _pthread_cleanup_push(
__buffer: p_pthread_cleanup_buffer;
__routine: TPThreadCleanupRoutine;
__arg: pointer
);