diff options
Diffstat (limited to 'libguile/ioext.c')
-rw-r--r-- | libguile/ioext.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/ioext.c b/libguile/ioext.c index 66e32cb91..59460afa7 100644 --- a/libguile/ioext.c +++ b/libguile/ioext.c @@ -204,7 +204,7 @@ SCM_DEFINE (scm_isatty_p, "isatty?", 1, 0, 0, return SCM_BOOL_F; rv = isatty (SCM_FPORT_FDES (port)); - return SCM_BOOL(rv); + return scm_from_bool(rv); } #undef FUNC_NAME |