redefined some types
This commit is contained in:
@ -64,7 +64,7 @@ static void compact_symbol_table (stix_t* stix, stix_oop_t _nil)
|
||||
|
||||
STIX_ASSERT (STIX_CLASSOF(stix,symbol) == stix->_symbol);
|
||||
|
||||
z = stix_hashuchars(symbol->slot, STIX_OBJ_GET_SIZE(symbol)) % bucket_size;
|
||||
z = stix_hashchars(symbol->slot, STIX_OBJ_GET_SIZE(symbol)) % bucket_size;
|
||||
|
||||
/* move an element if necessary */
|
||||
if ((y > x && (z <= x || z > y)) ||
|
||||
@ -290,6 +290,7 @@ void stix_gc (stix_t* stix)
|
||||
stix->_false_class = stix_moveoop (stix, stix->_false_class);
|
||||
stix->_character = stix_moveoop (stix, stix->_character);
|
||||
stix->_small_integer = stix_moveoop (stix, stix->_small_integer);
|
||||
stix->_large_integer = stix_moveoop (stix, stix->_large_integer);
|
||||
|
||||
stix->sysdic = (stix_oop_set_t) stix_moveoop (stix, (stix_oop_t)stix->sysdic);
|
||||
stix->processor = (stix_oop_process_scheduler_t) stix_moveoop (stix, (stix_oop_t)stix->processor);
|
||||
|
Reference in New Issue
Block a user