diff options
| author | Eduardo Julian | 2021-09-07 22:50:21 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2021-09-07 22:50:21 -0400 |
| commit | 35c0807799717cd720ab28b35851c1a01a67445d (patch) | |
| tree | c6237b79fb262d24c8a46ee3ecb714df3e9874d8 /stdlib/source/library/lux/abstract/monad.lux | |
| parent | b55cefcb258f11eeee32c1478faefd1bd09ec871 (diff) | |
De-taggification | part 4
Diffstat (limited to 'stdlib/source/library/lux/abstract/monad.lux')
| -rw-r--r-- | stdlib/source/library/lux/abstract/monad.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/library/lux/abstract/monad.lux b/stdlib/source/library/lux/abstract/monad.lux index cc2aadad1..b90a93580 100644 --- a/stdlib/source/library/lux/abstract/monad.lux +++ b/stdlib/source/library/lux/abstract/monad.lux @@ -2,7 +2,7 @@ [library [lux "*" [meta - ["." location]]]] + ["[0]" location]]]] [// [functor {"+" [Functor]}]]) @@ -117,7 +117,7 @@ (All (_ ! a) (-> (Monad !) (List (! a)) (! (List a)))) - (let [(^open "!\.") monad] + (let [(^open "!\[0]") monad] (function (recur xs) (case xs #.End @@ -133,7 +133,7 @@ (All (_ M a b) (-> (Monad M) (-> a (M b)) (List a) (M (List b)))) - (let [(^open "!\.") monad] + (let [(^open "!\[0]") monad] (function (recur xs) (case xs #.End @@ -149,7 +149,7 @@ (All (_ ! a b) (-> (Monad !) (-> a (! Bit)) (List a) (! (List a)))) - (let [(^open "!\.") monad] + (let [(^open "!\[0]") monad] (function (recur xs) (case xs #.End |