39  *			which may or may not check number of children).
95 A backward-compatible version of C<GIMME_V> which can only return
119                                  *     ops which support them, e.g. $x += 1
195 /* Mask for OP_ENTERSUB flags, the absence of which must be propagated
307    more complex, and we'd have an AV with (SV*)NULL in it, which feels bad */
308 /* BEWARE - something that calls this macro passes (r) which has a side
622  * and reg_ac_data structures, which are shared between duplicated
711  * of space for allocating op slots, each of which consists of two pointers
718  * form a chain.  All bookkeeping is done on the first slab, which is where
760 /* the first (head) opslab of the chain in which this op is allocated */
792 =for apidoc mxu|void *|BhkENTRY|BHK *hk|token which
793 Return an entry from the BHK structure.  C<which> is a preprocessor token
794 indicating which entry to return.  If the appropriate flag is not set
795 this will return C<NULL>.  The type of the return value depends on which
798 =for apidoc Amxu|void|BhkENTRY_set|BHK *hk|token which|void *ptr
800 valid.  C<which> is a preprocessing token indicating which entry to set.
803 =for apidoc Amxu|void|BhkDISABLE|BHK *hk|token which
805 appropriate flag.  C<which> is a preprocessor token indicating which
808 =for apidoc Amxu|void|BhkENABLE|BHK *hk|token which
810 flag.  C<which> is a preprocessor token indicating which entry to enable.
814 =for apidoc mxu|void|CALL_BLOCK_HOOKS|token which|arg
815 Call all the registered block hooks for type C<which>.  C<which> is a
816 preprocessing token; the type of C<arg> depends on C<which>.
828 #define BhkENTRY(hk, which) \  argument
829     ((BhkFLAGS(hk) & BHKf_ ## which) ? ((hk)->which) : NULL)
831 #define BhkENABLE(hk, which) \  argument
833         BhkFLAGS(hk) |= BHKf_ ## which; \
834         assert(BhkENTRY(hk, which)); \
837 #define BhkDISABLE(hk, which) \  argument
839         BhkFLAGS(hk) &= ~(BHKf_ ## which); \
842 #define BhkENTRY_set(hk, which, ptr) \  argument
844         (hk)->which = ptr; \
845         BhkENABLE(hk, which); \
848 #define CALL_BLOCK_HOOKS(which, arg) \  argument
862                 if (BhkENTRY(hk, which)) \
863                     BhkENTRY(hk, which)(aTHX_ arg); \
890 =for apidoc Amu||XopENTRY|XOP *xop|token which
891 Return a member of the XOP structure.  C<which> is a cpp token
892 indicating which entry to return.  If the member is not set
894 on C<which>.  This macro evaluates its arguments more than
898 =for apidoc Amu||XopENTRYCUSTOM|const OP *o|token which
899 Exactly like C<XopENTRY(XopENTRY(Perl_custom_op_xop(aTHX_ o), which)> but more
900 efficient.  The C<which> parameter is identical to L</XopENTRY>.
902 =for apidoc Amu|void|XopENTRY_set|XOP *xop|token which|value
903 Set a member of the XOP structure.  C<which> is a cpp token
904 indicating which entry to set.  See L<perlguts/"Custom Operators">
909 =for apidoc Amu|void|XopDISABLE|XOP *xop|token which
912 =for apidoc Amu|void|XopENABLE|XOP *xop|token which
913 Reenable a member of the XOP which has been disabled.
958 #define XopENTRY_set(xop, which, to) \  argument
960         (xop)->which = (to); \
961         (xop)->xop_flags |= XOPf_ ## which; \
964 #define XopENTRY(xop, which) \  argument
965     ((XopFLAGS(xop) & XOPf_ ## which) ? (xop)->which : XOPd_ ## which)
967 #define XopENTRYCUSTOM(o, which) \  argument
968     (Perl_custom_op_get_field(aTHX_ o, XOPe_ ## which).which)
970 #define XopDISABLE(xop, which) ((xop)->xop_flags &= ~XOPf_ ## which)  argument
971 #define XopENABLE(xop, which) \  argument
973         (xop)->xop_flags |= XOPf_ ## which; \
974         assert(XopENTRY(xop, which)); \
991 Return the class of the provided OP: that is, which of the *OP
993 of C<PL_opargs>, which does not always accurately reflect the type used;
994 in v5.26 onwards, see also the function C<L</op_class>> which can do a better
1006 as well as C<OP_TYPE_IS_NN> and C<OP_TYPE_ISNT_NN> which elide
1016 and C<OP_TYPE_ISNT_AND_WASNT_NN> which elide