Patch - Defsystem - use "mode: lisp" when any
Sean Champ <[email protected]> Sun, 30 Jul 2006 02:30:09 -0700
| Newsgroups | gmane.lisp.clocc.devel |
|---|---|
| Message-ID | <[email protected]> |
The patch attached to this message will ensure that the text "Mode: lisp" will be used in lieu of "Mode: CLtL", at the head of Lisp files within the defsystem-4 subset of the CLOCC codebase. I would like to recommend that no "mode: " line would be used, on the files. Given a reasonable pathname semantics, the user's editing platform may be left to select what mode to use for the file. This patch should serve to ensure that the affected files will be loaded in an appropriate mode, as on systems in which a 'CLtL' mode would not be applicable. -- Sean ------------------------------------------------------------------------- Take Surveys. Earn Cash. Influence the Future of IT Join SourceForge.net's Techsay panel and you'll get the chance to share your opinions on IT & business topics through brief surveys -- and earn cash http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV _______________________________________________ clocc-devel mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/clocc-devel
defsystem.lisp-file-mode-spec.diff
(text/x-diff, 11.2 KB)
Index: ./src/impl-dependent/allegro.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/impl-dependent/allegro.lisp,v retrieving revision 1.6 diff -p -u -u -r1.6 allegro.lisp --- ./src/impl-dependent/allegro.lisp 26 Nov 2002 00:01:52 -0000 1.6 +++ ./src/impl-dependent/allegro.lisp 30 Jul 2006 09:24:58 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- ;;; allegro.lisp -- Index: ./src/impl-dependent/clisp.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/impl-dependent/clisp.lisp,v retrieving revision 1.1 diff -p -u -u -r1.1 clisp.lisp --- ./src/impl-dependent/clisp.lisp 21 Feb 2002 17:01:46 -0000 1.1 +++ ./src/impl-dependent/clisp.lisp 30 Jul 2006 09:24:58 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- (in-package "MK4") Index: ./src/impl-dependent/cmucl.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/impl-dependent/cmucl.lisp,v retrieving revision 1.4 diff -p -u -u -r1.4 cmucl.lisp --- ./src/impl-dependent/cmucl.lisp 26 Nov 2002 00:03:22 -0000 1.4 +++ ./src/impl-dependent/cmucl.lisp 30 Jul 2006 09:24:58 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- ;;; cmucl.lisp -- ;;; Implementation dependent DEFSYSTEM support for CMUCL Index: ./src/impl-dependent/common.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/impl-dependent/common.lisp,v retrieving revision 1.1 diff -p -u -u -r1.1 common.lisp --- ./src/impl-dependent/common.lisp 21 Feb 2002 17:01:46 -0000 1.1 +++ ./src/impl-dependent/common.lisp 30 Jul 2006 09:24:58 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- ;;; common.lisp -- Index: ./src/impl-dependent/corman.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/impl-dependent/corman.lisp,v retrieving revision 1.1 diff -p -u -u -r1.1 corman.lisp --- ./src/impl-dependent/corman.lisp 21 Feb 2002 17:01:46 -0000 1.1 +++ ./src/impl-dependent/corman.lisp 30 Jul 2006 09:24:58 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- (in-package "MK4") Index: ./src/impl-dependent/kcl-derivatives.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/impl-dependent/kcl-derivatives.lisp,v retrieving revision 1.2 diff -p -u -u -r1.2 kcl-derivatives.lisp --- ./src/impl-dependent/kcl-derivatives.lisp 14 Nov 2002 15:33:09 -0000 1.2 +++ ./src/impl-dependent/kcl-derivatives.lisp 30 Jul 2006 09:24:58 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- (in-package "MK4") Index: ./src/impl-dependent/lcl.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/impl-dependent/lcl.lisp,v retrieving revision 1.2 diff -p -u -u -r1.2 lcl.lisp --- ./src/impl-dependent/lcl.lisp 14 Nov 2002 15:33:50 -0000 1.2 +++ ./src/impl-dependent/lcl.lisp 30 Jul 2006 09:24:58 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- (in-package "MK4") Index: ./src/impl-dependent/lispworks.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/impl-dependent/lispworks.lisp,v retrieving revision 1.5 diff -p -u -u -r1.5 lispworks.lisp --- ./src/impl-dependent/lispworks.lisp 26 Nov 2002 00:02:18 -0000 1.5 +++ ./src/impl-dependent/lispworks.lisp 30 Jul 2006 09:24:58 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- (in-package "MK4") Index: ./src/impl-dependent/mcl.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/impl-dependent/mcl.lisp,v retrieving revision 1.1 diff -p -u -u -r1.1 mcl.lisp --- ./src/impl-dependent/mcl.lisp 21 Feb 2002 17:01:46 -0000 1.1 +++ ./src/impl-dependent/mcl.lisp 30 Jul 2006 09:24:58 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- (in-package "MK4") Index: ./src/impl-dependent/poplog.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/impl-dependent/poplog.lisp,v retrieving revision 1.1 diff -p -u -u -r1.1 poplog.lisp --- ./src/impl-dependent/poplog.lisp 21 Feb 2002 17:01:46 -0000 1.1 +++ ./src/impl-dependent/poplog.lisp 30 Jul 2006 09:24:58 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- (in-package "MK4") Index: ./src/impl-dependent/sbcl.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/impl-dependent/sbcl.lisp,v retrieving revision 1.2 diff -p -u -u -r1.2 sbcl.lisp --- ./src/impl-dependent/sbcl.lisp 26 Nov 2002 00:02:48 -0000 1.2 +++ ./src/impl-dependent/sbcl.lisp 30 Jul 2006 09:24:58 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- ;;; sbcl.lisp -- ;;; Implementation dependent DEFSYSTEM support for SBCL. Index: ./src/defsystem-pkg.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/defsystem-pkg.lisp,v retrieving revision 1.9 diff -p -u -u -r1.9 defsystem-pkg.lisp --- ./src/defsystem-pkg.lisp 26 Nov 2002 23:17:51 -0000 1.9 +++ ./src/defsystem-pkg.lisp 30 Jul 2006 09:24:59 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- ;;; DEFSYSTEM 4.0 Index: ./src/versions.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/versions.lisp,v retrieving revision 1.3 diff -p -u -u -r1.3 versions.lisp --- ./src/versions.lisp 25 Nov 2002 23:47:28 -0000 1.3 +++ ./src/versions.lisp 30 Jul 2006 09:25:00 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- ;;; DEFSYSTEM 4.0 Index: ./src/languages/c/c.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/languages/c/c.lisp,v retrieving revision 1.7 diff -p -u -u -r1.7 c.lisp --- ./src/languages/c/c.lisp 26 Nov 2002 00:05:19 -0000 1.7 +++ ./src/languages/c/c.lisp 30 Jul 2006 09:25:00 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- ;;; DEFSYSTEM 4.0 Index: ./src/languages/common-lisp/common-lisp.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/languages/common-lisp/common-lisp.lisp,v retrieving revision 1.1 diff -p -u -u -r1.1 common-lisp.lisp --- ./src/languages/common-lisp/common-lisp.lisp 27 Nov 2002 20:04:03 -0000 1.1 +++ ./src/languages/common-lisp/common-lisp.lisp 30 Jul 2006 09:25:00 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- ;;; DEFSYSTEM 4.0 Index: ./src/languages/scheme/scheme.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/languages/scheme/scheme.lisp,v retrieving revision 1.2 diff -p -u -u -r1.2 scheme.lisp --- ./src/languages/scheme/scheme.lisp 14 Nov 2002 15:42:54 -0000 1.2 +++ ./src/languages/scheme/scheme.lisp 30 Jul 2006 09:25:00 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- ;;; DEFSYSTEM 4.0 Index: ./src/tests/crscl.system =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/tests/crscl.system,v retrieving revision 1.1 diff -p -u -u -r1.1 crscl.system --- ./src/tests/crscl.system 21 Feb 2002 17:01:47 -0000 1.1 +++ ./src/tests/crscl.system 30 Jul 2006 09:25:00 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- #-mk4-test1 (mk4:defsystem "CRSCL" Index: ./src/tests/component-test.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/tests/component-test.lisp,v retrieving revision 1.1 diff -p -u -u -r1.1 component-test.lisp --- ./src/tests/component-test.lisp 21 Feb 2002 17:01:47 -0000 1.1 +++ ./src/tests/component-test.lisp 30 Jul 2006 09:25:01 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- (defparameter f1 (mk4::construct-component :file "actions")) Index: ./src/utilities/ambler/ambler.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/utilities/ambler/ambler.lisp,v retrieving revision 1.4 diff -p -u -u -r1.4 ambler.lisp --- ./src/utilities/ambler/ambler.lisp 26 Mar 2002 19:49:59 -0000 1.4 +++ ./src/utilities/ambler/ambler.lisp 30 Jul 2006 09:25:01 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- ;;; ambler.lisp -- ;;; Simple code ambler. Purely syntactic and without `environment' Index: ./src/utilities/ambler/ambler-pkg.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/utilities/ambler/ambler-pkg.lisp,v retrieving revision 1.4 diff -p -u -u -r1.4 ambler-pkg.lisp --- ./src/utilities/ambler/ambler-pkg.lisp 23 Mar 2002 04:31:40 -0000 1.4 +++ ./src/utilities/ambler/ambler-pkg.lisp 30 Jul 2006 09:25:01 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- ;;; ambler-pkg.lisp -- ;;; Simple code ambler. Purely syntactic and without `environment' Index: ./src/utilities/ambler/ambler.system =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/utilities/ambler/ambler.system,v retrieving revision 1.1 diff -p -u -u -r1.1 ambler.system --- ./src/utilities/ambler/ambler.system 21 Feb 2002 17:03:04 -0000 1.1 +++ ./src/utilities/ambler/ambler.system 30 Jul 2006 09:25:01 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- ;;; ambler.system -- ;;; Simple code ambler. Index: ./src/utilities/save-image.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/utilities/save-image.lisp,v retrieving revision 1.1 diff -p -u -u -r1.1 save-image.lisp --- ./src/utilities/save-image.lisp 21 Feb 2002 17:01:47 -0000 1.1 +++ ./src/utilities/save-image.lisp 30 Jul 2006 09:25:02 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- ;;; save-image -- Index: ./src/utilities/user-interaction.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/utilities/user-interaction.lisp,v retrieving revision 1.3 diff -p -u -u -r1.3 user-interaction.lisp --- ./src/utilities/user-interaction.lisp 26 Nov 2002 00:09:17 -0000 1.3 +++ ./src/utilities/user-interaction.lisp 30 Jul 2006 09:25:02 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- ;;; user-interaction.lisp -- Index: ./src/utilities/y-or-n-p-wait.lisp =================================================================== RCS file: /cvsroot/clocc/clocc/src/defsystem-4/src/utilities/y-or-n-p-wait.lisp,v retrieving revision 1.2 diff -p -u -u -r1.2 y-or-n-p-wait.lisp --- ./src/utilities/y-or-n-p-wait.lisp 14 Nov 2002 15:45:54 -0000 1.2 +++ ./src/utilities/y-or-n-p-wait.lisp 30 Jul 2006 09:25:03 -0000 @@ -1,4 +1,4 @@ -;;; -*- Mode: CLtL -*- +;;; -*- Mode: lisp -*- ;;; y-or-n-p-wait --