diff options
author | nanardon <nanardon@971eb68f-4bfb-0310-8326-d2484c010a4c> | 2006-06-11 02:58:14 +0000 |
---|---|---|
committer | nanardon <nanardon@971eb68f-4bfb-0310-8326-d2484c010a4c> | 2006-06-11 02:58:14 +0000 |
commit | 03c5aa4ebd6dd7b8bceb4a2a92e131d8960542b4 (patch) | |
tree | 4b4b37306a5a6841da8131078d163f7abc0d3333 | |
parent | 88e3fad5e5e61f2faa6280136f2d4cacf3f68f93 (diff) | |
download | perl-RPM4-03c5aa4ebd6dd7b8bceb4a2a92e131d8960542b4.tar perl-RPM4-03c5aa4ebd6dd7b8bceb4a2a92e131d8960542b4.tar.gz perl-RPM4-03c5aa4ebd6dd7b8bceb4a2a92e131d8960542b4.tar.bz2 perl-RPM4-03c5aa4ebd6dd7b8bceb4a2a92e131d8960542b4.tar.xz perl-RPM4-03c5aa4ebd6dd7b8bceb4a2a92e131d8960542b4.zip |
- really fix segfault
git-svn-id: svn+ssh://haiku.zarb.org/home/projects/rpm4/svn/trunk@105 971eb68f-4bfb-0310-8326-d2484c010a4c
-rw-r--r-- | RPM4/src/RPM4.xs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/RPM4/src/RPM4.xs b/RPM4/src/RPM4.xs index f0bb272..8e76c66 100644 --- a/RPM4/src/RPM4.xs +++ b/RPM4/src/RPM4.xs @@ -1293,10 +1293,10 @@ Header_files(header, scaremem = O_SCAREMEM) PPCODE: #ifdef HDLISTDEBUG PRINTF_CALL; -#endif - SPAGAIN; +#endif Files = rpmfiNew(ts, header, RPMTAG_BASENAMES, scaremem); if (Files != NULL && (Files = rpmfiInit(Files, 0)) != NULL && rpmfiNext(Files) >= 0) { + SPAGAIN; XPUSHs(sv_setref_pv(sv_newmortal(), bless_rpmfi, (void *)Files)); #ifdef HDRPMMEM PRINTF_NEW(bless_rpmfi, Files, Files->nrefs); |