Merge pull request #3 from joneshf/master

Add `(->)` instance.
purescript-deprecated · Sep 2, 2014 · b5ebfe7 · b5ebfe7
2 parents 3ae7fd1 + 86d406c
commit b5ebfe7
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 1 deletion.
diff --git a/README.md b/README.md
@@ -10,6 +10,8 @@
 
 ### Type Class Instances
 
+    instance monoidArr :: (Monoid b) => Monoid (a -> b)
+
     instance monoidArray :: Monoid [a]
 
     instance monoidString :: Monoid String

diff --git a/src/Data/Monoid.purs b/src/Data/Monoid.purs
@@ -10,6 +10,9 @@ instance monoidString :: Monoid String where
 
 instance monoidArray :: Monoid [a] where
   mempty = []
-  
+
 instance monoidUnit :: Monoid Unit where
   mempty = unit
+
+instance monoidArr :: (Monoid b) => Monoid (a -> b) where
+  mempty = const mempty