diff options
| author | Eduardo Julian | 2019-03-15 00:23:49 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2019-03-15 00:23:49 -0400 |
| commit | f9d4d316ef9666f6b122b0eec8180351216e95f8 (patch) | |
| tree | 2a66da0c7552dcb3642ba37afd53f1bef44eef41 /stdlib/source/lux/control/comonad.lux | |
| parent | 9449d89f611ba3192373fdeb6848d02707ff1292 (diff) | |
Changed the convention for the structure opening separator from "/" to ";", to avoid confusion since "/" is used for relative module paths.
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/lux/control/comonad.lux | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/lux/control/comonad.lux b/stdlib/source/lux/control/comonad.lux index 10171d0ae..1d6ac49e5 100644 --- a/stdlib/source/lux/control/comonad.lux +++ b/stdlib/source/lux/control/comonad.lux @@ -2,7 +2,7 @@ [lux #* [data [collection - ["." list ("#/." fold)]]]] + ["." list ("#;." fold)]]]] [// ["." functor (#+ Functor)]]) @@ -36,7 +36,7 @@ (let [g!_ (: Code [_cursor (#.Identifier ["" " _ "])]) g!map (: Code [_cursor (#.Identifier ["" " map "])]) g!split (: Code [_cursor (#.Identifier ["" " split "])]) - body' (list/fold (: (-> [Code Code] Code Code) + body' (list;fold (: (-> [Code Code] Code Code) (function (_ binding body') (let [[var value] binding] (case var |