}
cell code_block::owner_quot() const {
- if (!optimized_p() && TAG(owner) == WORD_TYPE)
+ if (type() != CODE_BLOCK_OPTIMIZED && TAG(owner) == WORD_TYPE)
return untag<word>(owner)->def;
return owner;
}
// scan offset. In all other cases -1 is returned.
// Allocates memory (quot_code_offset_to_scan)
cell code_block::scan(factor_vm* vm, cell addr) const {
- if (type() != code_block_unoptimized) {
+ if (type() != CODE_BLOCK_UNOPTIMIZED) {
return tag_fixnum(-1);
}