aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/language/compiler/default
diff options
context:
space:
mode:
authorEduardo Julian2018-07-11 20:20:24 -0400
committerEduardo Julian2018-07-11 20:20:24 -0400
commitf861af6c6bd57677ba4af2ee3275c69b11f68beb (patch)
tree2262674a11d1507fe2f8eeb3bbc4a42b178a3e0f /stdlib/source/lux/language/compiler/default
parent86238e5f3753cd6e751f1fa73367530a54c49577 (diff)
- Re-named "lux/macro/poly.this" to "exactly" and "lux/macro/poly.like" to "similar".
Diffstat (limited to 'stdlib/source/lux/language/compiler/default')
-rw-r--r--stdlib/source/lux/language/compiler/default/repl/type.lux10
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/lux/language/compiler/default/repl/type.lux b/stdlib/source/lux/language/compiler/default/repl/type.lux
index a9342ab6a..84f063e0c 100644
--- a/stdlib/source/lux/language/compiler/default/repl/type.lux
+++ b/stdlib/source/lux/language/compiler/default/repl/type.lux
@@ -32,12 +32,12 @@
(Poly Representation)
(`` ($_ p.either
(do p.Monad<Parser>
- [_ (poly.this Any)]
+ [_ (poly.exactly Any)]
(wrap (function.constant "[]")))
(~~ (do-template [<type> <formatter>]
[(do p.Monad<Parser>
- [_ (poly.like <type>)]
+ [_ (poly.similar <type>)]
(wrap (|>> (:coerce <type>) <formatter>)))]
[Bool %b]
@@ -52,7 +52,7 @@
(`` ($_ p.either
(~~ (do-template [<type> <formatter>]
[(do p.Monad<Parser>
- [_ (poly.like <type>)]
+ [_ (poly.similar <type>)]
(wrap (|>> (:coerce <type>) <formatter>)))]
[Type %type]
@@ -64,12 +64,12 @@
[XML %xml]))
(do p.Monad<Parser>
- [[_ elemT] (poly.apply (p.seq (poly.this List) poly.any))
+ [[_ elemT] (poly.apply (p.seq (poly.exactly List) poly.any))
elemR (poly.local (list elemT) representation)]
(wrap (|>> (:coerce (List Any)) (%list elemR))))
(do p.Monad<Parser>
- [[_ elemT] (poly.apply (p.seq (poly.this Maybe) poly.any))
+ [[_ elemT] (poly.apply (p.seq (poly.exactly Maybe) poly.any))
elemR (poly.local (list elemT) representation)]
(wrap (|>> (:coerce (Maybe Any))
(case> #.None