* read.c: fix various preprocessor usages of new public

symbols to expect 0 or 1 values rather than 1 or undefined.
i.e. change #ifdef to #if, etc.

diff --git a/libguile/read.c b/libguile/read.c
index bb6836b..6718224 100644 (file)
--- a/libguile/read.c
+++ b/libguile/read.c
@@ -442,7 +442,7 @@ scm_lreadr (SCM *tok_buf, SCM port, SCM *copy)
          c = scm_flush_ws (port, (char *)NULL);
          goto tryagain_no_flush_ws;
 
-#ifdef SCM_HAVE_ARRAYS
+#if SCM_HAVE_ARRAYS
        case '*':
          j = scm_read_token (c, tok_buf, port, 0);
          p = scm_istr2bve (SCM_STRING_CHARS (*tok_buf) + 1, (long) (j - 1));