author | wenzelm |
Wed, 15 May 2013 20:34:42 +0200 | |
changeset 52009 | 3b18ef9df768 |
parent 52008 | src/Pure/ProofGeneral/proof_general_pure.ML@bdb82afdcb92 |
child 52011 | 56dfc90a5c75 |
permissions | -rw-r--r-- |
52009 | 1 |
(* Title: Pure/Tools/proof_general_pure.ML |
52007
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
2 |
Author: David Aspinall |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
3 |
Author: Makarius |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
4 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
5 |
Proof General preferences for Isabelle/Pure. |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
6 |
*) |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
7 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
8 |
(* display *) |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
9 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
10 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
11 |
ProofGeneral.preference_bool ProofGeneral.category_display |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
12 |
Printer.show_types_default |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
13 |
"show-types" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
14 |
"Include types in display of Isabelle terms"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
15 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
16 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
17 |
ProofGeneral.preference_bool ProofGeneral.category_display |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
18 |
Printer.show_sorts_default |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
19 |
"show-sorts" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
20 |
"Include sorts in display of Isabelle terms"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
21 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
22 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
23 |
ProofGeneral.preference_bool ProofGeneral.category_display |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
24 |
Goal_Display.show_consts_default |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
25 |
"show-consts" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
26 |
"Show types of consts in Isabelle goal display"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
27 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
28 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
29 |
ProofGeneral.preference_option ProofGeneral.category_display |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
30 |
@{option names_long} |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
31 |
"long-names" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
32 |
"Show fully qualified names in Isabelle terms"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
33 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
34 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
35 |
ProofGeneral.preference_bool ProofGeneral.category_display |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
36 |
Printer.show_brackets_default |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
37 |
"show-brackets" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
38 |
"Show full bracketing in Isabelle terms"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
39 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
40 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
41 |
ProofGeneral.preference_bool ProofGeneral.category_display |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
42 |
Goal_Display.show_main_goal_default |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
43 |
"show-main-goal" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
44 |
"Show main goal in proof state display"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
45 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
46 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
47 |
ProofGeneral.preference_bool ProofGeneral.category_display |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
48 |
Syntax_Trans.eta_contract_default |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
49 |
"eta-contract" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
50 |
"Print terms eta-contracted"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
51 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
52 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
53 |
(* advanced display *) |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
54 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
55 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
56 |
ProofGeneral.preference_option ProofGeneral.category_advanced_display |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
57 |
@{option goals_limit} |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
58 |
"goals-limit" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
59 |
"Setting for maximum number of subgoals to be printed"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
60 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
61 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
62 |
ProofGeneral.preference_raw ProofGeneral.category_advanced_display |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
63 |
(Markup.print_int o get_print_depth) |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
64 |
(print_depth o Markup.parse_int) |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
65 |
ProofGeneral.pgipint |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
66 |
"print-depth" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
67 |
"Setting for the ML print depth"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
68 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
69 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
70 |
ProofGeneral.preference_option ProofGeneral.category_advanced_display |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
71 |
@{option show_question_marks} |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
72 |
"show-question-marks" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
73 |
"Show leading question mark of variable name"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
74 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
75 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
76 |
(* tracing *) |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
77 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
78 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
79 |
ProofGeneral.preference_bool ProofGeneral.category_tracing |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
80 |
Raw_Simplifier.simp_trace_default |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
81 |
"trace-simplifier" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
82 |
"Trace simplification rules"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
83 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
84 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
85 |
ProofGeneral.preference_int ProofGeneral.category_tracing |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
86 |
Raw_Simplifier.simp_trace_depth_limit_default |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
87 |
"trace-simplifier-depth" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
88 |
"Trace simplifier depth limit"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
89 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
90 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
91 |
ProofGeneral.preference_bool ProofGeneral.category_tracing |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
92 |
Pattern.trace_unify_fail |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
93 |
"trace-unification" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
94 |
"Output error diagnostics during unification"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
95 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
96 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
97 |
ProofGeneral.preference_bool ProofGeneral.category_tracing |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
98 |
Toplevel.timing |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
99 |
"global-timing" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
100 |
"Whether to enable timing in Isabelle"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
101 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
102 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
103 |
ProofGeneral.preference_bool ProofGeneral.category_tracing |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
104 |
Toplevel.debug |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
105 |
"debugging" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
106 |
"Whether to enable debugging"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
107 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
108 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
109 |
ProofGeneral.preference_raw ProofGeneral.category_tracing |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
110 |
(fn () => Markup.print_bool (print_mode_active ProofGeneral.thm_depsN)) |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
111 |
(fn s => |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
112 |
if Markup.parse_bool s |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
113 |
then Unsynchronized.change print_mode (insert (op =) ProofGeneral.thm_depsN) |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
114 |
else Unsynchronized.change print_mode (remove (op =) ProofGeneral.thm_depsN)) |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
115 |
ProofGeneral.pgipbool |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
116 |
"theorem-dependencies" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
117 |
"Track theorem dependencies within Proof General"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
118 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
119 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
120 |
(* proof *) |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
121 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
122 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
123 |
Unsynchronized.setmp quick_and_dirty true (fn () => |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
124 |
ProofGeneral.preference_bool ProofGeneral.category_proof |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
125 |
quick_and_dirty |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
126 |
"quick-and-dirty" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
127 |
"Take a few short cuts") (); |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
128 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
129 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
130 |
ProofGeneral.preference_bool ProofGeneral.category_proof |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
131 |
Goal.skip_proofs |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
132 |
"skip-proofs" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
133 |
"Skip over proofs"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
134 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
135 |
val _ = |
52008
bdb82afdcb92
clarified default for Proofterm.proofs, according to etc/options and innermost setmp;
wenzelm
parents:
52007
diff
changeset
|
136 |
Unsynchronized.setmp Proofterm.proofs 1 (fn () => |
52007
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
137 |
ProofGeneral.preference_raw ProofGeneral.category_proof |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
138 |
(Markup.print_bool o Proofterm.proofs_enabled) |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
139 |
(fn s => Proofterm.proofs := (if Markup.parse_bool s then 2 else 1)) |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
140 |
ProofGeneral.pgipbool |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
141 |
"full-proofs" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
142 |
"Record full proof objects internally") (); |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
143 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
144 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
145 |
Unsynchronized.setmp Multithreading.max_threads 0 (fn () => |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
146 |
ProofGeneral.preference_int ProofGeneral.category_proof |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
147 |
Multithreading.max_threads |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
148 |
"max-threads" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
149 |
"Maximum number of threads") (); |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
150 |
|
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
151 |
val _ = |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
152 |
ProofGeneral.preference_raw ProofGeneral.category_proof |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
153 |
(fn () => Markup.print_bool (! Goal.parallel_proofs >= 1)) |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
154 |
(fn s => Goal.parallel_proofs := (if Markup.parse_bool s then 1 else 0)) |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
155 |
ProofGeneral.pgipbool |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
156 |
"parallel-proofs" |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
157 |
"Check proofs in parallel"; |
0b1183012a3c
maintain ProofGeneral preferences within ProofGeneral module;
wenzelm
parents:
diff
changeset
|
158 |