diff options
author | Eduardo Julian | 2018-07-11 20:20:24 -0400 |
---|---|---|
committer | Eduardo Julian | 2018-07-11 20:20:24 -0400 |
commit | f861af6c6bd57677ba4af2ee3275c69b11f68beb (patch) | |
tree | 2262674a11d1507fe2f8eeb3bbc4a42b178a3e0f /stdlib/source/lux/language/compiler/default | |
parent | 86238e5f3753cd6e751f1fa73367530a54c49577 (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.lux | 10 |
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 |