[Guile-commits] GNU Guile branch, master, updated. release_1-9-10-204-g853cb35

[No Itisnt]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU Guile".

http://git.savannah.gnu.org/cgit/guile.git/commit/?id=853cb35661cb5ff9ef31595ea8189aa4b68ae4b4

The branch, master has been updated
       via  853cb35661cb5ff9ef31595ea8189aa4b68ae4b4 (commit)
       via  45f3d9b6db2091fed4767d8d5c9440f68d4da047 (commit)
       via  3d82d9a62df61079fac8249a87719e6bbf35f3e5 (commit)
       via  167510bc105747d18932696f57c26cfcc0446a3c (commit)
      from  911b03b20c0e75b2379440064f7d8d8fd24453c2 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 853cb35661cb5ff9ef31595ea8189aa4b68ae4b4
Author: No Itisnt <address@hidden>
Date:   Thu May 27 14:09:51 2010 -0500

    Two spaces.

commit 45f3d9b6db2091fed4767d8d5c9440f68d4da047
Author: No Itisnt <address@hidden>
Date:   Wed May 26 21:34:29 2010 -0500

    Rename set-record-printer!
    
    * doc/ref/srfi-modules.texi: set-record-printer! -> set-record-type-printer!

commit 3d82d9a62df61079fac8249a87719e6bbf35f3e5
Author: No Itisnt <address@hidden>
Date:   Wed May 26 21:25:48 2010 -0500

    Add sources to module/Makefile.am
    
    * module/Makefile.am: add srfi/srfi-9/gnu.scm to SRFI_SOURCES

commit 167510bc105747d18932696f57c26cfcc0446a3c
Author: No Itisnt <address@hidden>
Date:   Wed May 26 21:22:46 2010 -0500

    Record printer fixes
    
    * doc/ref/srfi-modules.texi: Fix style
    
    * module/srfi/srfi-9/gnu.scm (set-record-type-printer!): renamed from 
set-record-printer!

-----------------------------------------------------------------------

Summary of changes:
 doc/ref/srfi-modules.texi  |   21 +++++++--------------
 module/Makefile.am         |    1 +
 module/srfi/srfi-9/gnu.scm |    5 +++--
 3 files changed, 11 insertions(+), 16 deletions(-)

diff --git a/doc/ref/srfi-modules.texi b/doc/ref/srfi-modules.texi
index b3f9946..0d74202 100644
--- a/doc/ref/srfi-modules.texi
+++ b/doc/ref/srfi-modules.texi
@@ -1922,30 +1922,23 @@ The functions created by @code{define-record-type} are 
ordinary
 top-level @code{define}s.  They can be redefined or @code{set!} as
 desired, exported from a module, etc.
 
address@hidden
-* SRFI-9 Custom printers::      Customizing print behavior.
address@hidden menu
address@hidden Custom Printers
 
address@hidden SRFI-9 Custom printers
address@hidden Custom printers
address@hidden record printer
+You may use @code{set-record-type-printer!} to customize the default printing
+behavior of records.  This is a Guile extension and is not part of SRFI-9.  It
+is located in the @nicode{(srfi srfi-9 gnu)} module.
 
-You may use @code{set-record-printer!} to customize the default printing
-behavior of records. This is a GUILE extension and is not part of SRFI-9. It is
-located in the @nicode{(srfi srfi-9 gnu)} module.
-
address@hidden {library syntax} set-record-printer! name thunk
address@hidden {Scheme Syntax} set-record-type-printer! name thunk
 Where @var{type} corresponds to the first argument of 
@code{define-record-type},
 and @var{thunk} is a procedure accepting two arguments, the record to print, 
and
 an output port.
-
 @end deffn
 
 @noindent
-This example prints the employee's name in brackets, for instance 
address@hidden''.
+This example prints the employee's name in brackets, for instance 
@code{[Fred]}.
 
 @example
-(set-record-printer! employee-type
+(set-record-type-printer! employee-type
   (lambda (record port)
     (write-char #\[ port)
     (display (get-employee-name record) port)
diff --git a/module/Makefile.am b/module/Makefile.am
index 4ea8997..80376c9 100644
--- a/module/Makefile.am
+++ b/module/Makefile.am
@@ -236,6 +236,7 @@ SRFI_SOURCES = \
   srfi/srfi-6.scm \
   srfi/srfi-8.scm \
   srfi/srfi-9.scm \
+  srfi/srfi-9/gnu.scm \
   srfi/srfi-10.scm \
   srfi/srfi-11.scm \
   srfi/srfi-13.scm \
diff --git a/module/srfi/srfi-9/gnu.scm b/module/srfi/srfi-9/gnu.scm
index 3a37471..30c101b 100644
--- a/module/srfi/srfi-9/gnu.scm
+++ b/module/srfi/srfi-9/gnu.scm
@@ -23,7 +23,8 @@
 ;;; Code:
 
 (define-module (srfi srfi-9 gnu)
-  #:export (set-record-printer!))
+  #:export (set-record-type-printer!))
 
-(define (set-record-printer! type thunk)
+(define (set-record-type-printer! type thunk)
+  "Set a custom printer THUNK for TYPE."
   (struct-set! type vtable-index-printer thunk))


hooks/post-receive
-- 
GNU Guile