X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=gv.h;h=8d987edbc4799e2650f40751ad21dcef9110c707;hb=1a159553554948091ed2e3b1cf5953ca46e63bc5;hp=804007519e7bbd2bca7b3522ad641f5dbe929cf1;hpb=9607fc9c489d4095e3baa795d7ead7acba96137d;p=p5sagit%2Fp5-mst-13.2.git diff --git a/gv.h b/gv.h index 8040075..8d987ed 100644 --- a/gv.h +++ b/gv.h @@ -127,6 +127,11 @@ HV *GvHVn(); #define DM_EGID 0x020 #define DM_DELAY 0x100 -#define GV_ADD 0x01 -#define GV_ADDMULTI 0x02 -#define GV_ADDWARN 0x04 +/* + * symbol creation flags, for use in gv_fetchpv() and perl_get_*v() + */ +#define GV_ADD 0x01 /* add, if symbol not already there */ +#define GV_ADDMULTI 0x02 /* add, pretending it has been added already */ +#define GV_ADDWARN 0x04 /* add, but warn if symbol wasn't already there */ +#define GV_ADDINEVAL 0x08 /* add, as though we're doing so within an eval */ +#define GV_NOINIT 0x10 /* add, but don't init symbol, if type != PVGV */