diff options
| author | Vincent Pit <perl@profvince.com> | 2009-08-13 13:34:48 +0200 |
|---|---|---|
| committer | Vincent Pit <perl@profvince.com> | 2009-08-13 13:34:48 +0200 |
| commit | cf284a245bd2c9f479068768a1e22147f7925e7d (patch) | |
| tree | 65f472451e8df6065096495c3ecf19a2f628645a /proto.h | |
| parent | e64d4d0a203b6a8764713bd33efa0a1c4a3d1b25 (diff) | |
| download | perl-cf284a245bd2c9f479068768a1e22147f7925e7d.tar.gz | |
Perl_die_nocontext() is also called with NULL from XS extensions that want to set $@ themselves.
This commit goes with 52a5bfab8876f302d269f1bfa46eae1998f0d3ca.
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 5 |
1 files changed, 1 insertions, 4 deletions
@@ -335,10 +335,7 @@ PERL_CALLCONV void Perl_croak_nocontext(const char* pat, ...) __attribute__format__null_ok__(__printf__,1,2); PERL_CALLCONV OP* Perl_die_nocontext(const char* pat, ...) - __attribute__format__(__printf__,1,2) - __attribute__nonnull__(1); -#define PERL_ARGS_ASSERT_DIE_NOCONTEXT \ - assert(pat) + __attribute__format__null_ok__(__printf__,1,2); PERL_CALLCONV void Perl_deb_nocontext(const char* pat, ...) __attribute__format__(__printf__,1,2) |