diff options
author | Marius Vollmer <mvo@zagadka.de> | 2004-10-26 17:00:13 +0000 |
---|---|---|
committer | Marius Vollmer <mvo@zagadka.de> | 2004-10-26 17:00:13 +0000 |
commit | a4022e691e12857b9c836c4bdc5b31462b73c1b2 (patch) | |
tree | fa78df5f8822222dd24693c035e76590c80f4585 /libguile/read.h | |
parent | 358ebb0b7414468db557b662b2322aff772e2175 (diff) | |
download | guile-a4022e691e12857b9c836c4bdc5b31462b73c1b2.tar.gz |
* read.c (scm_lreadr): Call scm_i_read_homogenous_vector for '#f',
'#u', and '#s'.
* read.h, read.c (scm_i_input_error): Renamed from scm_input_error
and made non-static. Changed all uses.
Diffstat (limited to 'libguile/read.h')
-rw-r--r-- | libguile/read.h | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/libguile/read.h b/libguile/read.h index 70f6521eb..a2370ebf8 100644 --- a/libguile/read.h +++ b/libguile/read.h @@ -72,6 +72,10 @@ SCM_API SCM scm_lreadr (SCM * tok_buf, SCM port, SCM *copy); SCM_API size_t scm_read_token (int ic, SCM * tok_buf, SCM port, int weird); SCM_API SCM scm_lreadrecparen (SCM * tok_buf, SCM port, char *name, SCM *copy); SCM_API SCM scm_read_hash_extend (SCM chr, SCM proc); + +SCM_API void scm_i_input_error (const char *func, SCM port, + const char *message, SCM arg); + SCM_API void scm_init_read (void); #endif /* SCM_READ_H */ |