Commit 69ebc8ba authored by Pascal J. Bourguignon's avatar Pascal J. Bourguignon

Deleted trailing whitespaces.

parent b52746a5
......@@ -12,10 +12,10 @@
# $(PREFIX) where the non-lisp stuff will be installed
# such as in $(PREFIX)/bin/, $(PREFIX)/lib/.
#
#
#
# It will be created a subdirectory in this
# $(PREFIX) named after the library:
#
#
#
#AUTHORS
# <PJB> Pascal J. Bourguignon
......@@ -23,19 +23,19 @@
# 2001-06-19 <PJB> Reorganized and simplified.
#LEGAL
# AGPL3
#
#
# Copyright Pascal J. Bourguignon 2012 - 2016
#
#
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU Affero General Public License as published by
# the Free Software Foundation, either version 3 of the License, or
# (at your option) any later version.
#
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU Affero General Public License for more details.
#
#
# You should have received a copy of the GNU Affero General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>
#******************************************************************************
......@@ -49,7 +49,7 @@ help::
@printf $(HELP_FMT) 'all' 'Compile with all the available compilers.'
# Let's compile with all the available compilers ( $(GCL) not yet ).
# all:: $(ABCL) $(ALLEGRO) $(CCL) $(CLISP) $(ECL) $(SBCL) $(CMUCL) $(OPENMCL)
all:: compile-with-$(CLISP) compile-with-$(ECL) compile-with-$(SBCL) compile-with-$(OPENMCL)
all:: compile-with-$(CLISP) compile-with-$(ECL) compile-with-$(SBCL) compile-with-$(OPENMCL)
# compile-with-$(CMUCL) breaks on decode-raw-cardinal in bencode...
# compile-with-$(ALLEGRO) fails on posix-regexp out of memory...
# compile-with-$(ABCL) chokes on unicode!
......@@ -120,7 +120,7 @@ help::
systems system system.asd summaries summary summary.html:
@echo not implemented yet
@false
.PHONY::systems system summaries summary
.PHONY::systems system summaries summary
help::
......@@ -160,7 +160,7 @@ html:: README.html
.PHONY::doc documentation readme doc-upload lispdoc html
$(WEBDOCDIR)/develop/lisp/doc:
$(MAKE) $(MFLAGS) -C lispdoc
$(MAKE) $(MFLAGS) -C lispdoc
upload:
$(MAKE) $(MFLAGS) -C $(WEBDOCDIR) update upload
......@@ -186,14 +186,14 @@ help::
@printf $(HELP_FMT) 'quicklisp-tag' 'Update the quicklisp tag on the remote repositories.'
# quicklisp-tag: quicklisp-tag-remove quicklisp-tag-add
#
#
# quicklisp-tag-remove:
# git tag -d quicklisp
# git push origin :refs/tags/quicklisp
# git push github :refs/tags/quicklisp
# git push gitlab :refs/tags/quicklisp
# git push framasoft :refs/tags/quicklisp
#
#
# quicklisp-tag-add:
# git tag -f -s quicklisp -m 'current version for quicklisp'
# git push --tags framasoft
......
......@@ -71,7 +71,7 @@ Repository
These libraries can be obtained from the `git` repository at
https://gitlab.com/com-informatimago/com-informatimago/ ::
git clone https://gitlab.com/com-informatimago/com-informatimago.git informatimago
They're also available thru `quicklisp <http://quicklisp.org/>`_: ::
......@@ -86,7 +86,7 @@ They're also available thru `quicklisp <http://quicklisp.org/>`_: ::
(ql:quickload :com.informatimago)
Documentation
============================================================
......@@ -110,7 +110,7 @@ All this code is authored by Pascal J. Bourguignon, apart from:
- the system `com.informatimago.lisp-reader.package` which is authored
by Zach Beane and modified by Pascal J. Bourguignon.
- the system `com.informatimago.lispdoc` which is authored by Sven Van
Caekenberghe and modified by Pascal J. Bourguignon.
......
......@@ -43,7 +43,7 @@ package bar leaving them parentless?
A parent-children relationship would be a run-time entity, while
refering to another package using a relative *name* would be a
read-time operation. Do we need the former?
read-time operation. Do we need the former?
......@@ -101,7 +101,7 @@ Note: funny thing, `ccl` ignores ``*print-case*`` and escapes the
dots in package names when there's a reader macro on ``#\.``.
::
cl-user> (ql:quickload :com.informatimago.common-lisp.lisp.relative-package)
To load "com.informatimago.common-lisp.lisp.relative-package":
Load 1 ASDF system:
......@@ -131,7 +131,7 @@ dots in package names when there's a reader macro on ``#\.``.
31
relative-package> (in-package :cl-user)
#<Package "COMMON-LISP-USER">
cl-user>
cl-user>
.. comment: THE END
......
#!/bin/bash
LC_CTYPE=en_US.UTF-8 ccl --quiet --no-init --eval '(DECLAIM (OPTIMIZE (SAFETY 3) (DEBUG 3) (SPEED 0) (SPACE 0)))' --eval '(load "compile.lisp")' --eval '(ccl:quit)'
LC_CTYPE=en_US.UTF-8 ccl --quiet --no-init --eval '(DECLAIM (OPTIMIZE (SAFETY 3) (DEBUG 3) (SPEED 0) (SPACE 0)))' --eval '(load "compile.lisp")' --eval '(ccl:quit)'
......@@ -5,9 +5,9 @@
;;;;SYSTEM: Common-Lisp
;;;;USER-INTERFACE: NONE
;;;;DESCRIPTION
;;;;
;;;;
;;;; Loads ASDF.
;;;;
;;;;
;;;;AUTHORS
;;;; <PJB> Pascal J. Bourguignon <pjb@informatimago.com>
;;;;MODIFICATIONS
......@@ -17,19 +17,19 @@
;;;;BUGS
;;;;LEGAL
;;;; AGPL3
;;;;
;;;;
;;;; Copyright Pascal J. Bourguignon 2003 - 2016
;;;;
;;;;
;;;; This program is free software: you can redistribute it and/or modify
;;;; it under the terms of the GNU Affero General Public License as published by
;;;; the Free Software Foundation, either version 3 of the License, or
;;;; (at your option) any later version.
;;;;
;;;;
;;;; This program is distributed in the hope that it will be useful,
;;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;;; GNU Affero General Public License for more details.
;;;;
;;;;
;;;; You should have received a copy of the GNU Affero General Public License
;;;; along with this program. If not, see <http://www.gnu.org/licenses/>
;;;;****************************************************************************
......@@ -54,11 +54,11 @@
(when *load-verbose*
(format *trace-output* "~&;; Scanning ASDF packages...~%"))
(prog1
(sort
(delete-duplicates
(sort
(delete-duplicates
(mapcar
(lambda (p) (make-pathname :name nil :type nil :version nil :defaults p))
(directory "PACKAGES:**;*.ASD"))
(directory "PACKAGES:**;*.ASD"))
:test (function equal))
(lambda (a b) (if (= (length a) (length b))
(string< a b)
......
......@@ -5,9 +5,9 @@
;;;;SYSTEM: Common-Lisp
;;;;USER-INTERFACE: NONE
;;;;DESCRIPTION
;;;;
;;;;
;;;; Loads CCLAN.
;;;;
;;;;
;;;;AUTHORS
;;;; <PJB> Pascal J. Bourguignon <pjb@informatimago.com>
;;;;MODIFICATIONS
......@@ -15,19 +15,19 @@
;;;;BUGS
;;;;LEGAL
;;;; AGPL3
;;;;
;;;;
;;;; Copyright Pascal J. Bourguignon 2003 - 2016
;;;;
;;;;
;;;; This program is free software: you can redistribute it and/or modify
;;;; it under the terms of the GNU Affero General Public License as published by
;;;; the Free Software Foundation, either version 3 of the License, or
;;;; (at your option) any later version.
;;;;
;;;;
;;;; This program is distributed in the hope that it will be useful,
;;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;;; GNU Affero General Public License for more details.
;;;;
;;;;
;;;; You should have received a copy of the GNU Affero General Public License
;;;; along with this program. If not, see <http://www.gnu.org/licenses/>
;;;;****************************************************************************
......@@ -37,7 +37,7 @@
(load "CCLAN:ASDF;ASDF.LISP")
(load "CCLAN:CCLAN-GET;PACKAGE.LISP")
(load "CCLAN:CCLAN-GET;CCLAN-GET.ASD")
(asdf:operate 'asdf:load-op :cclan-get)
(asdf:operate 'asdf:load-op :cclan-get)
(setf cclan-get::*cclan-tarball-directory* "SHARE-LISP:CCLAN;TARBALL;"
cclan-get::*cclan-source-directory* "SHARE-LISP:CCLAN;SOURCE;"
cclan-get::*cclan-asdf-registry* "SHARE-LISP:CCLAN;REGISTRY;")
......
......@@ -5,9 +5,9 @@
;;;;SYSTEM: Common-Lisp
;;;;USER-INTERFACE: NONE
;;;;DESCRIPTION
;;;;
;;;;
;;;; Loads com.fractalconcept.cl-pdf
;;;;
;;;;
;;;;AUTHORS
;;;; <PJB> Pascal J. Bourguignon <pjb@informatimago.com>
;;;;MODIFICATIONS
......@@ -15,19 +15,19 @@
;;;;BUGS
;;;;LEGAL
;;;; AGPL3
;;;;
;;;;
;;;; Copyright Pascal J. Bourguignon 2004 - 2016
;;;;
;;;;
;;;; This program is free software: you can redistribute it and/or modify
;;;; it under the terms of the GNU Affero General Public License as published by
;;;; the Free Software Foundation, either version 3 of the License, or
;;;; (at your option) any later version.
;;;;
;;;;
;;;; This program is distributed in the hope that it will be useful,
;;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;;; GNU Affero General Public License for more details.
;;;;
;;;;
;;;; You should have received a copy of the GNU Affero General Public License
;;;; along with this program. If not, see <http://www.gnu.org/licenses/>
;;;;****************************************************************************
......
......@@ -5,9 +5,9 @@
;;;;SYSTEM: Common-Lisp
;;;;USER-INTERFACE: NONE
;;;;DESCRIPTION
;;;;
;;;;
;;;; Loads cliki under sbcl.
;;;;
;;;;
;;;;AUTHORS
;;;; <PJB> Pascal J. Bourguignon <pjb@informatimago.com>
;;;;MODIFICATIONS
......@@ -15,19 +15,19 @@
;;;;BUGS
;;;;LEGAL
;;;; AGPL3
;;;;
;;;;
;;;; Copyright Pascal J. Bourguignon 2004 - 2016
;;;;
;;;;
;;;; This program is free software: you can redistribute it and/or modify
;;;; it under the terms of the GNU Affero General Public License as published by
;;;; the Free Software Foundation, either version 3 of the License, or
;;;; (at your option) any later version.
;;;;
;;;;
;;;; This program is distributed in the hope that it will be useful,
;;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;;; GNU Affero General Public License for more details.
;;;;
;;;;
;;;; You should have received a copy of the GNU Affero General Public License
;;;; along with this program. If not, see <http://www.gnu.org/licenses/>
;;;;****************************************************************************
......
......@@ -54,7 +54,7 @@
#+vms ".fas"
#+lucid ".sbin")
(defvar *f2cl_dir* "CLOCC:CLOCC;SRC;F2CL;SRC;")
(defun load-f2cl-module (x)
(defun load-f2cl-module (x)
(load (concatenate 'string *f2cl_dir* x *ext*) :print nil :verbose nil)) ;;LOAD-F2CL-MODULE
(defun load-f2cl ()
(load-f2cl-module "f2cl0" )
......
......@@ -97,14 +97,14 @@
;; |(load "/etc/sbclrc")
;; |
;; |(format t "Hello Peter!~%")
;; |
;; |
;; |(common-lisp-controller:add-project-directory
;; | #p"/home/pvaneynd/common-lisp/src/"
;; | #p"/home/pvaneynd/common-lisp/fasl-sbcl/"
;; | '("CLX")
;; | "/home/pvaneynd/common-lisp/systems/")
;; then you can do:
;; then you can do:
;; * (require :db-sockets)
;; * (pushnew :db-sockets *features*)
......
......@@ -5,9 +5,9 @@
;;;;SYSTEM: Common-Lisp
;;;;USER-INTERFACE: NONE
;;;;DESCRIPTION
;;;;
;;;;
;;;; Loader for garnet.
;;;;
;;;;
;;;;AUTHORS
;;;; <PJB> Pascal J. Bourguignon <pjb@informatimago.com>
;;;;MODIFICATIONS
......@@ -15,19 +15,19 @@
;;;;BUGS
;;;;LEGAL
;;;; AGPL3
;;;;
;;;;
;;;; Copyright Pascal J. Bourguignon 2004 - 2016
;;;;
;;;;
;;;; This program is free software: you can redistribute it and/or modify
;;;; it under the terms of the GNU Affero General Public License as published by
;;;; the Free Software Foundation, either version 3 of the License, or
;;;; (at your option) any later version.
;;;;
;;;;
;;;; This program is distributed in the hope that it will be useful,
;;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;;; GNU Affero General Public License for more details.
;;;;
;;;;
;;;; You should have received a copy of the GNU Affero General Public License
;;;; along with this program. If not, see <http://www.gnu.org/licenses/>
;;;;****************************************************************************
......
......@@ -5,9 +5,9 @@
;;;;SYSTEM: Common-Lisp
;;;;USER-INTERFACE: NONE
;;;;DESCRIPTION
;;;;
;;;;
;;;; Loads Portable Hemlock.
;;;;
;;;;
;;;;AUTHORS
;;;; <PJB> Pascal J. Bourguignon <pjb@informatimago.com>
;;;;MODIFICATIONS
......@@ -15,19 +15,19 @@
;;;;BUGS
;;;;LEGAL
;;;; AGPL3
;;;;
;;;;
;;;; Copyright Pascal J. Bourguignon 2004 - 2016
;;;;
;;;;
;;;; This program is free software: you can redistribute it and/or modify
;;;; it under the terms of the GNU Affero General Public License as published by
;;;; the Free Software Foundation, either version 3 of the License, or
;;;; (at your option) any later version.
;;;;
;;;;
;;;; This program is distributed in the hope that it will be useful,
;;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;;; GNU Affero General Public License for more details.
;;;;
;;;;
;;;; You should have received a copy of the GNU Affero General Public License
;;;; along with this program. If not, see <http://www.gnu.org/licenses/>
;;;;****************************************************************************
......
......@@ -17,7 +17,7 @@
commands
comdefs
driver))
(load (merge-pathnames (make-pathname :name (string file)
(load (merge-pathnames (make-pathname :name (string file)
:version :newest)
"PACKAGES:NET;COMMON-LISP;LMUD;LMUD;")))
......
......@@ -5,10 +5,10 @@
;;;;SYSTEM: clisp
;;;;USER-INTERFACE: clisp
;;;;DESCRIPTION
;;;;