We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent f738832 commit 0829b1eCopy full SHA for 0829b1e
src/Data/Foreign/Class.purs
@@ -57,7 +57,7 @@ instance intIsForeign :: IsForeign Int where
57
read = readInt
58
59
instance arrayIsForeign :: IsForeign a => IsForeign (Array a) where
60
- read value = readArray value >>= readElements
+ read = readArray >=> readElements
61
where
62
readElements :: Array Foreign -> F (Array a)
63
readElements arr = sequence (zipWith readElement (range zero (length arr)) arr)
0 commit comments