92 lines
3.5 KiB
Plaintext
92 lines
3.5 KiB
Plaintext
/**************************************************************************/
|
|
/* */
|
|
/* OCaml */
|
|
/* */
|
|
/* KC Sivaramakrishnan, Indian Institute of Technology, Madras */
|
|
/* Stephen Dolan, University of Cambridge */
|
|
/* */
|
|
/* Copyright 2019 Indian Institute of Technology, Madras */
|
|
/* Copyright 2019 University of Cambridge */
|
|
/* */
|
|
/* All rights reserved. This file is distributed under the terms of */
|
|
/* the GNU Lesser General Public License version 2.1, with the */
|
|
/* special exception on linking described in the file LICENSE. */
|
|
/* */
|
|
/**************************************************************************/
|
|
|
|
DOMAIN_STATE(value*, young_ptr)
|
|
DOMAIN_STATE(value*, young_limit)
|
|
/* Minor heap limit. See minor_gc.c. */
|
|
|
|
DOMAIN_STATE(char*, exception_pointer)
|
|
/* Exception pointer that points into the current stack */
|
|
|
|
DOMAIN_STATE(void*, young_base)
|
|
DOMAIN_STATE(value*, young_start)
|
|
DOMAIN_STATE(value*, young_end)
|
|
DOMAIN_STATE(value*, young_alloc_start)
|
|
DOMAIN_STATE(value*, young_alloc_end)
|
|
DOMAIN_STATE(value*, young_alloc_mid)
|
|
DOMAIN_STATE(value*, young_trigger)
|
|
DOMAIN_STATE(asize_t, minor_heap_wsz)
|
|
DOMAIN_STATE(intnat, in_minor_collection)
|
|
DOMAIN_STATE(double, extra_heap_resources_minor)
|
|
DOMAIN_STATE(struct caml_ref_table*, ref_table)
|
|
DOMAIN_STATE(struct caml_ephe_ref_table*, ephe_ref_table)
|
|
DOMAIN_STATE(struct caml_custom_table*, custom_table)
|
|
/* See minor_gc.c */
|
|
|
|
DOMAIN_STATE(struct mark_stack*, mark_stack)
|
|
/* See major_gc.c */
|
|
|
|
DOMAIN_STATE(value*, stack_low)
|
|
DOMAIN_STATE(value*, stack_high)
|
|
DOMAIN_STATE(value*, stack_threshold)
|
|
DOMAIN_STATE(value*, extern_sp)
|
|
DOMAIN_STATE(value*, trapsp)
|
|
DOMAIN_STATE(value*, trap_barrier)
|
|
DOMAIN_STATE(struct longjmp_buffer*, external_raise)
|
|
DOMAIN_STATE(value, exn_bucket)
|
|
/* See interp.c */
|
|
|
|
DOMAIN_STATE(char*, top_of_stack)
|
|
DOMAIN_STATE(char*, bottom_of_stack)
|
|
DOMAIN_STATE(uintnat, last_return_address)
|
|
DOMAIN_STATE(value*, gc_regs)
|
|
/* See roots_nat.c */
|
|
|
|
DOMAIN_STATE(intnat, backtrace_active)
|
|
DOMAIN_STATE(intnat, backtrace_pos)
|
|
DOMAIN_STATE(backtrace_slot*, backtrace_buffer)
|
|
DOMAIN_STATE(value, backtrace_last_exn)
|
|
/* See backtrace.c */
|
|
|
|
DOMAIN_STATE(intnat, compare_unordered)
|
|
DOMAIN_STATE(intnat, requested_major_slice)
|
|
DOMAIN_STATE(intnat, requested_minor_gc)
|
|
DOMAIN_STATE(struct caml__roots_block *, local_roots)
|
|
|
|
DOMAIN_STATE(double, stat_minor_words)
|
|
DOMAIN_STATE(double, stat_promoted_words)
|
|
DOMAIN_STATE(double, stat_major_words)
|
|
DOMAIN_STATE(intnat, stat_minor_collections)
|
|
DOMAIN_STATE(intnat, stat_major_collections)
|
|
DOMAIN_STATE(intnat, stat_heap_wsz)
|
|
DOMAIN_STATE(intnat, stat_top_heap_wsz)
|
|
DOMAIN_STATE(intnat, stat_compactions)
|
|
DOMAIN_STATE(intnat, stat_forced_major_collections)
|
|
DOMAIN_STATE(intnat, stat_heap_chunks)
|
|
/* See gc_ctrl.c */
|
|
|
|
DOMAIN_STATE(uintnat, eventlog_startup_timestamp)
|
|
DOMAIN_STATE(long, eventlog_startup_pid)
|
|
DOMAIN_STATE(uintnat, eventlog_paused)
|
|
DOMAIN_STATE(uintnat, eventlog_enabled)
|
|
DOMAIN_STATE(FILE*, eventlog_out)
|
|
/* See eventlog.c */
|
|
|
|
#if defined(NAKED_POINTERS_CHECKER) && !defined(_WIN32)
|
|
DOMAIN_STATE(void*, checking_pointer_pc)
|
|
/* See major_gc.c */
|
|
#endif
|