aports/testing/perl-xml-bare/pointer_from_integer.patch
Celeste 737533635e testing/perl-xml-bare: apply debian patches
to include `stdlib.h` and fix
pointer from integer without cast
2024-06-10 02:47:59 +00:00

66 lines
2.7 KiB
Diff

Patch-Source: https://sources.debian.org/data/main/libx/libxml-bare-perl/0.53-4/debian/patches/pointer_from_integer.patch
--
Description: fix use of pointer as int
fixes "warning: comparison between pointer and integer" and
"warning: assignment makes pointer from integer without a cast"
compiler warnings
Author: Florian Schlichting <fsfs@debian.org>
--- a/Bare.xs
+++ b/Bare.xs
@@ -144,7 +144,7 @@
SV *atthref = newRV_noinc( (SV *) atth );
hv_store( output, curatt->name, curatt->namelen, atthref, 0 );
- if( curatt->value == -1 ) attval = newSVpvn( "1", 1 );
+ if( curatt->value == NULL ) attval = newSVpvn( "1", 1 );
else attval = newSVpvn( curatt->value, curatt->vallen );
SvUTF8_on(attval);
hv_store( atth, "value", 5, attval, vhash );
@@ -272,7 +272,7 @@
if( numatts ) {
curatt = curnode->firstatt;
for( i = 0; i < numatts; i++ ) {
- if( curatt->value == -1 ) attval = newSVpvn( "1", 1 );
+ if( curatt->value == NULL ) attval = newSVpvn( "1", 1 );
else attval = newSVpvn( curatt->value, curatt->vallen );
SvUTF8_on(attval);
hv_store( output, curatt->name, curatt->namelen, attval, 0 );
--- a/parser.c
+++ b/parser.c
@@ -417,7 +417,7 @@
case 0: last_state = ST_att_name; goto done;
case '/': // self closing !! /> is assumed !!
curatt = nodec_addattr( curnode, attname, attname_len );
- if( !att_has_val ) { curatt->value = -1; curatt->vallen = 0; }
+ if( !att_has_val ) { curatt->value = NULL; curatt->vallen = 0; }
attname_len = 0;
curnode->z = cpos+1-xmlin;
@@ -436,7 +436,7 @@
goto att_space;
case '>':
curatt = nodec_addattr( curnode, attname, attname_len );
- if( !att_has_val ) { curatt->value = -1; curatt->vallen = 0; }
+ if( !att_has_val ) { curatt->value = NULL; curatt->vallen = 0; }
attname_len = 0;
cpos++;
goto val_1;
@@ -832,7 +832,7 @@
switch( let ) {
case '/': // self closing !! /> is assumed !!
curatt = nodec_addattr( curnode, attname, attname_len );
- if( !att_has_val ) { curatt->value = -1; curatt->vallen = 0; }
+ if( !att_has_val ) { curatt->value = NULL; curatt->vallen = 0; }
attname_len = 0;
curnode = curnode->parent;
@@ -850,7 +850,7 @@
goto u_att_space;
case '>':
curatt = nodec_addattr( curnode, attname, attname_len );
- if( !att_has_val ) { curatt->value = -1; curatt->vallen = 0; }
+ if( !att_has_val ) { curatt->value = NULL; curatt->vallen = 0; }
attname_len = 0;
cpos++;
goto u_val_1;