util.c
/* this is called in both parent and child after the fork() */
this is called in both parent and child after the fork()
this is called in both parent and child after the fork ()
void
Perl_atfork_unlock(void)
{
    dVAR;
#if defined(USE_ITHREADS)
#  ifdef MYMALLOC
    MUTEX_UNLOCK(&PL_malloc_mutex);
#  endif
    OP_REFCNT_UNLOCK;
#endif
}
void Perl_atfork_unlock ( void ) { dVAR ; #if defined ( USE_ITHREADS ) #  ifdef MYMALLOC MUTEX_UNLOCK ( & PL_malloc_mutex ) ; #  endif OP_REFCNT_UNLOCK ; #endif }
this is called in both parent and child after the fork()
this is called in both parent and child after the fork ()
/* locks must be released in same order as in atfork_lock() */