Displaying 1 result from an estimated 1 matches for "b72161a82".
2017 Apr 12
1
[PATCH] mllib: Bind %identity C primitive to Common_utils.identity.
...sefn xpathctx expr =
expr str
)
-external identity : 'a -> 'a = "%identity"
-
let xpath_string = xpath_eval identity
let xpath_int = xpath_eval int_of_string
let xpath_int64 = xpath_eval Int64.of_string
diff --git a/v2v/input_vmx.ml b/v2v/input_vmx.ml
index b72161a82..c48a0155a 100644
--- a/v2v/input_vmx.ml
+++ b/v2v/input_vmx.ml
@@ -26,8 +26,6 @@ open Types
open Utils
open Name_from_disk
-external identity : 'a -> 'a = "%identity"
-
let rec find_disks vmx vmx_filename =
find_scsi_disks vmx vmx_filename @ find_ide_disks vmx vmx_file...