RPM Package Manager, CVS Repository
http://rpm5.org/cvs/
____________________________________________________________________________
Server: rpm5.org Name: Anders F. Björklund
Root: /v/rpm/cvs Email: afb@rpm5.org
Module: rpm Date: 09-Nov-2007 02:25:34
Branch: HEAD Handle: 2007110901253400
Modified files:
rpm/perl RPM_Header.xs
Log:
RPM_INT#_TYPE -> RPM_UINT#_TYPE, to make perl compile
Summary:
Revision Changes Path
1.9 +6 -6 rpm/perl/RPM_Header.xs
____________________________________________________________________________
patch -p0 <<'@@ .'
Index: rpm/perl/RPM_Header.xs
============================================================================
$ cvs diff -u -r1.8 -r1.9 RPM_Header.xs
--- rpm/perl/RPM_Header.xs 1 Nov 2007 17:12:33 -0000 1.8
+++ rpm/perl/RPM_Header.xs 9 Nov 2007 01:25:34 -0000 1.9
@@ -237,9 +237,9 @@
for (i = 3; (i < items) && RETVAL; i++) {
switch (tagtype) {
case RPM_CHAR_TYPE:
- case RPM_INT8_TYPE:
- case RPM_INT16_TYPE:
- case RPM_INT32_TYPE:
+ case RPM_UINT8_TYPE:
+ case RPM_UINT16_TYPE:
+ case RPM_UINT32_TYPE:
ivalue = SvUV(ST(i));
RETVAL = headerAddOrAppendEntry(h, tag, tagtype, &ivalue, 1);
break;
@@ -331,9 +331,9 @@
PUSHs(sv_2mortal(newSVpv((char *)ret, 0)));
break;
case RPM_CHAR_TYPE:
- case RPM_INT8_TYPE:
- case RPM_INT16_TYPE:
- case RPM_INT32_TYPE:
+ case RPM_UINT8_TYPE:
+ case RPM_UINT16_TYPE:
+ case RPM_UINT32_TYPE:
{
int i;
int *r;
@@ .
Received on Fri Nov 9 02:25:34 2007