Merge pull request #24 from truqu/feature/error.name

add getter for error's name when available

Author: paf31

src/Control/Monad/Eff/Exception.js

@@ -12,6 +12,10 @@ exports.message = function (e) {
   return e.message;
 };
 
+exports.name = function (e) {
+  return e.name || "Error";
+};
+
 exports.stackImpl = function (just) {
   return function (nothing) {
     return function (e) {

src/Control/Monad/Eff/Exception.purs

@@ -6,6 +6,7 @@ module Control.Monad.Eff.Exception
   , Error
   , error
   , message
+  , name
   , stack
   , throwException
   , catchException
@@ -37,6 +38,9 @@ foreign import error :: String -> Error
 -- | Get the error message from a JavaScript error
 foreign import message :: Error -> String
 
+-- | Get the error name when defined, or fallback to 'Error'
+foreign import name :: Error -> String
+
 -- | Get the stack trace from a JavaScript error
 stack :: Error -> Maybe String
 stack = stackImpl Just Nothing