New upstream version 5f2upstream/5f2upstream

1 files changed, 2 insertions, 2 deletions

diff --git a/dynl.c b/dynl.c
index 171670b..f63e05b 100644..100755
--- a/dynl.c
+++ b/dynl.c
@@ -374,7 +374,7 @@ SCM l_dyn_link(fname)
   DEFER_INTS;
   handle = dlopen(CHARS(fname), DLOPEN_MODE);
   if (NULL==handle) {
-    if (verbose > 1) {
+    if (scm_verbose > 1) {
       char *dlr = dlerror();
       ALLOW_INTS;
       if (dlr) {
@@ -444,7 +444,7 @@ SCM l_dyn_main_call(symb, shl, args)
   argv = makargvfrmstrs(args, s_main_call);
   ALLOW_INTS;
 /*  *loc_loadpath = linkpath; */
-  i = (*func) ((int)ilength(args), argv);
+  i = (*func) ((int)ilength(args), (const char**)argv);
 /*  *loc_loadpath = oloadpath; */
   DEFER_INTS;
   must_free_argv(argv);