Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-20 20:07:36 +00:00
Code Issues Projects Releases Packages Wiki Activity

* Synthesize as const primitive function pointers and its container struct.

Browse source 
* src/comp.c (declare_imported_func): Make const function pointer
	to primitive funcions.
	(emit_ctxt_code): Make struct 'comp.func_relocs' const.
This commit is contained in:
Andrea Corallo 2020-11-27 18:31:53 +01:00
parent 949b49cf77
commit e2ff5d9605
1 changed files with 10 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
src/comp.c
View file

@ -967,12 +967,13 @@ declare_imported_func (Lisp_Object subr_sym, gcc_jit_type *ret_type,
subr_sym, make_string ("R", 1));
gcc_jit_type *f_ptr_type =
gcc_jit_context_new_function_ptr_type (comp.ctxt,
NULL,
ret_type,
nargs,
types,
0);
gcc_jit_type_get_const (
gcc_jit_context_new_function_ptr_type (comp.ctxt,
NULL,
ret_type,
nargs,
types,
0));
gcc_jit_field *field =
gcc_jit_context_new_field (comp.ctxt,
NULL,
@ -2866,7 +2867,9 @@ emit_ctxt_code (void)
comp.ctxt,
NULL,
GCC_JIT_GLOBAL_EXPORTED,
gcc_jit_type_get_pointer (gcc_jit_struct_as_type (f_reloc_struct)),
gcc_jit_type_get_pointer (
gcc_jit_type_get_const (
gcc_jit_struct_as_type (f_reloc_struct))),
FUNC_LINK_TABLE_SYM);
xfree (fields);