From c5c8ff2ce2fcdc1c7e70983b18dd4abaab8e8b35 Mon Sep 17 00:00:00 2001 From: ram <ram> Date: Mon, 3 Sep 1990 12:57:17 +0000 Subject: [PATCH] Fixed typo in MERGE-ALIAS-CONFLICTS where I was using the initial value rather than the loop variable in the body of the loop changing the conflict TN for leftover conflicts. --- compiler/life.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/compiler/life.lisp b/compiler/life.lisp index ff3413990..97c838099 100644 --- a/compiler/life.lisp +++ b/compiler/life.lisp @@ -950,7 +950,7 @@ (setf (tn-global-conflicts original) conf)) (do ((current conf (global-conflicts-tn-next current))) ((null current)) - (change-global-conflicts-tn conf original)) + (change-global-conflicts-tn current original)) (return)) (unless conf (return)))) -- GitLab