summaryrefslogtreecommitdiff
path: root/libguile/read.c
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2008-10-09 22:21:33 +0200
committerLudovic Courtès <ludo@gnu.org>2008-10-09 22:21:33 +0200
commit45a9f4304955599ee4e772069e56d131401695dd (patch)
treed4f3afcc9528c8462ec3b45d6c3a4d9185a40ccc /libguile/read.c
parent89bc270db3c207b2210736f066ce18721e0dbc76 (diff)
downloadguile-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.c2
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