[PATCH] Undeprecate read syntax for uniform complex vectors

[Mark H Weaver]

FYI, I just pushed this fix.

    Mark

>From df941b5b62721d061ce5381a1a6400609e8a10b8 Mon Sep 17 00:00:00 2001
From: Mark H Weaver <address@hidden>
Date: Tue, 5 Apr 2011 19:42:06 -0400
Subject: [PATCH] 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 <address@hidden> for the bug report.
---
 libguile/read.c |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/libguile/read.c b/libguile/read.c
index 5be3bd9..a05a86d 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':
-- 
1.7.1