diff options
author | Martin Grabmüller <mgrabmue@cs.tu-berlin.de> | 2001-03-16 10:00:17 +0000 |
---|---|---|
committer | Martin Grabmüller <mgrabmue@cs.tu-berlin.de> | 2001-03-16 10:00:17 +0000 |
commit | 5352393c556ff4e4be85cacf4b6dd32e93b24bce (patch) | |
tree | 5a0ddf5e9148dc856087dfe06ae0fad1e887c029 /libguile/rdelim.c | |
parent | 1543613f4bb8576a9630c724b0c896355171322b (diff) | |
download | guile-5352393c556ff4e4be85cacf4b6dd32e93b24bce.tar.gz |
* list.c (scm_list, scm_cons_star, scm_null_p, scm_list_p),
(scm_length, scm_append, scm_reverse, scm_list_ref),
(scm_memq, scm_memv, scm_member, scm_delv_x, scm_delete_x),
(scm_delq, scm_delv, scm_delete, scm_delq1_x, scm_delv1_x),
(scm_delete1_x), gc.c (scm_map_free_list),
(scm_free_list_length), hash.c (scm_hashq, scm_hashv),
(scm_hash), hashtab.c (scm_hashq_ref, scm_hashq_set_x),
(scm_hashq_remove_x, scm_hashv_ref, scm_hashv_set_x),
(scm_hashv_remove_x, scm_hash_ref, scm_hash_set_x),
(scm_hash_remove_x), ports.c (scm_pt_size, scm_pt_member), print.c
(scm_current_pstate), scmsigs.c (scm_usleep), goops.c
(scm_get_keyword, scm_sys_compute_slots): Added texinfo markup.
* weaks.c (scm_weak_vector_p, scm_weak_key_hash_table_p),
(scm_weak_value_hash_table_p, scm_doubly_weak_hash_table_p),
rdelim.c (scm_read_delimited_x), strop.c (scm_string_index),
symbols.c (scm_symbol_interned_p), numbers.c
(scm_string_to_number), ports.c (scm_port_p): Corrected texinfo
markup.
Diffstat (limited to 'libguile/rdelim.c')
-rw-r--r-- | libguile/rdelim.c | 26 |
1 files changed, 14 insertions, 12 deletions
diff --git a/libguile/rdelim.c b/libguile/rdelim.c index 20fe8150c..40f65b938 100644 --- a/libguile/rdelim.c +++ b/libguile/rdelim.c @@ -62,18 +62,20 @@ SCM_DEFINE (scm_read_delimited_x, "%read-delimited!", 3, 3, 0, (SCM delims, SCM str, SCM gobble, SCM port, SCM start, SCM end), "Read characters from @var{port} into @var{str} until one of the\n" - "characters in the @var{delims} string is encountered. If @var{gobble}\n" - "is true, discard the delimiter character; otherwise, leave it\n" - "in the input stream for the next read.\n" - "If @var{port} is not specified, use the value of\n" - "@code{(current-input-port)}. If @var{start} or @var{end} are specified,\n" - "store data only into the substring of @var{str} bounded by @var{start}\n" - "and @var{end} (which default to the beginning and end of the string,\n" - "respectively).\n\n" - "Return a pair consisting of the delimiter that terminated the string and\n" - "the number of characters read. If reading stopped at the end of file,\n" - "the delimiter returned is the @var{eof-object}; if the string was filled\n" - "without encountering a delimiter, this value is @var{#f}.") + "characters in the @var{delims} string is encountered. If\n" + "@var{gobble} is true, discard the delimiter character;\n" + "otherwise, leave it in the input stream for the next read. If\n" + "@var{port} is not specified, use the value of\n" + "@code{(current-input-port)}. If @var{start} or @var{end} are\n" + "specified, store data only into the substring of @var{str}\n" + "bounded by @var{start} and @var{end} (which default to the\n" + "beginning and end of the string, respectively).\n" + "\n" + " Return a pair consisting of the delimiter that terminated the\n" + "string and the number of characters read. If reading stopped\n" + "at the end of file, the delimiter returned is the\n" + "@var{eof-object}; if the string was filled without encountering\n" + "a delimiter, this value is @code{#f}.") #define FUNC_NAME s_scm_read_delimited_x { long j; |