(* semi-colon separated list of input documents *)
-let documents = [ "../tests/tiny.srx" ]
+let documents = [ "../tests/tiny.xml" ]
(* semi-colon separated list of XPath queries *)
-let queries = [ "/*" ]
+let queries = [ "//*[ contains(.//para//self::text(),\"international\") ]//para//acronym" ]
(* I is the initial configuration
struct
let path = "."
let result_basename = "test"
- let num_runs = 1
+ let num_runs = 2
let run_with_output = true
let run_without_output = true
end
module I = INIT_TESTER (CONF)
-module TEST = MK (SXSI) (I)
+module TEST = MK (SXSI) (MK (SaxonBXQuery) (I))
let reference = false
let time_factor = 1.0
let mk_queryfile b doc q out = ()
- let mk_cmdline b qout qfile doc q = [ doc; q ]@ (if b then [qout] else [])
+ let mk_cmdline b qout qfile doc q =
+ let doc' = (Filename.chop_suffix doc ".xml")^".srx" in
+ [ doc'; q ]@ (if b then [qout] else [])
let parse_rules =
[ ( ".*Parsing document :[ \\t]*\\([0-9]+\\.[0-9]*\\)ms.*",
[ Input_parsing_time 1]);