mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-12 06:41:13 +02:00
Code Activity

* Docstring fixes.

Browse source
This commit is contained in:
Neil Jerram 2000-09-02 23:20:40 +00:00
parent 6386e25c29
commit 09831f943c
4 changed files with 9 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/posix.c
View file

@ -1198,8 +1198,8 @@ SCM_DEFINE (scm_mknod, "mknod", 4, 0, 0,
"being created.\n\n" "being created.\n\n"
"E.g.,\n" "E.g.,\n"
"@example\n" "@example\n"
"(mknod \"/dev/fd0\" 'block-special #o660 (+ (* 2 256) 2))" "(mknod \"/dev/fd0\" 'block-special #o660 (+ (* 2 256) 2))\n"
"@end example\n" "@end example\n\n"
"The return value is unspecified.") "The return value is unspecified.")
#define FUNC_NAME s_scm_mknod #define FUNC_NAME s_scm_mknod
{ {

2
libguile/ramap.c
View file

@ -813,6 +813,7 @@ SCM_REGISTER_PROC(s_array_copy_in_order_x, "array-copy-in-order!", 2, 0, 0, scm_
SCM_DEFINE (scm_array_copy_x, "array-copy!", 2, 0, 0, SCM_DEFINE (scm_array_copy_x, "array-copy!", 2, 0, 0,
(SCM src, SCM dst), (SCM src, SCM dst),
"@deffnx primitive array-copy-in-order! src dst\n"
"Copies every element from vector or array @var{source} to the\n" "Copies every element from vector or array @var{source} to the\n"
"corresponding element of @var{destination}. @var{destination} must have\n" "corresponding element of @var{destination}. @var{destination} must have\n"
"the same rank as @var{source}, and be at least as large in each\n" "the same rank as @var{source}, and be at least as large in each\n"
@ -1495,6 +1496,7 @@ SCM_REGISTER_PROC(s_array_map_in_order_x, "array-map-in-order!", 2, 0, 1, scm_ar
SCM_DEFINE (scm_array_map_x, "array-map!", 2, 0, 1, SCM_DEFINE (scm_array_map_x, "array-map!", 2, 0, 1,
(SCM ra0, SCM proc, SCM lra), (SCM ra0, SCM proc, SCM lra),
"@deffnx primitive array-map-in-order! ra0 proc . lra\n"
"@var{array1}, @dots{} must have the same number of dimensions as\n" "@var{array1}, @dots{} must have the same number of dimensions as\n"
"@var{array0} and have a range for each index which includes the range\n" "@var{array0} and have a range for each index which includes the range\n"
"for the corresponding index in @var{array0}. @var{proc} is applied to\n" "for the corresponding index in @var{array0}. @var{proc} is applied to\n"

3
libguile/socket.c
View file

@ -696,7 +696,8 @@ SCM_DEFINE (scm_recv, "recv!", 2, 1, 0,
"The optional @var{flags} argument is a value or\n" "The optional @var{flags} argument is a value or\n"
"bitwise OR of MSG_OOB, MSG_PEEK, MSG_DONTROUTE etc.\n\n" "bitwise OR of MSG_OOB, MSG_PEEK, MSG_DONTROUTE etc.\n\n"
"The value returned is the number of bytes read from the socket.\n\n" "The value returned is the number of bytes read from the socket.\n\n"
"Note that the data is read directly from the socket file descriptor:any unread buffered port data is ignored.") "Note that the data is read directly from the socket file descriptor:\n"
"any unread buffered port data is ignored.")
#define FUNC_NAME s_scm_recv #define FUNC_NAME s_scm_recv
{ {
int rv; int rv;

5
libguile/stime.c
View file

@ -220,7 +220,8 @@ SCM_DEFINE (scm_get_internal_run_time, "get-internal-run-time", 0, 0, 0,
SCM_DEFINE (scm_current_time, "current-time", 0, 0, 0, SCM_DEFINE (scm_current_time, "current-time", 0, 0, 0,
(void), (void),
"Returns the number of seconds since 1970-01-01 00:00:00 UTC, excludingleap seconds.") "Returns the number of seconds since 1970-01-01 00:00:00 UTC, excluding\n"
"leap seconds.")
#define FUNC_NAME s_scm_current_time #define FUNC_NAME s_scm_current_time
{ {
timet timv; timet timv;
@ -660,7 +661,7 @@ SCM_DEFINE (scm_strptime, "strptime", 2, 0, 0,
"but the time zone components\n" "but the time zone components\n"
"are not usefully set.\n" "are not usefully set.\n"
"The CDR reports the number of characters from @var{string} which\n" "The CDR reports the number of characters from @var{string} which\n"
"vwere used for the conversion.") "were used for the conversion.")
#define FUNC_NAME s_scm_strptime #define FUNC_NAME s_scm_strptime
{ {
struct tm t; struct tm t;