summaryrefslogtreecommitdiff
path: root/Perl-RPM
diff options
context:
space:
mode:
authorrjray <devnull@localhost>2002-04-11 23:06:01 +0000
committerrjray <devnull@localhost>2002-04-11 23:06:01 +0000
commit18f406d5e418289151e5c45419b157166a402f5a (patch)
treeb2b224c8bc63ecd9508d189538a3e6b641af28aa /Perl-RPM
parenta1062052bce4c47b67a158690665263c086f5384 (diff)
downloadrpm-18f406d5e418289151e5c45419b157166a402f5a.tar.gz
rpm-18f406d5e418289151e5c45419b157166a402f5a.tar.bz2
rpm-18f406d5e418289151e5c45419b157166a402f5a.zip
Now that rpm 3.0 is no longer supported, the HDR_ITER_CONST macro is no longer
needed. CVS patchset: 5396 CVS date: 2002/04/11 23:06:01
Diffstat (limited to 'Perl-RPM')
-rw-r--r--Perl-RPM/RPM/Header.xs19
1 files changed, 5 insertions, 14 deletions
diff --git a/Perl-RPM/RPM/Header.xs b/Perl-RPM/RPM/Header.xs
index 751fbcf4c..db754a90e 100644
--- a/Perl-RPM/RPM/Header.xs
+++ b/Perl-RPM/RPM/Header.xs
@@ -8,13 +8,7 @@
# define RPMERR_READERROR RPMERR_READ
#endif
-#if (RPM_VERSION >= 0x040002)
-# define HDR_ITER_CONST const
-#else
-# define HDR_ITER_CONST
-#endif
-
-static char * const rcsid = "$Id: Header.xs,v 1.24 2001/05/15 06:22:36 rjray Exp $";
+static char * const rcsid = "$Id: Header.xs,v 1.25 2002/04/11 23:06:01 rjray Exp $";
static int scalar_tag(pTHX_ SV *, int);
/*
@@ -892,13 +886,10 @@ int rpmhdr_FIRSTKEY(pTHX_ RPM__Header self, SV** key, SV** value)
return 0;
/* Run once to get started */
- headerNextIterator(hdr->iterator,
- Null(int *), Null(int *),
- Null(HDR_ITER_CONST void **),
- Null(int *));
+ headerNextIterator(hdr->iterator, Null(int *), Null(int *),
+ Null(const void **), Null(int *));
/* Now run it once, to get the first header entry */
- if (! headerNextIterator(hdr->iterator, &tag, &type,
- (HDR_ITER_CONST void **)&ptr,
+ if (! headerNextIterator(hdr->iterator, &tag, &type, (const void **)&ptr,
&size))
return 0;
@@ -928,7 +919,7 @@ int rpmhdr_NEXTKEY(pTHX_ RPM__Header self, SV* key,
{
/* Run it once, to get the next header entry */
if (! headerNextIterator(hdr->iterator, &tag, &type,
- (HDR_ITER_CONST void **)&ptr, &size))
+ (const void **)&ptr, &size))
/* Last tag. Inform perl that iteration is over. */
return 0;