From 3e8b3c556d559ce29afbd2f4e6260091da6b8daa Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Tue, 9 Feb 2021 20:18:46 -0800 Subject: compiler: rename variable in optimizer code. * share/txr/stdlib/optimize.tl (basic-blocks peephole): Rename jlabel3 variable to jlabel2, so it is in sequence after jlabel0 and jlabel1. --- share/txr/stdlib/optimize.tl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/share/txr/stdlib/optimize.tl b/share/txr/stdlib/optimize.tl index c06c5d22..0875231c 100644 --- a/share/txr/stdlib/optimize.tl +++ b/share/txr/stdlib/optimize.tl @@ -84,9 +84,9 @@ (jmp @(with @jlabel1 @(hash (@jlabel1 (@jlabel1 (if @reg @nil) - (jmp @jlabel3) . @nil))) + (jmp @jlabel2) . @nil))) bb.hash)) . @rest) - ^(,(car insns) (jmp ,jlabel3) ,*rest)) + ^(,(car insns) (jmp ,jlabel2) ,*rest)) (((if @reg @jlabel) . @rest) (let ((jinsns [bb.hash jlabel])) (match-case jinsns -- cgit v1.2.3