~ chicken-core (chicken-5) fe84b3ac373ac68991638ec152c2712810c8569a

commit fe84b3ac373ac68991638ec152c2712810c8569a
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Mon Sep 24 00:00:58 2012 +0200
Commit:     Peter Bex <peter.bex@xs4all.nl>
CommitDate: Mon Sep 24 19:35:00 2012 +0200

    show keyword style in csi ,r output
    
    Signed-off-by: Peter Bex <peter.bex@xs4all.nl>

diff --git a/csi.scm b/csi.scm
index de17b74f..8afcd79a 100644
--- a/csi.scm
+++ b/csi.scm
@@ -506,6 +506,7 @@ EOF
                    Installation prefix:\t~A~%~
                    Extension path:  \t~A~%~
                    Include path:    \t~A~%~
+                   Keyword style:   \t~A~%~
                    Symbol-table load:\t~S~%  ~
                      Avg bucket length:\t~S~%  ~
                      Total symbol count:\t~S~%~
@@ -520,6 +521,7 @@ EOF
 		    prefix
 		    (repository-path)
 		    ##sys#include-pathnames
+		    (symbol->string (keyword-style))
 		    (shorten (vector-ref sinfo 0))
 		    (shorten (vector-ref sinfo 1))
 		    (vector-ref sinfo 2)