summaryrefslogtreecommitdiff
path: root/libguile/scm_validate.h
diff options
context:
space:
mode:
authorGreg J. Badros <gjb@cs.washington.edu>2000-01-09 03:52:29 +0000
committerGreg J. Badros <gjb@cs.washington.edu>2000-01-09 03:52:29 +0000
commit027486339679ead67ea1ef0d40f28df0666a9925 (patch)
tree6aacf16bfa941b540ac875dcb1d7e6683bced956 /libguile/scm_validate.h
parent2fdcf8bdf04dcbe8848a42db1317029e798cb752 (diff)
downloadguile-027486339679ead67ea1ef0d40f28df0666a9925.tar.gz
* scm_validate.h (SCM_VALIDATE_BOOL_COPY): Fix typo.
Diffstat (limited to 'libguile/scm_validate.h')
-rw-r--r--libguile/scm_validate.h4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/scm_validate.h b/libguile/scm_validate.h
index 3186f1f2e..7b6f54739 100644
--- a/libguile/scm_validate.h
+++ b/libguile/scm_validate.h
@@ -1,4 +1,4 @@
-/* $Id: scm_validate.h,v 1.13 2000-01-07 23:53:20 gjb Exp $ */
+/* $Id: scm_validate.h,v 1.14 2000-01-09 03:52:29 gjb Exp $ */
/* Copyright (C) 1999 Free Software Foundation, Inc.
*
* This program is free software; you can redistribute it and/or modify
@@ -95,7 +95,7 @@
#define SCM_VALIDATE_BOOL(pos,flag) SCM_MAKE_VALIDATE(pos,flag,BOOLP)
#define SCM_VALIDATE_BOOL_COPY(pos,flag,cvar) \
- do { SCM_ASSERT(SCM_BOOLP(flags), flag, pos, FUNC_NAME); \
+ do { SCM_ASSERT(SCM_BOOLP(flag), flag, pos, FUNC_NAME); \
cvar = (SCM_BOOL_T == flag)? 1: 0; } while (0)
#define SCM_VALIDATE_CHAR(pos,scm) SCM_MAKE_VALIDATE(pos,scm,ICHRP)