From: Björn Lindqvist <bjourne@gmail.com>
Date: Tue, 15 Nov 2016 04:58:11 +0000 (+0100)
Subject: VM: cast to fixnum looks suspicious
X-Git-Tag: unmaintained~440
X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=commitdiff_plain;h=5027830b0532f4d4905f64db19ef5bb410554879

VM: cast to fixnum looks suspicious
---

diff --git a/vm/mark_bits.hpp b/vm/mark_bits.hpp
index efd66b339c..e86290f320 100644
--- a/vm/mark_bits.hpp
+++ b/vm/mark_bits.hpp
@@ -112,7 +112,7 @@ struct mark_bits {
     cell bit_index = position.second;
 
     for (cell index = position.first; index < bits_size; index++) {
-      cell mask = ((fixnum)marked[index] >> bit_index);
+      cell mask = marked[index] >> bit_index;
       if (~mask) {
         // Found an unmarked block on this page. Stop, it's hammer time
         cell clear_bit = rightmost_clear_bit(mask);
@@ -132,7 +132,7 @@ struct mark_bits {
     cell bit_index = position.second;
 
     for (cell index = position.first; index < bits_size; index++) {
-      cell mask = (marked[index] >> bit_index);
+      cell mask = marked[index] >> bit_index;
       if (mask) {
         // Found an marked block on this page. Stop, it's hammer time
         cell set_bit = rightmost_set_bit(mask);