diff options
| author | Erik Martin-Dorel | 2018-08-23 01:37:33 +0200 |
|---|---|---|
| committer | GitHub | 2018-08-23 01:37:33 +0200 |
| commit | 733cd24a7368ee186884da488da0f59bbedb627e (patch) | |
| tree | e2a6832c08a6f058f423879c40c02fd924082af3 /easycrypt/easycrypt-hooks.el | |
| parent | 26b3bf9f070e9aee45c6e3d19bca475d4ae8ed37 (diff) | |
| parent | 7986697e7999e1d24356d459d64e7be5ee4c8da0 (diff) | |
Merge pull request #380 from ProofGeneral/prepare-melpa
Prepare PG for MELPA
Diffstat (limited to 'easycrypt/easycrypt-hooks.el')
| -rw-r--r-- | easycrypt/easycrypt-hooks.el | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/easycrypt/easycrypt-hooks.el b/easycrypt/easycrypt-hooks.el index 3cf891e3..67592973 100644 --- a/easycrypt/easycrypt-hooks.el +++ b/easycrypt/easycrypt-hooks.el @@ -1,3 +1,5 @@ +;;; easycrypt-hooks.el --- Auxiliary functions for EasyCrypt mode + ;; -------------------------------------------------------------------- ;; Copyright (c) - 2012--2016 - IMDEA Software Institute ;; Copyright (c) - 2012--2016 - Inria @@ -5,9 +7,14 @@ ;; Distributed under the terms of the GPL-v3 license ;; -------------------------------------------------------------------- +;;; Commentary: +;; + (require 'span) (require 'proof) +;;; Code: + (defvar easycrypt-last-but-one-statenum 0) (defvar easycrypt-proof-weak-mode nil) @@ -38,7 +45,7 @@ (defun easycrypt-last-prompt-info (s) "Extract the information from prompt." - (let ((lastprompt (or s (error "no prompt")))) + (let ((lastprompt (or s (error "No prompt")))) (when (string-match "\\[\\([0-9]+\\)|\\(\\sw+\\)\\]" lastprompt) (list (string-to-number (match-string 1 lastprompt)) (if (equal (match-string 2 lastprompt) "weakcheck") t nil))))) @@ -68,3 +75,5 @@ (list (format "undo %s." (int-to-string span-staten))))) (provide 'easycrypt-hooks) + +;;; easycrypt-hooks.el ends here |