Update of /cvsroot/perl-xml/XML-LibXML-XPathContext
In directory sc8-pr-cvs1:/tmp/cvs-serv29454
Modified Files:
XPathContext.xs
Log Message:
Fix compilation errors:
PPCODE must be last thing in XPathContext.xs, line 579
and
XPathContext.xs: In function `XS_XML__LibXML__XPathContext_lookupNs':
XPathContext.xs:578: too few arguments to function `xpc_C2Sv'
Index: XPathContext.xs
===================================================================
RCS file: /cvsroot/perl-xml/XML-LibXML-XPathContext/XPathContext.xs,v
retrieving revision 1.35
retrieving revision 1.36
diff -u -d -r1.35 -r1.36
--- XPathContext.xs 29 May 2003 14:28:29 -0000 1.35
+++ XPathContext.xs 21 Sep 2003 10:05:05 -0000 1.36
@@ -514,7 +514,7 @@
} else {
RETVAL = &PL_sv_undef;
}
-OUTPUT:
+ OUTPUT:
RETVAL
void
@@ -574,8 +574,8 @@
croak("XPathContext: missing xpath context");
}
xpc_LibXML_configure_xpathcontext(ctxt);
- PPCODE:
- RETVAL = xpc_C2Sv(xmlXPathNsLookup(ctxt, SvPV_nolen(prefix)));
+ CODE:
+ RETVAL = xpc_C2Sv(xmlXPathNsLookup(ctxt, SvPV_nolen(prefix)), NULL);
OUTPUT:
RETVAL
@@ -603,11 +603,8 @@
} else {
RETVAL = &PL_sv_undef;
}
-
OUTPUT:
RETVAL
-
-
void
registerVarLookupFunc( pxpath_context, lookup_func, lookup_data )
|
