Add WrappedException abstract type

Implemented by LoadError and InitError

base/base.jl

@@ -34,17 +34,6 @@ type KeyError <: Exception
     key
 end
 
-type LoadError <: Exception
-    file::AbstractString
-    line::Int
-    error
-end
-
-type InitError <: Exception
-    mod::Symbol
-    error
-end
-
 type MethodError <: Exception
     f
     args
@@ -64,6 +53,21 @@ type AssertionError <: Exception
     AssertionError(msg) = new(msg)
 end
 
+#Generic wrapping of arbitrary exceptions
+#Subtypes should put the exception in an 'error' field
+abstract WrappedException <: Exception
+
+type LoadError <: WrappedException
+    file::AbstractString
+    line::Int
+    error
+end
+
+type InitError <: WrappedException
+    mod::Symbol
+    error
+end
+
 ccall(:jl_get_system_hooks, Void, ())
 
 

base/loading.jl

@@ -145,7 +145,7 @@ function show(io::IO, ex::PrecompilableError)
     end
 end
 precompilableerror(ex::PrecompilableError, c) = ex.isprecompilable == c
-precompilableerror(ex::Union{LoadError,InitError}, c) = precompilableerror(ex.error, c)
+precompilableerror(ex::WrappedException, c) = precompilableerror(ex.error, c)
 precompilableerror(ex, c) = false
 
 # put at the top of a file to force it to be precompiled (true), or