From f36b070b656958b6c2044c583269032d7176aa4e Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Mon, 24 Nov 2008 09:10:51 +0100 Subject: [PATCH] Fix comments in `test-scm-c-read.c'. * test-suite/standalone/test-scm-c-read.c (make_port): Fix comments. --- test-suite/standalone/test-scm-c-read.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/test-suite/standalone/test-scm-c-read.c b/test-suite/standalone/test-scm-c-read.c index be8ea808a..1b4caa1c7 100644 --- a/test-suite/standalone/test-scm-c-read.c +++ b/test-suite/standalone/test-scm-c-read.c @@ -42,10 +42,10 @@ make_port (scm_t_bits port_type) port = scm_new_port_table_entry (port_type); - /* Attach it the underlying u8vector, which we'll use as PORT's buffer. */ + /* Associate C_BUFFER with PORT, for test purposes. */ SCM_SETSTREAM (port, (scm_t_bits) c_buffer); - /* Have the port directly access the buffer (bytevector). */ + /* Use C_BUFFER as PORT's internal buffer. */ c_port = SCM_PTAB_ENTRY (port); c_port->read_pos = c_port->read_buf = (unsigned char *) c_buffer; c_port->read_end = (unsigned char *) c_buffer + PORT_BUFFER_SIZE;