From 55893dcd3118428f046d5f539d80e9aa5345b885 Mon Sep 17 00:00:00 2001 From: dos-reis Date: Mon, 24 Mar 2008 11:47:01 +0000 Subject: Add support for SBCL and CLisp --- src/interp/unlisp.lisp | 10 +++------- 1 file changed, 3 insertions(+), 7 deletions(-) (limited to 'src/interp/unlisp.lisp') 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)) -- cgit v1.2.3