mirror/perl
1
0
Fork 0
mirror of https://github.com/Perl/perl5.git synced 2026-01-26 16:39:36 +00:00
Code Issues Packages Projects Releases Wiki Activity

nocontext

Browse Source
This commit is contained in:
Karl Williamson 2025-11-02 10:56:01 -07:00
parent 4092daf53e
commit fa51cfc550
3 changed files with 18 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
embed.fnc
View File

@ -1009,6 +1009,8 @@ AMdfpr |void |croak |NULLOK const char *pat \
Tfpr |void |croak_caller |NULLOK const char *pat \
|...
CTrs |void |croak_memory_wrap
ATdfpr |void |croak_nocontext|NULLOK const char *pat \
|...
Tpr |void |croak_no_mem
Tpr |void |croak_no_mem_ext \
|NN const char *context \
@ -1113,6 +1115,8 @@ ETXdp |char * |delimcpy_no_escape \
Cp |void |despatch_signals
AMdfpr |OP * |die |NULLOK const char *pat \
|...
ATdfpr |OP * |die_nocontext |NULLOK const char *pat \
|...
Adpr |OP * |die_sv |NN SV *baseex
: Used in util.c
pr |void |die_unwind |NN SV *msv
@ -4212,12 +4216,8 @@ pr |int |magic_regdatum_set \
|NN MAGIC *mg
#endif
#if defined(MULTIPLICITY)
ATdfpr |void |croak_nocontext|NULLOK const char *pat \
|...
ATdfp |void |deb_nocontext |NN const char *pat \
|...
ATdfpr |OP * |die_nocontext |NULLOK const char *pat \
|...
ATdfp |char * |form_nocontext |NN const char *pat \
|...
AFTdp |void |load_module_nocontext \

4
embed.h
View File

@ -172,6 +172,7 @@
# define cop_store_label(a,b,c,d) Perl_cop_store_label(aTHX_ a,b,c,d)
# define croak_memory_wrap Perl_croak_memory_wrap
# define croak_no_modify Perl_croak_no_modify
# define croak_nocontext Perl_croak_nocontext
# define croak_sv(a) Perl_croak_sv(aTHX_ a)
# define croak_xs_usage Perl_croak_xs_usage
# define csighandler1 Perl_csighandler1
@ -192,6 +193,7 @@
# define debstackptrs() Perl_debstackptrs(aTHX)
# define delimcpy Perl_delimcpy
# define despatch_signals() Perl_despatch_signals(aTHX)
# define die_nocontext Perl_die_nocontext
# define die_sv(a) Perl_die_sv(aTHX_ a)
# define do_close(a,b) Perl_do_close(aTHX_ a,b)
# define do_gv_dump(a,b,c,d) Perl_do_gv_dump(aTHX_ a,b,c,d)
@ -895,9 +897,7 @@
# endif
# endif
# if defined(MULTIPLICITY)
# define croak_nocontext Perl_croak_nocontext
# define deb_nocontext Perl_deb_nocontext
# define die_nocontext Perl_die_nocontext
# define form_nocontext Perl_form_nocontext
# define load_module_nocontext Perl_load_module_nocontext
# define mess_nocontext Perl_mess_nocontext

24
proto.h generated
View File

@ -574,6 +574,12 @@ Perl_croak_no_modify(void)
__attribute__noreturn__;
#define PERL_ARGS_ASSERT_CROAK_NO_MODIFY
PERL_CALLCONV_NO_RET void
Perl_croak_nocontext(const char *pat, ...)
__attribute__noreturn__
__attribute__format__null_ok__(__printf__,1,2);
#define PERL_ARGS_ASSERT_CROAK_NOCONTEXT
PERL_CALLCONV_NO_RET void
Perl_croak_popstack(void)
__attribute__noreturn__;
@ -778,6 +784,12 @@ Perl_die(pTHX_ const char *pat, ...)
__attribute__format__null_ok__(__printf__,pTHX_1,pTHX_2);
#define PERL_ARGS_ASSERT_DIE
PERL_CALLCONV_NO_RET OP *
Perl_die_nocontext(const char *pat, ...)
__attribute__noreturn__
__attribute__format__null_ok__(__printf__,1,2);
#define PERL_ARGS_ASSERT_DIE_NOCONTEXT
PERL_CALLCONV_NO_RET OP *
Perl_die_sv(pTHX_ SV *baseex)
__attribute__noreturn__;
@ -5858,24 +5870,12 @@ Perl_magic_regdatum_set(pTHX_ SV *sv, MAGIC *mg)
#endif
#if defined(MULTIPLICITY)
PERL_CALLCONV_NO_RET void
Perl_croak_nocontext(const char *pat, ...)
__attribute__noreturn__
__attribute__format__null_ok__(__printf__,1,2);
# define PERL_ARGS_ASSERT_CROAK_NOCONTEXT
PERL_CALLCONV void
Perl_deb_nocontext(const char *pat, ...)
__attribute__format__(__printf__,1,2);
# define PERL_ARGS_ASSERT_DEB_NOCONTEXT \
assert(pat)
PERL_CALLCONV_NO_RET OP *
Perl_die_nocontext(const char *pat, ...)
__attribute__noreturn__
__attribute__format__null_ok__(__printf__,1,2);
# define PERL_ARGS_ASSERT_DIE_NOCONTEXT
PERL_CALLCONV char *
Perl_form_nocontext(const char *pat, ...)
__attribute__format__(__printf__,1,2);