diff options
Diffstat (limited to 'Lisp')
| -rw-r--r-- | Lisp/clozure-compat.lisp | 25 | ||||
| -rw-r--r-- | Lisp/defpackage.lisp | 4 |
2 files changed, 2 insertions, 27 deletions
diff --git a/Lisp/clozure-compat.lisp b/Lisp/clozure-compat.lisp deleted file mode 100644 index 8d6e2ea..0000000 --- a/Lisp/clozure-compat.lisp +++ /dev/null @@ -1,25 +0,0 @@ -;;;; Objective-CL, an Objective-C bridge for Common Lisp. -;;;; Copyright (C) 2007 Matthias Andreas Benkard. -;;;; -;;;; This program is free software: you can redistribute it and/or -;;;; modify it under the terms of the GNU Lesser 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 -;;;; Lesser General Public License for more details. -;;;; -;;;; You should have received a copy of the GNU Lesser General Public -;;;; License along with this program. If not, see -;;;; <http://www.gnu.org/licenses/>. - - -(let* ((package (find-package '#:objective-c-classes)) - (new-name '#:ns) - (new-nicknames (remove new-name - (remove-duplicates - (cons (package-name package) - (package-nicknames package)))))) - (rename-package package new-name new-nicknames)) diff --git a/Lisp/defpackage.lisp b/Lisp/defpackage.lisp index 9151bba..6b5f8eb 100644 --- a/Lisp/defpackage.lisp +++ b/Lisp/defpackage.lisp @@ -68,8 +68,8 @@ #:next-runtime)) -(defpackage #:objcl-ns - (:nicknames #:objective-c-classes #:objc-classes) +(defpackage #:ns + (:nicknames #:objcl-ns #:objective-c-classes #:objc-classes) (:use)) |