develooper Front page | perl.perl5.porters | Postings from January 2001

[PATCH] Add missing CV flags to dump.c

From:
Tim Jenness
Date:
January 29, 2001 23:48
Subject:
[PATCH] Add missing CV flags to dump.c
Message ID:
Pine.LNX.4.30.0101292144280.14179-100000@lapaki.jach.hawaii.edu

This patch adds LVALUE and METHOD to the list of flags that are dumped
when dumping PVCV's. I'm assuming they just fell through the cracks.


*** dump.c.orig	Mon Jan 29 20:51:40 2001
--- dump.c	Mon Jan 29 21:20:36 2001
***************
*** 823,828 ****
--- 823,830 ----
  	if (CvCONST(sv))	sv_catpv(d, "CONST,");
  	if (CvNODEBUG(sv))	sv_catpv(d, "NODEBUG,");
  	if (SvCOMPILED(sv))	sv_catpv(d, "COMPILED,");
+ 	if (CvLVALUE(sv))	sv_catpv(d, "LVALUE,");
+ 	if (CvMETHOD(sv))	sv_catpv(d, "METHOD,");
  	break;
      case SVt_PVHV:
  	if (HvSHAREKEYS(sv))	sv_catpv(d, "SHAREKEYS,");

-- 
Tim Jenness
JCMT software engineer/Support scientist
http://www.jach.hawaii.edu/~timj





nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About