diff options
Diffstat (limited to 'lux-lua/source')
| -rw-r--r-- | lux-lua/source/program.lux | 26 |
1 files changed, 13 insertions, 13 deletions
diff --git a/lux-lua/source/program.lux b/lux-lua/source/program.lux index d41447879..b581ce7bd 100644 --- a/lux-lua/source/program.lux +++ b/lux-lua/source/program.lux @@ -333,19 +333,19 @@ (for {@.old (as_is (with_expansions [$var_args (_.var "...") $str_rel_to_abs (_.var "_utf8_str_rel_to_abs") $decode (_.var "_utf8_decode")] - (template.with [(!int <hex>) - [(_.int (.int (hex <hex>)))] - - (!&| <or> <and> <raw>) - [(|> <raw> - (_.bit_and (!int <and>)) - (_.bit_or (!int <or>)))] - - (!&|< <or> <and> <shift> <raw>) - [(|> <raw> - (_.bit_shr (_.int <shift>)) - (_.bit_and (!int <and>)) - (_.bit_or (!int <or>)))]] + (template.let [(!int <hex>) + [(_.int (.int (hex <hex>)))] + + (!&| <or> <and> <raw>) + [(|> <raw> + (_.bit_and (!int <and>)) + (_.bit_or (!int <or>)))] + + (!&|< <or> <and> <shift> <raw>) + [(|> <raw> + (_.bit_shr (_.int <shift>)) + (_.bit_and (!int <and>)) + (_.bit_or (!int <or>)))]] (as_is (def: rembulan//char (let [$buffer (_.var "buffer") $k (_.var "k") |