[khatus.git] / x3 / src / lib / khatus_time.mli

module Span : sig
  type t

  val of_string : string -> t

  val is_gt_or_eq : t -> t -> bool
end

type t

val init : t

val diff : t -> t -> Span.t

val to_string : t -> string

val of_string : string -> t
(** Raises if string is not a number. *)
Commit	Line	Data
c6a7396e SK	1	module Span : sig
	2	type t
	3
	4	val of_string : string -> t
	5
	6	val is_gt_or_eq : t -> t -> bool
	7	end
	8
	9	type t
	10
	11	val init : t
	12
	13	val diff : t -> t -> Span.t
	14
	15	val to_string : t -> string
	16
	17	val of_string : string -> t
6f35286a	18	(** Raises if string is not a number. *)