diff options
author | Paul "LeoNerd" Evans <leonerd@leonerd.org.uk> | 2021-02-09 00:52:18 +0000 |
---|---|---|
committer | Paul "LeoNerd" Evans <leonerd@leonerd.org.uk> | 2021-02-14 13:40:50 +0000 |
commit | 383bf72f374cd3608e3ae2a186dd0c3a8d2fbf53 (patch) | |
tree | 6ce924a3e6c0059d1c46fd9926bce2828bc12967 /proto.h | |
parent | 656489102eb44a763e82ae9961a7097021182677 (diff) | |
download | perl-383bf72f374cd3608e3ae2a186dd0c3a8d2fbf53.tar.gz |
A totally new optree structure for try/catch involving three new optypes
Diffstat (limited to 'proto.h')
-rw-r--r-- | proto.h | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -652,6 +652,11 @@ PERL_CALLCONV OP * Perl_ck_trunc(pTHX_ OP *o) #define PERL_ARGS_ASSERT_CK_TRUNC \ assert(o) +PERL_CALLCONV OP * Perl_ck_trycatch(pTHX_ OP *o) + __attribute__warn_unused_result__; +#define PERL_ARGS_ASSERT_CK_TRYCATCH \ + assert(o) + PERL_CALLCONV void Perl_ck_warner(pTHX_ U32 err, const char* pat, ...) __attribute__format__(__printf__,pTHX_2,pTHX_3); #define PERL_ARGS_ASSERT_CK_WARNER \ |