mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-29 16:30:19 +02:00
* tags.h (SCM_IM_HASH_DISPATCH): Removed.
This commit is contained in:
parent
2c53acd5c3
commit
a9571599e7
1 changed files with 9 additions and 10 deletions
|
@ -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))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue