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/filesys.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'libguile/filesys.h') diff --git a/libguile/filesys.h b/libguile/filesys.h index d4d8c9119..1b4e2773e 100644 --- a/libguile/filesys.h +++ b/libguile/filesys.h @@ -54,7 +54,7 @@ extern long scm_tc16_dir; #define SCM_DIRP(x) (SCM_NIMP(x) && (SCM_TYP16(x)==(scm_tc16_dir))) -#define SCM_OPDIRP(x) (SCM_NIMP(x) && (SCM_CARW(x)==(scm_tc16_dir | SCM_OPN))) +#define SCM_OPDIRP(x) (SCM_NIMP(x) && (SCM_CARBITS(x)==(scm_tc16_dir | SCM_OPN))) extern SCM scm_chown (SCM object, SCM owner, SCM group); -- cgit v1.2.3