summaryrefslogtreecommitdiff
path: root/libguile/scm_validate.h
diff options
context:
space:
mode:
authorGreg J. Badros <gjb@cs.washington.edu>2000-01-06 18:04:14 +0000
committerGreg J. Badros <gjb@cs.washington.edu>2000-01-06 18:04:14 +0000
commit921a7441d40bf82ec5a5590aafb39e1a543b5902 (patch)
tree0b828dc2128cd29ec0dffa9cd26831e9964f7d1f /libguile/scm_validate.h
parentbc00b4625c086346c8963db83c025971bd3e20d8 (diff)
downloadguile-921a7441d40bf82ec5a5590aafb39e1a543b5902.tar.gz
scm_validate.h: Remove some redundant NIMP tests.
Diffstat (limited to 'libguile/scm_validate.h')
-rw-r--r--libguile/scm_validate.h6
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/scm_validate.h b/libguile/scm_validate.h
index d1279b95d..6b01d2293 100644
--- a/libguile/scm_validate.h
+++ b/libguile/scm_validate.h
@@ -1,4 +1,4 @@
-/* $Id: scm_validate.h,v 1.11 2000-01-06 18:02:16 gjb Exp $ */
+/* $Id: scm_validate.h,v 1.12 2000-01-06 18:04:14 gjb Exp $ */
/* Copyright (C) 1999 Free Software Foundation, Inc.
*
* This program is free software; you can redistribute it and/or modify
@@ -117,8 +117,8 @@
#define SCM_VALIDATE_STRING(pos,str) SCM_MAKE_VALIDATE(pos,str,STRINGP)
#define SCM_VALIDATE_STRINGORSUBSTR(pos,str) \
- do { SCM_ASSERT(SCM_NIMP (str) && \
- (SCM_SLOPPY_STRINGP (str) || SCM_SLOPPY_SUBSTRP(str)), str, pos, FUNC_NAME); } while (0)
+ do { SCM_ASSERT(SCM_SLOPPY_STRINGP (str) || \
+ SCM_SLOPPY_SUBSTRP(str), str, pos, FUNC_NAME); } while (0)
#define SCM_VALIDATE_STRING_COPY(pos,str,cvar) \
do { SCM_ASSERT(SCM_STRINGP (str), str, pos, FUNC_NAME); \