remove "externals" from the vm

[bpt/guile.git] / libguile / objcodes.h

diff --git a/libguile/objcodes.h b/libguile/objcodes.h
index e9b1cdb..6727e23 100644 (file)
--- a/libguile/objcodes.h
+++ b/libguile/objcodes.h
@@ -26,7 +26,7 @@ struct scm_objcode {
   scm_t_uint8 nargs;
   scm_t_uint8 nrest;
   scm_t_uint8 nlocs;
-  scm_t_uint8 nexts;
+  scm_t_uint8 unused;
   scm_t_uint32 len;             /* the maximum index of base[] */
   scm_t_uint32 metalen;         /* well, i lie. this many bytes at the end of
                                    base[] for metadata */
@@ -49,7 +49,6 @@ SCM_API scm_t_bits scm_tc16_objcode;
 #define SCM_OBJCODE_NARGS(x)   (SCM_OBJCODE_DATA (x)->nargs)
 #define SCM_OBJCODE_NREST(x)   (SCM_OBJCODE_DATA (x)->nrest)
 #define SCM_OBJCODE_NLOCS(x)   (SCM_OBJCODE_DATA (x)->nlocs)
-#define SCM_OBJCODE_NEXTS(x)   (SCM_OBJCODE_DATA (x)->nexts)
 #define SCM_OBJCODE_BASE(x)    (SCM_OBJCODE_DATA (x)->base)
 
 #define SCM_OBJCODE_IS_MMAP(x) (SCM_SMOB_FLAGS (x) & SCM_F_OBJCODE_IS_MMAP)