fixed a wrong class name specified when adding a compiled method
This commit is contained in:
@ -137,7 +137,8 @@ static int ignite_1 (stix_t* stix)
|
||||
stix->_small_integer = alloc_kernel_class (stix, 0, STIX_CLASS_SPEC_MAKE(0, 0, STIX_OBJ_TYPE_OOP));
|
||||
|
||||
if (!stix->_stix || !stix->_nil_object || !stix->_object ||
|
||||
!stix->_array || !stix->_string || !stix->_symbol ||
|
||||
!stix->_array || !stix->_byte_array ||
|
||||
!stix->_string || !stix->_symbol ||
|
||||
!stix->_symbol_set || !stix->_system_dictionary || !stix->_method_dictionary ||
|
||||
!stix->_association || !stix->_true_class || !stix->_false_class ||
|
||||
!stix->_character || !stix->_small_integer) return -1;
|
||||
@ -170,15 +171,10 @@ static int ignite_2 (stix_t* stix)
|
||||
stix->symtab->bucket = (stix_oop_oop_t)tmp;
|
||||
|
||||
/* Create the system dictionary */
|
||||
tmp = stix_instantiate (stix, stix->_system_dictionary, STIX_NULL, 0);
|
||||
tmp = stix_makedic (stix, stix->_system_dictionary, stix->option.dfl_sysdic_size);
|
||||
if (!tmp) return -1;
|
||||
stix->sysdic = (stix_oop_set_t)tmp;
|
||||
|
||||
stix->sysdic->tally = STIX_OOP_FROM_SMINT(0);
|
||||
tmp = stix_instantiate (stix, stix->_array, STIX_NULL, stix->option.dfl_sysdic_size);
|
||||
if (!tmp) return -1;
|
||||
stix->sysdic->bucket = (stix_oop_oop_t)tmp;
|
||||
|
||||
/* Export the system dictionary via the first class variable of the Stix class */
|
||||
((stix_oop_class_t)stix->_stix)->classvar[0] = (stix_oop_t)stix->sysdic;
|
||||
|
||||
@ -201,9 +197,11 @@ static int ignite_3 (stix_t* stix)
|
||||
{ 6, { 'S','t','r','i','n','g' } },
|
||||
{ 6, { 'S','y','m','b','o','l' } },
|
||||
{ 5, { 'A','r','r','a','y' } },
|
||||
{ 9, { 'B','y','t','e','A','r','r','a','y' } },
|
||||
{ 9, { 'S','y','m','b','o','l','S','e','t' } },
|
||||
{ 16, { 'S','y','s','t','e','m','D','i','c','t','i','o','n','a','r','y' } },
|
||||
{ 16, { 'M','e','t','h','o','d','D','i','c','t','i','o','n','a','r','y' } },
|
||||
{ 14, { 'C','o','m','p','i','l','e','d','M','e','t','h','o','d' } },
|
||||
{ 11, { 'A','s','s','o','c','i','a','t','i','o','n' } },
|
||||
{ 4, { 'T','r','u','e' } },
|
||||
{ 5, { 'F','a','l','s','e' } },
|
||||
|
Reference in New Issue
Block a user