From f15913d08f674422d52d83d444f9c73a39548795 Mon Sep 17 00:00:00 2001 From: Mikael Djurfeldt Date: Sat, 24 Jul 1999 23:10:57 +0000 Subject: *** empty log message *** --- libguile/unif.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'libguile/unif.c') diff --git a/libguile/unif.c b/libguile/unif.c index 83206f860..beabdd1c3 100644 --- a/libguile/unif.c +++ b/libguile/unif.c @@ -1695,7 +1695,7 @@ loop: scm_port *pt = SCM_PTAB_ENTRY (port_or_fd); int remaining = (cend - offset) * sz; char *source = SCM_CHARS (v) + (cstart + offset) * sz; - scm_ptobfuns *ptob = &scm_ptobs[SCM_PTOBNUM (port_or_fd)]; + scm_ptob_descriptor *ptob = &scm_ptobs[SCM_PTOBNUM (port_or_fd)]; ans = cend - offset; if (pt->rw_active == SCM_PORT_READ) -- cgit v1.2.3