steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

got debug compiles working again

db4
Phil Dawes 2009-08-21 18:33:04 +01:00
parent 43787e2664
commit a4a4439fc5
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
vm/code_block.cpp
View File

@ -345,8 +345,8 @@ void copy_literal_references(code_block *compiled, factorvm *myvm)
void factorvm::relocate_code_block_step(relocation_entry rel, cell index, code_block *compiled) void factorvm::relocate_code_block_step(relocation_entry rel, cell index, code_block *compiled)
{ {
#ifdef FACTOR_DEBUG #ifdef FACTOR_DEBUG
tagged<array>(compiled->literals).untag_check(); tagged<array>(compiled->literals).untag_check(vm);
tagged<byte_array>(compiled->relocation).untag_check(); tagged<byte_array>(compiled->relocation).untag_check(vm);
#endif #endif
store_address_in_code_block(relocation_class_of(rel), store_address_in_code_block(relocation_class_of(rel),

4
vm/tagged.hpp
View File

@ -37,13 +37,13 @@ struct tagged
explicit tagged(cell tagged) : value_(tagged) { explicit tagged(cell tagged) : value_(tagged) {
#ifdef FACTOR_DEBUG #ifdef FACTOR_DEBUG
untag_check(); untag_check(vm);
#endif #endif
} }
explicit tagged(TYPE *untagged) : value_(factor::tag(untagged)) { explicit tagged(TYPE *untagged) : value_(factor::tag(untagged)) {
#ifdef FACTOR_DEBUG #ifdef FACTOR_DEBUG
untag_check(); untag_check(vm);
#endif #endif
} }