(** Error types for Lithos database operations *)

type t =
  | IO_error of string
  | Invalid_database of string
  | Database_locked
  | Not_found

(** Convert error to human-readable string *)
val to_string : t -> string

(** Create an I/O error from a Unix error *)
val of_unix_error : Unix.error -> string -> t