refactor tc7 and tc16 checks
authorAndy Wingo <wingo@pobox.com>
Mon, 24 Oct 2011 15:34:47 +0000 (17:34 +0200)
committerAndy Wingo <wingo@pobox.com>
Mon, 24 Oct 2011 16:54:01 +0000 (18:54 +0200)
commitdc7da0be90d6033d512f9772894179970af678e7
tree3731e84376e21ca1eba9c92df4cf0ffe38f392ad
parent62fdadb0a5f10ff34c7e19ac299aa89d950ffc69
refactor tc7 and tc16 checks

* libguile/tags.h (SCM_HAS_TYP7, SCM_HAS_TYP7S, SCM_HAS_TYP16): New
  macros.

* libguile/bytevectors.h (SCM_BYTEVECTOR_P):
* libguile/control.h (SCM_PROMPT_P):
* libguile/filesys.h (SCM_DIRP):
* libguile/fluids.h (SCM_WITH_FLUIDS_P, SCM_FLUID_P)
  (SCM_I_DYNAMIC_STATE_P):
* libguile/foreign.h (SCM_POINTER_P):
* libguile/fports.h (SCM_FPORTP):
* libguile/frames.h (SCM_VM_FRAME_P):
* libguile/hashtab.h (SCM_HASHTABLE_P):
* libguile/inline.h (scm_get_byte_or_eof):
* libguile/numbers.h (SCM_REALP, SCM_BIGP, SCM_COMPLEXP, SCM_FRACTIONP):
* libguile/objcodes.h (SCM_OBJCODE_P):
* libguile/ports.h (SCM_OUTPUT_PORT_P):
* libguile/programs.h (SCM_PROGRAM_P):
* libguile/smob.h (SCM_SMOB_PREDICATE):
* libguile/srfi-14.h (SCM_CHARSETP):
* libguile/strings.c (IS_STRING):
* libguile/strports.h (SCM_STRPORTP):
* libguile/symbols.h (scm_is_symbol):
* libguile/variable.h (SCM_VARIABLEP):
* libguile/vectors.h (SCM_I_IS_VECTOR, SCM_I_IS_NONWEAK_VECTOR):
* libguile/vm-i-system.c (call, tail-call, mv-call)
* libguile/vm.h (SCM_VM_P, SCM_VM_CONT_P):
* libguile/weak-set.c (SCM_WEAK_SET_P):
* libguile/weak-table.c (SCM_WEAK_TABLE_P):
* libguile/weak-vector.h (SCM_I_WVECTP): Use them.
26 files changed:
libguile/bytevectors.h
libguile/control.h
libguile/filesys.h
libguile/fluids.h
libguile/foreign.h
libguile/fports.h
libguile/frames.h
libguile/hashtab.h
libguile/inline.h
libguile/numbers.h
libguile/objcodes.h
libguile/ports.h
libguile/programs.h
libguile/smob.h
libguile/srfi-14.h
libguile/strings.c
libguile/strports.h
libguile/symbols.h
libguile/tags.h
libguile/variable.h
libguile/vectors.h
libguile/vm-i-system.c
libguile/vm.h
libguile/weak-set.c
libguile/weak-table.c
libguile/weak-vector.h