X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=lists.lisp;h=5cd193cefe96910174ef1c9a9a5039c0b1c9b7b5;hb=2f5755be1ecd77d0fac647b609402ae4da99c751;hp=b51c41a5072c396e1bf0a3f7ead8d292d14226be;hpb=03712fbb06acbb103602bae10f41aeae7fa05127;p=kmrcl.git

diff --git a/lists.lisp b/lists.lisp
index b51c41a..5cd193c 100644
--- a/lists.lisp
+++ b/lists.lisp
@@ -81,6 +81,8 @@
 
 ;;; Keyword functions
 
+;; ECL doesn't allow FOR clauses after UNTIL.
+#-ecl
 (defun remove-keyword (key arglist)
   (loop for sublist = arglist then rest until (null sublist)
         for (elt arg . rest) = sublist