Class GUtil.variable


class ['a] variable : 'a -> object .. end


val set : 'a signal
val changed : 'a signal
val mutable x : 'a
method connect : 'a variable_signals
method get : 'a
method set : 'a -> unit
method private equal : 'a -> 'a -> bool
method private real_set : 'a -> unit