sig val new_day_entry : Ed_sourceview.sourceview -> string array -> unit val mode : Ed_sourceview.mode end