summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2008-11-24 09:10:51 +0100
committerLudovic Courtès <ludo@gnu.org>2008-11-24 09:10:51 +0100
commit92834759359e8061479215579134e70da23c6336 (patch)
tree9533bde64e893df9ae412d2adff23cff3da39037
parent8e7ff77376d99f7c0641d906e40f85320273bb20 (diff)
downloadguile-92834759359e8061479215579134e70da23c6336.tar.gz
Fix comments in `test-scm-c-read.c'.
* test-suite/standalone/test-scm-c-read.c (make_port): Fix comments.
-rw-r--r--test-suite/standalone/test-scm-c-read.c4
1 files 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;