diff options
Diffstat (limited to 'stdlib/source/library/lux/meta/compiler/language/lux/phase/synthesis/loop.lux')
-rw-r--r-- | stdlib/source/library/lux/meta/compiler/language/lux/phase/synthesis/loop.lux | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/library/lux/meta/compiler/language/lux/phase/synthesis/loop.lux b/stdlib/source/library/lux/meta/compiler/language/lux/phase/synthesis/loop.lux index 27ce06b25..43c75fc6a 100644 --- a/stdlib/source/library/lux/meta/compiler/language/lux/phase/synthesis/loop.lux +++ b/stdlib/source/library/lux/meta/compiler/language/lux/phase/synthesis/loop.lux @@ -138,11 +138,11 @@ that (again return? that)] (in (/.branch/exec @ [this that]))) - (/.branch/let @ [input register body]) + (/.branch/let @ [[register input] body]) (do maybe.monad [input' (again false input) body' (again return? body)] - (in (/.branch/let @ [input' (register_optimization offset register) body']))) + (in (/.branch/let @ [[(register_optimization offset register) input'] body']))) (/.branch/if @ [input then else]) (do maybe.monad |