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

* Miscellaneous small doc updates and fixes.

Browse source
This commit is contained in:
Neil Jerram 2001-11-13 23:44:29 +00:00
parent 409b85880d
commit 72dd0a03e0
11 changed files with 137 additions and 810 deletions
Download patch file Download diff file Expand all files Collapse all files

10
libguile/ChangeLog
View file

@ -1,3 +1,13 @@
2001-11-13 Neil Jerram <neil@ossau.uklinux.net>
* random.c (scm_random_solid_sphere_x,
scm_random_hollow_sphere_x): Correct "shere" typos.
* hashtab.c (scm_hash_fold): Add missing apostrophe to docstring.
* version.c (scm_version): Update docstring to include
`micro-version'.
2001-11-13 Marius Vollmer <mvo@zagadka.ping.de>
* modules.c (scm_c_export): Call va_end after collecting the

2
libguile/extensions.c
View file

@ -117,7 +117,7 @@ scm_c_load_extension (const char *lib, const char *init)
SCM_DEFINE (scm_load_extension, "load-extension", 2, 0, 0,
(SCM lib, SCM init),
"Load and initilize the extension designated by LIB and INIT.\n"
"Load and initialize the extension designated by LIB and INIT.\n"
"When there is no pre-registered function for LIB/INIT, this is\n"
"equivalent to\n"
"\n"

2
libguile/hashtab.c
View file

@ -524,7 +524,7 @@ SCM_DEFINE (scm_hash_fold, "hash-fold", 3, 0, 0,
"and value are successive pairs from the hash table TABLE, and\n"
"prior-result is either INIT (for the first application of PROC)\n"
"or the return value of the previous application of PROC.\n"
"For example, @code{(hash-fold acons () tab)} will convert a hash\n"
"For example, @code{(hash-fold acons '() tab)} will convert a hash\n"
"table into an a-list of key-value pairs.")
#define FUNC_NAME s_scm_hash_fold
{

4
libguile/random.c
View file

@ -492,7 +492,7 @@ SCM_DEFINE (scm_random_solid_sphere_x, "random:solid-sphere!", 1, 1, 0,
"the sum of whose squares is less than 1.0.\n"
"Thinking of vect as coordinates in space of\n"
"dimension n = (vector-length vect), the coordinates\n"
"are uniformly distributed within the unit n-shere.\n"
"are uniformly distributed within the unit n-sphere.\n"
"The sum of the squares of the numbers is returned.")
#define FUNC_NAME s_scm_random_solid_sphere_x
{
@ -516,7 +516,7 @@ SCM_DEFINE (scm_random_hollow_sphere_x, "random:hollow-sphere!", 1, 1, 0,
"Thinking of vect as coordinates in space of\n"
"dimension n = (vector-length vect), the coordinates\n"
"are uniformly distributed over the surface of the\n"
"unit n-shere.")
"unit n-sphere.")
#define FUNC_NAME s_scm_random_hollow_sphere_x
{
SCM_VALIDATE_VECTOR_OR_DVECTOR (1,v);

10
libguile/version.c
View file

@ -96,12 +96,14 @@ SCM_DEFINE (scm_version, "version", 0, 0, 0,
(),
"@deffnx primitive major-version\n"
"@deffnx primitive minor-version\n"
"Return a string describing Guile's version number, or its major or minor\n"
"version numbers, respectively.\n\n"
"@deffnx primitive micro-version\n"
"Return a string describing Guile's version number, or its major, minor\n"
"or micro version number, respectively.\n\n"
"@lisp\n"
"(version) @result{} \"1.3a\"\n"
"(version) @result{} \"1.6.0\"\n"
"(major-version) @result{} \"1\"\n"
"(minor-version) @result{} \"3a\"\n"
"(minor-version) @result{} \"6\"\n"
"(micro-version) @result{} \"0\"\n"
"@end lisp")
#define FUNC_NAME s_scm_version
{