/[guile]/guile/guile-core/libguile/tags.h
ViewVC logotype

Diff of /guile/guile-core/libguile/tags.h

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.90 by mvo, Mon Nov 12 01:13:00 2001 UTC revision 1.91 by ossau, Tue Jan 22 23:31:39 2002 UTC
# Line 458  SCM_API char *scm_isymnames[];   /* defi Line 458  SCM_API char *scm_isymnames[];   /* defi
458  /* Multi-language support */  /* Multi-language support */
459    
460  #define SCM_IM_NIL_COND         SCM_MAKISYM (25)  #define SCM_IM_NIL_COND         SCM_MAKISYM (25)
461  #define SCM_IM_NIL_IFY          SCM_MAKISYM (26)  #define SCM_IM_BIND             SCM_MAKISYM (26)
 #define SCM_IM_T_IFY            SCM_MAKISYM (27)  
 #define SCM_IM_0_COND           SCM_MAKISYM (28)  
 #define SCM_IM_0_IFY            SCM_MAKISYM (29)  
 #define SCM_IM_1_IFY            SCM_MAKISYM (30)  
 #define SCM_IM_BIND             SCM_MAKISYM (31)  
462    
463  #define SCM_IM_DELAY            SCM_MAKISYM (32)  #define SCM_IM_DELAY            SCM_MAKISYM (27)
464  #define SCM_IM_CALL_WITH_VALUES SCM_MAKISYM (33)  #define SCM_IM_CALL_WITH_VALUES SCM_MAKISYM (28)
465    
466  /* When a variable is unbound this is marked by the SCM_UNDEFINED  /* When a variable is unbound this is marked by the SCM_UNDEFINED
467   * value.  The following is an unbound value which can be handled on   * value.  The following is an unbound value which can be handled on
# Line 477  SCM_API char *scm_isymnames[];   /* defi Line 472  SCM_API char *scm_isymnames[];   /* defi
472   * used instead.  It is not ideal to let this kind of unique and   * used instead.  It is not ideal to let this kind of unique and
473   * strange values loose on the Scheme level.   * strange values loose on the Scheme level.
474   */   */
475  #define SCM_UNBOUND             SCM_MAKIFLAG (34)  #define SCM_UNBOUND             SCM_MAKIFLAG (29)
476    
477  #define SCM_UNBNDP(x)           (SCM_EQ_P ((x), SCM_UNDEFINED))  #define SCM_UNBNDP(x)           (SCM_EQ_P ((x), SCM_UNDEFINED))
478    
479    /* The Elisp nil value. */
480    #define SCM_ELISP_NIL           SCM_MAKIFLAG (30)
481    
482    
483    
484  /* Dispatching aids:  /* Dispatching aids:

Legend:
Removed from v.1.90  
changed lines
  Added in v.1.91

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26