From 6aaf4108701d03e3663ab149b084be98635a4897 Mon Sep 17 00:00:00 2001
From: Simon Cozens <simon@netthink.co.uk>
Date: Wed, 9 Aug 2000 04:49:20 +0000
Subject: B::Deparse didn't do sub attributes.

Subject: B::Deparse was Re: [ID 20000808.005] refs to returned lvalues are lvalues??
Message-ID: <slrn8p1omg.beq.simon@justanother.perlhacker.org>

p4raw-id: //depot/perl@6589
---
 ext/B/defsubs_h.PL | 1 +
 1 file changed, 1 insertion(+)

(limited to 'ext/B/defsubs_h.PL')

diff --git a/ext/B/defsubs_h.PL b/ext/B/defsubs_h.PL
index 80ef936fce..759013bbcc 100644
--- a/ext/B/defsubs_h.PL
+++ b/ext/B/defsubs_h.PL
@@ -8,6 +8,7 @@ open(OUT,">$out") || die "Cannot open $file:$!";
 print "Extracting $out...\n";
 foreach my $const (qw(AVf_REAL 
 		      HEf_SVKEY
+              CVf_METHOD CVf_LOCKED CVf_LVALUE
                       SVf_IOK SVf_IVisUV SVf_NOK SVf_POK 
 		      SVf_ROK SVp_IOK SVp_POK ))
  {
-- 
cgit v1.2.1