diff options
| author | rjray <devnull@localhost> | 2002-05-10 05:53:48 +0000 |
|---|---|---|
| committer | rjray <devnull@localhost> | 2002-05-10 05:53:48 +0000 |
| commit | 97aaa7f141caf7f1a00808cac245ce93c7cbc365 (patch) | |
| tree | be94716242c9d22a55b3e0708abc97bdedda0476 /Perl-RPM | |
| parent | e17659692997068b4cd5ee4a91f2aa9ee093b89a (diff) | |
| download | rpm-97aaa7f141caf7f1a00808cac245ce93c7cbc365.tar.gz | |
Turned a macro call that was using safemalloc into a direct call to
Newz. Turned some calls to safefree into Safefree.
CVS patchset: 5427
CVS date: 2002/05/10 05:53:48
Diffstat (limited to 'Perl-RPM')
| -rw-r--r-- | Perl-RPM/RPM/Database.xs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Perl-RPM/RPM/Database.xs b/Perl-RPM/RPM/Database.xs index c768fb250..fb4f82c2b 100644 --- a/Perl-RPM/RPM/Database.xs +++ b/Perl-RPM/RPM/Database.xs @@ -5,7 +5,7 @@ #include <fcntl.h> #include "RPM.h" -static char * const rcsid = "$Id: Database.xs,v 1.17 2002/04/12 00:16:33 rjray Exp $"; +static char * const rcsid = "$Id: Database.xs,v 1.18 2002/05/10 05:53:48 rjray Exp $"; /* rpmdb_TIEHASH @@ -54,7 +54,7 @@ RPM__Database rpmdb_TIEHASH(pTHX_ char* class, SV* opts) /* With that all processed, attempt to open the actual RPM DB */ /* The retvalp is used for the C-level rpmlib information on databases */ - retvalp = new_RPM_storage(RPM_Database); + Newz(0, retvalp, 1, RPM_Database); if (rpmdbOpen(root, &retvalp->dbp, mode, perms) != 0) /* rpm lib will have set the error already */ return (Null(RPM__Database)); @@ -251,10 +251,10 @@ void rpmdb_DESTROY(pTHX_ RPM__Database self) rpmdbClose(dbstruct->dbp); if (dbstruct->offsets) - safefree(dbstruct->offsets); + Safefree(dbstruct->offsets); hv_undef(dbstruct->storage); - safefree(dbstruct); + Safefree(dbstruct); hv_undef(self); } |