                 description: expr,
                 expected: exception,
                 reason: "raise",
-                actual: inspect(error) ],
+                actual: inspect(elem(error, 0)) <> " with message " <> inspect(error.message) ],
               stack
           end
 


    exception = case Enum.find(exprs, exc_filter_fn) do
      { _, {:error, exception, message} } ->
        inspect(exception) <> "[message: \"#{message}\"]"
      nil ->
        "nothing"
    end

    location = [line: line, file: Path.relative_to(file, System.cwd!)]
    stack    = Macro.escape [{ module, :__MODULE__, 0, location }]

    exc_filter_fn = fn
      { _, {:error, _, _} } -> true
      _ -> false
    end

    exceptions_num = Enum.count exprs, exc_filter_fn
    if exceptions_num > 1 do
      # Format the info about error location as if it were a part of the stacktrace
      { fun, arity } = fun_arity
      error_info = "    #{file}:#{line}: #{inspect module}.#{fun}/#{arity}"
      raise Error, message: "multiple exceptions in one doctest case are not supported.\n#{error_info}"
    end

    { tests, whole_expr } = Enum.map_reduce exprs, "", fn {expr, expected}, acc ->
