aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/target/jvm/type/parser.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/library/lux/target/jvm/type/parser.lux')
-rw-r--r--stdlib/source/library/lux/target/jvm/type/parser.lux10
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/library/lux/target/jvm/type/parser.lux b/stdlib/source/library/lux/target/jvm/type/parser.lux
index 2bbbca6ca..cf0064195 100644
--- a/stdlib/source/library/lux/target/jvm/type/parser.lux
+++ b/stdlib/source/library/lux/target/jvm/type/parser.lux
@@ -68,7 +68,7 @@
(template [<type> <name> <head> <tail> <adapter>]
[(def: .public <name>
(Parser <type>)
- (\ <>.functor map <adapter>
+ (\ <>.functor each <adapter>
(<text>.slice (<text>.and! (<text>.one_of! <head>)
(<text>.some! (<text>.one_of! <tail>))))))]
@@ -84,7 +84,7 @@
(def: .public var
(Parser (Type Var))
- (<>\map //.var ..var'))
+ (<>\each //.var ..var'))
(def: .public var?
(-> (Type Value) (Maybe Text))
@@ -104,7 +104,7 @@
[(def: <name>
(-> (Parser (Type Class)) (Parser (Type Parameter)))
(|>> (<>.after (<text>.this <prefix>))
- (<>\map <constructor>)))]
+ (<>\each <constructor>)))]
[lower //signature.lower_prefix //.lower]
[upper //signature.upper_prefix //.upper]
@@ -125,7 +125,7 @@
(def: class'
(-> (Parser (Type Parameter)) (Parser (Type Class)))
(|>> ..class''
- (\ <>.monad map (product.uncurried //.class))))
+ (\ <>.monad each (product.uncurried //.class))))
(def: .public parameter
(Parser (Type Parameter))
@@ -143,7 +143,7 @@
(def: .public array'
(-> (Parser (Type Value)) (Parser (Type Array)))
(|>> (<>.after (<text>.this //descriptor.array_prefix))
- (<>\map //.array)))
+ (<>\each //.array)))
(def: .public class
(Parser (Type Class))