/[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.94 by hanwen, Mon Aug 5 17:46:34 2002 UTC revision 1.95 by mdj, Sun Dec 15 14:24:34 2002 UTC
# Line 3  Line 3 
3  #ifndef SCM_TAGS_H  #ifndef SCM_TAGS_H
4  #define SCM_TAGS_H  #define SCM_TAGS_H
5    
6  /* Copyright (C) 1995,1996,1997,1998,1999,2000,2001 Free Software Foundation, Inc.  /* Copyright (C) 1995,1996,1997,1998,1999,2000,2001, 2002 Free Software Foundation, Inc.
7   *   *
8   * This program is free software; you can redistribute it and/or modify   * This program is free software; you can redistribute it and/or modify
9   * it under the terms of the GNU General Public License as published by   * it under the terms of the GNU General Public License as published by
# Line 459  SCM_API char *scm_isymnames[];   /* defi Line 459  SCM_API char *scm_isymnames[];   /* defi
459  #define SCM_IM_BIND             SCM_MAKISYM (26)  #define SCM_IM_BIND             SCM_MAKISYM (26)
460    
461  #define SCM_IM_DELAY            SCM_MAKISYM (27)  #define SCM_IM_DELAY            SCM_MAKISYM (27)
462  #define SCM_IM_CALL_WITH_VALUES SCM_MAKISYM (28)  #define SCM_IM_FUTURE           SCM_MAKISYM (28)
463    #define SCM_IM_CALL_WITH_VALUES SCM_MAKISYM (29)
464    
465  /* When a variable is unbound this is marked by the SCM_UNDEFINED  /* When a variable is unbound this is marked by the SCM_UNDEFINED
466   * 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 470  SCM_API char *scm_isymnames[];   /* defi Line 471  SCM_API char *scm_isymnames[];   /* defi
471   * 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
472   * strange values loose on the Scheme level.   * strange values loose on the Scheme level.
473   */   */
474  #define SCM_UNBOUND             SCM_MAKIFLAG (29)  #define SCM_UNBOUND             SCM_MAKIFLAG (30)
475    
476  #define SCM_UNBNDP(x)           (SCM_EQ_P ((x), SCM_UNDEFINED))  #define SCM_UNBNDP(x)           (SCM_EQ_P ((x), SCM_UNDEFINED))
477    
478  /* The Elisp nil value. */  /* The Elisp nil value. */
479  #define SCM_ELISP_NIL           SCM_MAKIFLAG (30)  #define SCM_ELISP_NIL           SCM_MAKIFLAG (31)
480    
481    
482    

Legend:
Removed from v.1.94  
changed lines
  Added in v.1.95

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