/[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.92 by dirk, Fri Mar 1 00:19:20 2002 UTC revision 1.93 by xxhanwen, Sat Jul 20 14:08:34 2002 UTC
# Line 315  typedef signed long scm_t_signed_bits; Line 315  typedef signed long scm_t_signed_bits;
315  #define SCM_TYP16(x)            (0xffff & SCM_CELL_TYPE (x))  #define SCM_TYP16(x)            (0xffff & SCM_CELL_TYPE (x))
316  #define SCM_TYP16S(x)           (0xfeff & SCM_CELL_TYPE (x))  #define SCM_TYP16S(x)           (0xfeff & SCM_CELL_TYPE (x))
317    
318  #define SCM_TYP16_PREDICATE(tag,x) (!SCM_IMP (x) && SCM_TYP16 (x) == (tag))  #define SCM_TYP16_PREDICATE(tag, x) (!SCM_IMP (x) && SCM_TYP16 (x) == (tag))
319    
320    
321    

Legend:
Removed from v.1.92  
changed lines
  Added in v.1.93

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