diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/comp.c | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/src/comp.c b/src/comp.c index 6f5863b7f7e..ca741fc9f1d 100644 --- a/src/comp.c +++ b/src/comp.c | |||
| @@ -935,6 +935,10 @@ emit_limple_inst (Lisp_Object inst) | |||
| 935 | char *block_name = SDATA (SYMBOL_NAME (arg0)); | 935 | char *block_name = SDATA (SYMBOL_NAME (arg0)); |
| 936 | comp.block = gcc_jit_function_new_block (comp.func, block_name); | 936 | comp.block = gcc_jit_function_new_block (comp.func, block_name); |
| 937 | } | 937 | } |
| 938 | else if (EQ (op, Qjump)) | ||
| 939 | { | ||
| 940 | |||
| 941 | } | ||
| 938 | else if (EQ (op, Qeqcall)) | 942 | else if (EQ (op, Qeqcall)) |
| 939 | { | 943 | { |
| 940 | } | 944 | } |
| @@ -1881,7 +1885,8 @@ void | |||
| 1881 | syms_of_comp (void) | 1885 | syms_of_comp (void) |
| 1882 | { | 1886 | { |
| 1883 | /* Limple instruction set. */ | 1887 | /* Limple instruction set. */ |
| 1884 | DEFSYM (Qblock, "BLOCK"); | 1888 | DEFSYM (Qblock, "block"); |
| 1889 | DEFSYM (Qjump, "jump"); | ||
| 1885 | DEFSYM (Qeqcall, "=call"); | 1890 | DEFSYM (Qeqcall, "=call"); |
| 1886 | DEFSYM (Qeqconst, "=const"); | 1891 | DEFSYM (Qeqconst, "=const"); |
| 1887 | DEFSYM (Qreturn, "return"); | 1892 | DEFSYM (Qreturn, "return"); |