aboutsummaryrefslogtreecommitdiff
path: root/src/interp/unlisp.lisp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-03-24 11:47:01 +0000
committerdos-reis <gdr@axiomatics.org>2008-03-24 11:47:01 +0000
commit55893dcd3118428f046d5f539d80e9aa5345b885 (patch)
tree05992761c4ad4d3421b7063de3357d1ced007c8a /src/interp/unlisp.lisp
parent97f54bf68c5aefffc94a4935e08fd6449ec501c9 (diff)
downloadopen-axiom-55893dcd3118428f046d5f539d80e9aa5345b885.tar.gz
Add support for SBCL and CLisp
Diffstat (limited to 'src/interp/unlisp.lisp')
-rw-r--r--src/interp/unlisp.lisp10
1 files changed, 3 insertions, 7 deletions
diff --git a/src/interp/unlisp.lisp b/src/interp/unlisp.lisp
index 146a27ce..730e4d06 100644
--- a/src/interp/unlisp.lisp
+++ b/src/interp/unlisp.lisp
@@ -1,6 +1,6 @@
-;; Copyright (c) 1991-2002, The Numerical ALgorithms Group Ltd.
+;; Copyright (c) 1991-2002, The Numerical Algorithms Group Ltd.
;; All rights reserved.
-;; Copyright (C) 2007, Gabriel Dos Reis.
+;; Copyright (C) 2007-2008, Gabriel Dos Reis.
;; All rights reserved.
;;
;; Redistribution and use in source and binary forms, with or without
@@ -15,7 +15,7 @@
;; the documentation and/or other materials provided with the
;; distribution.
;;
-;; - Neither the name of The Numerical ALgorithms Group Ltd. nor the
+;; - Neither the name of The Numerical Algorithms Group Ltd. nor the
;; names of its contributors may be used to endorse or promote products
;; derived from this software without specific prior written permission.
;;
@@ -146,7 +146,3 @@
(if pr
(remove pr l :test #'eq)
l) ))
-
-;; CCL supplies a slightly more efficient version of logs to base 10, which
-;; is useful in the WIDTH function. MCD.
-#+:KCL (defun log10 (u) (log u 10))