val cast : 'a Gobject.obj -> Gtk.calendar Gtk.obj
val create : Gtk.calendar Gobject.param list -> Gtk.calendar Gtk.obj
val select_month : [> `calendar ] Gtk.obj -> month:int -> year:int -> unitval select_day : [> `calendar ] Gtk.obj -> int -> unitval mark_day : [> `calendar ] Gtk.obj -> int -> unitval unmark_day : [> `calendar ] Gtk.obj -> int -> unitval clear_marks : [> `calendar ] Gtk.obj -> unitval set_display_options : [> `calendar ] Gtk.obj -> Gtk.Tags.calendar_display_options list -> unitval get_date : [> `calendar ] Gtk.obj -> int * int * int