diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/library/lux/static.lux | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/stdlib/source/library/lux/static.lux b/stdlib/source/library/lux/static.lux index 5f4560e52..375664915 100644 --- a/stdlib/source/library/lux/static.lux +++ b/stdlib/source/library/lux/static.lux @@ -44,7 +44,7 @@ expression <code>.any]) (do meta.monad [pair (meta.eval (.type_literal <type>) - (` [(~ format) (~ expression)])) + (` [(, format) (, expression)])) .let [[format expression] (as <type> pair)]] (in (list (format expression))))))) @@ -56,7 +56,7 @@ expression <code>.any]) (do meta.monad [pair (meta.eval (.type_literal <type>) - (` [(~ format) (~ expression)])) + (` [(, format) (, expression)])) .let [[format expression] (as <type> pair)]] (in (list#each format expression)))))) @@ -88,7 +88,7 @@ random <code>.any]) (do meta.monad [pair (meta.eval (type_literal <type>) - (` [(~ format) (~ random)])) + (` [(, format) (, random)])) .let [[format random] (as <type> pair)] seed meta.seed .let [[_ result] (random.result (random.pcg_32 [..pcg_32_magic_inc seed]) @@ -103,7 +103,7 @@ random <code>.any]) (do meta.monad [pair (meta.eval (type_literal <type>) - (` [(~ format) (~ random)])) + (` [(, format) (, random)])) .let [[format random] (as <type> pair)] seed meta.seed .let [[_ result] (random.result (random.pcg_32 [..pcg_32_magic_inc seed]) @@ -124,9 +124,9 @@ (syntax (_ [test,then/* (<>.some (<>.and <code>.any <code>.any)) else <code>.any]) (in (list (list#mix (function (_ [test then] else) - (` (..if (~ test) - (~ then) - (~ else)))) + (` (..if (, test) + (, then) + (, else)))) else (list.reversed test,then/*)))))) |