aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorAndrea Corallo2020-03-29 12:26:45 +0100
committerAndrea Corallo2020-03-29 12:28:39 +0100
commit05f89e8ef4eb5fbcd04fcc9c0dcb92f90ad6b28c (patch)
treeeed4bebcf3cf2abdde5d1da7e2d510b0bed969f8 /src
parent79483a5873a90bb28178af59acfdb00040c3d23d (diff)
downloademacs-05f89e8ef4eb5fbcd04fcc9c0dcb92f90ad6b28c.tar.gz
emacs-05f89e8ef4eb5fbcd04fcc9c0dcb92f90ad6b28c.zip
src/comp.c (Fcomp__init_ctxt): Aesthetic
Diffstat (limited to 'src')
-rw-r--r--src/comp.c8
1 files changed, 0 insertions, 8 deletions
diff --git a/src/comp.c b/src/comp.c
index d72d6acc8ef..60ef3bf0dcd 100644
--- a/src/comp.c
+++ b/src/comp.c
@@ -3123,7 +3123,6 @@ DEFUN ("comp--init-ctxt", Fcomp__init_ctxt, Scomp__init_ctxt,
3123 comp.unsigned_long_long_type = 3123 comp.unsigned_long_long_type =
3124 gcc_jit_context_get_type (comp.ctxt, GCC_JIT_TYPE_UNSIGNED_LONG_LONG); 3124 gcc_jit_context_get_type (comp.ctxt, GCC_JIT_TYPE_UNSIGNED_LONG_LONG);
3125 comp.char_ptr_type = gcc_jit_type_get_pointer (comp.char_type); 3125 comp.char_ptr_type = gcc_jit_type_get_pointer (comp.char_type);
3126
3127#if EMACS_INT_MAX <= LONG_MAX 3126#if EMACS_INT_MAX <= LONG_MAX
3128 /* 32-bit builds without wide ints, 64-bit builds on Posix hosts. */ 3127 /* 32-bit builds without wide ints, 64-bit builds on Posix hosts. */
3129 comp.lisp_obj_as_ptr = gcc_jit_context_new_field (comp.ctxt, 3128 comp.lisp_obj_as_ptr = gcc_jit_context_new_field (comp.ctxt,
@@ -3137,16 +3136,13 @@ DEFUN ("comp--init-ctxt", Fcomp__init_ctxt, Scomp__init_ctxt,
3137 comp.long_long_type, 3136 comp.long_long_type,
3138 "obj"); 3137 "obj");
3139#endif 3138#endif
3140
3141 comp.emacs_int_type = gcc_jit_context_get_int_type (comp.ctxt, 3139 comp.emacs_int_type = gcc_jit_context_get_int_type (comp.ctxt,
3142 sizeof (EMACS_INT), 3140 sizeof (EMACS_INT),
3143 true); 3141 true);
3144
3145 comp.lisp_obj_as_num = gcc_jit_context_new_field (comp.ctxt, 3142 comp.lisp_obj_as_num = gcc_jit_context_new_field (comp.ctxt,
3146 NULL, 3143 NULL,
3147 comp.emacs_int_type, 3144 comp.emacs_int_type,
3148 "num"); 3145 "num");
3149
3150 gcc_jit_field *lisp_obj_fields[] = { comp.lisp_obj_as_ptr, 3146 gcc_jit_field *lisp_obj_fields[] = { comp.lisp_obj_as_ptr,
3151 comp.lisp_obj_as_num }; 3147 comp.lisp_obj_as_num };
3152 comp.lisp_obj_type = 3148 comp.lisp_obj_type =
@@ -3156,7 +3152,6 @@ DEFUN ("comp--init-ctxt", Fcomp__init_ctxt, Scomp__init_ctxt,
3156 ARRAYELTS (lisp_obj_fields), 3152 ARRAYELTS (lisp_obj_fields),
3157 lisp_obj_fields); 3153 lisp_obj_fields);
3158 comp.lisp_obj_ptr_type = gcc_jit_type_get_pointer (comp.lisp_obj_type); 3154 comp.lisp_obj_ptr_type = gcc_jit_type_get_pointer (comp.lisp_obj_type);
3159
3160 comp.most_positive_fixnum = 3155 comp.most_positive_fixnum =
3161 gcc_jit_context_new_rvalue_from_long (comp.ctxt, 3156 gcc_jit_context_new_rvalue_from_long (comp.ctxt,
3162 comp.emacs_int_type, 3157 comp.emacs_int_type,
@@ -3173,16 +3168,13 @@ DEFUN ("comp--init-ctxt", Fcomp__init_ctxt, Scomp__init_ctxt,
3173 gcc_jit_context_new_rvalue_from_int (comp.ctxt, 3168 gcc_jit_context_new_rvalue_from_int (comp.ctxt,
3174 comp.emacs_int_type, 3169 comp.emacs_int_type,
3175 INTTYPEBITS); 3170 INTTYPEBITS);
3176
3177 comp.lisp_int0 = 3171 comp.lisp_int0 =
3178 gcc_jit_context_new_rvalue_from_int (comp.ctxt, 3172 gcc_jit_context_new_rvalue_from_int (comp.ctxt,
3179 comp.emacs_int_type, 3173 comp.emacs_int_type,
3180 Lisp_Int0); 3174 Lisp_Int0);
3181
3182 comp.ptrdiff_type = gcc_jit_context_get_int_type (comp.ctxt, 3175 comp.ptrdiff_type = gcc_jit_context_get_int_type (comp.ctxt,
3183 sizeof (void *), 3176 sizeof (void *),
3184 true); 3177 true);
3185
3186 comp.uintptr_type = gcc_jit_context_get_int_type (comp.ctxt, 3178 comp.uintptr_type = gcc_jit_context_get_int_type (comp.ctxt,
3187 sizeof (void *), 3179 sizeof (void *),
3188 false); 3180 false);