diff options
author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1999-07-24 23:10:27 +0000 |
---|---|---|
committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1999-07-24 23:10:27 +0000 |
commit | 2c16a78a11cb78458e78b1454a23a2739166b6fd (patch) | |
tree | 749f729e7ee737999d61f991d089c26c9b4672ac /libguile/smob.h | |
parent | f12733c9d43d6147d9e7bf09cf51225945a1a97c (diff) | |
download | guile-2c16a78a11cb78458e78b1454a23a2739166b6fd.tar.gz |
* smob.c (scm_smob_print): Handle non-existing type name nicely.
Removed #include "genio.h"
Diffstat (limited to 'libguile/smob.h')
-rw-r--r-- | libguile/smob.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/libguile/smob.h b/libguile/smob.h index 110044dc0..95e94ecbe 100644 --- a/libguile/smob.h +++ b/libguile/smob.h @@ -89,6 +89,7 @@ do { \ #define SCM_SET_SMOB_DATA(x, data) SCM_SETCDR (x, data) #define SCM_TC2SMOBNUM(x) (0x0ff & ((x) >> 8)) #define SCM_SMOBNUM(x) (SCM_TC2SMOBNUM (SCM_CAR (x))) +/* SCM_SMOBNAME can be 0 if name is missing */ #define SCM_SMOBNAME(smobnum) scm_smobs[smobnum].name extern int scm_numsmob; |