Help for this page

Select Code to Download

Select or download this

void
recursive_lock_release(pTHX_ recursive_lock_t *lock)
...
    }
    MUTEX_UNLOCK(&lock->mutex);
}

Select or download this

#  define MUTEX_LOCK(m) \
    STMT_START {                        \
...
        Perl_croak_nocontext("panic: MUTEX_LOCK (%d) [%s:%d]",    \
                 _eC_, __FILE__, __LINE__);    \
    } STMT_END