Commit 4293ec7b authored by Peter Van Eynde's avatar Peter Van Eynde
Browse files

Fix the loop contruct. This makes ecl fail. (Closes: #545768)

parent f0a6b20f
......@@ -1374,9 +1374,8 @@ Returns the new tree (which probably shares structure with the old one)"
(loop for name in +asdf-methods+ do
(let ((keyword (intern (symbol-name name) :keyword)))
(loop for data = rest then (cddr data)
while data
for key = (first data)
for value = (second data)
for key = (and data (first data))
for value = (and data (second data))
when (eq key keyword) do
(destructuring-bind (op qual (o c) &body body) value
cl-asdf (1:20090819-2) unstable; urgency=low
* Fix the loop contruct. This makes ecl fail. (Closes: #545768)
-- Peter Van Eynde <> Thu, 10 Sep 2009 14:20:11 +0100
cl-asdf (1:20090819-1) unstable; urgency=low
* New upstream, New homepage and new upstream repository.
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment