]> gitweb.factorcode.org Git - factor.git/blob - vm/primitives.hpp
Merge Phil Dawes' VM work
[factor.git] / vm / primitives.hpp
1 namespace factor
2 {
3
4 #if defined(FACTOR_X86)
5   extern "C" __attribute__ ((regparm (1))) typedef void (*primitive_type)(void *myvm);
6   #define PRIMITIVE(name) extern "C" __attribute__ ((regparm (1)))  void primitive_##name(void *myvm)
7 #else
8   extern "C" typedef void (*primitive_type)(void *myvm);
9   #define PRIMITIVE(name) extern "C" void primitive_##name(void *myvm)
10 #endif
11
12 extern const primitive_type primitives[];
13 }