diff options
| author | Andrea Corallo | 2019-11-17 23:23:50 +0100 |
|---|---|---|
| committer | Andrea Corallo | 2020-01-01 11:38:07 +0100 |
| commit | 42b08f8a9ada7791c992894e88f648909e1ecc95 (patch) | |
| tree | 902fa3b7086ce40b8173e4cc2a8b9118786c65b8 /src/comp.c | |
| parent | 41bfb91f5db878d139d5c0c631c569475018a7c2 (diff) | |
| download | emacs-42b08f8a9ada7791c992894e88f648909e1ecc95.tar.gz emacs-42b08f8a9ada7791c992894e88f648909e1ecc95.zip | |
some style nits
Diffstat (limited to 'src/comp.c')
| -rw-r--r-- | src/comp.c | 38 |
1 files changed, 19 insertions, 19 deletions
diff --git a/src/comp.c b/src/comp.c index 251ba242d43..8001580eba2 100644 --- a/src/comp.c +++ b/src/comp.c | |||
| @@ -398,20 +398,21 @@ emit_call (Lisp_Object subr_sym, gcc_jit_type *ret_type, unsigned nargs, | |||
| 398 | nargs, | 398 | nargs, |
| 399 | args); | 399 | args); |
| 400 | } | 400 | } |
| 401 | else { | 401 | else |
| 402 | gcc_jit_lvalue *f_ptr = | 402 | { |
| 403 | gcc_jit_lvalue_access_field (comp.func_relocs, | 403 | gcc_jit_lvalue *f_ptr = |
| 404 | NULL, | 404 | gcc_jit_lvalue_access_field (comp.func_relocs, |
| 405 | (gcc_jit_field *) xmint_pointer (func)); | 405 | NULL, |
| 406 | ICE_IF (!f_ptr, "undeclared function relocation"); | 406 | (gcc_jit_field *) xmint_pointer (func)); |
| 407 | emit_comment (format_string ("calling subr: %s", | 407 | ICE_IF (!f_ptr, "undeclared function relocation"); |
| 408 | SSDATA (SYMBOL_NAME (subr_sym)))); | 408 | emit_comment (format_string ("calling subr: %s", |
| 409 | return gcc_jit_context_new_call_through_ptr (comp.ctxt, | 409 | SSDATA (SYMBOL_NAME (subr_sym)))); |
| 410 | NULL, | 410 | return gcc_jit_context_new_call_through_ptr (comp.ctxt, |
| 411 | gcc_jit_lvalue_as_rvalue (f_ptr), | 411 | NULL, |
| 412 | nargs, | 412 | gcc_jit_lvalue_as_rvalue (f_ptr), |
| 413 | args); | 413 | nargs, |
| 414 | } | 414 | args); |
| 415 | } | ||
| 415 | } | 416 | } |
| 416 | 417 | ||
| 417 | static gcc_jit_rvalue * | 418 | static gcc_jit_rvalue * |
| @@ -481,8 +482,7 @@ emit_cast (gcc_jit_type *new_type, gcc_jit_rvalue *obj) | |||
| 481 | } | 482 | } |
| 482 | 483 | ||
| 483 | /* | 484 | /* |
| 484 | Emit the equivalent of | 485 | Emit the equivalent of: |
| 485 | |||
| 486 | (typeof_ptr) ((uintptr) ptr + size_of_ptr_ref * i) | 486 | (typeof_ptr) ((uintptr) ptr + size_of_ptr_ref * i) |
| 487 | */ | 487 | */ |
| 488 | 488 | ||
| @@ -1046,8 +1046,8 @@ emit_mvar_val (Lisp_Object mvar) | |||
| 1046 | { | 1046 | { |
| 1047 | if (FIXNUMP (constant)) | 1047 | if (FIXNUMP (constant)) |
| 1048 | { | 1048 | { |
| 1049 | /* We can still emit directly objects that are selfcontained in a word | 1049 | /* We can still emit directly objects that are self-contained in a |
| 1050 | (read fixnums). */ | 1050 | word (read fixnums). */ |
| 1051 | emit_comment (SSDATA (Fprin1_to_string (constant, Qnil))); | 1051 | emit_comment (SSDATA (Fprin1_to_string (constant, Qnil))); |
| 1052 | gcc_jit_rvalue *word = | 1052 | gcc_jit_rvalue *word = |
| 1053 | gcc_jit_context_new_rvalue_from_ptr (comp.ctxt, | 1053 | gcc_jit_context_new_rvalue_from_ptr (comp.ctxt, |
| @@ -1168,7 +1168,7 @@ emit_limple_push_handler (gcc_jit_rvalue *handler, gcc_jit_rvalue *handler_type, | |||
| 1168 | gcc_jit_block *handler_bb, gcc_jit_block *guarded_bb, | 1168 | gcc_jit_block *handler_bb, gcc_jit_block *guarded_bb, |
| 1169 | Lisp_Object clobbered_mvar) | 1169 | Lisp_Object clobbered_mvar) |
| 1170 | { | 1170 | { |
| 1171 | /* struct handler *c = push_handler (POP, type); */ | 1171 | /* struct handler *c = push_handler (POP, type); */ |
| 1172 | 1172 | ||
| 1173 | gcc_jit_rvalue *args[] = { handler, handler_type }; | 1173 | gcc_jit_rvalue *args[] = { handler, handler_type }; |
| 1174 | gcc_jit_block_add_assignment ( | 1174 | gcc_jit_block_add_assignment ( |