diff --git a/src/eval.c b/src/eval.c
index e08a25a..4daf052 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -1987,7 +1987,8 @@ it defines a macro.  */)
       Lisp_Object fun = Findirect_function (funname, Qnil);
 
       if (!NILP (Fequal (fun, fundef)))
-	error ("Autoloading failed to define function %s",
+	error ("Autoloading file %s failed to define function %s",
+	       SDATA (Fcar (Fcar (Vload_history))),
 	       SDATA (SYMBOL_NAME (funname)));
       else
 	return fun;