From: Steve Hay <SteveHay@planit.com>
Date: Fri, 25 Aug 2006 16:12:52 +0000 (+0000)
Subject: Silence a bunch of Borland compiler warnings in SDBM_File
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=be64226e5b5d608a2b57cf611954f2a7cec0b340;p=p5sagit%2Fp5-mst-13.2.git

Silence a bunch of Borland compiler warnings in SDBM_File
(See: http://www.nntp.perl.org/group/perl.daily-build.reports/40283)

p4raw-id: //depot/perl@28759
---

diff --git a/XSUB.h b/XSUB.h
index 51112a9..de5d33b 100644
--- a/XSUB.h
+++ b/XSUB.h
@@ -365,7 +365,6 @@ Rethrows a previously caught exception.  See L<perlguts/"Exception Handling">.
             if (name[7] == 's'){                                \
                 arg = sv_2mortal(arg);                          \
             }                                                   \
-            SvOKp(arg);                                         \
 	} } STMT_END                                                     
 
 #if 1		/* for compatibility */