From a1325b902d57aa7a99bed3d2ec0fa5ce42836207 Mon Sep 17 00:00:00 2001 From: "Paul \"LeoNerd\" Evans" Date: Fri, 22 Jan 2021 17:57:08 +0000 Subject: Initial attempt at feature 'try' * Add feature, experimental warning, keyword * Basic parsing * Basic implementation as optree fragment See also https://github.com/Perl/perl5/issues/18504 --- opnames.h | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'opnames.h') diff --git a/opnames.h b/opnames.h index 0e325466d1..57d29583af 100644 --- a/opnames.h +++ b/opnames.h @@ -414,10 +414,11 @@ typedef enum opcode { OP_ISA = 397, OP_CMPCHAIN_AND = 398, OP_CMPCHAIN_DUP = 399, + OP_CATCH = 400, OP_max } opcode; -#define MAXO 400 +#define MAXO 401 #define OP_FREED MAXO /* the OP_IS_* macros are optimized to a simple range check because -- cgit v1.2.1