# Module OUnitCache

    module OUnitCache: sig .. end

    type cache = OUnitTest.result OUnitTest.MapPath.t

    val cache_filename : ?extra_subst:(string * string) list -> OUnitConf.conf -> string option

    val default : 'a OUnitTest.MapPath.t

    val load : OUnitConf.conf -> cache

    val dump : OUnitConf.conf -> 'a -> unit

    val get_result : OUnitTest.MapPath.key -> 'a OUnitTest.MapPath.t -> 'a option

    val add_result : OUnitTest.MapPath.key ->
           'a -> 'a OUnitTest.MapPath.t -> 'a OUnitTest.MapPath.t