From 879f4fa041cfdefee655eb877f1a91f86a9c62b7 Mon Sep 17 00:00:00 2001 From: Bryan Newbold Date: Fri, 3 Mar 2017 00:56:40 -0800 Subject: New upstream version 5f2 --- dynl.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) mode change 100644 => 100755 dynl.c (limited to 'dynl.c') diff --git a/dynl.c b/dynl.c old mode 100644 new mode 100755 index 171670b..f63e05b --- 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); -- cgit v1.2.3