From 413cb56ff4080de5676a2756b670bcdd81af3334 Mon Sep 17 00:00:00 2001 From: Mikael Djurfeldt Date: Sun, 12 Mar 2000 17:00:58 +0000 Subject: * async.c, boolean.h, debug.c, dynl.c, dynwind.c, eval.c, eval.h, feature.h, filesys.h, fluids.h, fports.c, fports.h, gc.c, gc.h, hash.c, keywords.h, macros.c, numbers.c, numbers.h, objects.c, objects.h, options.c, pairs.h, ports.c, ports.h, print.c, procs.h, ramap.c, read.c, smob.c, smob.h, srcprop.h, stacks.c, stacks.h, strports.c, struct.c, struct.h, tag.c, tags.h, throw.c, unif.c, unif.h, variable.h, vectors.h, weaks.c, weaks.h (SCM_SCM, SCM_BITS, SCM_CARBITS): Renamed from SCM_ASSCM, SCM_ASWORD, SCM_CARW). --- libguile/debug.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'libguile/debug.c') diff --git a/libguile/debug.c b/libguile/debug.c index 45431ad73..14c69130d 100644 --- a/libguile/debug.c +++ b/libguile/debug.c @@ -275,7 +275,7 @@ SCM_DEFINE (scm_gloc_p, "gloc?", 1, 0, 0, #define FUNC_NAME s_scm_gloc_p { return SCM_BOOL((SCM_MEMOIZEDP (obj) - && (SCM_ASWORD(SCM_MEMOIZED_EXP (obj)) & 7) == 1)); + && (SCM_BITS(SCM_MEMOIZED_EXP (obj)) & 7) == 1)); } #undef FUNC_NAME -- cgit v1.2.3