Changeset 4371
- Timestamp:
- 10/14/03 16:04:29 (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/j/src/org/armedbear/lisp/assoc.lisp
r2279 r4371 2 2 ;;; 3 3 ;;; Copyright (C) 2003 Peter Graves 4 ;;; $Id: assoc.lisp,v 1. 3 2003-06-11 00:33:17piso Exp $4 ;;; $Id: assoc.lisp,v 1.4 2003-10-14 16:04:29 piso Exp $ 5 5 ;;; 6 6 ;;; This program is free software; you can redistribute it and/or … … 18 18 ;;; Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. 19 19 20 (in-package "COMMON-LISP") 20 ;;; From CMUCL. 21 21 22 (export '(assoc assoc-if assoc-if-not 23 rassoc rassoc-if rassoc-if-not)) 24 25 ;;; From CMUCL. 22 (in-package "SYSTEM") 26 23 27 24 (defmacro assoc-guts (test-guy)
Note: See TracChangeset
for help on using the changeset viewer.