diff options
-rw-r--r-- | libguile/ports.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/ports.c b/libguile/ports.c index 44416cb6c..960dfa8e7 100644 --- a/libguile/ports.c +++ b/libguile/ports.c @@ -2221,7 +2221,7 @@ SCM_DEFINE (scm_peek_char, "peek-char", 0, 1, 0, scm_t_wchar c; char bytes[SCM_MBCHAR_BUF_SIZE]; long column, line; - size_t len; + size_t len = 0; if (SCM_UNBNDP (port)) port = scm_current_input_port (); |