diff options
author | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2015-01-03 20:09:06 +0100 |
---|---|---|
committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2015-01-05 09:53:54 +0100 |
commit | c72224832e2488b15f8f58d96554e4cf4337460d (patch) | |
tree | d7ba9651cd0e8fa745f0c4161cf6c7d72e719018 /ide/wg_Segment.mli | |
parent | c146a313b5eeee2bb567553810d57c6a8548bd9a (diff) |
Implementing a segment-viewer in CoqIDE.
This allows a nifty display of the current state of the document through
a dedicated progress bar.
Also closes bug #3764.
Diffstat (limited to 'ide/wg_Segment.mli')
-rw-r--r-- | ide/wg_Segment.mli | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/ide/wg_Segment.mli b/ide/wg_Segment.mli new file mode 100644 index 000000000..cea6058b4 --- /dev/null +++ b/ide/wg_Segment.mli @@ -0,0 +1,21 @@ +(************************************************************************) +(* v * The Coq Proof Assistant / The Coq Development Team *) +(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *) +(* \VV/ **************************************************************) +(* // * This file is distributed under the terms of the *) +(* * GNU Lesser General Public License Version 2.1 *) +(************************************************************************) + +type color = GDraw.color + +class segment : unit -> + object + inherit GObj.widget + val obj : Gtk.widget Gtk.obj + method length : int + method set_length : int -> unit + method default_color : color + method set_default_color : color -> unit + method add : int -> color -> unit + method remove : int -> unit + end |