diff options
| author | Gary Houston <ghouston@arglist.com> | 1997-03-10 06:49:15 +0000 |
|---|---|---|
| committer | Gary Houston <ghouston@arglist.com> | 1997-03-10 06:49:15 +0000 |
| commit | c773377128287dcd5c6804fc307d84bbf6cd3673 (patch) | |
| tree | 6cf5b9cf758484bad4160d1dc7c282e430119162 /libguile/read.h | |
| parent | d2d82421a60ce3c36447ab6307723a2e6656b19c (diff) | |
| download | guile-c773377128287dcd5c6804fc307d84bbf6cd3673.tar.gz | |
* read.h (SCM_N_READ_OPTIONS): increase SCM_N_READ_OPTIONS to 4.
(SCM_KEYWORD_STYLE): defined.
* read.c (scm_read_opts): add a keywords option. This isn't a
boolean option, in case someone wants to add support for DSSSL
keywords too.
Setup scm_keyword_prefix symbol.
(scm_lreadr): Only process keywords if SCM_KEYWORD_STYLE is
set to 'prefix.
* I've left keyword support disabled by default, since it doesn't
seem to break the module system and it gives R4RS standard behaviour.
It can be reactivated with (read-set! keywords 'prefix).
Diffstat (limited to 'libguile/read.h')
| -rw-r--r-- | libguile/read.h | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/read.h b/libguile/read.h index 74904452b..f30e6660f 100644 --- a/libguile/read.h +++ b/libguile/read.h @@ -72,7 +72,8 @@ extern scm_option scm_read_opts[]; #define SCM_COPY_SOURCE_P scm_read_opts[0].val #define SCM_RECORD_POSITIONS_P scm_read_opts[1].val #define SCM_CASE_INSENSITIVE_P scm_read_opts[2].val -#define SCM_N_READ_OPTIONS 3 +#define SCM_KEYWORD_STYLE scm_read_opts[3].val +#define SCM_N_READ_OPTIONS 4 |