summaryrefslogtreecommitdiff
path: root/src/comp.c
diff options
context:
space:
mode:
authorAndrea Corallo <akrl@sdf.org>2019-09-08 18:48:14 +0200
committerAndrea Corallo <akrl@sdf.org>2020-01-01 11:37:45 +0100
commit1b9b19ebf911a959948de513afe3f639e23f346a (patch)
tree6e9cff437f64eac12e1e3a9c52b191d45dd547f5 /src/comp.c
parent4c6272373d4e5a6fbb8668f4980bbafbdc28405e (diff)
downloademacs-1b9b19ebf911a959948de513afe3f639e23f346a.tar.gz
emacs-1b9b19ebf911a959948de513afe3f639e23f346a.tar.bz2
emacs-1b9b19ebf911a959948de513afe3f639e23f346a.zip
fix missing specbind import
Diffstat (limited to 'src/comp.c')
-rw-r--r--src/comp.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/comp.c b/src/comp.c
index 2b6f8bf0536..b6733522a10 100644
--- a/src/comp.c
+++ b/src/comp.c
@@ -1676,6 +1676,9 @@ declare_runtime_imported_funcs (void)
args[0] = comp.lisp_obj_type;
ADD_IMPORTED ("helper_unwind_protect", comp.void_type, 1, args);
+ args[0] = args[1] = comp.lisp_obj_type;
+ ADD_IMPORTED ("specbind", comp.void_type, 2, args);
+
#undef ADD_IMPORTED
return field_list;
@@ -3149,6 +3152,9 @@ load_comp_unit (dynlib_handle_ptr handle)
} else if (!strcmp (f_str, "helper_unwind_protect"))
{
f_relocs[i] = (void *) helper_unwind_protect;
+ } else if (!strcmp (f_str, "specbind"))
+ {
+ f_relocs[i] = (void *) specbind;
} else
{
error ("Unexpected function relocation %s", f_str);