Ignore:
Timestamp:
10/14/03 16:04:29 (19 years ago)
Author:
piso
Message:

(in-package "SYSTEM")

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/j/src/org/armedbear/lisp/assoc.lisp

    r2279 r4371  
    22;;;
    33;;; Copyright (C) 2003 Peter Graves
    4 ;;; $Id: assoc.lisp,v 1.3 2003-06-11 00:33:17 piso Exp $
     4;;; $Id: assoc.lisp,v 1.4 2003-10-14 16:04:29 piso Exp $
    55;;;
    66;;; This program is free software; you can redistribute it and/or
     
    1818;;; Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
    1919
    20 (in-package "COMMON-LISP")
     20;;; From CMUCL.
    2121
    22 (export '(assoc assoc-if assoc-if-not
    23           rassoc rassoc-if rassoc-if-not))
    24 
    25 ;;; From CMUCL.
     22(in-package "SYSTEM")
    2623
    2724(defmacro assoc-guts (test-guy)
Note: See TracChangeset for help on using the changeset viewer.