Help for this page

Select Code to Download

Select or download this

#define COND_SIGNAL(c) \
    STMT_START {                        \
...
        ReleaseSemaphore((c)->sem,1,NULL) == 0)        \
        Perl_croak_nocontext("panic: COND_SIGNAL (%ld)",GetLastError()
+);    \
    } STMT_END