From d962ca400be636af017ac3f043e686751cd0f1b8 Mon Sep 17 00:00:00 2001 From: =?utf8?q?David=20V=C3=A1zquez?= Date: Thu, 23 May 2013 00:36:19 +0100 Subject: [PATCH] Fix comment --- experimental/compiler.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/experimental/compiler.lisp b/experimental/compiler.lisp index 03b7499..1b296f0 100644 --- a/experimental/compiler.lisp +++ b/experimental/compiler.lisp @@ -813,7 +813,7 @@ `(do-blocks% (,block ,component nil ,ends ,result) ,@body)) -;;; Iterate across blocks in COMPONENT in reverse post order. +;;; Iterate across blocks in COMPONENT in post order. (defmacro do-blocks-backward ((block component &optional ends result) &body body) `(do-blocks% (,block (reverse ,component) t ,ends ,result) ,@body)) -- 1.7.10.4