Mercurial > emacs
changeset 798:b7932f859d4e
*** empty log message ***
| author | Eric S. Raymond <esr@snark.thyrsus.com> |
|---|---|
| date | Thu, 16 Jul 1992 19:23:43 +0000 |
| parents | ecc182062509 |
| children | f9874f408ddf |
| files | lisp/=cl.el lisp/cmuscheme.el lisp/progmodes/cplus-md.el lisp/progmodes/inf-lisp.el |
| diffstat | 4 files changed, 33 insertions(+), 9 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/=cl.el Thu Jul 16 18:51:53 1992 +0000 +++ b/lisp/=cl.el Thu Jul 16 19:23:43 1992 +0000 @@ -1,5 +1,11 @@ ;;; cl.el --- Common-Lisp extensions for GNU Emacs Lisp. +;; Author: Cesar Quiroz <quiroz@cs.rochester.edu> +;; Last-Modified: 16 Mar 1992 +;; Keywords: extensions + +(defvar cl-version "2.0 beta 29 October 1989") + ;; Copyright (C) 1987, 1988, 1989 Free Software Foundation, Inc. ;; This file is part of GNU Emacs. @@ -19,7 +25,8 @@ ;; file named COPYING. Among other things, the copyright notice ;; and this notice must be preserved on all copies. -;;;; +;;; Commentary: + ;;;; These are extensions to Emacs Lisp that provide some form of ;;;; Common Lisp compatibility, beyond what is already built-in ;;;; in Emacs Lisp. @@ -41,11 +48,6 @@ ;;;; the files are concatenated together one cannot ensure that ;;;; declaration always precedes use. ;;;; -;;;; Bug reports, suggestions and comments, -;;;; to quiroz@cs.rochester.edu - -(defvar cl-version "2.0 beta 29 October 1989") - ;;;; GLOBAL ;;;; This file provides utilities and declarations that are global @@ -61,6 +63,8 @@ ;;; use here anything but plain Emacs Lisp! There is a neater recursive form ;;; for the algorithm that deals with the bodies. +;;; Code: + (defmacro psetq (&rest body) "(psetq {var value }...) => nil Like setq, but all the values are computed before any assignment is made."
--- a/lisp/cmuscheme.el Thu Jul 16 18:51:53 1992 +0000 +++ b/lisp/cmuscheme.el Thu Jul 16 19:23:43 1992 +0000 @@ -1,6 +1,6 @@ ;;; cmuscheme.el -- Scheme process in a buffer. Adapted from tea.el. -;; Maintainer: Olin Shivers <olin.shivers@cs.cmu.edu> +;; Author: Olin Shivers <olin.shivers@cs.cmu.edu> ;; Last-Modified: 16 Mar 1992 ;;; Copyright Olin Shivers (1988)
--- a/lisp/progmodes/cplus-md.el Thu Jul 16 18:51:53 1992 +0000 +++ b/lisp/progmodes/cplus-md.el Thu Jul 16 19:23:43 1992 +0000 @@ -1,10 +1,20 @@ ;;; c++-mode.el --- C++ code editing commands for Emacs +;; Author: Dave Detlefs <dld@cs.cmu.edu> +;; Stewart Clamen <clamen@cs.cmu.edu> +;; Maintainer: Dave Detlefs <dld@cs.cmu.edu> +;; Last-Modified: 09 May 1991 +;; Keywords: c + +;;; Commentary: + ;; 1987 Dave Detlefs (dld@cs.cmu.edu) ;; and Stewart Clamen (clamen@cs.cmu.edu). ;; Done by fairly faithful modification of: ;; c-mode.el, Copyright (C) 1985 Richard M. Stallman. -;; + +;;; Change Log: + ;; Feb, 1990 (Dave Detlefs, dld@cs.cmu.edu) ;; Fixed electric-c++-terminator to handle double colons, at the ;; request of John Hagerman. @@ -70,6 +80,8 @@ ;; ;; August 1987: incorporated changes done by Glen Ditchfield of Waterloo. +;;; Code: + (defvar c++-mode-abbrev-table nil "Abbrev table used in C++ mode.") (define-abbrev-table 'c++-mode-abbrev-table ())
--- a/lisp/progmodes/inf-lisp.el Thu Jul 16 18:51:53 1992 +0000 +++ b/lisp/progmodes/inf-lisp.el Thu Jul 16 19:23:43 1992 +0000 @@ -1,11 +1,16 @@ ;;; cmulisp.el --- improved version of standard inferior-lisp mode +;; Author: Olin Shivers <shivers@cs.cmu.edu> +;; Last-Modified: 16 Jul 1993 + ;;; Copyright Olin Shivers (1988). ;;; Please imagine a long, tedious, legalistic 5-page gnu-style copyright ;;; notice appearing here to the effect that you may use this code any ;;; way you like, as long as you don't charge money for it, remove this ;;; notice, or hold me liable for its results. +;;; Commentary: + ;;; This replaces the standard inferior-lisp mode. ;;; Hacked from tea.el by Olin Shivers (shivers@cs.cmu.edu). 8/88 ;;; Please send me bug reports, bug fixes, and extensions, so that I can @@ -48,7 +53,6 @@ ;;; Maybe I should ensure the process mark is in the window when I send ;;; text to the process? Switch selectable? -(require 'comint) ;; YOUR .EMACS FILE ;;============================================================================= ;; Some suggestions for your .emacs file. @@ -125,6 +129,10 @@ ;;; source by lisp-load/compile-file. ;;; Read the rest of this file for more information. + +;;; Code: + +(require 'comint) (defvar cmulisp-filter-regexp "\\`\\s *\\(:\\(\\w\\|\\s_\\)\\)?\\s *\\'" "*What not to save on inferior Lisp's input history