guile/guile-core/libguile ChangeLog net_db.c li...

[Neil Jerram]

CVSROOT:        /cvs
Module name:    guile
Changes by:     Neil Jerram <address@hidden>    00/09/29 13:22:31

Modified files:
        guile-core/libguile: ChangeLog net_db.c list.c hashtab.c 

Log message:
        * Cosmetic docstring fixes.

CVSWeb URLs:
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-core/libguile/ChangeLog.diff?r1=1.1126&r2=1.1127
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-core/libguile/net_db.c.diff?r1=1.44&r2=1.45
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-core/libguile/list.c.diff?r1=1.43&r2=1.44
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-core/libguile/hashtab.c.diff?r1=1.27&r2=1.28

Patches:
Index: guile/guile-core/libguile/ChangeLog
diff -u guile/guile-core/libguile/ChangeLog:1.1126 
guile/guile-core/libguile/ChangeLog:1.1127
--- guile/guile-core/libguile/ChangeLog:1.1126  Tue Sep 26 15:21:10 2000
+++ guile/guile-core/libguile/ChangeLog Fri Sep 29 13:22:31 2000
@@ -1,3 +1,16 @@
+2000-09-29  Neil Jerram  <address@hidden>
+
+       * net_db.c (scm_inet_ntoa): Docstring fix: missing newline
+       inserted.
+
+       * hashtab.c (scm_hashx_create_handle_x, scm_hashx_ref): Insert
+       spaces between C parameters so that the snarfer doesn't coalesce
+       them all into a single very long-named parameter.
+
+2000-09-27  Neil Jerram  <address@hidden>
+
+       * list.c (scm_append): Use @example texinfo markup in docstring.
+
 2000-09-26  Dirk Herrmann  <address@hidden>
 
        * strings.c (scm_string, scm_make_string, scm_string_set_x,
Index: guile/guile-core/libguile/hashtab.c
diff -u guile/guile-core/libguile/hashtab.c:1.27 
guile/guile-core/libguile/hashtab.c:1.28
--- guile/guile-core/libguile/hashtab.c:1.27    Fri Jul  7 08:28:56 2000
+++ guile/guile-core/libguile/hashtab.c Fri Sep 29 13:22:31 2000
@@ -433,7 +433,7 @@
 
 
 SCM_DEFINE (scm_hashx_create_handle_x, "hashx-create-handle!", 5, 0, 0, 
-            (SCM hash,SCM assoc,SCM table,SCM obj,SCM init),
+            (SCM hash, SCM assoc, SCM table, SCM obj, SCM init),
            "This behaves the same way as the corresponding 
@code{-create-handle}\n"
            "function, but uses @var{hasher} as a\n"
            "hash function and @var{assoc} to compare keys.  @code{hasher} 
must\n"
@@ -452,7 +452,7 @@
 
 
 SCM_DEFINE (scm_hashx_ref, "hashx-ref", 4, 1, 0, 
-            (SCM hash,SCM assoc,SCM table,SCM obj,SCM dflt),
+            (SCM hash, SCM assoc, SCM table, SCM obj, SCM dflt),
            "This behaves the same way as the corresponding @code{ref}\n"
            "function, but uses @var{hasher} as a\n"
            "hash function and @var{assoc} to compare keys.  @code{hasher} 
must\n"
Index: guile/guile-core/libguile/list.c
diff -u guile/guile-core/libguile/list.c:1.43 
guile/guile-core/libguile/list.c:1.44
--- guile/guile-core/libguile/list.c:1.43       Fri Aug 11 08:12:37 2000
+++ guile/guile-core/libguile/list.c    Fri Sep 29 13:22:31 2000
@@ -192,19 +192,20 @@
 SCM_DEFINE (scm_append, "append", 0, 0, 1, 
             (SCM args),
             "Returns a list consisting of the elements of the first LIST\n"
-            "followed by the elements of the other LISTs.\n"
-            "\n"
-            "  (append '(x) '(y))          =>  (x y)\n"
-            "  (append '(a) '(b c d))      =>  (a b c d)\n"
-            "  (append '(a (b)) '((c)))    =>  (a (b) (c))\n"
-            "\n"
-            "The resulting list is always newly allocated, except that it 
shares\n"
-            "structure with the last LIST argument.  The last argument may\n"
-            "actually be any object; an improper list results if the last\n"
-            "argument is not a proper list.\n"
-
-            "  (append '(a b) '(c . d))    =>  (a b c . d)\n"
-            "  (append '() 'a)             =>  a\n")
+           "followed by the elements of the other LISTs.\n\n"
+           "@example\n"
+           "  (append '(x) '(y))          =>  (x y)\n"
+           "  (append '(a) '(b c d))      =>  (a b c d)\n"
+           "  (append '(a (b)) '((c)))    =>  (a (b) (c))\n"
+           "@end example\n\n"
+           "The resulting list is always newly allocated, except that it 
shares\n"
+           "structure with the last LIST argument.  The last argument may\n"
+           "actually be any object; an improper list results if the last\n"
+           "argument is not a proper list.\n\n"
+           "@example\n"
+           "  (append '(a b) '(c . d))    =>  (a b c . d)\n"
+           "  (append '() 'a)             =>  a\n"
+           "@end example")
 #define FUNC_NAME s_scm_append
 {
   SCM_VALIDATE_REST_ARGUMENT (args);
Index: guile/guile-core/libguile/net_db.c
diff -u guile/guile-core/libguile/net_db.c:1.44 
guile/guile-core/libguile/net_db.c:1.45
--- guile/guile-core/libguile/net_db.c:1.44     Fri Aug 18 09:52:15 2000
+++ guile/guile-core/libguile/net_db.c  Fri Sep 29 13:22:31 2000
@@ -108,7 +108,7 @@
            "Converts an integer Internet host address into a string with the\n"
            "traditional dotted decimal representation.\n\n"
            "@smalllisp\n"
-           "(inet-ntoa 2130706433) @result{} \"127.0.0.1\""
+           "(inet-ntoa 2130706433) @result{} \"127.0.0.1\"\n"
            "@end smalllisp")
 #define FUNC_NAME s_scm_inet_ntoa
 {