Changeset 4273

Timestamp:

10/10/03 01:54:26 (20 years ago)

Author:

piso

Message:

maptree => sys::maptree

File:

• trunk/j/src/org/armedbear/lisp/backquote.lisp (modified) (2 diffs)

trunk/j/src/org/armedbear/lisp/backquote.lisp

@@ -2 +2 @@
 ;;;
 ;;; Copyright (C) 2003 Peter Graves
-;;; $Id: backquote.lisp,v 1.4 2003-08-24 19:18:25 piso Exp $
+;;; $Id: backquote.lisp,v 1.5 2003-10-10 01:54:26 piso Exp $
 ;;;
 ;;; This program is free software; you can redistribute it and/or
@@ -93 +93 @@
               (consp (cddr x))
               (null (cdddr x)))
-         (cons 'cons (maptree #'bq-remove-tokens (cdr x))))
-        (t (maptree #'bq-remove-tokens x))))
+         (cons 'cons (sys::maptree #'bq-remove-tokens (cdr x))))
+        (t (sys::maptree #'bq-remove-tokens x))))