From fdf1c2a96851c109301f03c196f94876286980ed Mon Sep 17 00:00:00 2001
From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Thu, 29 Nov 2001 23:46:12 +0100
Subject: [PATCH] Re: [ID 20011129.163] B::Xref- $top corrupt Message-ID:
 <20011129224612.A699@rafael>

p4raw-id: //depot/perl@13403
---
 ext/B/B/Xref.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/ext/B/B/Xref.pm b/ext/B/B/Xref.pm
index 1f3e247..1731b86 100644
--- a/ext/B/B/Xref.pm
+++ b/ext/B/B/Xref.pm
@@ -281,6 +281,7 @@ sub pp_const {
     }
     else {
 	$top = $pad[$op->targ];
+	$top = UNKNOWN unless $top;
     }
 }
 
-- 
2.7.4