summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorChip Salzenberg <chip@atlantic.net>1996-12-26 13:07:14 +1200
committerChip Salzenberg <chip@atlantic.net>1996-12-28 06:22:00 +1200
commit07055b4c536e012d70aa7099a086192fbb14e918 (patch)
tree3e0a87f4a64a30f336a29f23aba7fd2aac1b1e58 /perl.c
parent39035d0c756b3e78a63763b830ba26854e6124f8 (diff)
downloadperl-07055b4c536e012d70aa7099a086192fbb14e918.tar.gz
Support named closures
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl.c b/perl.c
index d4c626c7f5..aa6a1a4d8b 100644
--- a/perl.c
+++ b/perl.c
@@ -562,6 +562,7 @@ setuid perl scripts securely.\n");
compcv = (CV*)NEWSV(1104,0);
sv_upgrade((SV *)compcv, SVt_PVCV);
+ CvUNIQUE_on(compcv);
comppad = newAV();
av_push(comppad, Nullsv);