aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/spec/compositor
diff options
context:
space:
mode:
authorEduardo Julian2021-05-24 19:29:13 -0400
committerEduardo Julian2021-05-24 19:29:13 -0400
commitda27db478b368724ee4659eb674dcdbeb2cd8747 (patch)
treec1c5ef50644fa78ea899ac8c0afa1e234cd03b26 /stdlib/source/spec/compositor
parent1ffd2dd7e37d3be90522dfe768226334f60577f5 (diff)
Re-named lux/host to lux/ffi.
Diffstat (limited to 'stdlib/source/spec/compositor')
-rw-r--r--stdlib/source/spec/compositor/generation/structure.lux4
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/spec/compositor/generation/structure.lux b/stdlib/source/spec/compositor/generation/structure.lux
index a8f820786..237ff5024 100644
--- a/stdlib/source/spec/compositor/generation/structure.lux
+++ b/stdlib/source/spec/compositor/generation/structure.lux
@@ -18,7 +18,7 @@
["." list ("#\." functor)]]]
[math
["r" random]]
- ["." host (#+ import:)]
+ ["." ffi (#+ import:)]
[tool
[compiler
["." analysis]
@@ -48,7 +48,7 @@
(let [tag-out (:coerce java/lang/Integer (maybe.assume (array.read 0 valueT)))
last?-out (array.read 1 valueT)
value-out (:coerce Any (maybe.assume (array.read 2 valueT)))
- same-tag? (|> tag-out host.int-to-long (:coerce Nat) (n.= tag-in))
+ same-tag? (|> tag-out ffi.int-to-long (:coerce Nat) (n.= tag-in))
same-flag? (case last?-out
(#.Some last?-out')
(and last?-in (text\= "" (:coerce Text last?-out')))