module ProgressBar:sig
..end
val cast : 'a Gobject.obj -> Gtk.progress_bar Gtk.obj
module P:sig
..end
val create : Gtk.progress_bar Gobject.param list -> Gtk.progress_bar Gtk.obj
val pulse : [> `progressbar ] Gtk.obj -> unit
val make_params : cont:(([> `progressbar ] as 'a) Gobject.param list -> 'b) ->
'a Gobject.param list ->
?orientation:GtkEnums.progress_bar_orientation -> ?pulse_step:float -> 'b