aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/host.old.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/lux/host.old.lux7
1 files changed, 3 insertions, 4 deletions
diff --git a/stdlib/source/lux/host.old.lux b/stdlib/source/lux/host.old.lux
index 461a99a77..95e2cb1ed 100644
--- a/stdlib/source/lux/host.old.lux
+++ b/stdlib/source/lux/host.old.lux
@@ -1,5 +1,6 @@
(.module:
[lux (#- type)
+ ["." type ("#\." equivalence)]
[abstract
["." monad (#+ Monad do)]
["." enum]]
@@ -13,13 +14,11 @@
["." maybe]
["." product]
["." bit ("#\." codec)]
- number
["." text ("#\." equivalence monoid)
["%" format (#+ format)]]
[collection
["." array (#+ Array)]
["." list ("#\." monad fold monoid)]]]
- ["." type ("#\." equivalence)]
[macro
["." code]
[syntax (#+ syntax:)]]
@@ -1357,8 +1356,8 @@
(syntax: #export (do_to obj {methods (p.some partial_call^)})
{#.doc (doc "Call a variety of methods on an object. Then, return the object."
(do_to object
- (ClassName::method1 arg0 arg1 arg2)
- (ClassName::method2 arg3 arg4 arg5)))}
+ (ClassName::method1 arg0 arg1 arg2)
+ (ClassName::method2 arg3 arg4 arg5)))}
(with_gensyms [g!obj]
(wrap (list (` (let [(~ g!obj) (~ obj)]
(exec (~+ (list\map (complete_call$ g!obj) methods))