aboutsummaryrefslogtreecommitdiff
path: root/lux-lua
diff options
context:
space:
mode:
authorEduardo Julian2022-03-30 13:12:18 -0400
committerEduardo Julian2022-03-30 13:12:18 -0400
commit1a962ee4b03f51f46a5979bfefc954f35ee3a1b7 (patch)
treeb042049a8ff6036007d57c8253ce203a1ed90744 /lux-lua
parent220c804f9136c73058802575ee49f3f769d5599f (diff)
Re-named "as_is" to "these" to avoid confusion with the new type-annotation macro names.
Diffstat (limited to '')
-rw-r--r--lux-lua/source/program.lux22
1 files changed, 11 insertions, 11 deletions
diff --git a/lux-lua/source/program.lux b/lux-lua/source/program.lux
index 46fb33033..8d572e8c2 100644
--- a/lux-lua/source/program.lux
+++ b/lux-lua/source/program.lux
@@ -68,7 +68,7 @@
[program
["/" compositor]])
-(with_expansions [<jvm> (as_is (ffi.import: java/lang/String
+(with_expansions [<jvm> (these (ffi.import: java/lang/String
"[1]::[0]")
(ffi.import: (java/lang/Class a)
@@ -491,15 +491,15 @@
{.#None}
(exception.except ..cannot_apply_a_non_function (as java/lang/Object macro)))))]
- (for @.old (as_is <jvm>)
- @.jvm (as_is <jvm>)
+ (for @.old (these <jvm>)
+ @.jvm (these <jvm>)
@.lua
(def: (expander macro inputs lux)
Expander
{try.#Success ((as Macro' macro) inputs lux)})))
-(with_expansions [<jvm> (as_is (with_expansions [$var_args (_.var "...")
+(with_expansions [<jvm> (these (with_expansions [$var_args (_.var "...")
$str_rel_to_abs (_.var "_utf8_str_rel_to_abs")
$decode (_.var "_utf8_decode")]
(template.let [(!int <hex>)
@@ -515,7 +515,7 @@
(_.bit_shr (_.int <shift>))
(_.bit_and (!int <and>))
(_.bit_or (!int <or>)))]]
- (as_is (def: rembulan//char
+ (these (def: rembulan//char
(let [$buffer (_.var "buffer")
$k (_.var "k")
$v (_.var "v")
@@ -741,9 +741,9 @@
(do try.monad
[_ (run! content)]
(run! (_.return (_.var (reference.artifact context))))))))]))))]
- (for @.old (as_is <jvm>)
- @.jvm (as_is <jvm>)
- @.lua (as_is (ffi.import: (load [ffi.String] "try" ffi.Function))
+ (for @.old (these <jvm>)
+ @.jvm (these <jvm>)
+ @.lua (these (ffi.import: (load [ffi.String] "try" ffi.Function))
(def: host
(IO (Host _.Expression _.Statement))
(io (let [run! (is (-> _.Statement (Try Any))
@@ -782,7 +782,7 @@
[_ (run! content)]
(run! (_.return (_.var (reference.artifact context))))))))))))))
-(with_expansions [<jvm> (as_is (def: (to_host it)
+(with_expansions [<jvm> (these (def: (to_host it)
(-> Any java/lang/Object)
(`` (<| (~~ (template [<jvm> <lua>]
[(case (ffi.check <jvm> (as java/lang/Object it))
@@ -827,8 +827,8 @@
maybe.trusted
(as java/lang/Object)
..read)))))]
- (for @.old (as_is <jvm>)
- @.jvm (as_is <jvm>)
+ (for @.old (these <jvm>)
+ @.jvm (these <jvm>)
@.lua
(def: (extender phase_wrapper handler)