diff options
author | Michael Gran <spk121@yahoo.com> | 2010-02-15 20:45:58 -0800 |
---|---|---|
committer | Michael Gran <spk121@yahoo.com> | 2010-02-15 20:45:58 -0800 |
commit | 8a8da78d97ffe779a1baa1098ed9497c5021759e (patch) | |
tree | 931495280cccc7d7b632d03a94e3f76abda9383f /libguile/read.c | |
parent | 44d3d1114447ee619bc9a900afb410273b56aae2 (diff) | |
download | guile-8a8da78d97ffe779a1baa1098ed9497c5021759e.tar.gz |
Faster read of semicolon comments
There is no need to do character encoding processing within
semicolon comments.
* libguile/read.c (scm_read_semicolon_comment): changed
Diffstat (limited to 'libguile/read.c')
-rw-r--r-- | libguile/read.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/read.c b/libguile/read.c index ceef9992a..e17735ed0 100644 --- a/libguile/read.c +++ b/libguile/read.c @@ -860,7 +860,7 @@ scm_read_semicolon_comment (int chr, SCM port) always represents itself no matter what the encoding is. */ for (c = scm_get_byte_or_eof (port); (c != EOF) && (c != '\n'); - c = scm_getc (port)); + c = scm_get_byte_or_eof (port)); return SCM_UNSPECIFIED; } |