diff options
| -rw-r--r-- | rts/Linker.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/rts/Linker.c b/rts/Linker.c index b9a1d34a85..29bd5d8b47 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -430,13 +430,17 @@ static int ghciInsertSymbolTable( " %s\n" "whilst processing object file\n" " %" PATH_FMT "\n" + "The symbol was previously defined in\n" + " %" PATH_FMT "\n" "This could be caused by:\n" " * Loading two different object files which export the same symbol\n" " * Specifying the same object file twice on the GHCi command line\n" " * An incorrect `package.conf' entry, causing some object to be\n" " loaded twice.\n", (char*)key, - obj_name + obj_name, + pinfo->owner->archiveMemberName ? pinfo->owner->archiveMemberName + : pinfo->owner->fileName ); return 0; } |