aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/debug.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/lux/debug.lux')
-rw-r--r--stdlib/source/lux/debug.lux26
1 files changed, 13 insertions, 13 deletions
diff --git a/stdlib/source/lux/debug.lux b/stdlib/source/lux/debug.lux
index d5bbd3be2..a076942bc 100644
--- a/stdlib/source/lux/debug.lux
+++ b/stdlib/source/lux/debug.lux
@@ -2,7 +2,7 @@
[lux (#- type)
["@" target]
["." type]
- ["." host (#+ import:)]
+ ["." ffi (#+ import:)]
[abstract
[monad (#+ do)]]
[control
@@ -66,23 +66,23 @@
@.js
(as_is (import: JSON
- (#static stringify [.Any] host.String))
+ (#static stringify [.Any] ffi.String))
(import: Array
- (#static isArray [.Any] host.Boolean)))
+ (#static isArray [.Any] ffi.Boolean)))
@.python
(as_is (type: PyType
(primitive "python_type"))
(import: (type [.Any] PyType))
- (import: (str [.Any] host.String)))
+ (import: (str [.Any] ffi.String)))
@.lua
- (as_is (import: (type [.Any] host.String))
- (import: (tostring [.Any] host.String))
+ (as_is (import: (type [.Any] ffi.String))
+ (import: (tostring [.Any] ffi.String))
(import: math
- (#static type [.Any] #? host.String)))
+ (#static type [.Any] #? ffi.String)))
@.ruby
(as_is (import: Class)
@@ -91,8 +91,8 @@
(type [] Class)))
@.php
- (as_is (import: (gettype [.Any] host.String))
- (import: (strval [.Any] host.String)))
+ (as_is (import: (gettype [.Any] ffi.String))
+ (import: (strval [.Any] ffi.String)))
@.scheme
(as_is (import: (boolean? [.Any] Bit))
@@ -120,7 +120,7 @@
Inspector
(with_expansions [<jvm> (let [object (:coerce java/lang/Object value)]
(`` (<| (~~ (template [<class> <processing>]
- [(case (host.check <class> object)
+ [(case (ffi.check <class> object)
(#.Some value)
(`` (|> value (~~ (template.splice <processing>))))
#.None)]
@@ -130,12 +130,12 @@
[java/lang/Long [(:coerce .Int) %.int]]
[java/lang/Number [java/lang/Number::doubleValue %.frac]]
))
- (case (host.check [java/lang/Object] object)
+ (case (ffi.check [java/lang/Object] object)
(#.Some value)
(let [value (:coerce (array.Array java/lang/Object) value)]
(case (array.read 0 value)
(^multi (#.Some tag)
- [(host.check java/lang/Integer tag)
+ [(ffi.check java/lang/Integer tag)
(#.Some tag)]
[[(array.read 1 value)
(array.read 2 value)]
@@ -157,7 +157,7 @@
@.jvm <jvm>
@.js
- (case (host.type_of value)
+ (case (ffi.type_of value)
(^template [<type_of> <then>]
[<type_of>
(`` (|> value (~~ (template.splice <then>))))])