
(* Waste time converting ToTree and then ToLinear. - Tom 7 *)
structure TestConvert :> sig end =
struct

  val _ = Driver.register_opt {optfun=Driver.Liltolil
                               (ToLinear.tolinear o ToTree.totree),
                               optname="TestConvert",
                               scorefn=(fn x=>x),
                               trusted=false,
                               initscore=NONE,
                               blowup=false,
                               disabled=true}
end
