File tree 1 file changed +5
-0
lines changed
1 file changed +5
-0
lines changed Original file line number Diff line number Diff line change @@ -130,6 +130,7 @@ See L<perlguts/Autoloading with XSUBs>.
130
130
#define CVf_NAMED 0x8000 /* Has a name HEK */
131
131
#define CVf_LEXICAL 0x10000 /* Omit package from name */
132
132
#define CVf_ANONCONST 0x20000 /* :const - create anonconst op */
133
+ #define CVf_SIGNATURE 0x40000 /* CV uses a signature */
133
134
134
135
/* This symbol for optimised communication between toke.c and op.c: */
135
136
#define CVf_BUILTIN_ATTRS (CVf_METHOD|CVf_LVALUE|CVf_ANONCONST)
@@ -219,6 +220,10 @@ See L<perlguts/Autoloading with XSUBs>.
219
220
#define CvANONCONST_on (cv ) (CvFLAGS(cv) |= CVf_ANONCONST)
220
221
#define CvANONCONST_off (cv ) (CvFLAGS(cv) &= ~CVf_ANONCONST)
221
222
223
+ #define CvSIGNATURE (cv ) (CvFLAGS(cv) & CVf_SIGNATURE)
224
+ #define CvSIGNATURE_on (cv ) (CvFLAGS(cv) |= CVf_SIGNATURE)
225
+ #define CvSIGNATURE_off (cv ) (CvFLAGS(cv) &= ~CVf_SIGNATURE)
226
+
222
227
/* Flags for newXS_flags */
223
228
#define XS_DYNAMIC_FILENAME 0x01 /* The filename isn't static */
224
229
You can’t perform that action at this time.
0 commit comments