diff options
| -rw-r--r-- | isa/isa.el | 7 |
1 files changed, 7 insertions, 0 deletions
@@ -115,6 +115,9 @@ and script mode." proof-find-theorems-command "ProofGeneral.thms_containing (space_explode \",\" \"%s\");" proof-shell-start-silent-cmd "proofgeneral_disable_pr();" proof-shell-stop-silent-cmd "proofgeneral_enable_pr();" + ; FIXME improved version for Isabelle99-1: + ; proof-shell-start-silent-cmd "Goals.disable_pr();" + ; proof-shell-stop-silent-cmd "Goals.enable_pr();" ;; command hooks proof-goal-command-p 'isa-goal-command-p proof-count-undos-fn 'isa-count-undos @@ -181,6 +184,10 @@ and script mode." ;; Also for setting default values. proof-shell-init-cmd (concat (isabelle-set-default-cmd) "val pg_saved_gl = ref (!goals_limit); fun proofgeneral_enable_pr () = goals_limit:= !pg_saved_gl; fun proofgeneral_disable_pr() = (pg_saved_gl := (if (!goals_limit)>0 then !goals_limit else !pg_saved_gl); goals_limit := 0); ProofGeneral.init false;") + ; FIXME improved version for Isabelle99-1: + ;proof-shell-init-cmd (concat (isabelle-set-default-cmd) + ; "ProofGeneral.init false;") + proof-shell-restart-cmd "ProofGeneral.isa_restart();" proof-shell-quit-cmd "quit();" |