/dports/lang/perl5.30/perl-5.30.3/ext/XS-APItest/t/ |
H A D | call.t | 71 ok(eq_array( [ call_sv(\&f, $flags, @$args) ], $expected), 74 ok(eq_array( [ call_sv(*f, $flags, @$args) ], $expected), 77 ok(eq_array( [ call_sv('f', $flags, @$args) ], $expected), 103 ok(eq_array( [ call_sv('d', $flags|G_EVAL|$keep, @$args) ], 142 ok(eq_array( [ sub { call_sv('f', $flags|G_NOARGS, "bad") }->(@$args) ], 157 ok(eq_array( [ eval { call_sv('d', $flags, @$args)}, $@ ], 191 call_sv(sub { die $inx if $inx }, G_VOID|G_EVAL); 197 call_sv(sub { die $inx if $inx }, G_VOID|G_EVAL|G_KEEPERR); 208 call_sv(sub { die "aa\n" }, G_VOID|G_EVAL|G_KEEPERR); 216 call_sv(sub { use warnings "misc"; die "aa\n" }, G_VOID|G_EVAL|G_KEEPERR); [all …]
|
/dports/lang/perl5.34/perl-5.34.0/ext/XS-APItest/t/ |
H A D | call.t | 71 ok(eq_array( [ call_sv(\&f, $flags, @$args) ], $expected), 74 ok(eq_array( [ call_sv(*f, $flags, @$args) ], $expected), 77 ok(eq_array( [ call_sv('f', $flags, @$args) ], $expected), 103 ok(eq_array( [ call_sv('d', $flags|G_EVAL|$keep, @$args) ], 142 ok(eq_array( [ sub { call_sv('f', $flags|G_NOARGS, "bad") }->(@$args) ], 157 ok(eq_array( [ eval { call_sv('d', $flags, @$args)}, $@ ], 191 call_sv(sub { die $inx if $inx }, G_VOID|G_EVAL); 197 call_sv(sub { die $inx if $inx }, G_VOID|G_EVAL|G_KEEPERR); 208 call_sv(sub { die "aa\n" }, G_VOID|G_EVAL|G_KEEPERR); 216 call_sv(sub { use warnings "misc"; die "aa\n" }, G_VOID|G_EVAL|G_KEEPERR); [all …]
|
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/ext/XS-APItest/t/ |
H A D | call.t | 71 ok(eq_array( [ call_sv(\&f, $flags, @$args) ], $expected), 74 ok(eq_array( [ call_sv(*f, $flags, @$args) ], $expected), 77 ok(eq_array( [ call_sv('f', $flags, @$args) ], $expected), 103 ok(eq_array( [ call_sv('d', $flags|G_EVAL|$keep, @$args) ], 142 ok(eq_array( [ sub { call_sv('f', $flags|G_NOARGS, "bad") }->(@$args) ], 157 ok(eq_array( [ eval { call_sv('d', $flags, @$args)}, $@ ], 191 call_sv(sub { die $inx if $inx }, G_VOID|G_EVAL); 197 call_sv(sub { die $inx if $inx }, G_VOID|G_EVAL|G_KEEPERR); 208 call_sv(sub { die "aa\n" }, G_VOID|G_EVAL|G_KEEPERR); 216 call_sv(sub { use warnings "misc"; die "aa\n" }, G_VOID|G_EVAL|G_KEEPERR); [all …]
|
/dports/lang/perl5.32/perl-5.32.1/ext/XS-APItest/t/ |
H A D | call.t | 71 ok(eq_array( [ call_sv(\&f, $flags, @$args) ], $expected), 74 ok(eq_array( [ call_sv(*f, $flags, @$args) ], $expected), 77 ok(eq_array( [ call_sv('f', $flags, @$args) ], $expected), 103 ok(eq_array( [ call_sv('d', $flags|G_EVAL|$keep, @$args) ], 142 ok(eq_array( [ sub { call_sv('f', $flags|G_NOARGS, "bad") }->(@$args) ], 157 ok(eq_array( [ eval { call_sv('d', $flags, @$args)}, $@ ], 191 call_sv(sub { die $inx if $inx }, G_VOID|G_EVAL); 197 call_sv(sub { die $inx if $inx }, G_VOID|G_EVAL|G_KEEPERR); 208 call_sv(sub { die "aa\n" }, G_VOID|G_EVAL|G_KEEPERR); 216 call_sv(sub { use warnings "misc"; die "aa\n" }, G_VOID|G_EVAL|G_KEEPERR); [all …]
|
/dports/lang/perl5.30/perl-5.30.3/dist/Devel-PPPort/parts/inc/ |
H A D | call | 16 call_sv 27 __UNDEFINED__ call_sv perl_call_sv 41 # ifdef call_sv 42 # undef call_sv 45 # define call_sv(sv, flags) ((flags) & G_METHOD ? perl_call_method((char *) SvPV_nolen_const(sv),… 210 call_sv(sv, flags, ...) 221 i = call_sv(sv, flags); 291 i = call_sv(sv, flags | G_METHOD); 349 ok(eq_array( [ &Devel::PPPort::call_sv(\&f, $flags, @$args) ], $expected)); 350 ok(eq_array( [ &Devel::PPPort::call_sv(*f, $flags, @$args) ], $expected)); [all …]
|
/dports/sysutils/p5-Fuse/Fuse-0.16.1/ |
H A D | Fuse.xs | 193 rv = call_sv(MY_CXT.callback[0],G_ARRAY); in _PLfuse_getattr() 238 rv = call_sv(MY_CXT.callback[1],G_SCALAR); in _PLfuse_readlink() 270 prv = call_sv(MY_CXT.callback[2],G_ARRAY); in _PLfuse_getdir() 305 rv = call_sv(MY_CXT.callback[3],G_SCALAR); in _PLfuse_mknod() 326 rv = call_sv(MY_CXT.callback[4],G_SCALAR); in _PLfuse_mkdir() 346 rv = call_sv(MY_CXT.callback[5],G_SCALAR); in _PLfuse_unlink() 366 rv = call_sv(MY_CXT.callback[6],G_SCALAR); in _PLfuse_rmdir() 387 rv = call_sv(MY_CXT.callback[7],G_SCALAR); in _PLfuse_symlink() 408 rv = call_sv(MY_CXT.callback[8],G_SCALAR); in _PLfuse_rename() 429 rv = call_sv(MY_CXT.callback[9],G_SCALAR); in _PLfuse_link() [all …]
|
/dports/astro/p5-Starlink-AST/Starlink-AST-1.05/src/ |
H A D | grf_perl.c | 127 count = call_sv( SvRV(cb), flags); in astGBBuf() 196 count = call_sv( SvRV(cb), flags); in astGEBuf() 265 count = call_sv( SvRV(cb), flags); in astGFlush() 341 count = call_sv( SvRV(cb), G_SCALAR | G_EVAL ); in astGLine() 408 count = call_sv( SvRV(cb), flags); in astGQch() 487 count = call_sv( SvRV(cb), G_SCALAR | G_EVAL ); in astGMark() 556 count = call_sv( SvRV(cb), G_SCALAR | G_EVAL); in astGText() 631 count = call_sv( SvRV(cb), G_ARRAY | G_EVAL ); in astGTxExt() 763 count = call_sv( SvRV(cb), G_ARRAY | G_EVAL ); in astGAttr() 834 count = call_sv( SvRV(cb), flags); in astGScales() [all …]
|
/dports/devel/p5-Sentinel/Sentinel-0.06/lib/ |
H A D | Sentinel.xs | 48 count = call_sv(ctx[CTX_GET_CB], G_SCALAR | G_METHOD_NAMED); in magic_get() 50 count = call_sv(ctx[CTX_GET_CB], G_SCALAR); in magic_get() 86 call_sv(ctx[CTX_SET_CB], G_VOID | G_METHOD_NAMED); in magic_set() 88 call_sv(ctx[CTX_SET_CB], G_VOID); in magic_set()
|
/dports/lang/perl5.32/perl-5.32.1/dist/Devel-PPPort/parts/inc/ |
H A D | call | 16 call_sv 28 __UNDEFINED__ call_sv perl_call_sv 57 # ifdef call_sv 58 # undef call_sv 61 # define call_sv(sv, flags) ((flags) & G_METHOD ? perl_call_method((char *) SvPV_nolen_const(sv),… 250 call_sv(sv, flags, ...) 261 i = call_sv(sv, flags); 331 i = call_sv(sv, flags | G_METHOD); 383 ok(eq_array( [ &Devel::PPPort::call_sv(\&f, $flags, @$args) ], $expected)); 384 ok(eq_array( [ &Devel::PPPort::call_sv(*f, $flags, @$args) ], $expected)); [all …]
|
/dports/lang/perl5.34/perl-5.34.0/dist/Devel-PPPort/parts/inc/ |
H A D | call | 16 call_sv 28 __UNDEFINED__ call_sv perl_call_sv 57 # ifdef call_sv 58 # undef call_sv 61 # define call_sv(sv, flags) ((flags) & G_METHOD ? perl_call_method((char *) SvPV_nolen_const(sv),… 250 call_sv(sv, flags, ...) 261 i = call_sv(sv, flags); 331 i = call_sv(sv, flags | G_METHOD); 383 ok(eq_array( [ &Devel::PPPort::call_sv(\&f, $flags, @$args) ], $expected)); 384 ok(eq_array( [ &Devel::PPPort::call_sv(*f, $flags, @$args) ], $expected)); [all …]
|
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/dist/Devel-PPPort/parts/inc/ |
H A D | call | 16 call_sv 28 __UNDEFINED__ call_sv perl_call_sv 59 # ifdef call_sv 60 # undef call_sv 63 # define call_sv(sv, flags) ((flags) & G_METHOD ? perl_call_method((char *) SvPV_nolen_const(sv),… 252 call_sv(sv, flags, ...) 263 i = call_sv(sv, flags); 333 i = call_sv(sv, flags | G_METHOD); 385 ok(eq_array( [ &Devel::PPPort::call_sv(\&f, $flags, @$args) ], $expected)); 386 ok(eq_array( [ &Devel::PPPort::call_sv(*f, $flags, @$args) ], $expected)); [all …]
|
/dports/devel/p5-Devel-PPPort/Devel-PPPort-3.63/parts/inc/ |
H A D | call | 16 call_sv 28 __UNDEFINED__ call_sv perl_call_sv 59 # ifdef call_sv 60 # undef call_sv 63 # define call_sv(sv, flags) ((flags) & G_METHOD ? perl_call_method((char *) SvPV_nolen_const(sv),… 252 call_sv(sv, flags, ...) 263 i = call_sv(sv, flags); 333 i = call_sv(sv, flags | G_METHOD); 385 ok(eq_array( [ &Devel::PPPort::call_sv(\&f, $flags, @$args) ], $expected)); 386 ok(eq_array( [ &Devel::PPPort::call_sv(*f, $flags, @$args) ], $expected)); [all …]
|
/dports/devel/p5-FFI-Platypus/FFI-Platypus-1.56/xs/ |
H A D | custom.c | 29 count = call_sv(subref, G_ARRAY); in ffi_pl_custom_perl() 56 call_sv(subref, G_VOID|G_DISCARD); in ffi_pl_custom_perl_cb()
|
/dports/graphics/p5-Geo-GDAL/gdal-3.3.3/swig/include/perl/ |
H A D | callback.i | 22 count = call_sv(env_ptr->fct, G_SCALAR); in callback_d_cp_vp() 46 call_sv(VSIStdoutSetRedirectionFct, G_DISCARD); in callback_fwrite()
|
/dports/graphics/gdal/gdal-3.3.3/swig/include/perl/ |
H A D | callback.i | 22 count = call_sv(env_ptr->fct, G_SCALAR); in callback_d_cp_vp() 46 call_sv(VSIStdoutSetRedirectionFct, G_DISCARD); in callback_fwrite()
|
/dports/graphics/py-gdal/gdal-3.3.3/swig/include/perl/ |
H A D | callback.i | 22 count = call_sv(env_ptr->fct, G_SCALAR); in callback_d_cp_vp() 46 call_sv(VSIStdoutSetRedirectionFct, G_DISCARD); in callback_fwrite()
|
/dports/math/polymake/polymake-4.5/lib/core/src/perl/ |
H A D | calls.cc | 280 call_sv(cv, G_SCALAR | G_EVAL); in ~FunCall() 297 call_sv(cv, protect_with_eval ? G_SCALAR | G_EVAL : G_SCALAR); in ~FunCall() 312 call_sv(cv, G_SCALAR | G_EVAL); in ~FunCall() 325 const int ret = call_sv(cv, G_ARRAY | G_EVAL); in ~FunCall() 338 const int ret = call_sv(cv, G_VOID | G_EVAL); in ~FunCall()
|
/dports/devel/p5-Data-Util/Data-Util-0.63/ |
H A D | subs.c | 153 call_sv(proc, GIMME_V | is_method | G_EVAL); in XS() 174 call_sv(AvARRAY(subs)[i], G_VOID | G_DISCARD | G_EVAL); in my_call_av() 214 call_sv(current, GIMME_V); in XS()
|
/dports/mail/p5-Mail-OpenDKIM/Mail-OpenDKIM-4204/ |
H A D | OpenDKIM.xs | 72 call_sv(sv, G_DISCARD); in call_dns_callback() 97 count = call_sv(sv, G_SCALAR); in call_final_callback() 139 count = call_sv(sv, G_SCALAR); in call_key_lookup_callback() 180 count = call_sv(sv, G_SCALAR); in call_prescreen_callback() 221 count = call_sv(sv, G_SCALAR); in call_signature_handle_callback() 261 call_sv(sv, G_DISCARD); in call_signature_handle_free_callback() 287 call_sv(sv, G_DISCARD); in call_signature_tagvalues_callback() 311 count = call_sv(sv, G_SCALAR); in call_dns_query_cancel_callback() 349 call_sv(sv, G_DISCARD); in call_dns_query_service_callback() 377 count = call_sv(sv, G_SCALAR); in call_dns_query_start_callback() [all …]
|
/dports/lang/perl5.30/perl-5.30.3/dist/Devel-PPPort/t/ |
H A D | call.t | 91 ok(eq_array( [ &Devel::PPPort::call_sv(\&f, $flags, @$args) ], $expected)); 92 ok(eq_array( [ &Devel::PPPort::call_sv(*f, $flags, @$args) ], $expected)); 93 ok(eq_array( [ &Devel::PPPort::call_sv('f', $flags, @$args) ], $expected));
|
/dports/mail/p5-Sendmail-Milter/Sendmail-Milter-0.18/ |
H A D | callbacks.c | 266 n = call_sv(callback, G_EVAL | G_SCALAR); in callback_noargs() 307 n = call_sv(callback, G_EVAL | G_SCALAR); in callback_s() 350 n = call_sv(callback, G_EVAL | G_SCALAR); in callback_body() 400 n = call_sv(callback, G_EVAL | G_SCALAR); in callback_argv() 442 n = call_sv(callback, G_EVAL | G_SCALAR); in callback_ss() 505 n = call_sv(callback, G_EVAL | G_SCALAR); in callback_ssockaddr()
|
/dports/devel/p5-Term-ReadLine-Gnu/Term-ReadLine-Gnu-1.42/ |
H A D | Gnu.xs | 772 count = call_sv(fn_tbl[type].callback, G_SCALAR); 803 count = call_sv(fn_tbl[type].callback, G_SCALAR); 840 count = call_sv(fn_tbl[type].callback, G_SCALAR); 882 count = call_sv(fn_tbl[type].callback, G_SCALAR); 918 count = call_sv(fn_tbl[type].callback, G_SCALAR); 948 count = call_sv(fn_tbl[type].callback, G_SCALAR); 984 count = call_sv(fn_tbl[type].callback, G_SCALAR); 1024 count = call_sv(fn_tbl[type].callback, G_SCALAR); 1059 count = call_sv(fn_tbl[type].callback, G_SCALAR); 1756 call_sv(fntbl[id].pfn, G_DISCARD); [all …]
|
/dports/databases/py-xapian/xapian-bindings-1.4.18/perl/ |
H A D | perl.i | 454 int count = call_sv(callback, G_SCALAR); in operator() 502 int count = call_sv(callback, G_SCALAR); in operator() 546 int count = call_sv(callback, G_SCALAR); in operator() 596 int count = call_sv(callback, G_SCALAR); in operator() 646 int count = call_sv(callback, G_SCALAR); in operator() 704 int count = call_sv(callback, G_SCALAR); in operator() 762 (void)call_sv(callback, G_VOID); in operator()
|
/dports/databases/php-xapian/xapian-bindings-1.4.18/perl/ |
H A D | perl.i | 454 int count = call_sv(callback, G_SCALAR); in operator() 502 int count = call_sv(callback, G_SCALAR); in operator() 546 int count = call_sv(callback, G_SCALAR); in operator() 596 int count = call_sv(callback, G_SCALAR); in operator() 646 int count = call_sv(callback, G_SCALAR); in operator() 704 int count = call_sv(callback, G_SCALAR); in operator() 762 (void)call_sv(callback, G_VOID); in operator()
|
/dports/databases/p5-Xapian/xapian-bindings-1.4.18/perl/ |
H A D | perl.i | 454 int count = call_sv(callback, G_SCALAR); in operator() 502 int count = call_sv(callback, G_SCALAR); in operator() 546 int count = call_sv(callback, G_SCALAR); in operator() 596 int count = call_sv(callback, G_SCALAR); in operator() 646 int count = call_sv(callback, G_SCALAR); in operator() 704 int count = call_sv(callback, G_SCALAR); in operator() 762 (void)call_sv(callback, G_VOID); in operator()
|