Ignore:
Timestamp:
07/30/05 17:52:19 (16 years ago)
Author:
piso
Message:

Work in progress.

File:
1 edited

Legend:

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

    r9172 r9749  
    22;;;
    33;;; Copyright (C) 2003-2005 Peter Graves
    4 ;;; $Id: replace.lisp,v 1.4 2005-05-15 14:32:03 piso Exp $
     4;;; $Id: replace.lisp,v 1.5 2005-07-30 17:52:19 piso Exp $
    55;;;
    66;;; This program is free software; you can redistribute it and/or
     
    2222(in-package #:system)
    2323
    24 (eval-when (:compile-toplevel)
     24(eval-when (:compile-toplevel :load-toplevel :execute)
    2525  (defmacro seq-dispatch (sequence list-form array-form)
    2626    `(if (listp ,sequence)
Note: See TracChangeset for help on using the changeset viewer.