Module Tdl_types (.ml)

module Tdl_types: sig .. end

milestone date of date when the item state changed to Done.

type state =

type item = {

`mutable item_title : string;`
`mutable item_date : Tdl_date.t;`
`mutable item_enddate : Tdl_date.t option;`	`(*`	milestone date of date when the item state changed to `Done`.	`*)`
`mutable item_desc : string option;`
`mutable item_state : state;`
`mutable item_id : int option;`

}

val item : unit -> item

type group = {

	`mutable group_title : string;`
	`mutable group_items : item list;`
	`mutable group_groups : group list;`
	`mutable group_id : int option;`

}

val group : unit -> group