46 lines
1.6 KiB
C++
46 lines
1.6 KiB
C++
#include "commons.hpp"
|
|
#include "fun.hpp"
|
|
#include "macro.hpp"
|
|
|
|
extern "C" void lib(Module& mod)
|
|
{
|
|
mod.register_function("assert=", fkstd::assert_eq);
|
|
mod.register_function("println", fkstd::println);
|
|
mod.register_function("+", fkstd::add_int);
|
|
mod.register_function("-", fkstd::sub_int);
|
|
mod.register_function("*", fkstd::mul_int);
|
|
mod.register_function("/", fkstd::div_int);
|
|
mod.register_function("%", fkstd::mod_int);
|
|
mod.register_function("^", fkstd::pow_int);
|
|
|
|
mod.register_function("+.", fkstd::add_float);
|
|
mod.register_function("-.", fkstd::sub_float);
|
|
mod.register_function("*.", fkstd::mul_float);
|
|
mod.register_function("/.", fkstd::div_float);
|
|
mod.register_function("%.", fkstd::mod_float);
|
|
mod.register_function("^.", fkstd::pow_float);
|
|
|
|
mod.register_function("trunc", fkstd::trunc);
|
|
|
|
mod.register_function("<", fkstd::lt);
|
|
mod.register_function("<=", fkstd::le);
|
|
mod.register_function(">", fkstd::gt);
|
|
mod.register_function(">=", fkstd::ge);
|
|
mod.register_function("=", fkstd::eq);
|
|
mod.register_function("<>", fkstd::ne);
|
|
|
|
mod.register_function("not", fkstd::bool_not);
|
|
mod.register_function("ref", fkstd::array_ref);
|
|
mod.register_function("ref!", fkstd::array_set);
|
|
mod.register_function("cat", fkstd::string_cat);
|
|
mod.register_function("dup", fkstd::string_dup);
|
|
mod.register_function("char-at", fkstd::char_at);
|
|
|
|
mod.register_macro("!", fkstd::set_addr);
|
|
mod.register_macro("assert-static-fail", fkstd::assert_static_fail);
|
|
mod.register_macro(":", fkstd::block);
|
|
mod.register_macro("if", fkstd::if_macro);
|
|
mod.register_macro("and", fkstd::and_macro);
|
|
mod.register_macro("or", fkstd::or_macro);
|
|
}
|