diff options
| author | tv <tv@971eb68f-4bfb-0310-8326-d2484c010a4c> | 2012-06-13 18:43:02 +0000 |
|---|---|---|
| committer | tv <tv@971eb68f-4bfb-0310-8326-d2484c010a4c> | 2012-06-13 18:43:02 +0000 |
| commit | f35a729e6d21461cbcb6f5ddb45c38778e271348 (patch) | |
| tree | 99ec1a1975e69e720c8df3abd86d87da8238e2d1 /RPM4/src | |
| parent | 19974080aae72472f00db49d80d954350f1cc8f4 (diff) | |
| download | perl-RPM4-f35a729e6d21461cbcb6f5ddb45c38778e271348.tar perl-RPM4-f35a729e6d21461cbcb6f5ddb45c38778e271348.tar.gz perl-RPM4-f35a729e6d21461cbcb6f5ddb45c38778e271348.tar.bz2 perl-RPM4-f35a729e6d21461cbcb6f5ddb45c38778e271348.tar.xz perl-RPM4-f35a729e6d21461cbcb6f5ddb45c38778e271348.zip | |
simplify using mPUSHs()
git-svn-id: svn+ssh://haiku.zarb.org/home/projects/rpm4/svn/trunk@203 971eb68f-4bfb-0310-8326-d2484c010a4c
Diffstat (limited to 'RPM4/src')
| -rw-r--r-- | RPM4/src/RPM4.xs | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/RPM4/src/RPM4.xs b/RPM4/src/RPM4.xs index d3c0b96..3cb808c 100644 --- a/RPM4/src/RPM4.xs +++ b/RPM4/src/RPM4.xs @@ -1143,13 +1143,13 @@ Header_tag(h, sv_tag) rpmtdInit(&val); for (i = 0; i < n; i++) { - PUSHs(sv_2mortal(newSVpv(rpmtdNextString(&val), 0))); + mPUSHs(newSVpv(rpmtdNextString(&val), 0)); } } break; case RPM_STRING_TYPE: { char *name = (char *) rpmtdGetString(&val); - PUSHs(sv_2mortal(newSVpv(name, 0))); + mPUSHs(newSVpv(name, 0)); }; break; case RPM_CHAR_TYPE: @@ -1164,13 +1164,13 @@ Header_tag(h, sv_tag) for (i = 0; i < n; i++) { rpmtdNext(&val); - PUSHs(sv_2mortal(newSViv(rpmtdGetNumber(&val)))); + mPUSHs(newSViv(rpmtdGetNumber(&val))); } } break; case RPM_BIN_TYPE: /* XXX HACK ALERT: element field abused as no. bytes of binary data. */ - PUSHs(sv_2mortal(newSVpv((char *)val.data, val.count))); + mPUSHs(newSVpv((char *)val.data, val.count)); break; default: croak("unknown rpm tag type %d", type); @@ -1244,14 +1244,14 @@ Header_fullname(h) } } else if (gimme == G_ARRAY) { EXTEND(SP, 4); - PUSHs(sv_2mortal(newSVpv(name, 0))); - PUSHs(sv_2mortal(newSVpv(version, 0))); - PUSHs(sv_2mortal(newSVpv(release, 0))); + mPUSHs(newSVpv(name, 0)); + mPUSHs(newSVpv(version, 0)); + mPUSHs(newSVpv(release, 0)); if (ix != 1) { if (!headerIsEntry(h, RPMTAG_SOURCERPM)) { - PUSHs(sv_2mortal(newSVpv("src", 0))); + mPUSHs(newSVpv("src", 0)); } else { - PUSHs(sv_2mortal(newSVpv(arch, 0))); + mPUSHs(newSVpv(arch, 0)); } } } |