Use SCM_SMOB_* instead of SCM_CELL_* as appropriate. Use

[bpt/guile.git] / libguile / fluids.h

diff --git a/libguile/fluids.h b/libguile/fluids.h
index cb4fba4..0a60bac 100644 (file)
--- a/libguile/fluids.h
+++ b/libguile/fluids.h
@@ -50,7 +50,7 @@
 
 SCM_API scm_t_bits scm_tc16_fluid;
 
-#define SCM_FLUIDP(x)    (!SCM_IMP (x) && (SCM_CELL_TYPE (x) == scm_tc16_fluid))
+#define SCM_FLUIDP(x)    (SCM_SMOB_PREDICATE (scm_tc16_fluid, (x)))
 #define SCM_FLUID_NUM(x) (SCM_CELL_WORD_1 (x))
 
 /* The fastest way to acces/modify the value of a fluid.  These macros