Avoid an overflow error in emacs-module.c

* src/emacs-module.c (Fmodule_load): Allow creating a bignum
to avoid overflow error
This commit is contained in:
Philipp Stephani 2018-09-21 22:00:14 +02:00
parent ee3be3fdfa
commit 167274d44f

View file

@ -747,11 +747,7 @@ DEFUN ("module-load", Fmodule_load, Smodule_load, 1, 1, 0,
maybe_quit ();
if (r != 0)
{
if (FIXNUM_OVERFLOW_P (r))
overflow_error ();
xsignal2 (Qmodule_init_failed, file, make_fixnum (r));
}
xsignal2 (Qmodule_init_failed, file, INT_TO_INTEGER (r));
module_signal_or_throw (&env_priv);
return unbind_to (count, Qt);