diff --git a/src/lsp/arraylib.lsp b/src/lsp/arraylib.lsp index a0c100a45..c9753da31 100644 --- a/src/lsp/arraylib.lsp +++ b/src/lsp/arraylib.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1984, Taiichi Yuasa and Masami Hagiya. ;;;; Copyright (c) 1990, Giuseppe Attardi. @@ -14,7 +14,6 @@ ;;;; arraylib.lsp ;;;; ;;;; array routines - (in-package "SYSTEM") (defun make-array (dimensions diff --git a/src/lsp/assert.lsp b/src/lsp/assert.lsp index 05bab32a2..f4f7ea98b 100644 --- a/src/lsp/assert.lsp +++ b/src/lsp/assert.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1984, Taiichi Yuasa and Masami Hagiya. ;;;; Copyright (c) 1990, Giuseppe Attardi. diff --git a/src/lsp/autoload.lsp b/src/lsp/autoload.lsp index 3d286604a..f96cb4b64 100644 --- a/src/lsp/autoload.lsp +++ b/src/lsp/autoload.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1984, Taiichi Yuasa and Masami Hagiya. ;;;; Copyright (c) 1990, Giuseppe Attardi. diff --git a/src/lsp/cdr-5.lsp b/src/lsp/cdr-5.lsp index 7d6d41e11..9c2ddefb5 100644 --- a/src/lsp/cdr-5.lsp +++ b/src/lsp/cdr-5.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 2011, Juan Jose Garcia-Ripoll ;;;; diff --git a/src/lsp/cmdline.lsp b/src/lsp/cmdline.lsp index 613000580..10211160a 100644 --- a/src/lsp/cmdline.lsp +++ b/src/lsp/cmdline.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; cmdline.lsp -- command line processing ;;;; diff --git a/src/lsp/cmpinit.lsp b/src/lsp/cmpinit.lsp index a832b7fef..6cc8531ba 100644 --- a/src/lsp/cmpinit.lsp +++ b/src/lsp/cmpinit.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; (in-package "SYSTEM") diff --git a/src/lsp/cmuutil.lsp b/src/lsp/cmuutil.lsp index 889a5ae3a..6fdadc5cf 100644 --- a/src/lsp/cmuutil.lsp +++ b/src/lsp/cmuutil.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;; ********************************************************************** ;;; This code was written as part of the CMU Common Lisp project at diff --git a/src/lsp/defpackage.lsp b/src/lsp/defpackage.lsp index 5a5189de4..9d4c1e191 100644 --- a/src/lsp/defpackage.lsp +++ b/src/lsp/defpackage.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;; -*- Mode: LISP; Syntax: Common-lisp; Base: 10; Package: (DEFPACKAGE :COLON-MODE :EXTERNAL) -*- ;;; diff --git a/src/lsp/defstruct.lsp b/src/lsp/defstruct.lsp index c50a05975..07f6f864d 100644 --- a/src/lsp/defstruct.lsp +++ b/src/lsp/defstruct.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1984, Taiichi Yuasa and Masami Hagiya. ;;;; Copyright (c) 1990, Giuseppe Attardi. diff --git a/src/lsp/describe.lsp b/src/lsp/describe.lsp index 136bddd99..09360f511 100644 --- a/src/lsp/describe.lsp +++ b/src/lsp/describe.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1984, Taiichi Yuasa and Masami Hagiya. ;;;; Copyright (c) 1990, Giuseppe Attardi. diff --git a/src/lsp/evalmacros.lsp b/src/lsp/evalmacros.lsp index a7b87afa3..797695788 100644 --- a/src/lsp/evalmacros.lsp +++ b/src/lsp/evalmacros.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1984, Taiichi Yuasa and Masami Hagiya. ;;;; Copyright (c) 1990, Giuseppe Attardi. diff --git a/src/lsp/export.lsp b/src/lsp/export.lsp index 5eddef144..6b942dbec 100644 --- a/src/lsp/export.lsp +++ b/src/lsp/export.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1984, Taiichi Yuasa and Masami Hagiya. ;;;; Copyright (c) 1990, Giuseppe Attardi. diff --git a/src/lsp/ffi.lsp b/src/lsp/ffi.lsp index 96102f563..9dfd6e3ca 100644 --- a/src/lsp/ffi.lsp +++ b/src/lsp/ffi.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 2001, Juan Jose Garcia-Ripoll ;;;; diff --git a/src/lsp/format.lsp b/src/lsp/format.lsp index 08b8fe3ab..c1ad851b5 100644 --- a/src/lsp/format.lsp +++ b/src/lsp/format.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;; -*- Package: FORMAT -*- ;;; diff --git a/src/lsp/helpfile.lsp b/src/lsp/helpfile.lsp index ee13d966f..0c43431b2 100644 --- a/src/lsp/helpfile.lsp +++ b/src/lsp/helpfile.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 2001, Juan Jose Garcia-Ripoll. ;;;; diff --git a/src/lsp/init.lsp b/src/lsp/init.lsp index ccefc4ae1..d0cb9fcd1 100644 --- a/src/lsp/init.lsp +++ b/src/lsp/init.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;(load "../cmp/init") diff --git a/src/lsp/iolib.lsp b/src/lsp/iolib.lsp index fd5dcdb53..b569259db 100644 --- a/src/lsp/iolib.lsp +++ b/src/lsp/iolib.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1984, Taiichi Yuasa and Masami Hagiya. ;;;; Copyright (c) 1990, Giuseppe Attardi. diff --git a/src/lsp/listlib.lsp b/src/lsp/listlib.lsp index 430bf5290..81858079e 100644 --- a/src/lsp/listlib.lsp +++ b/src/lsp/listlib.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1995, Giuseppe Attardi. ;;;; Copyright (c) 2001, Juan Jose Garcia Ripoll. diff --git a/src/lsp/loop.lsp b/src/lsp/loop.lsp index 8e0582643..868172e9a 100644 --- a/src/lsp/loop.lsp +++ b/src/lsp/loop.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;; -*- Mode:LISP; Syntax:Common-Lisp; Package:LOOP; Base:10; Lowercase:T -*- ;;; ************************************************************************* diff --git a/src/lsp/loop2.lsp b/src/lsp/loop2.lsp index eca83a9fb..bf3a661ed 100755 --- a/src/lsp/loop2.lsp +++ b/src/lsp/loop2.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;; -*- Mode: LISP; Syntax: Common-lisp; Base: 10; Lowercase:T -*- ;;;> diff --git a/src/lsp/mislib.lsp b/src/lsp/mislib.lsp index 1cd4c19f5..6d43bf1a9 100644 --- a/src/lsp/mislib.lsp +++ b/src/lsp/mislib.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1984, Taiichi Yuasa and Masami Hagiya. ;;;; Copyright (c) 1990, Giuseppe Attardi. diff --git a/src/lsp/module.lsp b/src/lsp/module.lsp index a159a3b25..5192d8060 100644 --- a/src/lsp/module.lsp +++ b/src/lsp/module.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1984, Taiichi Yuasa and Masami Hagiya. ;;;; Copyright (c) 1990, Giuseppe Attardi. diff --git a/src/lsp/mp.lsp b/src/lsp/mp.lsp index ab870d55d..56c4770fe 100644 --- a/src/lsp/mp.lsp +++ b/src/lsp/mp.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; MP.LSP -- Multiprocessing capabilities. diff --git a/src/lsp/numlib.lsp b/src/lsp/numlib.lsp index a9e798e60..10a4a5c1b 100644 --- a/src/lsp/numlib.lsp +++ b/src/lsp/numlib.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1984, Taiichi Yuasa and Masami Hagiya. ;;;; Copyright (c) 1990, Giuseppe Attardi. diff --git a/src/lsp/packlib.lsp b/src/lsp/packlib.lsp index e2a8dc74d..addbedf6d 100644 --- a/src/lsp/packlib.lsp +++ b/src/lsp/packlib.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1984, Taiichi Yuasa and Masami Hagiya. ;;;; Copyright (c) 1990, Giuseppe Attardi. diff --git a/src/lsp/pprint.lsp b/src/lsp/pprint.lsp index df499a84c..132cf841a 100644 --- a/src/lsp/pprint.lsp +++ b/src/lsp/pprint.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;; -*- Package: PRETTY-PRINT -*- ;;; diff --git a/src/lsp/predlib.lsp b/src/lsp/predlib.lsp index bacf3f02b..e3927ece3 100644 --- a/src/lsp/predlib.lsp +++ b/src/lsp/predlib.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1984, Taiichi Yuasa and Masami Hagiya. ;;;; Copyright (c) 1990, Giuseppe Attardi. diff --git a/src/lsp/process.lsp b/src/lsp/process.lsp index 5d5be8356..b7e80ad64 100644 --- a/src/lsp/process.lsp +++ b/src/lsp/process.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; PROCESS.LSP -- External processes diff --git a/src/lsp/proclaim.lsp b/src/lsp/proclaim.lsp index 957ff89c9..46944a730 100644 --- a/src/lsp/proclaim.lsp +++ b/src/lsp/proclaim.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; (in-package "SYSTEM") (proclaim '(FTYPE (FUNCTION (T T T) T) DEFMACRO*)) diff --git a/src/lsp/seq.lsp b/src/lsp/seq.lsp index ca2024635..5eb924a75 100644 --- a/src/lsp/seq.lsp +++ b/src/lsp/seq.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1984, Taiichi Yuasa and Masami Hagiya. ;;;; Copyright (c) 1990, Giuseppe Attardi. diff --git a/src/lsp/seqlib.lsp b/src/lsp/seqlib.lsp index ab6710608..2e33c8058 100644 --- a/src/lsp/seqlib.lsp +++ b/src/lsp/seqlib.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1984, Taiichi Yuasa and Masami Hagiya. ;;;; Copyright (c) 1990, Giuseppe Attardi. diff --git a/src/lsp/seqmacros.lsp b/src/lsp/seqmacros.lsp index 747318a83..d7ed5d445 100644 --- a/src/lsp/seqmacros.lsp +++ b/src/lsp/seqmacros.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 2010, Juan Jose Garcia-Ripoll ;;;; diff --git a/src/lsp/setf.lsp b/src/lsp/setf.lsp index 7de4a5d82..28aa14d8c 100644 --- a/src/lsp/setf.lsp +++ b/src/lsp/setf.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1984, Taiichi Yuasa and Masami Hagiya. ;;;; Copyright (c) 1990, Giuseppe Attardi. diff --git a/src/lsp/top.lsp b/src/lsp/top.lsp index 91d2253f2..3d9f1d566 100644 --- a/src/lsp/top.lsp +++ b/src/lsp/top.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; top.lsp -- Top-level loop, break loop, and error handlers ;;;; diff --git a/src/lsp/trace.lsp b/src/lsp/trace.lsp index d2b89dbfd..411244237 100644 --- a/src/lsp/trace.lsp +++ b/src/lsp/trace.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 1990, Giuseppe Attardi. ;;;; Copyright (c) 2001, Juan Jose Garcia Ripoll. diff --git a/src/lsp/unicode.lsp b/src/lsp/unicode.lsp index b3331116d..8819953bc 100644 --- a/src/lsp/unicode.lsp +++ b/src/lsp/unicode.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; ;;;; Copyright (c) 2011, Juan Jose Garcia-Ripoll. ;;;; diff --git a/src/lsp/util.lsp b/src/lsp/util.lsp index 4b1027d7f..b25aa6e9b 100644 --- a/src/lsp/util.lsp +++ b/src/lsp/util.lsp @@ -1,4 +1,4 @@ -;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM -*- +;;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SYSTEM; indent-tabs-mode: nil -*- ;;;; (in-package "COMPILER") (defvar file-list