[cmucl-cvs] [git] CMU Common Lisp branch RELEASE-20C-BRANCH updated. release-20c-base-7-gd26f843

[Raymond Toy]

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 "CMU Common Lisp".

The branch, RELEASE-20C-BRANCH has been updated
       via  d26f843313d53333fc1160a6fef13d6aaba312d3 (commit)
      from  50b8f96365ae8fb57e0dd70a01185fff20c19156 (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 d26f843313d53333fc1160a6fef13d6aaba312d3
Author: Raymond Toy <toy.raymond at gmail.com>
Date:   Sun Oct 30 17:55:31 2011 -0700

    Pretty-print WITH-ARRAY-DATA.

diff --git a/code/pprint.lisp b/code/pprint.lisp
index c0f66c5..d1f570f 100644
--- a/code/pprint.lisp
+++ b/code/pprint.lisp
@@ -1945,7 +1945,8 @@ When annotations are present, invoke them at the right positions."
     (new-assem:without-scheduling pprint-with-like)
     (vm::with-fixed-allocation pprint-with-like)
     (kernel::number-dispatch pprint-with-like)
-    (stream::with-stream-class pprint-with-like)))
+    (stream::with-stream-class pprint-with-like)
+    (lisp::with-array-data pprint-with-like)))
 
 (defun pprint-init ()
   (setf *initial-pprint-dispatch* (make-pprint-dispatch-table))

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

Summary of changes:
 code/pprint.lisp |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)


hooks/post-receive
-- 
CMU Common Lisp