lean4-htt/src/initialize/init.cpp

60 lines
1.5 KiB
C++

/*
Copyright (c) 2014 Microsoft Corporation. All rights reserved.
Released under Apache 2.0 license as described in the file LICENSE.
Author: Leonardo de Moura
*/
#include <lean/stackinfo.h>
#include <lean/thread.h>
#include <lean/init_module.h>
#include "util/init_module.h"
#include "util/io.h"
#include "kernel/init_module.h"
#include "library/init_module.h"
#include "library/constructions/init_module.h"
#include "library/print.h"
#include "library/compiler/init_module.h"
#include "initialize/init.h"
namespace lean {
extern "C" object* initialize_Init(object* w);
extern "C" object* initialize_Lean(object* w);
extern "C" void lean_initialize() {
save_stack_info();
initialize_util_module();
consume_io_result(initialize_Init(io_mk_world()));
consume_io_result(initialize_Lean(io_mk_world()));
initialize_kernel_module();
init_default_print_fn();
initialize_library_core_module();
initialize_library_module();
initialize_compiler_module();
initialize_constructions_module();
}
void initialize() {
lean_initialize();
}
void finalize() {
run_thread_finalizers();
finalize_constructions_module();
finalize_compiler_module();
finalize_library_module();
finalize_library_core_module();
finalize_kernel_module();
finalize_util_module();
run_post_thread_finalizers();
delete_thread_finalizer_manager();
}
initializer::initializer() {
initialize();
lean::io_mark_end_initialization();
}
initializer::~initializer() {
finalize();
}
}