vm/primitives.hpp

   1 namespace factor
   2 {
   3
   4 #define PRIMITIVE(name) extern "C" void primitive_##name(factor_vm *parent)
   5
   6 /* These are generated with macros in alien.cpp */
   7 PRIMITIVE(alien_signed_cell);
   8 PRIMITIVE(set_alien_signed_cell);
   9 PRIMITIVE(alien_unsigned_cell);
  10 PRIMITIVE(set_alien_unsigned_cell);
  11 PRIMITIVE(alien_signed_8);
  12 PRIMITIVE(set_alien_signed_8);
  13 PRIMITIVE(alien_unsigned_8);
  14 PRIMITIVE(set_alien_unsigned_8);
  15 PRIMITIVE(alien_signed_4);
  16 PRIMITIVE(set_alien_signed_4);
  17 PRIMITIVE(alien_unsigned_4);
  18 PRIMITIVE(set_alien_unsigned_4);
  19 PRIMITIVE(alien_signed_2);
  20 PRIMITIVE(set_alien_signed_2);
  21 PRIMITIVE(alien_unsigned_2);
  22 PRIMITIVE(set_alien_unsigned_2);
  23 PRIMITIVE(alien_signed_1);
  24 PRIMITIVE(set_alien_signed_1);
  25 PRIMITIVE(alien_unsigned_1);
  26 PRIMITIVE(set_alien_unsigned_1);
  27 PRIMITIVE(alien_float);
  28 PRIMITIVE(set_alien_float);
  29 PRIMITIVE(alien_double);
  30 PRIMITIVE(set_alien_double);
  31 PRIMITIVE(alien_cell);
  32 PRIMITIVE(set_alien_cell);
  33
  34 }