Re: [PATCH] gcc-3.0 warnings on HP-UX

[p5sagit/p5-mst-13.2.git] / xsutils.c

diff --git a/xsutils.c b/xsutils.c
index 1a95191..fd43e23 100644 (file)
--- a/xsutils.c
+++ b/xsutils.c
@@ -85,7 +85,7 @@ modify_SV_attributes(pTHXo_ SV *sv, SV **retlist, SV **attrlist, int numattrs)
                    }
                    break;
                case 's':
-                   if (strEQ(name, "shared")) {
+      if (strEQ(name, "unique")) {
                        if (negated)
                            GvSHARED_off(CvGV((CV*)sv));
                        else
@@ -102,7 +102,7 @@ modify_SV_attributes(pTHXo_ SV *sv, SV **retlist, SV **attrlist, int numattrs)
               case 6:
                switch (*name) {
                   case 's':
-                   if (strEQ(name, "shared")) {
+      if (strEQ(name, "unique")) {
                         /* toke.c has already marked as GvSHARED */
                         continue;
                     }
@@ -190,7 +190,7 @@ usage:
        if (cvflags & CVf_METHOD)
            XPUSHs(sv_2mortal(newSVpvn("method", 6)));
         if (GvSHARED(CvGV((CV*)sv)))
-           XPUSHs(sv_2mortal(newSVpvn("shared", 6)));
+     XPUSHs(sv_2mortal(newSVpvn("unique", 6)));
        break;
     default:
        break;
@@ -231,10 +231,9 @@ usage:
        HV *stash = Nullhv;
        switch (SvTYPE(sv)) {
        case SVt_PVCV:
-           if (CvGV(sv) && isGV(CvGV(sv)) && GvSTASH(CvGV(sv)) &&
-                           HvNAME(GvSTASH(CvGV(sv))))
+           if (CvGV(sv) && isGV(CvGV(sv)) && GvSTASH(CvGV(sv)))
                stash = GvSTASH(CvGV(sv));
-           else if (/* !CvANON(sv) && */ CvSTASH(sv) && HvNAME(CvSTASH(sv)))
+           else if (/* !CvANON(sv) && */ CvSTASH(sv))
                stash = CvSTASH(sv);
            break;
        case SVt_PVMG:
@@ -242,7 +241,7 @@ usage:
                break;
            /*FALLTHROUGH*/
        case SVt_PVGV:
-           if (GvGP(sv) && GvESTASH((GV*)sv) && HvNAME(GvESTASH((GV*)sv)))
+           if (GvGP(sv) && GvESTASH((GV*)sv))
                stash = GvESTASH((GV*)sv);
            break;
        default: