Merge pull request #10 from hdgarrood/add-throw

Add throw (as in #8)

Author: paf31

docs/Control/Monad/Eff/Exception.md

@@ -21,7 +21,7 @@ The type of Javascript errors
 
 ##### Instances
 ``` purescript
-instance showError :: Show Error
+Show Error
 ```
 
 #### `error`
@@ -74,4 +74,13 @@ main = catchException print do
   trace "Exceptions thrown in this block will be logged to the console"
 ```
 
+#### `throw`
+
+``` purescript
+throw :: forall eff a. String -> Eff (err :: EXCEPTION | eff) a
+```
+
+A shortcut allowing you to throw an error in one step. Defined as
+`throwException <<< error`.
+
 

src/Control/Monad/Eff/Exception.purs

@@ -8,6 +8,7 @@ module Control.Monad.Eff.Exception
   , message
   , throwException
   , catchException
+  , throw
   ) where
 
 import Prelude
@@ -53,3 +54,8 @@ foreign import throwException :: forall a eff. Error -> Eff (err :: EXCEPTION |
 -- |   trace "Exceptions thrown in this block will be logged to the console"
 -- | ```
 foreign import catchException :: forall a eff. (Error -> Eff eff a) -> Eff (err :: EXCEPTION | eff) a -> Eff eff a
+
+-- | A shortcut allowing you to throw an error in one step. Defined as
+-- | `throwException <<< error`.
+throw :: forall eff a. String -> Eff (err :: EXCEPTION | eff) a
+throw = throwException <<< error