From 121ec5ba7a19a219149ea3c8c8a845624b2bf8ea Mon Sep 17 00:00:00 2001
From: Jason Vas Dias <unknown>
Date: Thu, 11 May 2006 04:00:42 -0700
Subject: [PATCH] [perl #39130] h2ph generates incorrect code for '#if defined
 A || defined B' From: Jason Vas Dias (via RT) <perlbug-followup@perl.org>
 Message-ID: <rt-3.0.11-39130-133411.1.91055283125046@perl.org>

p4raw-id: //depot/perl@28225
---
 utils/h2ph.PL | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/utils/h2ph.PL b/utils/h2ph.PL
index 5fe2e9f..2ea0152 100644
--- a/utils/h2ph.PL
+++ b/utils/h2ph.PL
@@ -514,7 +514,7 @@ sub expr {
 		}
 	    } else {
 		if ($inif && $new !~ /defined\s*\($/) {
-		    $new .= '(defined(&' . $id . ') ? &' . $id . ' : 0)';
+		    $new .= '(defined(&' . $id . ') ? &' . $id . ' : undef)';
 		} elsif (/^\[/) {
 		    $new .= " \$$id";
 		} else {
-- 
2.7.4