vm: replace assert with FACTOR_ASSERT

[factor.git] / vm / code_blocks.cpp

diff --git a/vm/code_blocks.cpp b/vm/code_blocks.cpp
index b636777a672b4f7540878d4a9fa7fcea2d6eaf74..00bfac513396826db49909ecbf731309d07a7c1f 100755 (executable)
--- a/vm/code_blocks.cpp
+++ b/vm/code_blocks.cpp
@@ -54,8 +54,8 @@ cell factor_vm::code_block_owner(code_block *compiled)
                tagged<quotation> quot(owner.as<quotation>());
                tagged<array> elements(quot->array);
 #ifdef FACTOR_DEBUG
-               assert(array_capacity(elements.untagged()) == 5);
-               assert(array_nth(elements.untagged(),4) == special_objects[PIC_MISS_WORD]
+               FACTOR_ASSERT(array_capacity(elements.untagged()) == 5);
+               FACTOR_ASSERT(array_nth(elements.untagged(),4) == special_objects[PIC_MISS_WORD]
                        || array_nth(elements.untagged(),4) == special_objects[PIC_MISS_TAIL_WORD]);
 #endif
                tagged<wrapper> word_wrapper(array_nth(elements.untagged(),0));