[cmucl-commit] [git] CMU Common Lisp branch master updated. snapshot-2013-04-9-g497b9b2

Raymond Toy rtoy at common-lisp.net
Fri May 3 03:15:24 UTC 2013


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, master has been updated
       via  497b9b2d466859117a71b7988dc0c6f6eaacb26b (commit)
      from  99250b40fa0b1f424a9a1f458060a16d698c71d8 (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 497b9b2d466859117a71b7988dc0c6f6eaacb26b
Author: Raymond Toy <toy.raymond at gmail.com>
Date:   Thu May 2 20:15:16 2013 -0700

    Just remove a blank line and reformat a strangely formatted line.

diff --git a/src/lisp/gencgc.c b/src/lisp/gencgc.c
index 9bdc16a..708e2fa 100644
--- a/src/lisp/gencgc.c
+++ b/src/lisp/gencgc.c
@@ -7076,12 +7076,9 @@ verify_space(lispobj * start, size_t words)
 	if (Pointerp(thing)) {
 	    int page_index = find_page_index((void *) thing);
 	    int to_readonly_space = (READ_ONLY_SPACE_START <= thing &&
-				     thing <
-
-				     SymbolValue(READ_ONLY_SPACE_FREE_POINTER));
+				     thing < SymbolValue(READ_ONLY_SPACE_FREE_POINTER));
 	    unsigned long to_static_space =
 		((unsigned long) static_space <= thing
-
 		 && thing < SymbolValue(STATIC_SPACE_FREE_POINTER));
 
 	    /* Does it point to the dynamic space? */

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

Summary of changes:
 src/lisp/gencgc.c |    5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)


hooks/post-receive
-- 
CMU Common Lisp


More information about the cmucl-commit mailing list