mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00
Code Activity

* read.c: rename usage of HAVE_ARRAYS to SCM_HAVE_ARRAYS.

Browse source
This commit is contained in:
Rob Browning 2003-03-25 23:59:19 +00:00
parent f3447317c2
commit a625d258b8
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/read.c
View file

@ -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 HAVE_ARRAYS
#ifdef 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));