summaryrefslogtreecommitdiff
path: root/src/module.c
diff options
context:
space:
mode:
authorPaul Eggert <eggert@cs.ucla.edu>2015-11-19 11:49:27 -0800
committerPaul Eggert <eggert@cs.ucla.edu>2015-11-19 11:50:16 -0800
commit62d787ed124726fd1f73dcfb7227d83bc5940fcc (patch)
treef2fbfa26961709470101b1898cef1763100f0a8d /src/module.c
parentc8a972b0c3082edfcca4a85562224499f75bfe9b (diff)
downloademacs-62d787ed124726fd1f73dcfb7227d83bc5940fcc.tar.gz
Fix minor module problems found by static checking
* src/dynlib.c (dynlib_close): #ifdef out for now, as it’s not used. * src/eval.c, src/lisp.h (lisp_eval_depth): Now static. * src/module.c (Fmodule_load): Fix pointer signedness bug. (Fmodule_call): Tell GCC that the default case is unreachable.
Diffstat (limited to 'src/module.c')
-rw-r--r--src/module.c4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/module.c b/src/module.c
index 35a9f48eb12..98264df35a9 100644
--- a/src/module.c
+++ b/src/module.c
@@ -697,7 +697,7 @@ DEFUN ("module-load", Fmodule_load, Smodule_load, 1, 1, 0,
void *gpl_sym;
CHECK_STRING (file);
- handle = dynlib_open (SDATA (file));
+ handle = dynlib_open (SSDATA (file));
if (!handle)
error ("Cannot load file %s: %s", SDATA (file), dynlib_error ());
@@ -789,6 +789,8 @@ ARGLIST is a list of arguments passed to SUBRPTR. */)
finalize_environment (&env);
Fthrow (tag, value);
}
+ default:
+ eassume (false);
}
}