diff options
Diffstat (limited to 'stdlib/source/lux/host.old.lux')
-rw-r--r-- | stdlib/source/lux/host.old.lux | 7 |
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)) |