mirrors/libguestfs
1
0
Fork 0
mirror of https://github.com/libguestfs/libguestfs.git synced 2026-03-22 07:03:38 +00:00
Code Issues Packages Projects Releases Wiki Activity

v2v: xml: Rename internal xpath_new_context function.

Browse Source 
This change is not necessary, but is consistent with the naming scheme
of the rest of the code in this file.
This commit is contained in:
Richard W.M. Jones
2016-07-31 17:20:08 +01:00
parent 9e0022cea8
commit 1d3f075502
1 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
v2v/xml.ml
View File

@@ -74,9 +74,10 @@ let copy_doc docptr ~recursive =
external to_string : docptr -> format:bool -> string = "v2v_xml_to_string"
external xpath_new_context : docptr -> xpathctxptr = "v2v_xml_xpath_new_context"
external _xpath_new_context : docptr -> xpathctxptr
= "v2v_xml_xpath_new_context"
let xpath_new_context docptr =
let xpathctxptr = xpath_new_context docptr in
let xpathctxptr = _xpath_new_context docptr in
Gc.finalise free_xpathctxptr xpathctxptr;
docptr, xpathctxptr