vm: cleanups

diff --git a/vm/callstack.cpp b/vm/callstack.cpp
index 0c81aa408aab635a123a82c1c13b2c4db137b1c3..37647b2b3bd7c1e87502468ad8556d462ac8d76b 100755 (executable)
--- a/vm/callstack.cpp
+++ b/vm/callstack.cpp
@@ -21,7 +21,7 @@ be calling it at all, so we leave it as it is for now. */
 void *factor_vm::second_from_top_stack_frame(context *ctx)
 {
        void *frame_top = ctx->callstack_top;
-       for (unsigned i = 0; i < 2; ++i)
+       for (cell i = 0; i < 2; ++i)
        {
                void *pred = frame_predecessor(frame_top);
                if (pred >= ctx->callstack_bottom)

diff --git a/vm/code_heap.cpp b/vm/code_heap.cpp
index 95cef61d76a8d135bdad8db522cd455c224c21af..ad3680bb0da35cbb2f971c1d773541e4fa42a527 100755 (executable)
--- a/vm/code_heap.cpp
+++ b/vm/code_heap.cpp
@@ -105,7 +105,6 @@ struct all_blocks_set_verifier {
        void operator()(code_block *block, cell size)
        {
                FACTOR_ASSERT(all_blocks->find((cell)block) != all_blocks->end());
-               // XXX check block size
        }
 };