mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-28 07:50:20 +02:00
Code Activity

* tags.h (SCM_IM_HASH_DISPATCH): Removed.

Browse source
This commit is contained in:
Mikael Djurfeldt 1999-08-29 03:28:08 +00:00
parent 2c53acd5c3
commit a9571599e7
1 changed files with 9 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

19
libguile/tags.h
View file

@ -472,19 +472,18 @@ extern char *scm_isymnames[]; /* defined in print.c */
#define SCM_EOL SCM_MAKIFLAG(20)
#define SCM_UNSPECIFIED SCM_MAKIFLAG(21)
#define SCM_IM_DISPATCH SCM_MAKISYM(22)
#define SCM_IM_HASH_DISPATCH SCM_MAKISYM(23)
#define SCM_IM_SLOT_REF SCM_MAKISYM(24)
#define SCM_IM_SLOT_SET_X SCM_MAKISYM(25)
#define SCM_IM_SLOT_REF SCM_MAKISYM(23)
#define SCM_IM_SLOT_SET_X SCM_MAKISYM(24)
/* Multi-language support */
#define SCM_IM_NIL_COND SCM_MAKISYM(26)
#define SCM_IM_NIL_IFY SCM_MAKISYM(27)
#define SCM_IM_T_IFY SCM_MAKISYM(28)
#define SCM_IM_0_COND SCM_MAKISYM(29)
#define SCM_IM_0_IFY SCM_MAKISYM(30)
#define SCM_IM_1_IFY SCM_MAKISYM(31)
#define SCM_IM_BIND SCM_MAKISYM(32)
#define SCM_IM_NIL_COND SCM_MAKISYM(25)
#define SCM_IM_NIL_IFY 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)
#define SCM_UNBNDP(x) (SCM_UNDEFINED==(x))