diff options
| author | Andrea Corallo | 2019-07-08 17:04:33 +0200 |
|---|---|---|
| committer | Andrea Corallo | 2020-01-01 11:33:51 +0100 |
| commit | a59ef0747f855fb30d66ff98c739965fafdfe0c7 (patch) | |
| tree | c1d5096420fb40bcfe3b9e97701a1cd10efd1fc6 /src | |
| parent | c51b7fe2c881335c9958f75d205859d434cc6de4 (diff) | |
| download | emacs-a59ef0747f855fb30d66ff98c739965fafdfe0c7.tar.gz emacs-a59ef0747f855fb30d66ff98c739965fafdfe0c7.zip | |
block list in limple
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"); |