diff options
Diffstat (limited to 'hol-light')
-rw-r--r-- | hol-light/hol-light-autotest.el | 25 | ||||
-rw-r--r-- | hol-light/hol-light-unicode-tokens.el | 19 | ||||
-rw-r--r-- | hol-light/hol-light.el | 27 |
3 files changed, 50 insertions, 21 deletions
diff --git a/hol-light/hol-light-autotest.el b/hol-light/hol-light-autotest.el index 20c16727..d68b898f 100644 --- a/hol-light/hol-light-autotest.el +++ b/hol-light/hol-light-autotest.el @@ -1,21 +1,30 @@ -;; hol-light-autotest.el: tests of HOL Light Proof General. +;;; hol-light-autotest.el --- tests of HOL Light Proof General. + +;; This file is part of Proof General. + +;; Portions © Copyright 1994-2012 David Aspinall and University of Edinburgh +;; Portions © Copyright 2003, 2012, 2014 Free Software Foundation, Inc. +;; Portions © Copyright 2001-2017 Pierre Courtieu +;; Portions © Copyright 2010, 2016 Erik Martin-Dorel +;; Portions © Copyright 2011-2013, 2016-2017 Hendrik Tews +;; Portions © Copyright 2015-2017 Clément Pit-Claudel + +;;; Commentary: ;; ;; You can run these by issuing "make test.hol-light" in PG home dir. ;; -;; $Id$ -;; + +;;; Code: (eval-when-compile (require 'cl)) -(eval-when (compile) - (require 'proof-site) - (proof-ready-for-assistant 'coq) - (defvar coq-compile-before-require nil)) +(require 'proof-site) +(proof-ready-for-assistant 'hol-light) (require 'pg-autotest) -(unless noninteractive +(unless (bound-and-true-p byte-compile-current-file) (pg-autotest start 'debug) (pg-autotest log ".autotest.log") ; convention diff --git a/hol-light/hol-light-unicode-tokens.el b/hol-light/hol-light-unicode-tokens.el index df32e4bd..7e24e4b1 100644 --- a/hol-light/hol-light-unicode-tokens.el +++ b/hol-light/hol-light-unicode-tokens.el @@ -1,8 +1,17 @@ -;;; -*- coding: utf-8; -*- -;; coq-unicode-tokens.el --- (No) Tokens for Unicode Tokens package -;; -;; Copyright(C) 2012 David Aspinall / University of Edinburgh +;;; coq-unicode-tokens.el --- (No) Tokens for Unicode Tokens package -*- coding: utf-8; -*- + +;; This file is part of Proof General. + +;; Portions © Copyright 1994-2012 David Aspinall and University of Edinburgh +;; Portions © Copyright 2003, 2012, 2014 Free Software Foundation, Inc. +;; Portions © Copyright 2001-2017 Pierre Courtieu +;; Portions © Copyright 2010, 2016 Erik Martin-Dorel +;; Portions © Copyright 2011-2013, 2016-2017 Hendrik Tews +;; Portions © Copyright 2015-2017 Clément Pit-Claudel + ;; Author: David Aspinall <David.Aspinall@ed.ac.uk> + +;;; Commentary: ;; ;; This file is loaded by `proof-unicode-tokens.el'. ;; @@ -18,6 +27,8 @@ ;; - fix unicode tokens sorting so longs tokens handled first (broken?) ;; <=> not <= > +;;; Code: + (require 'proof-unicode-tokens) (defconst hol-light-token-format "%s") ; plain tokens diff --git a/hol-light/hol-light.el b/hol-light/hol-light.el index 85d10607..2b4f3989 100644 --- a/hol-light/hol-light.el +++ b/hol-light/hol-light.el @@ -1,24 +1,33 @@ -;; hol-light.el Basic Proof General instance for HOL Light -;; -;; Copyright (C) 2010-12 LFCS Edinburgh, David Aspinall. -;; +;;; hol-light.el --- Basic Proof General instance for HOL Light + +;; This file is part of Proof General. + +;; Portions © Copyright 1994-2012 David Aspinall and University of Edinburgh +;; Portions © Copyright 2003, 2012, 2014 Free Software Foundation, Inc. +;; Portions © Copyright 2001-2017 Pierre Courtieu +;; Portions © Copyright 2010, 2016 Erik Martin-Dorel +;; Portions © Copyright 2011-2013, 2016-2017 Hendrik Tews +;; Portions © Copyright 2015-2017 Clément Pit-Claudel + ;; Author: David Aspinall <David.Aspinall@ed.ac.uk> ;; Mark Adams <mark@proof-technologies.com> -;; -;; $Id$ + +;;; Commentary: ;; ;; See the README file in this directory for information. ;; +;;; Code: + (require 'proof-easy-config) ; easy configure mechanism (require 'proof-syntax) ; functions for making regexps (or (proof-try-require 'caml-font) ; use OCaml Emacs mode syntax (defvar caml-font-lock-keywords nil)) ; -(eval-when (compile) - (require 'proof-tree) - (defvar caml-font-lock-keywords nil)) +(eval-when-compile + (require 'proof-tree) + (defvar caml-font-lock-keywords nil)) (defcustom hol-light-home (or (getenv "HOLLIGHT_HOME") |