summaryrefslogtreecommitdiff
path: root/libguile/gdbint.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/gdbint.c')
-rw-r--r--libguile/gdbint.c4
1 files changed, 1 insertions, 3 deletions
diff --git a/libguile/gdbint.c b/libguile/gdbint.c
index 3c2c90450..3bdb7c7a5 100644
--- a/libguile/gdbint.c
+++ b/libguile/gdbint.c
@@ -168,9 +168,7 @@ remark_port (SCM port)
int
gdb_maybe_valid_type_p (SCM value)
{
- if (SCM_IMP (value) || scm_cellp (value))
- return (! SCM_EQ_P (scm_tag (value), SCM_MAKINUM (-1)));
- return 0;
+ return SCM_IMP (value) || scm_cellp (value);
}