diff options
Diffstat (limited to 'libguile/strports.c')
-rw-r--r-- | libguile/strports.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/strports.c b/libguile/strports.c index 21bffde78..de9dfbc79 100644 --- a/libguile/strports.c +++ b/libguile/strports.c @@ -114,7 +114,7 @@ st_resize_port (scm_port_t *pt, off_t new_size) /* reset buffer. */ { - pt->stream = new_stream; + pt->stream = SCM_UNPACK (new_stream); pt->read_buf = pt->write_buf = SCM_STRING_UCHARS (new_stream); pt->read_pos = pt->write_pos = pt->write_buf + index; pt->write_end = pt->write_buf + pt->write_buf_size; |