[prev in list] [next in list] [prev in thread] [next in thread] 

List:       sbcl-commits
Subject:    [Sbcl-commits] master: Fix scavenge_generations, again.
From:       "stassats" <stassats () users ! sourceforge ! net>
Date:       2017-03-30 0:19:39
Message-ID: 1490833179.916902.26555 () sfp-scm-1 ! v30 ! ch3 ! sourceforge ! com
[Download RAW message or body]

The branch "master" has been updated in SBCL:
       via  3c82c86bd44ce9895cec7e35577163f0288d6d42 (commit)
      from  700c22ad97d77f0d02f719ba8459877e095fbccd (commit)

- Log -----------------------------------------------------------------
commit 3c82c86bd44ce9895cec7e35577163f0288d6d42
Author: Stas Boukarev <stassats@gmail.com>
Date:   Thu Mar 30 03:19:28 2017 +0300

    Fix scavenge_generations, again.
    
    Correctly subtract two words.
---
 src/runtime/gencgc.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/runtime/gencgc.c b/src/runtime/gencgc.c
index 412023f..8c11031 100644
--- a/src/runtime/gencgc.c
+++ b/src/runtime/gencgc.c
@@ -2545,7 +2545,7 @@ scavenge_generations(generation_index_t from, generation_index_t to)
                  * worthwile */
                 if (!page_table[i].write_protected) {
                     scavenge((lispobj*)page_address(i) + 2,
-                             (GENCGC_CARD_BYTES - 2) / N_WORD_BYTES);
+                             GENCGC_CARD_BYTES / N_WORD_BYTES - 2);
                     update_page_write_prot(i);
                 }
                 for (last_page = i + 1; ; last_page++) {

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


hooks/post-receive
-- 
SBCL

------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
Sbcl-commits mailing list
Sbcl-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/sbcl-commits
[prev in list] [next in list] [prev in thread] [next in thread]