Fix excess parentheses in use-modules forms.

diff --git a/gdb/doc/ChangeLog b/gdb/doc/ChangeLog
index 2d8b1003dd75cc9bbf19dae35293002daf13bb31..7d8ebb89e86c4c1d1f22ad8ccbaecac582fcff47 100644 (file)
--- a/gdb/doc/ChangeLog
+++ b/gdb/doc/ChangeLog
@@ -1,3 +1,8 @@
+2014-05-26  Andy Wingo  <wingo@igalia.com>
+
+       * guile.texi (Writing a Guile Pretty-Printer)
+       (Guile Types Module): Fix excess parentheses in use-modules forms.
+
 2014-05-24  Eli Zaretskii  <eliz@gnu.org>
 
        * guile.texi (Types In Guile, Basic Guile, Frames In Guile)

diff --git a/gdb/doc/guile.texi b/gdb/doc/guile.texi
index be41f36286a3435fcdd97f462538e279e824eed0..fc63cb273516b098766c083f56aba07cc923da85 100644 (file)
--- a/gdb/doc/guile.texi
+++ b/gdb/doc/guile.texi
@@ -1600,7 +1600,7 @@ To continue the @code{my::string} example,
 this code might appear in @code{(my-project my-library v1)}:
 
 @smallexample
-(use-modules ((gdb)))
+(use-modules (gdb))
 (define (register-printers objfile)
   (append-objfile-pretty-printer!
    (make-pretty-printer "my-string" str-lookup-function)))
@@ -1610,7 +1610,7 @@ this code might appear in @code{(my-project my-library v1)}:
 And then the corresponding contents of the auto-load file would be:
 
 @smallexample
-(use-modules ((gdb) (my-project my-library v1)))
+(use-modules (gdb) (my-project my-library v1))
 (register-printers (current-objfile))
 @end smallexample
 
@@ -1661,7 +1661,7 @@ This example doesn't need a lookup function, that is handled by the
 the object that handles the lookup.
 
 @smallexample
-(use-modules ((gdb printing)))
+(use-modules (gdb printing))
 
 (define (build-pretty-printer)
   (let ((pp (make-pretty-printer-collection "my-library")))
@@ -1673,7 +1673,7 @@ the object that handles the lookup.
 And here is the autoload support:
 
 @smallexample
-(use-modules ((gdb) (my-library)))
+(use-modules (gdb) (my-library))
 (append-objfile-pretty-printer! (current-objfile) (build-pretty-printer))
 @end smallexample
 
@@ -3265,7 +3265,7 @@ Then in gdb:
 
 @smallexample
 (gdb) start
-(gdb) guile (use-modules ((gdb) (gdb types)))
+(gdb) guile (use-modules (gdb) (gdb types))
 (gdb) guile (define foo-ref (parse-and-eval "foo_ref"))
 (gdb) guile (get-basic-type (value-type foo-ref))
 int