diff options
author | Ludovic Courtès <ludo@gnu.org> | 2008-10-09 22:21:33 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2008-10-09 22:21:33 +0200 |
commit | 45a9f4304955599ee4e772069e56d131401695dd (patch) | |
tree | d4f3afcc9528c8462ec3b45d6c3a4d9185a40ccc /libguile/read.c | |
parent | 89bc270db3c207b2210736f066ce18721e0dbc76 (diff) | |
download | guile-45a9f4304955599ee4e772069e56d131401695dd.tar.gz |
Revert "Make literal strings (i.e., returned by `read') read-only."
This reverts commit fb2f8886c4d537b0c7d3e9e78a8d4e5e272a36f4.
The rationale is that `read' must return mutable strings, as reported
by szgyg <szgyg@ludens.elte.hu>.
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 abe1cb9ad..47b80041e 100644 --- a/libguile/read.c +++ b/libguile/read.c @@ -484,7 +484,7 @@ scm_read_string (int chr, SCM port) else str = (str == SCM_BOOL_F) ? scm_nullstr : str; - return scm_i_make_read_only_string (str); + return str; } #undef FUNC_NAME |