sig
  val bisque : unit -> unit
  val set :
    ?activebackground:Tk.color ->
    ?activeforeground:Tk.color ->
    ?background:Tk.color ->
    ?disabledforeground:Tk.color ->
    ?foreground:Tk.color ->
    ?highlightcolor:Tk.color ->
    ?hilightbackground:Tk.color ->
    ?insertbackground:Tk.color ->
    ?selectbackground:Tk.color ->
    ?selectcolor:Tk.color ->
    ?selectforeground:Tk.color -> ?troughcolor:Tk.color -> unit -> unit
  val set_background : Tk.color -> unit
end