aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/tool/compiler/phase/generation/php/loop.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/lux/tool/compiler/phase/generation/php/loop.lux')
-rw-r--r--stdlib/source/lux/tool/compiler/phase/generation/php/loop.lux4
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/lux/tool/compiler/phase/generation/php/loop.lux b/stdlib/source/lux/tool/compiler/phase/generation/php/loop.lux
index 94857fe4f..75cdedae3 100644
--- a/stdlib/source/lux/tool/compiler/phase/generation/php/loop.lux
+++ b/stdlib/source/lux/tool/compiler/phase/generation/php/loop.lux
@@ -5,7 +5,7 @@
[data
["." product]
[text
- format]
+ ["%" format (#+ format)]]
[collection
["." list ("#@." functor)]]]
[target
@@ -21,7 +21,7 @@
(def: #export (scope generate [start initsS+ bodyS])
(-> Phase (Scope Synthesis) (Operation (Expression Any)))
(do ////.monad
- [@loop (:: @ map (|>> %n (format "loop")) ///.next)
+ [@loop (:: @ map (|>> %.nat (format "loop")) ///.next)
#let [@loopG (_.global @loop)
@loopL (_.var @loop)]
initsO+ (monad.map @ generate initsS+)