Merge pull request #12 from hdgarrood/revert-11-revert-10-bind

paf31 · paf31 · commit 1dcdd5c38672 · 2015-05-01T14:11:51.000-07:00
Revert "Revert "Relax constraint on (&gt;&gt;=)""
diff --git a/src/Prelude.purs b/src/Prelude.purs
@@ -349,7 +349,7 @@ foreign import arrayBind
   }
   """ :: forall a b. Array a -> (a -> Array b) -> Array b
 
-(>>=) :: forall m a b. (Monad m) => m a -> (a -> m b) -> m b
+(>>=) :: forall m a b. (Bind m) => m a -> (a -> m b) -> m b
 (>>=) = bind
 
 -- | The `Monad` type class combines the operations of the `Bind` and

Original file line number	Diff line number	Diff line change
`@@ -349,7 +349,7 @@ foreign import arrayBind`
`349`	`349`	`}`
`350`	`350`	`""" :: forall a b. Array a -> (a -> Array b) -> Array b`
`351`	`351`
`352`		`-(>>=) :: forall m a b. (Monad m) => m a -> (a -> m b) -> m b`
	`352`	`+(>>=) :: forall m a b. (Bind m) => m a -> (a -> m b) -> m b`
`353`	`353`	`(>>=) = bind`
`354`	`354`
`355`	`355`	-- \| The `Monad` type class combines the operations of the `Bind` and