blob: 76f4f09e64c4a6a3bc43ecec221e892b1236a330 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
;;
;; $Id$
;;
(customize-set-variable
'isabelle-isar-prog-name
(concat (getenv "ISABELLE") " " (getenv "PROOFGENERAL_LOGIC")))
(if (string-match "^polyml" (getenv "ML_SYSTEM"))
(customize-set-variable
'proof-shell-pre-interrupt-hook
(lambda () (proof-shell-insert (isar-verbatim "f") nil))))
(let ((xsym (getenv "PROOFGENERAL_XSYMBOL")))
(cond
((equal xsym "true")
(customize-set-variable 'proof-x-symbol-enable t))
((equal xsym "false")
(customize-set-variable 'proof-x-symbol-enable nil))))
|