fix non-ANSI C++-style comment

Subject: [ PATCH ]  Smoke 17780 /pro/3gl/CPAN/perl-current
From: "H.Merijn Brand" <h.m.brand@hccnet.nl>
Message-Id: <20020826090145.6975.H.M.BRAND@hccnet.nl>

p4raw-id: //depot/perl@17785

diff --git a/ext/Storable/Storable.xs b/ext/Storable/Storable.xs
index 48d05f9..b7ddc73 100644 (file)
--- a/ext/Storable/Storable.xs
+++ b/ext/Storable/Storable.xs
@@ -4962,7 +4962,7 @@ static SV *retrieve_code(stcxt_t *cxt, char *cname)
         */
 
        sub = newSVpvn("sub ", 4);
-       sv_catpv(sub, SvPV(text, PL_na)); //XXX no sv_catsv!
+       sv_catpv(sub, SvPV(text, PL_na)); /* XXX no sv_catsv! */
        SvREFCNT_dec(text);
 
        /*