Module Tdl_types (.ml)


module Tdl_types: sig .. end
milestone date of date when the item state changed to Done.


type state =
| Done
| Suspended
| Priority_low
| Priority_normal
| Priority_high

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