File tree Expand file tree Collapse file tree 2 files changed +2
-4
lines changed
Expand file tree Collapse file tree 2 files changed +2
-4
lines changed Original file line number Diff line number Diff line change 11"use strict" ;
22
3- // module Data.Foldable
4-
53exports . foldrArray = function ( f ) {
64 return function ( init ) {
75 return function ( xs ) {
Original file line number Diff line number Diff line change @@ -228,8 +228,8 @@ oneOf = foldr alt empty
228228intercalate :: forall f m . (Foldable f , Monoid m ) => m -> f m -> m
229229intercalate sep xs = (foldl go { init: true , acc: mempty } xs).acc
230230 where
231- go { init = true } x = { init: false , acc: x }
232- go { acc = acc } x = { init: false , acc: acc <> sep <> x }
231+ go { init: true } x = { init: false , acc: x }
232+ go { acc: acc } x = { init: false , acc: acc <> sep <> x }
233233
234234-- | The conjunction of all the values in a data structure. When specialized
235235-- | to `Boolean`, this function will test whether all of the values in a data
You can’t perform that action at this time.
0 commit comments