summaryrefslogtreecommitdiff
path: root/mg_raw.h
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2014-09-24 01:42:30 -0700
committerFather Chrysostomos <sprout@cpan.org>2014-10-10 21:55:09 -0700
commit9cce4f9a8471c0b7a6994f36be8819352a4d9483 (patch)
tree99f2ab891ecd57f1f1d82e5ecfdd803b26b3aaef /mg_raw.h
parent4c5bab508cf172e32fdb9e8567ff635b6d783791 (diff)
downloadperl-9cce4f9a8471c0b7a6994f36be8819352a4d9483.tar.gz
Add lvref magic type
I just couldn’t resist using the backslash for the character, even though I had to tweak mg_vtable.pl to make it work.
Diffstat (limited to 'mg_raw.h')
-rw-r--r--mg_raw.h2
1 files changed, 2 insertions, 0 deletions
diff --git a/mg_raw.h b/mg_raw.h
index 984f1d7ce5..e6bda5d9a8 100644
--- a/mg_raw.h
+++ b/mg_raw.h
@@ -82,6 +82,8 @@
"/* substr 'x' substr() lvalue */" },
{ 'y', "want_vtbl_defelem | PERL_MAGIC_VALUE_MAGIC",
"/* defelem 'y' Shadow \"foreach\" iterator variable / smart parameter vivification */" },
+ { '\\', "want_vtbl_lvref",
+ "/* lvref '\\' Lvalue reference in list assignment */" },
{ ']', "want_vtbl_checkcall | PERL_MAGIC_VALUE_MAGIC",
"/* checkcall ']' inlining/mutation of call to this CV */" },
{ '~', "magic_vtable_max",