diff options
Diffstat (limited to 'src/if_tcl.c')
| -rw-r--r-- | src/if_tcl.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/if_tcl.c b/src/if_tcl.c index c3b9c5bbe..f3f4b0798 100644 --- a/src/if_tcl.c +++ b/src/if_tcl.c @@ -167,11 +167,13 @@ typedef int HANDLE; # define load_dll(n) dlopen((n), RTLD_LAZY|RTLD_GLOBAL) # define symbol_from_dll dlsym # define close_dll dlclose +# define load_dll_error dlerror # else # define TCL_PROC FARPROC # define load_dll vimLoadLib # define symbol_from_dll GetProcAddress # define close_dll FreeLibrary +# define load_dll_error GetWin32Error # endif /* @@ -213,7 +215,7 @@ tcl_runtime_link_init(char *libname, int verbose) if (!(hTclLib = load_dll(libname))) { if (verbose) - semsg(_(e_loadlib), libname); + semsg(_(e_loadlib), libname, load_dll_error()); return FAIL; } for (i = 0; tcl_funcname_table[i].ptr; ++i) |