summaryrefslogtreecommitdiff
path: root/libguile/objects.c
diff options
context:
space:
mode:
authorGreg J. Badros <gjb@cs.washington.edu>2000-01-04 22:23:42 +0000
committerGreg J. Badros <gjb@cs.washington.edu>2000-01-04 22:23:42 +0000
commit0b5f3f34c220329c3fadcf75d881fab168ae35e7 (patch)
treee212fa265339e4e70e2af96807ccab57c2db173a /libguile/objects.c
parentdb62436ececa2f491a9c87147062f5a16aec813e (diff)
downloadguile-0b5f3f34c220329c3fadcf75d881fab168ae35e7.tar.gz
* options.c, objects.c, keywords.c, gc.c: Some redundant SCM_NIMP
removals from Dirk Hermann. * alist.c: Rename formals to match the parameter names in the documentation, updates to documentation. Thanks Dirk Hermann!
Diffstat (limited to 'libguile/objects.c')
-rw-r--r--libguile/objects.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/libguile/objects.c b/libguile/objects.c
index cc8b6e57c..358b3a3e6 100644
--- a/libguile/objects.c
+++ b/libguile/objects.c
@@ -373,8 +373,7 @@ GUILE_PROC (scm_operator_p, "operator?", 1, 0, 0,
"")
#define FUNC_NAME s_scm_operator_p
{
- return SCM_BOOL(SCM_NIMP (obj)
- && SCM_STRUCTP (obj)
+ return SCM_BOOL(SCM_STRUCTP (obj)
&& SCM_I_OPERATORP (obj)
&& !SCM_I_ENTITYP (obj));
}