#include "mlvalues.h"
#include "prims.h"
extern value alloc_dummy();
extern value update_dummy();
extern value array_get_addr();
extern value array_get_float();
extern value array_get();
extern value array_set_addr();
extern value array_set_float();
extern value array_set();
extern value array_unsafe_get_float();
extern value array_unsafe_get();
extern value array_unsafe_set_addr();
extern value array_unsafe_set_float();
extern value array_unsafe_set();
extern value make_vect();
extern value make_array();
extern value compare();
extern value equal();
extern value notequal();
extern value lessthan();
extern value lessequal();
extern value greaterthan();
extern value greaterequal();
extern value output_value();
extern value output_value_to_string();
extern value output_value_to_buffer();
extern value format_float();
extern value float_of_string();
extern value int_of_float();
extern value float_of_int();
extern value neg_float();
extern value abs_float();
extern value add_float();
extern value sub_float();
extern value mul_float();
extern value div_float();
extern value exp_float();
extern value floor_float();
extern value fmod_float();
extern value frexp_float();
extern value ldexp_float();
extern value log_float();
extern value log10_float();
extern value modf_float();
extern value sqrt_float();
extern value power_float();
extern value sin_float();
extern value sinh_float();
extern value cos_float();
extern value cosh_float();
extern value tan_float();
extern value tanh_float();
extern value asin_float();
extern value acos_float();
extern value atan_float();
extern value atan2_float();
extern value ceil_float();
extern value eq_float();
extern value neq_float();
extern value le_float();
extern value lt_float();
extern value ge_float();
extern value gt_float();
extern value float_of_bytes();
extern value classify_float();
extern value gc_stat();
extern value gc_counters();
extern value gc_get();
extern value gc_set();
extern value gc_minor();
extern value gc_major();
extern value gc_full_major();
extern value gc_compaction();
extern value hash_univ_param();
extern value input_value();
extern value input_value_from_string();
extern value marshal_data_size();
extern value int_of_string();
extern value format_int();
extern value int32_neg();
extern value int32_add();
extern value int32_sub();
extern value int32_mul();
extern value int32_div();
extern value int32_mod();
extern value int32_and();
extern value int32_or();
extern value int32_xor();
extern value int32_shift_left();
extern value int32_shift_right();
extern value int32_shift_right_unsigned();
extern value int32_of_int();
extern value int32_to_int();
extern value int32_of_float();
extern value int32_to_float();
extern value int32_format();
extern value int32_of_string();
extern value int64_neg();
extern value int64_add();
extern value int64_sub();
extern value int64_mul();
extern value int64_div();
extern value int64_mod();
extern value int64_and();
extern value int64_or();
extern value int64_xor();
extern value int64_shift_left();
extern value int64_shift_right();
extern value int64_shift_right_unsigned();
extern value int64_of_int();
extern value int64_to_int();
extern value int64_of_float();
extern value int64_to_float();
extern value int64_of_int32();
extern value int64_to_int32();
extern value int64_of_nativeint();
extern value int64_to_nativeint();
extern value int64_format();
extern value int64_of_string();
extern value int64_bits_of_float();
extern value int64_float_of_bits();
extern value nativeint_neg();
extern value nativeint_add();
extern value nativeint_sub();
extern value nativeint_mul();
extern value nativeint_div();
extern value nativeint_mod();
extern value nativeint_and();
extern value nativeint_or();
extern value nativeint_xor();
extern value nativeint_shift_left();
extern value nativeint_shift_right();
extern value nativeint_shift_right_unsigned();
extern value nativeint_of_int();
extern value nativeint_to_int();
extern value nativeint_of_float();
extern value nativeint_to_float();
extern value nativeint_of_int32();
extern value nativeint_to_int32();
extern value nativeint_format();
extern value nativeint_of_string();
extern value caml_open_descriptor_in();
extern value caml_open_descriptor_out();
extern value caml_out_channels_list();
extern value channel_descriptor();
extern value caml_close_channel();
extern value caml_channel_size();
extern value caml_set_binary_mode();
extern value caml_flush_partial();
extern value caml_flush();
extern value caml_output_char();
extern value caml_output_int();
extern value caml_output_partial();
extern value caml_output();
extern value caml_seek_out();
extern value caml_pos_out();
extern value caml_input_char();
extern value caml_input_int();
extern value caml_input();
extern value caml_seek_in();
extern value caml_pos_in();
extern value caml_input_scan_line();
extern value lex_engine();
extern value md5_string();
extern value md5_chan();
extern value get_global_data();
extern value reify_bytecode();
extern value realloc_global();
extern value get_current_environment();
extern value invoke_traced_function();
extern value static_alloc();
extern value static_free();
extern value static_resize();
extern value obj_is_block();
extern value obj_tag();
extern value obj_block();
extern value obj_dup();
extern value obj_truncate();
extern value parse_engine();
extern value install_signal_handler();
extern value ml_string_length();
extern value create_string();
extern value string_get();
extern value string_set();
extern value string_equal();
extern value string_notequal();
extern value blit_string();
extern value fill_string();
extern value is_printable();
extern value bitvect_test();
extern value sys_exit();
extern value sys_open();
extern value sys_close();
extern value sys_file_exists();
extern value sys_remove();
extern value sys_rename();
extern value sys_chdir();
extern value sys_getcwd();
extern value sys_getenv();
extern value sys_get_argv();
extern value sys_system_command();
extern value sys_time();
extern value sys_random_seed();
extern value sys_get_config();
extern value terminfo_setup();
extern value terminfo_backup();
extern value terminfo_standout();
extern value terminfo_resume();
extern value register_named_value();
extern value weak_create();
extern value weak_set();
extern value weak_get();
extern value weak_get_copy();
extern value weak_check();
extern value final_register();
extern value ensure_stack_capacity();
extern value dynlink_open_lib();
extern value dynlink_close_lib();
extern value dynlink_lookup_symbol();
extern value dynlink_add_primitive();
extern value dynlink_get_current_libs();
extern value nml_opendir();
extern value nml_readdir();
extern value nml_closedir();
extern value nml_findfirst();
extern value nml_findnext();
extern value nml_findclose();
c_primitive builtin_cprim[] = {
	alloc_dummy,
	update_dummy,
	array_get_addr,
	array_get_float,
	array_get,
	array_set_addr,
	array_set_float,
	array_set,
	array_unsafe_get_float,
	array_unsafe_get,
	array_unsafe_set_addr,
	array_unsafe_set_float,
	array_unsafe_set,
	make_vect,
	make_array,
	compare,
	equal,
	notequal,
	lessthan,
	lessequal,
	greaterthan,
	greaterequal,
	output_value,
	output_value_to_string,
	output_value_to_buffer,
	format_float,
	float_of_string,
	int_of_float,
	float_of_int,
	neg_float,
	abs_float,
	add_float,
	sub_float,
	mul_float,
	div_float,
	exp_float,
	floor_float,
	fmod_float,
	frexp_float,
	ldexp_float,
	log_float,
	log10_float,
	modf_float,
	sqrt_float,
	power_float,
	sin_float,
	sinh_float,
	cos_float,
	cosh_float,
	tan_float,
	tanh_float,
	asin_float,
	acos_float,
	atan_float,
	atan2_float,
	ceil_float,
	eq_float,
	neq_float,
	le_float,
	lt_float,
	ge_float,
	gt_float,
	float_of_bytes,
	classify_float,
	gc_stat,
	gc_counters,
	gc_get,
	gc_set,
	gc_minor,
	gc_major,
	gc_full_major,
	gc_compaction,
	hash_univ_param,
	input_value,
	input_value_from_string,
	marshal_data_size,
	int_of_string,
	format_int,
	int32_neg,
	int32_add,
	int32_sub,
	int32_mul,
	int32_div,
	int32_mod,
	int32_and,
	int32_or,
	int32_xor,
	int32_shift_left,
	int32_shift_right,
	int32_shift_right_unsigned,
	int32_of_int,
	int32_to_int,
	int32_of_float,
	int32_to_float,
	int32_format,
	int32_of_string,
	int64_neg,
	int64_add,
	int64_sub,
	int64_mul,
	int64_div,
	int64_mod,
	int64_and,
	int64_or,
	int64_xor,
	int64_shift_left,
	int64_shift_right,
	int64_shift_right_unsigned,
	int64_of_int,
	int64_to_int,
	int64_of_float,
	int64_to_float,
	int64_of_int32,
	int64_to_int32,
	int64_of_nativeint,
	int64_to_nativeint,
	int64_format,
	int64_of_string,
	int64_bits_of_float,
	int64_float_of_bits,
	nativeint_neg,
	nativeint_add,
	nativeint_sub,
	nativeint_mul,
	nativeint_div,
	nativeint_mod,
	nativeint_and,
	nativeint_or,
	nativeint_xor,
	nativeint_shift_left,
	nativeint_shift_right,
	nativeint_shift_right_unsigned,
	nativeint_of_int,
	nativeint_to_int,
	nativeint_of_float,
	nativeint_to_float,
	nativeint_of_int32,
	nativeint_to_int32,
	nativeint_format,
	nativeint_of_string,
	caml_open_descriptor_in,
	caml_open_descriptor_out,
	caml_out_channels_list,
	channel_descriptor,
	caml_close_channel,
	caml_channel_size,
	caml_set_binary_mode,
	caml_flush_partial,
	caml_flush,
	caml_output_char,
	caml_output_int,
	caml_output_partial,
	caml_output,
	caml_seek_out,
	caml_pos_out,
	caml_input_char,
	caml_input_int,
	caml_input,
	caml_seek_in,
	caml_pos_in,
	caml_input_scan_line,
	lex_engine,
	md5_string,
	md5_chan,
	get_global_data,
	reify_bytecode,
	realloc_global,
	get_current_environment,
	invoke_traced_function,
	static_alloc,
	static_free,
	static_resize,
	obj_is_block,
	obj_tag,
	obj_block,
	obj_dup,
	obj_truncate,
	parse_engine,
	install_signal_handler,
	ml_string_length,
	create_string,
	string_get,
	string_set,
	string_equal,
	string_notequal,
	blit_string,
	fill_string,
	is_printable,
	bitvect_test,
	sys_exit,
	sys_open,
	sys_close,
	sys_file_exists,
	sys_remove,
	sys_rename,
	sys_chdir,
	sys_getcwd,
	sys_getenv,
	sys_get_argv,
	sys_system_command,
	sys_time,
	sys_random_seed,
	sys_get_config,
	terminfo_setup,
	terminfo_backup,
	terminfo_standout,
	terminfo_resume,
	register_named_value,
	weak_create,
	weak_set,
	weak_get,
	weak_get_copy,
	weak_check,
	final_register,
	ensure_stack_capacity,
	dynlink_open_lib,
	dynlink_close_lib,
	dynlink_lookup_symbol,
	dynlink_add_primitive,
	dynlink_get_current_libs,
	nml_opendir,
	nml_readdir,
	nml_closedir,
	nml_findfirst,
	nml_findnext,
	nml_findclose,
	 0 };
