--- gforth/engine/main.c	2007/10/29 15:56:31	1.190
+++ gforth/engine/main.c	2007/12/04 14:55:03	1.191
@@ -2319,6 +2319,10 @@ int main(int argc, char **argv, char **e
 
   progname = argv[0];
 
+  if (lt_dlinit()!=0) {
+    fprintf(stderr,"%s: lt_dlinit failed", progname);
+    exit(1);
+  }
 #ifndef STANDALONE
 #ifdef HAS_OS
   gforth_args(argc, argv, &path, &imagename);
@@ -2367,6 +2371,8 @@ int main(int argc, char **argv, char **e
     vm_print_profile(stderr);
 #endif
     deprep_terminal();
+    if (lt_dlexit()!=0)
+      fprintf(stderr,"%s: lt_dlexit failed", progname);
   }
   if (print_metrics) {
     int i;