blob: 14cfd0dbfe3b030af22e56270757db83e46ec512 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
|
(************************************************************************)
(* v * The Coq Proof Assistant / The Coq Development Team *)
(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2015 *)
(* \VV/ **************************************************************)
(* // * This file is distributed under the terms of the *)
(* * GNU Lesser General Public License Version 2.1 *)
(************************************************************************)
module Script :
sig
val table : GText.tag_table
val comment : GText.tag
val error : GText.tag
val error_bg : GText.tag
val to_process : GText.tag
val processed : GText.tag
val incomplete : GText.tag
val unjustified : GText.tag
val found : GText.tag
val sentence : GText.tag
val tooltip : GText.tag
val edit_zone : GText.tag (* for debugging *)
val all : GText.tag list
end
module Proof :
sig
val table : GText.tag_table
val highlight : GText.tag
val hypothesis : GText.tag
val goal : GText.tag
end
module Message :
sig
val table : GText.tag_table
val error : GText.tag
val warning : GText.tag
val item : GText.tag
end
val string_of_color : Gdk.color -> string
val color_of_string : string -> Gdk.color
val get_processed_color : unit -> Gdk.color
val set_processed_color : Gdk.color -> unit
val get_processing_color : unit -> Gdk.color
val set_processing_color : Gdk.color -> unit
val get_error_color : unit -> Gdk.color
val set_error_color : Gdk.color -> unit
val get_error_fg_color : unit -> Gdk.color
val set_error_fg_color : Gdk.color -> unit
val default_processed_color : string
val default_processing_color : string
val default_error_color : string
val default_error_fg_color : string
val default_color : string
|