/* generated by Id 1.1 at ,$ */ /* with the command: -I../stage1/ -I../st80 -c PrototypeNode.st -o ../stage2/PrototypeNode.o.c */ #include static struct __libid *_libid= 0; #ifdef ID_DEBUG # define _enter(info) void *__id_debug= _libid->enter(info) # define _line(lno) _libid->line(lno) # define _leave() _libid->leave(__id_debug) # define _backtrace() _libid->backtrace() #else # define _enter(info) (void)info # define _line(lno) # define _leave() # define _backtrace() "(no debugging information)\n" #endif #define _return _leave(); return #define _sendv(MSG, N, RCV, ARG...) ({ \ struct __send _s= { (MSG), (N), (RCV) }; \ ((_imp_t)(_libid->bindv(&_s)))(&_s, _s.receiver, _s.receiver, ##ARG); \ }) #define _superv(TYP, MSG, N, RCV, ARG...) ({ \ struct __send _s= { (MSG), (N), (TYP) }; \ _imp_t _imp= _libid->bindv(&_s); \ _s.receiver= (RCV); \ _imp(&_s, _s.receiver, _s.receiver, ##ARG); \ }) static oop s_implementType_= 0; static oop s_genInitialisation_= 0; static oop s_ifTrue_ifFalse_= 0; static oop s_initialiseExternal_= 0; static oop s_slots_= 0; static oop s_initialiseType_in_= 0; static oop s_printIndent_= 0; static oop s_println= 0; static oop s_addType_= 0; static oop s__5fimport_= 0; static oop s_ifFalse_= 0; static oop s_beExternal= 0; static oop s_isExternal= 0; static oop s_println_= 0; static oop s__5fslots= 0; static oop s_slots= 0; static oop s_ifTrue_= 0; static oop s__2c= 0; static oop s_noteUsed= 0; static oop s__3d= 0; static oop s_withName_base_slots_position_= 0; static oop s_withPosition_= 0; static oop s_isPrototypeNode= 0; static oop s__5fdebugName= 0; static oop s_noteResized= 0; static oop s_base= 0; static oop s_and_= 0; static oop s_encode_position_= 0; static oop s_notNil= 0; static oop s_encodeType_position_= 0; static oop s_printString= 0; static oop s_size_5f_value_5f_= 0; static oop s_addSelector_= 0; static oop s_noteImplementation_in_at_= 0; static oop s_addTo_= 0; static oop s_genDeclaration_= 0; static oop s_isResized= 0; static oop s_name= 0; static oop s_encode_= 0; static oop s_putln= 0; static oop s_declareType_= 0; static oop s_genDefinition_= 0; static oop s__5fsizeof= 0; static oop s_defineType_= 0; static oop s_genImplementation_= 0; static oop s_not= 0; static struct _Selector { const char *name; oop *addr; } _Selectors[]= { { "implementType:", &s_implementType_ }, { "genInitialisation:", &s_genInitialisation_ }, { "ifTrue:ifFalse:", &s_ifTrue_ifFalse_ }, { "initialiseExternal:", &s_initialiseExternal_ }, { "slots:", &s_slots_ }, { "initialiseType:in:", &s_initialiseType_in_ }, { "printIndent:", &s_printIndent_ }, { "println", &s_println }, { "addType:", &s_addType_ }, { "_import:", &s__5fimport_ }, { "ifFalse:", &s_ifFalse_ }, { "beExternal", &s_beExternal }, { "isExternal", &s_isExternal }, { "println:", &s_println_ }, { "_slots", &s__5fslots }, { "slots", &s_slots }, { "ifTrue:", &s_ifTrue_ }, { ",", &s__2c }, { "noteUsed", &s_noteUsed }, { "=", &s__3d }, { "withName:base:slots:position:", &s_withName_base_slots_position_ }, { "withPosition:", &s_withPosition_ }, { "isPrototypeNode", &s_isPrototypeNode }, { "_debugName", &s__5fdebugName }, { "noteResized", &s_noteResized }, { "base", &s_base }, { "and:", &s_and_ }, { "encode:position:", &s_encode_position_ }, { "notNil", &s_notNil }, { "encodeType:position:", &s_encodeType_position_ }, { "printString", &s_printString }, { "size_:value_:", &s_size_5f_value_5f_ }, { "addSelector:", &s_addSelector_ }, { "noteImplementation:in:at:", &s_noteImplementation_in_at_ }, { "addTo:", &s_addTo_ }, { "genDeclaration:", &s_genDeclaration_ }, { "isResized", &s_isResized }, { "name", &s_name }, { "encode:", &s_encode_ }, { "putln", &s_putln }, { "declareType:", &s_declareType_ }, { "genDefinition:", &s_genDefinition_ }, { "_sizeof", &s__5fsizeof }, { "defineType:", &s_defineType_ }, { "genImplementation:", &s_genImplementation_ }, { "not", &s_not }, { 0, 0 } }; struct t__object { struct _vtable *_vtable[0]; }; struct t__selector { struct _vtable *_vtable[0]; oop v__size; oop v__elements; }; struct t__assoc { struct _vtable *_vtable[0]; oop v_key; oop v_value; }; struct t__closure { struct _vtable *_vtable[0]; oop v__method; oop v_data; }; struct t__vector { struct _vtable *_vtable[0]; oop v__size; }; struct t__vtable { struct _vtable *_vtable[0]; oop v__tally; oop v_bindings; oop v_delegate; }; struct t_Object { struct _vtable *_vtable[0]; }; struct t_UndefinedObject { struct _vtable *_vtable[0]; }; struct t_StaticBlockClosure { struct _vtable *_vtable[0]; oop v__function; oop v__arity; }; struct t_BlockClosure { struct _vtable *_vtable[0]; oop v__function; oop v__arity; oop v_outer; oop v_state; oop v__nlr; }; struct t_Magnitude { struct _vtable *_vtable[0]; }; struct t_Character { struct _vtable *_vtable[0]; oop v_value; }; struct t_Number { struct _vtable *_vtable[0]; }; struct t_Fraction { struct _vtable *_vtable[0]; oop v_numerator; oop v_denominator; }; struct t_Float { struct _vtable *_vtable[0]; }; struct t_Integer { struct _vtable *_vtable[0]; }; struct t_SmallInteger { struct _vtable *_vtable[0]; }; struct t_LargePositiveInteger { struct _vtable *_vtable[0]; oop v_bytes; }; struct t_LargeNegativeInteger { struct _vtable *_vtable[0]; oop v_bytes; }; struct t_Collection { struct _vtable *_vtable[0]; }; struct t_SequenceableCollection { struct _vtable *_vtable[0]; }; struct t_ArrayedCollection { struct _vtable *_vtable[0]; oop v_size; }; struct t_Array { struct _vtable *_vtable[0]; oop v_size; oop v__pointers; }; struct t_ImmutableArray { struct _vtable *_vtable[0]; oop v_size; oop v__pointers; }; struct t_WordArray { struct _vtable *_vtable[0]; oop v_size; oop v__words; }; struct t_ImmutableWordArray { struct _vtable *_vtable[0]; oop v_size; oop v__words; }; struct t_ByteArray { struct _vtable *_vtable[0]; oop v_size; oop v__bytes; }; struct t_ImmutableByteArray { struct _vtable *_vtable[0]; oop v_size; oop v__bytes; }; struct t_String { struct _vtable *_vtable[0]; oop v_size; oop v__bytes; }; struct t_ImmutableString { struct _vtable *_vtable[0]; oop v_size; oop v__bytes; }; struct t_Symbol { struct _vtable *_vtable[0]; oop v_size; oop v__bytes; }; struct t_nil { struct _vtable *_vtable[0]; }; struct t_true { struct _vtable *_vtable[0]; }; struct t_false { struct _vtable *_vtable[0]; }; struct t_CharacterTable { struct _vtable *_vtable[0]; oop v_size; oop v__pointers; }; struct t_ParseNode { struct _vtable *_vtable[0]; oop v_position; oop v_location; }; struct t_PrototypeNode { struct _vtable *_vtable[0]; oop v_position; oop v_location; oop v_name; oop v_base; oop v_slots; oop v_used; oop v_external; oop v_resized; }; static oop l_16= 0; static oop l_17= 0; static oop l_18= 0; static oop l_19= 0; static oop l_20= 0; static oop l_21= 0; static oop l_27= 0; static oop l_28= 0; static oop l_29= 0; static oop v__object= 0; static oop v_Object= 0; static oop v_UndefinedObject= 0; static oop v_StaticBlockClosure= 0; static oop v_Magnitude= 0; static oop v_Number= 0; static oop v_Integer= 0; static oop v_LargePositiveInteger= 0; static oop v_Collection= 0; static oop v_SequenceableCollection= 0; static oop v_ArrayedCollection= 0; static oop v_Array= 0; static oop v_WordArray= 0; static oop v_ByteArray= 0; static oop v_String= 0; static oop v_ImmutableString= 0; static oop v_true= 0; static oop v_false= 0; static oop v_ParseNode= 0; static oop v_PrototypeNode= 0; static size_t PrototypeNode___5fsizeof(oop _closure, oop v_self) { return sizeof(struct t_PrototypeNode); } static char *PrototypeNode___5fdebugName(oop _closure, oop v_self) { return "PrototypeNode"; } static struct __slotinfo *PrototypeNode___5fslots(oop _closure, oop v_self) { static struct __slotinfo info[]= { { "position", 0, 4 }, { "location", 4, 4 }, { "name", 8, 4 }, { "base", 12, 4 }, { "slots", 16, 4 }, { "used", 20, 4 }, { "external", 24, 4 }, { "resized", 28, 4 }, { 0, 0, 0 } }; return &info[0]; } static struct __methodinfo __info1= { "isPrototypeNode", "Object", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 35, 36, 0 }; static oop Object__isPrototypeNode(oop v__closure, oop v_stateful_self, oop v_self) { _enter(&__info1); oop _1= 0; _line(35); _1= v_false; _leave(); return _1; _leave(); } static struct __methodinfo __info2= { "isPrototypeNode", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 36, 38, &__info1 }; static oop PrototypeNode__isPrototypeNode(oop v__closure, oop v_stateful_self, oop v_self) { _enter(&__info2); oop _1= 0; _line(36); _1= v_true; _leave(); return _1; _leave(); } static struct __methodinfo __info3= { "withName:base:slots:position:", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 38, 49, &__info2 }; static oop PrototypeNode__withName_base_slots_position_(oop v__closure, oop v_stateful_self, oop v_self, oop v_nameString, oop v_baseString, oop v_slotStrings, oop v_aPosition) { _enter(&__info3); oop _1= 0; oop _2= 0; _line(38); _1= v_self; _2= v_aPosition; _line(40); _1=_sendv(s_withPosition_, 2, _1, _2); v_self= _1; v_stateful_self= _1; _1= v_nameString; ((struct t_PrototypeNode *)v_stateful_self)->v_name= _1; _1= v_baseString; ((struct t_PrototypeNode *)v_stateful_self)->v_base= _1; _1= v_slotStrings; ((struct t_PrototypeNode *)v_stateful_self)->v_slots= _1; _1= v_false; ((struct t_PrototypeNode *)v_stateful_self)->v_used= _1; _1= v_false; ((struct t_PrototypeNode *)v_stateful_self)->v_external= _1; _1= v_false; ((struct t_PrototypeNode *)v_stateful_self)->v_resized= _1; _1= v_self; _leave(); return _1; _leave(); } static struct __methodinfo __info4= { "name", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 49, 50, &__info3 }; static oop PrototypeNode__name(oop v__closure, oop v_stateful_self, oop v_self) { _enter(&__info4); oop _1= 0; _line(49); _1= ((struct t_PrototypeNode *)v_stateful_self)->v_name; _leave(); return _1; _leave(); } static struct __methodinfo __info5= { "base", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 50, 51, &__info4 }; static oop PrototypeNode__base(oop v__closure, oop v_stateful_self, oop v_self) { _enter(&__info5); oop _1= 0; _line(50); _1= ((struct t_PrototypeNode *)v_stateful_self)->v_base; _leave(); return _1; _leave(); } static struct __methodinfo __info6= { "slots", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 51, 53, &__info5 }; static oop PrototypeNode__slots(oop v__closure, oop v_stateful_self, oop v_self) { _enter(&__info6); oop _1= 0; _line(51); _1= ((struct t_PrototypeNode *)v_stateful_self)->v_slots; _leave(); return _1; _leave(); } static struct __methodinfo __info7= { "noteUsed", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 53, 54, &__info6 }; static oop PrototypeNode__noteUsed(oop v__closure, oop v_stateful_self, oop v_self) { _enter(&__info7); oop _1= 0; _line(53); _1= v_true; ((struct t_PrototypeNode *)v_stateful_self)->v_used= _1; _1= v_self; _leave(); return _1; _leave(); } static struct __methodinfo __info8= { "beExternal", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 54, 55, &__info7 }; static oop PrototypeNode__beExternal(oop v__closure, oop v_stateful_self, oop v_self) { _enter(&__info8); oop _1= 0; _line(54); _1= v_true; ((struct t_PrototypeNode *)v_stateful_self)->v_external= _1; _1= v_self; _leave(); return _1; _leave(); } static struct __methodinfo __info9= { "isExternal", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 55, 57, &__info8 }; static oop PrototypeNode__isExternal(oop v__closure, oop v_stateful_self, oop v_self) { _enter(&__info9); oop _1= 0; _line(55); _1= ((struct t_PrototypeNode *)v_stateful_self)->v_external; _leave(); return _1; _leave(); } static struct __methodinfo __info10= { "noteResized", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 57, 58, &__info9 }; static oop PrototypeNode__noteResized(oop v__closure, oop v_stateful_self, oop v_self) { _enter(&__info10); oop _1= 0; _line(57); _1= v_true; ((struct t_PrototypeNode *)v_stateful_self)->v_resized= _1; _1= v_self; _leave(); return _1; _leave(); } static struct __methodinfo __info11= { "isResized", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 58, 60, &__info10 }; static oop PrototypeNode__isResized(oop v__closure, oop v_stateful_self, oop v_self) { _enter(&__info11); oop _1= 0; _line(58); _1= ((struct t_PrototypeNode *)v_stateful_self)->v_resized; _leave(); return _1; _leave(); } static struct __methodinfo __info12= { "slots:", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 60, 62, &__info11 }; static oop PrototypeNode__slots_(oop v__closure, oop v_stateful_self, oop v_self, oop v_slotCollection) { _enter(&__info12); oop _1= 0; _line(60); _1= v_slotCollection; ((struct t_PrototypeNode *)v_stateful_self)->v_slots= _1; _leave(); return _1; _leave(); } static struct __methodinfo __info13= { "=", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 62, 64, &__info12 }; static oop PrototypeNode___3d(oop v__closure, oop v_stateful_self, oop v_self, oop v_aPrototypeNode) { _enter(&__info13); oop _1= 0; oop _2= 0; _line(62); /* and: */ _1= v_aPrototypeNode; _line(62); _1=_sendv(s_isPrototypeNode, 1, _1); if (!_1) goto _l1; { _1= ((struct t_PrototypeNode *)v_stateful_self)->v_slots; _2= v_aPrototypeNode; _line(62); _2=_sendv(s_slots, 1, _2); if (1 & (long)_1 & (long)_2) { _1= (((long)_1 == (long)_2) ? v_true : v_false); } else _1= _sendv(s__3d, 2, _1, _2); } _l1:; _leave(); return _1; _leave(); } static struct __methodinfo __info14= { "addTo:", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 64, 66, &__info13 }; static oop PrototypeNode__addTo_(oop v__closure, oop v_stateful_self, oop v_self, oop v_client) { _enter(&__info14); oop _1= 0; oop _2= 0; _line(64); _1= v_client; _2= v_self; _line(64); _1=_sendv(s_addType_, 2, _1, _2); _1= v_self; _leave(); return _1; _leave(); } static struct __methodinfo __info15= { "encode:", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 66, 90, &__info14 }; static oop PrototypeNode__encode_(oop v__closure, oop v_stateful_self, oop v_self, oop v_encoder) { _enter(&__info15); oop v_baseProto= 0; oop _1= 0; oop _2= 0; oop _3= 0; oop _4= 0; (void)v_baseProto; _line(66); /* ifTrue: */ _1= 0; _2= ((struct t_PrototypeNode *)v_stateful_self)->v_base; _line(70); _2=_sendv(s_notNil, 1, _2); if (!_2) goto _l2; { _1= v_encoder; _2= ((struct t_PrototypeNode *)v_stateful_self)->v_base; _3= ((struct t_PrototypeNode *)v_stateful_self)->v_position; _line(70); _sendv(s_encode_position_, 3, _1, _2, _3); _2= ((struct t_PrototypeNode *)v_stateful_self)->v_base; _3= ((struct t_PrototypeNode *)v_stateful_self)->v_position; _1=_sendv(s_encodeType_position_, 3, _1, _2, _3); v_baseProto= _1; } _l2:; /* ifFalse: */ _1= 0; _2= ((struct t_PrototypeNode *)v_stateful_self)->v_external; if (_2) goto _l3; { _1= v_true; ((struct t_PrototypeNode *)v_stateful_self)->v_used= _1; /* ifTrue: */ _1= 0; /* and: */ _2= v_baseProto; if (!_2) goto _l5; { _2= v_baseProto; _line(75); _2=_sendv(s_isResized, 1, _2); } _l5:; if (!_2) goto _l4; { _1= ((struct t_PrototypeNode *)v_stateful_self)->v_position; _line(77); _1=_sendv(s_printString, 1, _1); _2= l_16; _line(77); _1=_sendv(s__2c, 2, _1, _2); _2= ((struct t_PrototypeNode *)v_stateful_self)->v_base; _line(78); _1=_sendv(s__2c, 2, _1, _2); _2= l_17; _line(78); _1=_sendv(s__2c, 2, _1, _2); _2= ((struct t_PrototypeNode *)v_stateful_self)->v_name; _line(79); _1=_sendv(s__2c, 2, _1, _2); _2= l_18; _line(79); _1=_sendv(s__2c, 2, _1, _2); _line(79); _1=_sendv(s_putln, 1, _1); } _l4:; _1= v_encoder; _2= l_19; _line(81); _sendv(s_addSelector_, 2, _1, _2); _2= l_19; _3= ((struct t_PrototypeNode *)v_stateful_self)->v_name; _4= ((struct t_PrototypeNode *)v_stateful_self)->v_position; _sendv(s_noteImplementation_in_at_, 4, _1, _2, _3, _4); _2= l_20; _sendv(s_addSelector_, 2, _1, _2); _2= l_20; _3= ((struct t_PrototypeNode *)v_stateful_self)->v_name; _4= ((struct t_PrototypeNode *)v_stateful_self)->v_position; _sendv(s_noteImplementation_in_at_, 4, _1, _2, _3, _4); _2= l_21; _sendv(s_addSelector_, 2, _1, _2); _2= l_21; _3= ((struct t_PrototypeNode *)v_stateful_self)->v_name; _4= ((struct t_PrototypeNode *)v_stateful_self)->v_position; _1=_sendv(s_noteImplementation_in_at_, 4, _1, _2, _3, _4); } _l3:; _1= v_self; _leave(); return _1; _leave(); } static struct __methodinfo __info22= { "genDeclaration:", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 90, 91, &__info15 }; static oop PrototypeNode__genDeclaration_(oop v__closure, oop v_stateful_self, oop v_self, oop v_gen) { _enter(&__info22); oop _1= 0; oop _2= 0; _line(90); _1= v_gen; _2= v_self; _line(90); _1=_sendv(s_declareType_, 2, _1, _2); _1= v_self; _leave(); return _1; _leave(); } static struct __methodinfo __info23= { "genDefinition:", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 91, 92, &__info22 }; static oop PrototypeNode__genDefinition_(oop v__closure, oop v_stateful_self, oop v_self, oop v_gen) { _enter(&__info23); oop _1= 0; oop _2= 0; _line(91); /* ifTrue: */ _1= 0; _2= ((struct t_PrototypeNode *)v_stateful_self)->v_used; if (!_2) goto _l6; { _1= v_gen; _2= v_self; _line(91); _1=_sendv(s_defineType_, 2, _1, _2); } _l6:; _1= v_self; _leave(); return _1; _leave(); } static struct __methodinfo __info24= { "genImplementation:", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 92, 94, &__info23 }; static oop PrototypeNode__genImplementation_(oop v__closure, oop v_stateful_self, oop v_self, oop v_gen) { _enter(&__info24); oop _1= 0; oop _2= 0; _line(92); /* ifTrue: */ _1= 0; /* and: */ _2= ((struct t_PrototypeNode *)v_stateful_self)->v_used; if (!_2) goto _l8; { _2= ((struct t_PrototypeNode *)v_stateful_self)->v_external; _line(92); _2=_sendv(s_not, 1, _2); } _l8:; if (!_2) goto _l7; { _1= v_gen; _2= v_self; _line(92); _1=_sendv(s_implementType_, 2, _1, _2); } _l7:; _1= v_self; _leave(); return _1; _leave(); } static struct __methodinfo __info25= { "genInitialisation:", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 94, 103, &__info24 }; static oop PrototypeNode__genInitialisation_(oop v__closure, oop v_stateful_self, oop v_self, oop v_gen) { _enter(&__info25); oop _1= 0; oop _2= 0; oop _3= 0; _line(94); /* ifTrue: */ _1= 0; _2= ((struct t_PrototypeNode *)v_stateful_self)->v_used; if (!_2) goto _l9; { /* ifTrue:ifFalse: */ _1= ((struct t_PrototypeNode *)v_stateful_self)->v_external; if (!_1) goto _l10; { _1= v_gen; _2= ((struct t_PrototypeNode *)v_stateful_self)->v_name; _line(99); _1=_sendv(s_initialiseExternal_, 2, _1, _2); } goto _l11; _l10:; { _1= v_gen; _2= v_self; _line(100); _2=_sendv(s_name, 1, _2); _3= ((struct t_PrototypeNode *)v_stateful_self)->v_base; _line(100); _1=_sendv(s_initialiseType_in_, 3, _1, _2, _3); } _l11:; } _l9:; _1= v_self; _leave(); return _1; _leave(); } static struct __methodinfo __info26= { "println:", "PrototypeNode", "/Users/piumarta/src/idst/object/idc/PrototypeNode.st", 0, 103, 108, &__info25 }; static oop PrototypeNode__println_(oop v__closure, oop v_stateful_self, oop v_self, oop v_indent) { _enter(&__info26); oop _1= 0; oop _2= 0; _line(103); _1= v_self; _2= v_indent; _line(105); _1=_sendv(s_printIndent_, 2, _1, _2); _1= l_27; _2= ((struct t_PrototypeNode *)v_stateful_self)->v_name; _line(106); _2=_sendv(s_printString, 1, _2); _line(106); _1=_sendv(s__2c, 2, _1, _2); _2= l_28; _line(106); _1=_sendv(s__2c, 2, _1, _2); _2= ((struct t_PrototypeNode *)v_stateful_self)->v_base; _line(106); _2=_sendv(s_printString, 1, _2); _line(106); _1=_sendv(s__2c, 2, _1, _2); _2= l_29; _line(106); _1=_sendv(s__2c, 2, _1, _2); _2= ((struct t_PrototypeNode *)v_stateful_self)->v_slots; _line(106); _2=_sendv(s_printString, 1, _2); _line(106); _1=_sendv(s__2c, 2, _1, _2); _line(106); _1=_sendv(s_println, 1, _1); _1= v_self; _leave(); return _1; _leave(); } static struct __methodinfo __info= { "__id__init__", "", "PrototypeNode.st", 0, 0, 0, &__info26 }; void __id__init__PrototypeNode(struct __libid *__libid) { if (_libid) return; if (!(_libid= __libid)) { fprintf(stderr, "init _libid %p\n", __libid); abort(); } # define GC_add_roots _libid->gc_addRoots GC_INIT(); { struct _Selector *s= 0; for (s= _Selectors; s->name; ++s) *s->addr= _libid->intern(s->name); } _enter(&__info); _libid->infos(&__info, &__info1); _sendv(s__5fimport_, 3, _libid->_object, "ParseNode", "__id__init__ParseNode"); v__object= _libid->import("_object"); v_Object= _libid->import("Object"); v_UndefinedObject= _libid->import("UndefinedObject"); v_StaticBlockClosure= _libid->import("StaticBlockClosure"); v_Magnitude= _libid->import("Magnitude"); v_Number= _libid->import("Number"); v_Integer= _libid->import("Integer"); v_LargePositiveInteger= _libid->import("LargePositiveInteger"); v_Collection= _libid->import("Collection"); v_SequenceableCollection= _libid->import("SequenceableCollection"); v_ArrayedCollection= _libid->import("ArrayedCollection"); v_Array= _libid->import("Array"); v_WordArray= _libid->import("WordArray"); v_ByteArray= _libid->import("ByteArray"); v_String= _libid->import("String"); v_ImmutableString= _libid->import("ImmutableString"); v_true= _libid->import("true"); v_false= _libid->import("false"); v_ParseNode= _libid->import("ParseNode"); v_PrototypeNode= _libid->proto2(v_ParseNode, PrototypeNode___5fsizeof(0, 0)); _libid->method(v_PrototypeNode, s__5fsizeof, (_imp_t)PrototypeNode___5fsizeof); _libid->method(v_PrototypeNode, s__5fdebugName, (_imp_t)PrototypeNode___5fdebugName); _libid->method(v_PrototypeNode, s__5fslots, (_imp_t)PrototypeNode___5fslots); _libid->export("PrototypeNode", v_PrototypeNode); _libid->method(v_Object, s_isPrototypeNode, (_imp_t)Object__isPrototypeNode); _libid->method(v_PrototypeNode, s_isPrototypeNode, (_imp_t)PrototypeNode__isPrototypeNode); _libid->method(v_PrototypeNode, s_withName_base_slots_position_, (_imp_t)PrototypeNode__withName_base_slots_position_); _libid->method(v_PrototypeNode, s_name, (_imp_t)PrototypeNode__name); _libid->method(v_PrototypeNode, s_base, (_imp_t)PrototypeNode__base); _libid->method(v_PrototypeNode, s_slots, (_imp_t)PrototypeNode__slots); _libid->method(v_PrototypeNode, s_noteUsed, (_imp_t)PrototypeNode__noteUsed); _libid->method(v_PrototypeNode, s_beExternal, (_imp_t)PrototypeNode__beExternal); _libid->method(v_PrototypeNode, s_isExternal, (_imp_t)PrototypeNode__isExternal); _libid->method(v_PrototypeNode, s_noteResized, (_imp_t)PrototypeNode__noteResized); _libid->method(v_PrototypeNode, s_isResized, (_imp_t)PrototypeNode__isResized); _libid->method(v_PrototypeNode, s_slots_, (_imp_t)PrototypeNode__slots_); _libid->method(v_PrototypeNode, s__3d, (_imp_t)PrototypeNode___3d); _libid->method(v_PrototypeNode, s_addTo_, (_imp_t)PrototypeNode__addTo_); l_16= _sendv(s_size_5f_value_5f_, 3, v_ImmutableString, 51, ": WARNING: _sizeof method redefined in parent type "); l_17= _sendv(s_size_5f_value_5f_, 3, v_ImmutableString, 19, "; check if subtype "); l_18= _sendv(s_size_5f_value_5f_, 3, v_ImmutableString, 23, " should redefine it too"); l_19= _sendv(s_size_5f_value_5f_, 3, v_ImmutableString, 7, "_sizeof"); l_20= _sendv(s_size_5f_value_5f_, 3, v_ImmutableString, 10, "_debugName"); l_21= _sendv(s_size_5f_value_5f_, 3, v_ImmutableString, 6, "_slots"); _libid->method(v_PrototypeNode, s_encode_, (_imp_t)PrototypeNode__encode_); _libid->method(v_PrototypeNode, s_genDeclaration_, (_imp_t)PrototypeNode__genDeclaration_); _libid->method(v_PrototypeNode, s_genDefinition_, (_imp_t)PrototypeNode__genDefinition_); _libid->method(v_PrototypeNode, s_genImplementation_, (_imp_t)PrototypeNode__genImplementation_); _libid->method(v_PrototypeNode, s_genInitialisation_, (_imp_t)PrototypeNode__genInitialisation_); l_27= _sendv(s_size_5f_value_5f_, 3, v_ImmutableString, 5, "Type "); l_28= _sendv(s_size_5f_value_5f_, 3, v_ImmutableString, 3, " = "); l_29= _sendv(s_size_5f_value_5f_, 3, v_ImmutableString, 3, " + "); _libid->method(v_PrototypeNode, s_println_, (_imp_t)PrototypeNode__println_); _leave(); }