File: top-start-inferior-acl2.el

package info (click to toggle)
acl2 4.3-3
  • links: PTS
  • area: main
  • in suites: wheezy
  • size: 76,444 kB
  • sloc: lisp: 951,371; makefile: 3,491; sh: 1,669; perl: 1,639; ansic: 358; cpp: 245; csh: 125; haskell: 17; java: 12
file content (11 lines) | stat: -rw-r--r-- 413 bytes parent folder | download | duplicates (12)
1
2
3
4
5
6
7
8
9
10
11
(defvar *acl2-interface-dir*
  "/slocal/src/acl2/v1-8/interface/emacs/")

(setq *acl2-user-map-interface*
  '((inferior-acl2-mode-map menu-bar popup-menu keys)
    (shell-mode-map         menu-bar popup-menu keys)
    (acl2-mode-map          menu-bar popup-menu keys)
    (prooftree-mode-map     menu-bar popup-menu keys)))

(let ((load-path (cons *acl2-interface-dir* load-path)))
  (load "load-inferior-acl2"))