rev 228 - trunk/src
SVN User <[email protected]>
| Newsgroups | gmane.comp.lang.prothon.cvs |
|---|---|
| Message-ID | <[email protected]> |
Author: bcollins
Date: 2004-03-31 10:08:35 -0500 (Wed, 31 Mar 2004)
New Revision: 228
Modified:
trunk/src/interp.c
Log:
Cleanup error reporting for dso failures.
Modified: trunk/src/interp.c
===================================================================
--- trunk/src/interp.c 2004-03-31 15:07:37 UTC (rev 227)
+++ trunk/src/interp.c 2004-03-31 15:08:35 UTC (rev 228)
@@ -326,16 +326,20 @@
MODULE_EXTENSION);
aprerr = apr_dso_load(&handle, dll_path, get_pr_head_pool());
- if (aprerr != APR_SUCCESS)
+ if (aprerr != APR_SUCCESS) {
+#ifdef DEBUG_MODULES
+ printf("Failed finding dll: %s\n", apr_dso_error(handle, dll_path, sizeof(dll_path)));
+#endif
return FALSE;
+ }
apr_snprintf(dll_path, sizeof(dll_path), "%s_dll_entry", module_name);
aprerr = apr_dso_sym(&dll_entry, handle, dll_path);
if (aprerr != APR_SUCCESS) {
apr_dso_unload(handle);
- raise_exception(ist, OBJ(INTERNAL_EXC), "Loadable module `%s': initialization failed",
- module_name);
- printf("Failed finding dll entry symbol: %s\n", apr_dso_error(handle, dll_path, sizeof(dll_path)));
+ raise_exception(ist, OBJ(INTERNAL_EXC), "Loadable module `%s': %s",
+ module_name, apr_dso_error(handle, dll_path,
+ sizeof(dll_path)));
return FALSE;
}