type t = unit
type re = unit
let compile () = ()
let execp _ _ = false
let str _ = ()