aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/world/environment.jvm.lux
diff options
context:
space:
mode:
authorEduardo Julian2018-08-29 22:36:47 -0400
committerEduardo Julian2018-08-29 22:36:47 -0400
commitba93f7da278a3fdc71729d7a0325c99cec74ca3c (patch)
tree84f298edb360fefb6c6b518394a4565546ef0739 /stdlib/source/lux/world/environment.jvm.lux
parentc9ff55f6c989aff28b2d687fd8aa0ef520701e2c (diff)
Adapted new-luxc to latest stdlib changes.
Diffstat (limited to '')
-rw-r--r--stdlib/source/lux/world/environment.jvm.lux14
1 files changed, 7 insertions, 7 deletions
diff --git a/stdlib/source/lux/world/environment.jvm.lux b/stdlib/source/lux/world/environment.jvm.lux
index 019dab706..2a64c31f8 100644
--- a/stdlib/source/lux/world/environment.jvm.lux
+++ b/stdlib/source/lux/world/environment.jvm.lux
@@ -30,20 +30,20 @@
(def: (consume-iterator f iterator)
(All [a b] (-> (-> a b) (Iterator a) (List b)))
- (if (Iterator::hasNext [] iterator)
- (#.Cons (f (Iterator::next [] iterator))
+ (if (Iterator::hasNext iterator)
+ (#.Cons (f (Iterator::next iterator))
(consume-iterator f iterator))
#.Nil))
(def: (entry-to-kv entry)
(All [k v] (-> (Map$Entry k v) [k v]))
- [(Map$Entry::getKey [] entry)
- (Map$Entry::getValue [] entry)])
+ [(Map$Entry::getKey entry)
+ (Map$Entry::getValue entry)])
(def: #export read
(IO Context)
- (io (|> (System::getenv [])
- (Map::entrySet [])
- (Set::iterator [])
+ (io (|> (System::getenv)
+ Map::entrySet
+ Set::iterator
(consume-iterator entry-to-kv)
(dictionary.from-list text.Hash<Text>))))