val find: ?test:(string -> bool) -> string -> string list
(** find_in paths name returns the first path^"/"^name such that
- * is a regular file and the current user can 'stat' it. May raise Failure. *)
+ * is a regular file and the current user can 'stat' it.
+ * May raise (Failure "find_in") *)
val find_in: string list -> string -> string
(** {2 File I/O} *)
(* size in KB (SLOW) *)
val estimate_size: 'a -> int
+(* is_prefix_of [prefix] [string] *)
+val is_prefix_of: string -> string -> bool
+val touch: string -> unit