sig
  val create :
    ?name:string ->
    ?anchor:Tk.anchor ->
    ?aspect:int ->
    ?background:Tk.color ->
    ?borderwidth:int ->
    ?cursor:Tk.cursor ->
    ?font:string ->
    ?foreground:Tk.color ->
    ?highlightbackground:Tk.color ->
    ?highlightcolor:Tk.color ->
    ?highlightthickness:int ->
    ?justify:Tk.justification ->
    ?padx:int ->
    ?pady:int ->
    ?relief:Tk.relief ->
    ?takefocus:bool ->
    ?text:string ->
    ?textvariable:Textvariable.textVariable ->
    ?width:int -> 'a Widget.widget -> Widget.message Widget.widget
  val configure :
    ?anchor:Tk.anchor ->
    ?aspect:int ->
    ?background:Tk.color ->
    ?borderwidth:int ->
    ?cursor:Tk.cursor ->
    ?font:string ->
    ?foreground:Tk.color ->
    ?highlightbackground:Tk.color ->
    ?highlightcolor:Tk.color ->
    ?highlightthickness:int ->
    ?justify:Tk.justification ->
    ?padx:int ->
    ?pady:int ->
    ?relief:Tk.relief ->
    ?takefocus:bool ->
    ?text:string ->
    ?textvariable:Textvariable.textVariable ->
    ?width:int -> Widget.message Widget.widget -> unit
  val configure_get : Widget.message Widget.widget -> string
end