char * names_of_builtin_cprim[] = {
	"alloc_dummy",
	"update_dummy",
	"array_get_addr",
	"array_get_float",
	"array_get",
	"array_set_addr",
	"array_set_float",
	"array_set",
	"array_unsafe_get_float",
	"array_unsafe_get",
	"array_unsafe_set_addr",
	"array_unsafe_set_float",
	"array_unsafe_set",
	"make_vect",
	"make_array",
	"compare",
	"equal",
	"notequal",
	"lessthan",
	"lessequal",
	"greaterthan",
	"greaterequal",
	"output_value",
	"output_value_to_string",
	"output_value_to_buffer",
	"format_float",
	"float_of_string",
	"int_of_float",
	"float_of_int",
	"neg_float",
	"abs_float",
	"add_float",
	"sub_float",
	"mul_float",
	"div_float",
	"exp_float",
	"floor_float",
	"fmod_float",
	"frexp_float",
	"ldexp_float",
	"log_float",
	"log10_float",
	"modf_float",
	"sqrt_float",
	"power_float",
	"sin_float",
	"sinh_float",
	"cos_float",
	"cosh_float",
	"tan_float",
	"tanh_float",
	"asin_float",
	"acos_float",
	"atan_float",
	"atan2_float",
	"ceil_float",
	"eq_float",
	"neq_float",
	"le_float",
	"lt_float",
	"ge_float",
	"gt_float",
	"float_of_bytes",
	"classify_float",
	"gc_stat",
	"gc_counters",
	"gc_get",
	"gc_set",
	"gc_minor",
	"gc_major",
	"gc_full_major",
	"gc_compaction",
	"hash_univ_param",
	"input_value",
	"input_value_from_string",
	"marshal_data_size",
	"int_of_string",
	"format_int",
	"int32_neg",
	"int32_add",
	"int32_sub",
	"int32_mul",
	"int32_div",
	"int32_mod",
	"int32_and",
	"int32_or",
	"int32_xor",
	"int32_shift_left",
	"int32_shift_right",
	"int32_shift_right_unsigned",
	"int32_of_int",
	"int32_to_int",
	"int32_of_float",
	"int32_to_float",
	"int32_format",
	"int32_of_string",
	"int64_neg",
	"int64_add",
	"int64_sub",
	"int64_mul",
	"int64_div",
	"int64_mod",
	"int64_and",
	"int64_or",
	"int64_xor",
	"int64_shift_left",
	"int64_shift_right",
	"int64_shift_right_unsigned",
	"int64_of_int",
	"int64_to_int",
	"int64_of_float",
	"int64_to_float",
	"int64_of_int32",
	"int64_to_int32",
	"int64_of_nativeint",
	"int64_to_nativeint",
	"int64_format",
	"int64_of_string",
	"int64_bits_of_float",
	"int64_float_of_bits",
	"nativeint_neg",
	"nativeint_add",
	"nativeint_sub",
	"nativeint_mul",
	"nativeint_div",
	"nativeint_mod",
	"nativeint_and",
	"nativeint_or",
	"nativeint_xor",
	"nativeint_shift_left",
	"nativeint_shift_right",
	"nativeint_shift_right_unsigned",
	"nativeint_of_int",
	"nativeint_to_int",
	"nativeint_of_float",
	"nativeint_to_float",
	"nativeint_of_int32",
	"nativeint_to_int32",
	"nativeint_format",
	"nativeint_of_string",
	"caml_open_descriptor_in",
	"caml_open_descriptor_out",
	"caml_out_channels_list",
	"channel_descriptor",
	"caml_close_channel",
	"caml_channel_size",
	"caml_set_binary_mode",
	"caml_flush_partial",
	"caml_flush",
	"caml_output_char",
	"caml_output_int",
	"caml_output_partial",
	"caml_output",
	"caml_seek_out",
	"caml_pos_out",
	"caml_input_char",
	"caml_input_int",
	"caml_input",
	"caml_seek_in",
	"caml_pos_in",
	"caml_input_scan_line",
	"lex_engine",
	"md5_string",
	"md5_chan",
	"get_global_data",
	"reify_bytecode",
	"realloc_global",
	"get_current_environment",
	"invoke_traced_function",
	"static_alloc",
	"static_free",
	"static_resize",
	"obj_is_block",
	"obj_tag",
	"obj_block",
	"obj_dup",
	"obj_truncate",
	"parse_engine",
	"install_signal_handler",
	"ml_string_length",
	"create_string",
	"string_get",
	"string_set",
	"string_equal",
	"string_notequal",
	"blit_string",
	"fill_string",
	"is_printable",
	"bitvect_test",
	"sys_exit",
	"sys_open",
	"sys_close",
	"sys_file_exists",
	"sys_remove",
	"sys_rename",
	"sys_chdir",
	"sys_getcwd",
	"sys_getenv",
	"sys_get_argv",
	"sys_system_command",
	"sys_time",
	"sys_random_seed",
	"sys_get_config",
	"terminfo_setup",
	"terminfo_backup",
	"terminfo_standout",
	"terminfo_resume",
	"register_named_value",
	"weak_create",
	"weak_set",
	"weak_get",
	"weak_get_copy",
	"weak_check",
	"final_register",
	"ensure_stack_capacity",
	"dynlink_open_lib",
	"dynlink_close_lib",
	"dynlink_lookup_symbol",
	"dynlink_add_primitive",
	"dynlink_get_current_libs",
	"nml_opendir",
	"nml_readdir",
	"nml_closedir",
	"nml_findfirst",
	"nml_findnext",
	"nml_findclose",
	 0 };


syntax highlighted by Code2HTML, v. 0.9.1