Nits in the pp_defined code spotted by Jarkko.
Steve Peters [Sun, 6 Nov 2005 19:16:54 +0000 (19:16 +0000)]
p4raw-id: //depot/perl@26022

pp_hot.c

index f56b7de..0f13d5a 100644 (file)
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -345,7 +345,7 @@ PP(pp_defined)
         if (!sv || !SvANY(sv))
             RETPUSHNO;
     } else
-        DIE(aTHX_ "panic:  Invalid op passed to dd_defined()");
+        DIE(aTHX_ "panic:  Invalid op (%s) in pp_defined()", OP_NAME(PL_op));
 
     switch (SvTYPE(sv)) {
     case SVt_PVAV: