#include "mlvalues.h"
#include "prims.h"
extern value compare();
extern value equal();
extern value notequal();
extern value lessthan();
extern value lessequal();
extern value greaterthan();
extern value greaterequal();
extern value extern_val();
extern value extern_compact_val();
extern value format_float();
extern value float_of_string();
extern value exp_float();
extern value log_float();
extern value sqrt_float();
extern value power_float();
extern value sin_float();
extern value cos_float();
extern value tan_float();
extern value asin_float();
extern value acos_float();
extern value atan_float();
extern value atan2_float();
extern value gc_stat();
extern value gc_get();
extern value gc_set();
extern value gc_minor();
extern value gc_major();
extern value gc_full_major();
extern value hash_univ_param();
extern value intern_val();
extern value int_of_string();
extern value format_int();
extern value open_descriptor();
extern value channel_descriptor();
extern value channel_size();
extern value flush();
extern value output_char();
extern value output_int();
extern value output();
extern value seek_out();
extern value pos_out();
extern value close_out();
extern value input_char();
extern value input_int();
extern value input();
extern value input_nonblocking();
extern value seek_in();
extern value pos_in();
extern value close_in();
extern value input_scan_line();
extern value get_next_char();
extern value start_interp();
extern value realloc_global();
extern value static_alloc();
extern value static_free();
extern value static_resize();
extern value obj_is_block();
extern value obj_block();
extern value available_primitives();
extern value parse_engine();
extern value create_string();
extern value compare_strings();
extern value blit_string();
extern value fill_string();
extern value is_printable();
extern value sys_exit();
extern value sys_open();
extern value sys_close();
extern value sys_remove();
extern value sys_rename();
extern value sys_chdir();
extern value sys_getenv();
extern value sys_system_command();
extern value sys_catch_break();
extern value sml_equal();
extern value sml_not_equal();
extern value sml_system();
extern value sml_abs_int();
extern value sml_floor();
extern value sml_ceil();
extern value sml_round();
extern value sml_trunc();
extern value sml_abs_real();
extern value sml_sqrt();
extern value sml_sin();
extern value sml_cos();
extern value sml_exp();
extern value sml_ln();
extern value sml_int_of_string();
extern value sml_concat();
extern value sml_chr();
extern value sml_ord();
extern value sml_float_of_string();
extern value sml_string_of_int();
extern value sml_string_of_float();
extern value sml_makestring_of_char();
extern value sml_makestring_of_string();
extern value sml_getrealtime();
extern value sml_getrutime();
extern value sml_errno();
extern value sml_getdir();
extern value sml_mkdir();
extern value sml_rmdir();
extern value sml_opendir();
extern value sml_rewinddir();
extern value sml_readdir();
extern value sml_closedir();
extern value sml_isdir();
extern value sml_modtime();
extern value sml_settime();
extern value sml_access();
extern value sml_tmpnam();
extern value sml_errormsg();
extern value sml_asin();
extern value sml_acos();
extern value sml_atan2();
extern value sml_pow();
extern value sml_localtime();
extern value sml_gmtime();
extern value sml_mktime();
extern value sml_asctime();
extern value sml_strftime();
extern value sml_general_string_of_float();
extern value sml_filesize();
extern value sml_int_of_hex();
extern value sml_word_of_hex();
extern value sml_word_of_dec();
extern value sml_hexstring_of_word();
extern value sml_sinh();
extern value sml_cosh();
extern value sml_tanh();
extern value weak_sub();
extern value weak_isdead();
extern value weak_arr();
extern value string_mlval();
extern value mlval_string();
extern value w8vectofloat();
extern value floattow8vec();
extern value w8vectodouble();
extern value doubletow8vec();
extern value sml_localoffset();
extern value sml_exnname();
extern value sml_exnmessage();
extern value sml_realpath();
extern value sml_uname();
extern value sml_islink();
extern value sml_readlink();
extern value sml_devinode();
extern value sml_setdisk();
extern value md5sum();
extern value alloc_valueptr();
extern value sml_init_register();
extern value c_var();
extern value cfun_app1();
extern value cfun_app2();
extern value cfun_app3();
extern value cfun_app4();
extern value cfun_app5();
c_primitive cprim[] = {
  compare,
  equal,
  notequal,
  lessthan,
  lessequal,
  greaterthan,
  greaterequal,
  extern_val,
  extern_compact_val,
  format_float,
  float_of_string,
  exp_float,
  log_float,
  sqrt_float,
  power_float,
  sin_float,
  cos_float,
  tan_float,
  asin_float,
  acos_float,
  atan_float,
  atan2_float,
  gc_stat,
  gc_get,
  gc_set,
  gc_minor,
  gc_major,
  gc_full_major,
  hash_univ_param,
  intern_val,
  int_of_string,
  format_int,
  open_descriptor,
  channel_descriptor,
  channel_size,
  flush,
  output_char,
  output_int,
  output,
  seek_out,
  pos_out,
  close_out,
  input_char,
  input_int,
  input,
  input_nonblocking,
  seek_in,
  pos_in,
  close_in,
  input_scan_line,
  get_next_char,
  start_interp,
  realloc_global,
  static_alloc,
  static_free,
  static_resize,
  obj_is_block,
  obj_block,
  available_primitives,
  parse_engine,
  create_string,
  compare_strings,
  blit_string,
  fill_string,
  is_printable,
  sys_exit,
  sys_open,
  sys_close,
  sys_remove,
  sys_rename,
  sys_chdir,
  sys_getenv,
  sys_system_command,
  sys_catch_break,
  sml_equal,
  sml_not_equal,
  sml_system,
  sml_abs_int,
  sml_floor,
  sml_ceil,
  sml_round,
  sml_trunc,
  sml_abs_real,
  sml_sqrt,
  sml_sin,
  sml_cos,
  sml_exp,
  sml_ln,
  sml_int_of_string,
  sml_concat,
  sml_chr,
  sml_ord,
  sml_float_of_string,
  sml_string_of_int,
  sml_string_of_float,
  sml_makestring_of_char,
  sml_makestring_of_string,
  sml_getrealtime,
  sml_getrutime,
  sml_errno,
  sml_getdir,
  sml_mkdir,
  sml_rmdir,
  sml_opendir,
  sml_rewinddir,
  sml_readdir,
  sml_closedir,
  sml_isdir,
  sml_modtime,
  sml_settime,
  sml_access,
  sml_tmpnam,
  sml_errormsg,
  sml_asin,
  sml_acos,
  sml_atan2,
  sml_pow,
  sml_localtime,
  sml_gmtime,
  sml_mktime,
  sml_asctime,
  sml_strftime,
  sml_general_string_of_float,
  sml_filesize,
  sml_int_of_hex,
  sml_word_of_hex,
  sml_word_of_dec,
  sml_hexstring_of_word,
  sml_sinh,
  sml_cosh,
  sml_tanh,
  weak_sub,
  weak_isdead,
  weak_arr,
  string_mlval,
  mlval_string,
  w8vectofloat,
  floattow8vec,
  w8vectodouble,
  doubletow8vec,
  sml_localoffset,
  sml_exnname,
  sml_exnmessage,
  sml_realpath,
  sml_uname,
  sml_islink,
  sml_readlink,
  sml_devinode,
  sml_setdisk,
  md5sum,
  alloc_valueptr,
  sml_init_register,
  c_var,
  cfun_app1,
  cfun_app2,
  cfun_app3,
  cfun_app4,
  cfun_app5,
  0 };
char * names_of_cprim[] = {
  "compare",
  "equal",
  "notequal",
  "lessthan",
  "lessequal",
  "greaterthan",
  "greaterequal",
  "extern_val",
  "extern_compact_val",
  "format_float",
  "float_of_string",
  "exp_float",
  "log_float",
  "sqrt_float",
  "power_float",
  "sin_float",
  "cos_float",
  "tan_float",
  "asin_float",
  "acos_float",
  "atan_float",
  "atan2_float",
  "gc_stat",
  "gc_get",
  "gc_set",
  "gc_minor",
  "gc_major",
  "gc_full_major",
  "hash_univ_param",
  "intern_val",
  "int_of_string",
  "format_int",
  "open_descriptor",
  "channel_descriptor",
  "channel_size",
  "flush",
  "output_char",
  "output_int",
  "output",
  "seek_out",
  "pos_out",
  "close_out",
  "input_char",
  "input_int",
  "input",
  "input_nonblocking",
  "seek_in",
  "pos_in",
  "close_in",
  "input_scan_line",
  "get_next_char",
  "start_interp",
  "realloc_global",
  "static_alloc",
  "static_free",
  "static_resize",
  "obj_is_block",
  "obj_block",
  "available_primitives",
  "parse_engine",
  "create_string",
  "compare_strings",
  "blit_string",
  "fill_string",
  "is_printable",
  "sys_exit",
  "sys_open",
  "sys_close",
  "sys_remove",
  "sys_rename",
  "sys_chdir",
  "sys_getenv",
  "sys_system_command",
  "sys_catch_break",
  "sml_equal",
  "sml_not_equal",
  "sml_system",
  "sml_abs_int",
  "sml_floor",
  "sml_ceil",
  "sml_round",
  "sml_trunc",
  "sml_abs_real",
  "sml_sqrt",
  "sml_sin",
  "sml_cos",
  "sml_exp",
  "sml_ln",
  "sml_int_of_string",
  "sml_concat",
  "sml_chr",
  "sml_ord",
  "sml_float_of_string",
  "sml_string_of_int",
  "sml_string_of_float",
  "sml_makestring_of_char",
  "sml_makestring_of_string",
  "sml_getrealtime",
  "sml_getrutime",
  "sml_errno",
  "sml_getdir",
  "sml_mkdir",
  "sml_rmdir",
  "sml_opendir",
  "sml_rewinddir",
  "sml_readdir",
  "sml_closedir",
  "sml_isdir",
  "sml_modtime",
  "sml_settime",
  "sml_access",
  "sml_tmpnam",
  "sml_errormsg",
  "sml_asin",
  "sml_acos",
  "sml_atan2",
  "sml_pow",
  "sml_localtime",
  "sml_gmtime",
  "sml_mktime",
  "sml_asctime",
  "sml_strftime",
  "sml_general_string_of_float",
  "sml_filesize",
  "sml_int_of_hex",
  "sml_word_of_hex",
  "sml_word_of_dec",
  "sml_hexstring_of_word",
  "sml_sinh",
  "sml_cosh",
  "sml_tanh",
  "weak_sub",
  "weak_isdead",
  "weak_arr",
  "string_mlval",
  "mlval_string",
  "w8vectofloat",
  "floattow8vec",
  "w8vectodouble",
  "doubletow8vec",
  "sml_localoffset",
  "sml_exnname",
  "sml_exnmessage",
  "sml_realpath",
  "sml_uname",
  "sml_islink",
  "sml_readlink",
  "sml_devinode",
  "sml_setdisk",
  "md5sum",
  "alloc_valueptr",
  "sml_init_register",
  "c_var",
  "cfun_app1",
  "cfun_app2",
  "cfun_app3",
  "cfun_app4",
  "cfun_app5",
  0 };