--- gforth/engine/forth.h 2003/09/14 15:06:29 1.56 +++ gforth/engine/forth.h 2003/11/02 18:18:35 1.57 @@ -34,15 +34,41 @@ # define INDIRECT_THREADED #endif -#if defined(GFORTH_DEBUGGING) +#if defined(GFORTH_DEBUGGING) || defined(INDIRECT_THREADED) || defined(DOUBLY_INDIRECT) || defined(VM_PROFILING) # undef USE_TOS # undef USE_FTOS # undef USE_NO_TOS # undef USE_NO_FTOS # define USE_NO_TOS # define USE_NO_FTOS + +#define PRIM_I "prim.i" +#define PRIM_LAB_I "prim_lab.i" +#define PRIM_NAMES_I "prim_names.i" +#define PRIM_SUPEREND_I "prim_superend.i" +#define PROFILE_I "profile.i" +#define PRIM_NUM_I "prim_num.i" +#define PRIM_GRP_I "prim_grp.i" +#define COSTS_I "costs.i" +#define SUPER2_I "super2.i" + +#else +/* gforth-fast or gforth-native */ + +#define PRIM_I "prim-fast.i" +#define PRIM_LAB_I "prim_lab-fast.i" +#define PRIM_NAMES_I "prim_names-fast.i" +#define PRIM_SUPEREND_I "prim_superend-fast.i" +#define PROFILE_I "profile-fast.i" +#define PRIM_NUM_I "prim_num-fast.i" +#define PRIM_GRP_I "prim_grp-fast.i" +#define COSTS_I "costs-fast.i" +#define SUPER2_I "super2-fast.i" + #endif + + #include #if defined(NeXT)