From c2b3237bea99b43d0a68d4117d42ca0bfb7ef81e Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Wed, 28 Mar 2018 06:32:06 -0700 Subject: compiler: if: remove spurious instruction. * share/txr/stdlib/compiler.tl (compiler comp-if): Remove a trailing maybe-mov from the instruction template that serves no purpose and can potentially generate an instruction. --- share/txr/stdlib/compiler.tl | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/share/txr/stdlib/compiler.tl b/share/txr/stdlib/compiler.tl index 6f0211ad..1e089402 100644 --- a/share/txr/stdlib/compiler.tl +++ b/share/txr/stdlib/compiler.tl @@ -380,8 +380,7 @@ ,lelse ,*el-frag.code ,*(maybe-mov oreg el-frag.oreg) - ,lskip - ,*(maybe-mov te-oreg te-frag.oreg)) + ,lskip) (uni te-frag.fvars (uni th-frag.fvars el-frag.fvars)) (uni te-frag.ffuns (uni th-frag.ffuns el-frag.ffuns)))))))) ((op test then) -- cgit v1.2.3