1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
use crate::Runtime;
pub fn init() -> Runtime {
#[cfg(not(feature = "no-std"))]
crate::initial_setup();
Runtime::init()
}
pub fn init_persistent() {
#[cfg(not(feature = "no-std"))]
crate::initial_setup();
Runtime::init_persistent()
}
pub fn gc_minor() {
unsafe {
ocaml_sys::caml_gc_minor(ocaml_sys::UNIT);
}
}
pub unsafe fn gc_major() {
ocaml_sys::caml_gc_major(ocaml_sys::UNIT);
}
pub unsafe fn gc_full_major() {
ocaml_sys::caml_gc_full_major(ocaml_sys::UNIT);
}
pub unsafe fn gc_compact() {
ocaml_sys::caml_gc_compaction(ocaml_sys::UNIT);
}