module Option:sig
..end
val add : path:string -> ?priority:Tk.optionPriority -> string -> unit
val clear : unit -> unit
val get : 'a Widget.widget -> name:string -> clas:string -> string
val readfile : ?priority:Tk.optionPriority -> string -> unit