Home
last modified time | relevance | path

Searched refs:perl_subnames (Results 1 – 3 of 3) sorted by relevance

/dports/comms/qico/qico-15673bf/src/
H A Dperl.c84 static char *perl_subnames[]={ variable
286 for(rc=0,perl_nc=0;rc<sizeof(perl_subnames)/sizeof(*perl_subnames);rc++) in perl_init()
287 if(perl_get_cv(perl_subnames[rc],FALSE))perl_nc|=1<<rc; in perl_init()
327 DEBUG(('P',4,"perl_on_std(%s)",perl_subnames[sub])); in perl_on_std()
332 perl_call_pv(perl_subnames[sub],G_EVAL|G_VOID|G_NOARGS); in perl_on_std()
356 perl_call_pv(perl_subnames[PERL_ON_LOG],G_EVAL|G_SCALAR|G_NOARGS); in perl_on_log()
391 perl_call_pv(perl_subnames[PERL_ON_CALL],G_EVAL|G_SCALAR|G_NOARGS); in perl_on_call()
533 perl_call_pv(perl_subnames[PERL_ON_RECV],G_EVAL|G_SCALAR|G_NOARGS); in perl_on_recv()
563 perl_call_pv(perl_subnames[PERL_END_RECV],G_EVAL|G_SCALAR|G_NOARGS); in perl_end_recv()
602 perl_call_pv(perl_subnames[PERL_ON_SEND],G_EVAL|G_SCALAR|G_NOARGS); in perl_on_send()
[all …]
/dports/net/binkd/binkd-1.0.4/
H A Dperlhooks.c904 char *perl_subnames[] = { variable
1036 Log(LL_ERR, "Perl %s error: %s", perl_subnames[sub], s); in sub_err()
1039 Log(LL_ERR, "Perl %s error below:", perl_subnames[sub]); in sub_err()
1629 for (i = 0; i < sizeof(perl_subnames)/sizeof(perl_subnames[0]); i++) { in perl_init()
1649 perl_call_pv(perl_subnames[PERL_ON_EXIT], G_EVAL|G_VOID); in perl_on_exit()
1929 perl_call_pv(perl_subnames[PERL_ON_START], G_EVAL|G_VOID); in perl_on_start()
1979 perl_call_pv(perl_subnames[PERL_ON_CALL], G_EVAL|G_SCALAR); in perl_on_call()
2049 perl_call_pv(perl_subnames[PERL_ON_ERROR], G_EVAL|G_SCALAR); in perl_on_error()
2475 perl_call_pv(perl_subnames[PERL_ON_LOG], G_EVAL|G_SCALAR); in perl_on_log()
2524 perl_call_pv(perl_subnames[PERL_ON_SEND], G_EVAL|G_SCALAR); in perl_on_send()
[all …]
H A Dperlhooks.h88 extern char *perl_subnames[]; /* names for perl subs */