The unpac monorepo manager self-hosting as a monorepo using unpac
Merge pull request #12922 from stedolan/remove-caml-get-section-table
Remove caml_get_section_table (+bootstrap)
authored by
Sébastien Hinderer
and committed by
GitHub
c94d12ce
b6ecc237
+1
-14
boot/ocamlc
boot/ocamlc
This is a binary file and will not be displayed.
boot/ocamllex
boot/ocamllex
This is a binary file and will not be displayed.
-13
runtime/meta.c
-13
runtime/meta.c
···
45
45
return caml_global_data;
46
46
}
47
47
48
-
CAMLprim value caml_get_section_table(value unit)
49
-
{
50
-
if (caml_params->section_table == NULL) caml_raise_not_found();
51
-
return caml_input_value_from_block(caml_params->section_table,
52
-
caml_params->section_table_size);
53
-
}
54
-
55
48
struct bytecode {
56
49
code_t prog;
57
50
asize_t len;
···
213
206
value caml_get_global_data(value unit)
214
207
{
215
208
caml_invalid_argument("Meta.get_global_data");
216
-
return Val_unit; /* not reached */
217
-
}
218
-
219
-
value caml_get_section_table(value unit)
220
-
{
221
-
caml_invalid_argument("Meta.get_section_table");
222
209
return Val_unit; /* not reached */
223
210
}
224
211
+1
-1
runtime/startup_byt.c
+1
-1
runtime/startup_byt.c
···
661
661
caml_load_main_debug_info();
662
662
/* ensure all globals are in major heap */
663
663
caml_minor_collection();
664
-
/* Record the sections (for caml_get_section_table in meta.c) */
664
+
/* Record the sections (for caml_dynlink_get_bytecode_sections) */
665
665
caml_init_section_table(section_table, section_table_size);
666
666
/* Execute the program */
667
667
caml_debugger(PROGRAM_START, Val_unit);