From 73fe640af3ae07123154595686cd9548b83e93df Mon Sep 17 00:00:00 2001
From: Vitor Santos Costa <vsc@Vitors-MacBook-Pro.local>
Date: Mon, 9 Jan 2012 23:26:57 +0000
Subject: [PATCH] improve error message.

---
 C/load_dl.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C/load_dl.c b/C/load_dl.c
index fc7583517..a11132df6 100644
--- a/C/load_dl.c
+++ b/C/load_dl.c
@@ -76,7 +76,7 @@ Yap_LoadForeignFile(char *file, int flags)
   out = (void *)dlopen(file,dlflag);
   if (!out) {
     CACHE_REGS
-    Yap_Error(SYSTEM_ERROR, ARG1, "dlopen error %s\n", dlerror());
+    Yap_Error(SYSTEM_ERROR, ARG1, "dlopen error for %s: %s\n", file, dlerror());
   }
   return out;
 }