summaryrefslogtreecommitdiff
path: root/libguile/read.c
diff options
context:
space:
mode:
authorMark H Weaver <mhw@netris.org>2011-04-05 19:42:06 -0400
committerMark H Weaver <mhw@netris.org>2011-04-05 19:42:06 -0400
commitdf941b5b62721d061ce5381a1a6400609e8a10b8 (patch)
treeaa267a021714b189da5f3e428f48cad85af929d1 /libguile/read.c
parent78d1be4aef408248bbb545d4b94b4b1335a4ab88 (diff)
downloadguile-df941b5b62721d061ce5381a1a6400609e8a10b8.tar.gz
Undeprecate read syntax for uniform complex vectors
* libguile/read.c (scm_read_sharp): Move the "#c..." case outside of #if SCM_ENABLE_DEPRECATED, and to the same section which handles "#s...", "#u..." and "#f...". Thanks to Andreas Rottmann <a.rottmann@gmx.at> for the bug report.
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 5be3bd99d..a05a86d40 100644
--- a/libguile/read.c
+++ b/libguile/read.c
@@ -1329,6 +1329,7 @@ scm_read_sharp (scm_t_wchar chr, SCM port)
case 's':
case 'u':
case 'f':
+ case 'c':
/* This one may return either a boolean or an SRFI-4 vector. */
return (scm_read_srfi4_vector (chr, port));
case 'v':
@@ -1348,7 +1349,6 @@ scm_read_sharp (scm_t_wchar chr, SCM port)
#if SCM_ENABLE_DEPRECATED
/* See below for 'i' and 'e'. */
case 'a':
- case 'c':
case 'y':
case 'h':
case 'l':