ftp.nice.ch/pub/next/developer/languages/eiffel/SmallEiffel.0.91.N.bs.tar.gz#/SmallEiffel/bin_c/compile_to_c6.c

This is compile_to_c6.c in view mode; [Download] [Up]

/* ANSI C code generated by SmallEiffel. */
/*
-- SmallEiffel  -- Release (- 0.91)    --      FRANCE
-- Copyright (C), 1994 - Dominique COLNET and Suzanne COLLIN 
-- University Henri Poincare' - Nancy 1 - email colnet@loria.fr 
-- CRIN (Centre de Recherche en Informatique de Nancy)
-- FRANCE 
*/
#include "compile_to_c.h"
/*CST_ATT_UNIQUE*/T0* rT148first_name(T148 *C){
T0* R=NULL;
R=rT130item((T130*)(C)->_names,1);
return R;
}
/*CST_ATT_UNIQUE*/T0* rT148to_run_feature(T148 *C,T0* a1,T0* a2){
T0* R=NULL;
T0* _rc=NULL;
_rc=XrT62run_class(a1);
R=rT269at((T269*)_rc,a2);
if ((int)R) switch (((T0 *)R)->id) {
case 285: 
break;
default:
R = NULL;
};/*IF*/if (!(R)) {
{T285 *n=((T285*)se_new(285));
rT285make(n,a1,a2,(T0 *)C);
R=(T0 *)n;}
}
/*FI*/return R;
}
/*CST_ATT_UNIQUE*/void rT148error(/*C*/T0* a1,T0* a2){
rT48add_position(a1);
rT48error((T48*)oRBC27eh,a2);
}/*CST_ATT_UNIQUE*/int rT148is_merge_with(T148 *C,T0* a1,T0* a2){
int R=0;
int _ne=0;
_ne=/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/;
/*IF*/if (((T0 *)(C)->_result_type)!=((T0 *)/*XrT*E_FEATURE*/((T148*)a1)->_result_type)) {
/*IF*/if (((!((C)->_result_type))||(!(/*XrT*E_FEATURE*/((T148*)a1)->_result_type)))) {
rT48add_position(XrT66start_position(a1));
rT148error(rT148start_position(C),(T0 *)ms1_66);
}
/*FI*/}
/*FI*//*IF*/if (((T0 *)/*(IRF4*/NULL/*)*/)!=((T0 *)XrT66arguments(a1))) {
/*IF*/if (((!(/*(IRF4*/NULL/*)*/))||(!(XrT66arguments(a1))))) {
rT48add_position(XrT66start_position(a1));
rT148error(rT148start_position(C),(T0 *)ms2_66);
}
 else if ((rT97count((T97*)/*(IRF4*/NULL/*)*/))!=(rT97count((T97*)XrT66arguments(a1)))) {
rT48add_position(XrT66start_position(a1));
rT148error(rT148start_position(C),(T0 *)ms3_66);
}
/*FI*/}
/*FI*//*IF*/if (((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)-(_ne))==(0)) {
/*IF*/if (((int)(C)->_result_type)) {
/*IF*/if (!(XrT62is_a_in((C)->_result_type,/*XrT*E_FEATURE*/((T148*)a1)->_result_type,a2))) {
rT48error((T48*)oRBC27eh,(T0 *)ms13_66);
}
/*FI*/}
/*FI*/}
/*FI*//*IF*/if (((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)-(_ne))==(0)) {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
/*IF*/if (!(rT97is_a_in((T97*)/*(IRF4*/NULL/*)*/,XrT66arguments(a1),a2))) {
rT48add_position(XrT66start_position(a1));
rT148error(rT148start_position(C),(T0 *)ms13_66);
}
/*FI*/}
/*FI*/}
/*FI*/R=((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)-(_ne))==(0);
return R;
}
/*CST_ATT_UNIQUE*/T0* rT148start_position(T148 *C){
T0* R=NULL;
R=/*XrT*FEATURE_NAME*/((T70*)rT148first_name(C))->_start_position;
return R;
}
/*CST_ATT_UNIQUE*/void rT148collect_for(/*C*/int a1){
/*IF*/if ((a1)==(1001)) {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
/*IF*/if (!(rT276fast_has((T276*)oRBC66require_collector,/*(IRF4*/NULL/*)*/))) {
rT276add_last((T276*)oRBC66require_collector,/*(IRF4*/NULL/*)*/);
}
/*FI*/}
/*FI*/}
else {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
rT161add_into((T161*)/*(IRF4*/NULL/*)*/,oRBC66assertion_collector);
}
/*FI*/}
/*FI*/}/*CST_ATT_UNIQUE*/void rT148add_into(T148 *C,T0* a1){
T0* _fn=NULL;
int _i=0;
C->_base_class=rT49base_class((T49*)/*XrT*FEATURE_NAME*/((T70*)rT130item((T130*)(C)->_names,1))->_start_position);
_i=1;
while (!((_i)>(rT130count((T130*)(C)->_names)))) {
_fn=rT130item((T130*)(C)->_names,_i);
/*IF*/if (rT65has((T65*)a1,XrT71to_key(_fn))) {
_fn=XrT66first_name(rT65at((T65*)a1,XrT71to_key(_fn)));
rT48add_position(/*XrT*FEATURE_NAME*/((T70*)_fn)->_start_position);
rT48add_position(/*XrT*FEATURE_NAME*/((T70*)rT130item((T130*)(C)->_names,_i))->_start_position);
rT48error((T48*)oRBC27eh,(T0 *)ms12_66);
rT48append(/*XrT*FEATURE_NAME*/((T70*)_fn)->_to_string);
rT48error((T48*)oRBC27eh,(T0 *)ms102_27);
}
else {
rT65put((T65*)a1,(T0 *)C,XrT71to_key(_fn));
}
/*FI*/_i=(_i)+(1);
}
}/*CST_ATT_UNIQUE*/T0* rT148try_to_undefine(T148 *C,T0* a1,T0* a2){
T0* R=NULL;
XrT71undefine_in(a1,a2);
R=rT148try_to_undefine_aux(C,a1,a2);
/*IF*/if (((int)R)) {
/*XrT*DEFERRED_ROUTINE*//*[IRF3:set_clients*//*AW*/((T210*)R)->_clients=((C)->_clients);/*]*/
}
else {
rT53fatal_undefine((T53*)a2,a1);
}
/*FI*/return R;
}
/*CST_ATT_UNIQUE*/T0* rT148try_to_undefine_aux(T148 *C,T0* a1,T0* a2){
T0* R=NULL;
rT48add_position(rT148start_position(C));
rT148error(/*XrT*FEATURE_NAME*/((T70*)a1)->_start_position,(T0 *)ms1_150);
rT53fatal_undefine((T53*)a2,a1);
return R;
}
/*CST_ATT_UNIQUE*/int rT148stupid_switch(/*C*/T0* a1,T0* a2){
int R=0;
R=1;
return R;
}
/*CST_ATT_UNIQUE*/int rT148can_hide(T148 *C,T0* a1,T0* a2){
int R=0;
/*IF*/if (((T0 *)(C)->_result_type)!=((T0 *)/*XrT*E_FEATURE*/((T148*)a1)->_result_type)) {
/*IF*/if (((!((C)->_result_type))||(!(/*XrT*E_FEATURE*/((T148*)a1)->_result_type)))) {
rT48add_position(XrT66start_position(a1));
rT148error(rT148start_position(C),(T0 *)ms4_66);
}
/*FI*/}
/*FI*//*IF*/if (((T0 *)/*(IRF4*/NULL/*)*/)!=((T0 *)XrT66arguments(a1))) {
/*IF*/if (((!(/*(IRF4*/NULL/*)*/))||(!(XrT66arguments(a1))))) {
rT48add_position(XrT66start_position(a1));
rT148error(rT148start_position(C),(T0 *)ms5_66);
}
 else if ((rT97count((T97*)/*(IRF4*/NULL/*)*/))!=(rT97count((T97*)XrT66arguments(a1)))) {
rT48add_position(XrT66start_position(a1));
rT148error(rT148start_position(C),(T0 *)ms6_66);
}
/*FI*/}
/*FI*//*IF*/if ((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)==(0)) {
/*IF*/if (((int)(C)->_result_type)) {
/*IF*/if (!(XrT62is_a_in((C)->_result_type,/*XrT*E_FEATURE*/((T148*)a1)->_result_type,a2))) {
rT48append((T0 *)ms14_66);
rT48append(XrT62run_time_mark(((T269*)a2)->_current_type));
rT48error((T48*)oRBC27eh,(T0 *)ms7_66);
}
/*FI*/}
/*FI*/}
/*FI*//*IF*/if ((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)==(0)) {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
/*IF*/if (!(rT97is_a_in((T97*)/*(IRF4*/NULL/*)*/,XrT66arguments(a1),a2))) {
rT48add_position(XrT66start_position(a1));
rT48add_position(rT148start_position(C));
rT48append((T0 *)ms14_66);
rT48append(XrT62run_time_mark(((T269*)a2)->_current_type));
rT48error((T48*)oRBC27eh,(T0 *)ms8_66);
}
/*FI*/}
/*FI*/}
/*FI*/R=(/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)==(0);
return R;
}
/*CST_ATT_UNIQUE*/T0* rT148base_class_name(T148 *C){
T0* R=NULL;
R=((T53*)(C)->_base_class)->_base_class_name;
return R;
}
/*CST_ATT_UNIQUE*/T0* rT148value(T148 *C,int a1){
T0* R=NULL;
R=rT151item((T151*)(C)->_values,a1);
return R;
}
/*CST_ATT_UNIQUE*/void rT148make_e_feature(T148 *C,T0* a1,T0* a2){
C->_names=a1;
C->_result_type=a2;
}/*CST_ATT_UNIQUE*/void rT148make(T148 *C,T0* a1,T0* a2){
T0* _ic=NULL;
int _i=0;
rT148make_e_feature(C,a1,a2);
{T151 *n=((T151*)se_new(151));
rT151make(n,1,rT130count((T130*)(C)->_names));
C->_values=(T0 *)n;}
_i=1;
while (!((_i)>(((T151*)(C)->_values)->_upper))) {
{T84 *n=((T84*)se_new(84));
rT84make(n,rT55next_unique((T55*)oRBC27small_eiffel),NULL);
_ic=(T0 *)n;}
rT151put((T151*)(C)->_values,_ic,_i);
_i=(_i)+(1);
}
}/*CST_ATT_BOOLEAN*/T0* rT152first_name(T152 *C){
T0* R=NULL;
R=rT130item((T130*)(C)->_names,1);
return R;
}
/*CST_ATT_BOOLEAN*/T0* rT152to_run_feature(T152 *C,T0* a1,T0* a2){
T0* R=NULL;
T0* _rc=NULL;
_rc=XrT62run_class(a1);
R=rT269at((T269*)_rc,a2);
if ((int)R) switch (((T0 *)R)->id) {
case 285: 
break;
default:
R = NULL;
};/*IF*/if (!(R)) {
{T285 *n=((T285*)se_new(285));
rT285make(n,a1,a2,(T0 *)C);
R=(T0 *)n;}
}
/*FI*/return R;
}
/*CST_ATT_BOOLEAN*/void rT152error(/*C*/T0* a1,T0* a2){
rT48add_position(a1);
rT48error((T48*)oRBC27eh,a2);
}/*CST_ATT_BOOLEAN*/int rT152is_merge_with(T152 *C,T0* a1,T0* a2){
int R=0;
int _ne=0;
_ne=/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/;
/*IF*/if (((T0 *)(C)->_result_type)!=((T0 *)/*XrT*E_FEATURE*/((T148*)a1)->_result_type)) {
/*IF*/if (((!((C)->_result_type))||(!(/*XrT*E_FEATURE*/((T148*)a1)->_result_type)))) {
rT48add_position(XrT66start_position(a1));
rT152error(rT152start_position(C),(T0 *)ms1_66);
}
/*FI*/}
/*FI*//*IF*/if (((T0 *)/*(IRF4*/NULL/*)*/)!=((T0 *)XrT66arguments(a1))) {
/*IF*/if (((!(/*(IRF4*/NULL/*)*/))||(!(XrT66arguments(a1))))) {
rT48add_position(XrT66start_position(a1));
rT152error(rT152start_position(C),(T0 *)ms2_66);
}
 else if ((rT97count((T97*)/*(IRF4*/NULL/*)*/))!=(rT97count((T97*)XrT66arguments(a1)))) {
rT48add_position(XrT66start_position(a1));
rT152error(rT152start_position(C),(T0 *)ms3_66);
}
/*FI*/}
/*FI*//*IF*/if (((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)-(_ne))==(0)) {
/*IF*/if (((int)(C)->_result_type)) {
/*IF*/if (!(XrT62is_a_in((C)->_result_type,/*XrT*E_FEATURE*/((T148*)a1)->_result_type,a2))) {
rT48error((T48*)oRBC27eh,(T0 *)ms13_66);
}
/*FI*/}
/*FI*/}
/*FI*//*IF*/if (((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)-(_ne))==(0)) {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
/*IF*/if (!(rT97is_a_in((T97*)/*(IRF4*/NULL/*)*/,XrT66arguments(a1),a2))) {
rT48add_position(XrT66start_position(a1));
rT152error(rT152start_position(C),(T0 *)ms13_66);
}
/*FI*/}
/*FI*/}
/*FI*/R=((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)-(_ne))==(0);
return R;
}
/*CST_ATT_BOOLEAN*/T0* rT152start_position(T152 *C){
T0* R=NULL;
R=/*XrT*FEATURE_NAME*/((T70*)rT152first_name(C))->_start_position;
return R;
}
/*CST_ATT_BOOLEAN*/void rT152collect_for(/*C*/int a1){
/*IF*/if ((a1)==(1001)) {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
/*IF*/if (!(rT276fast_has((T276*)oRBC66require_collector,/*(IRF4*/NULL/*)*/))) {
rT276add_last((T276*)oRBC66require_collector,/*(IRF4*/NULL/*)*/);
}
/*FI*/}
/*FI*/}
else {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
rT161add_into((T161*)/*(IRF4*/NULL/*)*/,oRBC66assertion_collector);
}
/*FI*/}
/*FI*/}/*CST_ATT_BOOLEAN*/void rT152add_into(T152 *C,T0* a1){
T0* _fn=NULL;
int _i=0;
C->_base_class=rT49base_class((T49*)/*XrT*FEATURE_NAME*/((T70*)rT130item((T130*)(C)->_names,1))->_start_position);
_i=1;
while (!((_i)>(rT130count((T130*)(C)->_names)))) {
_fn=rT130item((T130*)(C)->_names,_i);
/*IF*/if (rT65has((T65*)a1,XrT71to_key(_fn))) {
_fn=XrT66first_name(rT65at((T65*)a1,XrT71to_key(_fn)));
rT48add_position(/*XrT*FEATURE_NAME*/((T70*)_fn)->_start_position);
rT48add_position(/*XrT*FEATURE_NAME*/((T70*)rT130item((T130*)(C)->_names,_i))->_start_position);
rT48error((T48*)oRBC27eh,(T0 *)ms12_66);
rT48append(/*XrT*FEATURE_NAME*/((T70*)_fn)->_to_string);
rT48error((T48*)oRBC27eh,(T0 *)ms102_27);
}
else {
rT65put((T65*)a1,(T0 *)C,XrT71to_key(_fn));
}
/*FI*/_i=(_i)+(1);
}
}/*CST_ATT_BOOLEAN*/T0* rT152try_to_undefine(T152 *C,T0* a1,T0* a2){
T0* R=NULL;
XrT71undefine_in(a1,a2);
R=rT152try_to_undefine_aux(C,a1,a2);
/*IF*/if (((int)R)) {
/*XrT*DEFERRED_ROUTINE*//*[IRF3:set_clients*//*AW*/((T210*)R)->_clients=((C)->_clients);/*]*/
}
else {
rT53fatal_undefine((T53*)a2,a1);
}
/*FI*/return R;
}
/*CST_ATT_BOOLEAN*/T0* rT152try_to_undefine_aux(T152 *C,T0* a1,T0* a2){
T0* R=NULL;
rT48add_position(rT152start_position(C));
rT152error(/*XrT*FEATURE_NAME*/((T70*)a1)->_start_position,(T0 *)ms1_150);
rT53fatal_undefine((T53*)a2,a1);
return R;
}
/*CST_ATT_BOOLEAN*/int rT152stupid_switch(/*C*/T0* a1,T0* a2){
int R=0;
R=1;
return R;
}
/*CST_ATT_BOOLEAN*/int rT152can_hide(T152 *C,T0* a1,T0* a2){
int R=0;
/*IF*/if (((T0 *)(C)->_result_type)!=((T0 *)/*XrT*E_FEATURE*/((T148*)a1)->_result_type)) {
/*IF*/if (((!((C)->_result_type))||(!(/*XrT*E_FEATURE*/((T148*)a1)->_result_type)))) {
rT48add_position(XrT66start_position(a1));
rT152error(rT152start_position(C),(T0 *)ms4_66);
}
/*FI*/}
/*FI*//*IF*/if (((T0 *)/*(IRF4*/NULL/*)*/)!=((T0 *)XrT66arguments(a1))) {
/*IF*/if (((!(/*(IRF4*/NULL/*)*/))||(!(XrT66arguments(a1))))) {
rT48add_position(XrT66start_position(a1));
rT152error(rT152start_position(C),(T0 *)ms5_66);
}
 else if ((rT97count((T97*)/*(IRF4*/NULL/*)*/))!=(rT97count((T97*)XrT66arguments(a1)))) {
rT48add_position(XrT66start_position(a1));
rT152error(rT152start_position(C),(T0 *)ms6_66);
}
/*FI*/}
/*FI*//*IF*/if ((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)==(0)) {
/*IF*/if (((int)(C)->_result_type)) {
/*IF*/if (!(XrT62is_a_in((C)->_result_type,/*XrT*E_FEATURE*/((T148*)a1)->_result_type,a2))) {
rT48append((T0 *)ms14_66);
rT48append(XrT62run_time_mark(((T269*)a2)->_current_type));
rT48error((T48*)oRBC27eh,(T0 *)ms7_66);
}
/*FI*/}
/*FI*/}
/*FI*//*IF*/if ((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)==(0)) {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
/*IF*/if (!(rT97is_a_in((T97*)/*(IRF4*/NULL/*)*/,XrT66arguments(a1),a2))) {
rT48add_position(XrT66start_position(a1));
rT48add_position(rT152start_position(C));
rT48append((T0 *)ms14_66);
rT48append(XrT62run_time_mark(((T269*)a2)->_current_type));
rT48error((T48*)oRBC27eh,(T0 *)ms8_66);
}
/*FI*/}
/*FI*/}
/*FI*/R=(/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)==(0);
return R;
}
/*CST_ATT_BOOLEAN*/T0* rT152base_class_name(T152 *C){
T0* R=NULL;
R=((T53*)(C)->_base_class)->_base_class_name;
return R;
}
/*CST_ATT_BOOLEAN*/T0* rT152value(T152 *C,int a1){
T0* R=NULL;
R=(C)->_value_mem;
return R;
}
/*CST_ATT_BOOLEAN*/void rT152make_e_feature(T152 *C,T0* a1,T0* a2){
C->_names=a1;
C->_result_type=a2;
}/*CST_ATT_BOOLEAN*/void rT152make(T152 *C,T0* a1,T0* a2,T0* a3){
rT152make_e_feature(C,a1,a2);
C->_value_mem=a3;
}/*CST_ATT_CHARACTER*/T0* rT153first_name(T153 *C){
T0* R=NULL;
R=rT130item((T130*)(C)->_names,1);
return R;
}
/*CST_ATT_CHARACTER*/T0* rT153to_run_feature(T153 *C,T0* a1,T0* a2){
T0* R=NULL;
T0* _rc=NULL;
_rc=XrT62run_class(a1);
R=rT269at((T269*)_rc,a2);
if ((int)R) switch (((T0 *)R)->id) {
case 285: 
break;
default:
R = NULL;
};/*IF*/if (!(R)) {
{T285 *n=((T285*)se_new(285));
rT285make(n,a1,a2,(T0 *)C);
R=(T0 *)n;}
}
/*FI*/return R;
}
/*CST_ATT_CHARACTER*/void rT153error(/*C*/T0* a1,T0* a2){
rT48add_position(a1);
rT48error((T48*)oRBC27eh,a2);
}/*CST_ATT_CHARACTER*/int rT153is_merge_with(T153 *C,T0* a1,T0* a2){
int R=0;
int _ne=0;
_ne=/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/;
/*IF*/if (((T0 *)(C)->_result_type)!=((T0 *)/*XrT*E_FEATURE*/((T148*)a1)->_result_type)) {
/*IF*/if (((!((C)->_result_type))||(!(/*XrT*E_FEATURE*/((T148*)a1)->_result_type)))) {
rT48add_position(XrT66start_position(a1));
rT153error(rT153start_position(C),(T0 *)ms1_66);
}
/*FI*/}
/*FI*//*IF*/if (((T0 *)/*(IRF4*/NULL/*)*/)!=((T0 *)XrT66arguments(a1))) {
/*IF*/if (((!(/*(IRF4*/NULL/*)*/))||(!(XrT66arguments(a1))))) {
rT48add_position(XrT66start_position(a1));
rT153error(rT153start_position(C),(T0 *)ms2_66);
}
 else if ((rT97count((T97*)/*(IRF4*/NULL/*)*/))!=(rT97count((T97*)XrT66arguments(a1)))) {
rT48add_position(XrT66start_position(a1));
rT153error(rT153start_position(C),(T0 *)ms3_66);
}
/*FI*/}
/*FI*//*IF*/if (((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)-(_ne))==(0)) {
/*IF*/if (((int)(C)->_result_type)) {
/*IF*/if (!(XrT62is_a_in((C)->_result_type,/*XrT*E_FEATURE*/((T148*)a1)->_result_type,a2))) {
rT48error((T48*)oRBC27eh,(T0 *)ms13_66);
}
/*FI*/}
/*FI*/}
/*FI*//*IF*/if (((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)-(_ne))==(0)) {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
/*IF*/if (!(rT97is_a_in((T97*)/*(IRF4*/NULL/*)*/,XrT66arguments(a1),a2))) {
rT48add_position(XrT66start_position(a1));
rT153error(rT153start_position(C),(T0 *)ms13_66);
}
/*FI*/}
/*FI*/}
/*FI*/R=((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)-(_ne))==(0);
return R;
}
/*CST_ATT_CHARACTER*/T0* rT153start_position(T153 *C){
T0* R=NULL;
R=/*XrT*FEATURE_NAME*/((T70*)rT153first_name(C))->_start_position;
return R;
}
/*CST_ATT_CHARACTER*/void rT153collect_for(/*C*/int a1){
/*IF*/if ((a1)==(1001)) {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
/*IF*/if (!(rT276fast_has((T276*)oRBC66require_collector,/*(IRF4*/NULL/*)*/))) {
rT276add_last((T276*)oRBC66require_collector,/*(IRF4*/NULL/*)*/);
}
/*FI*/}
/*FI*/}
else {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
rT161add_into((T161*)/*(IRF4*/NULL/*)*/,oRBC66assertion_collector);
}
/*FI*/}
/*FI*/}/*CST_ATT_CHARACTER*/void rT153add_into(T153 *C,T0* a1){
T0* _fn=NULL;
int _i=0;
C->_base_class=rT49base_class((T49*)/*XrT*FEATURE_NAME*/((T70*)rT130item((T130*)(C)->_names,1))->_start_position);
_i=1;
while (!((_i)>(rT130count((T130*)(C)->_names)))) {
_fn=rT130item((T130*)(C)->_names,_i);
/*IF*/if (rT65has((T65*)a1,XrT71to_key(_fn))) {
_fn=XrT66first_name(rT65at((T65*)a1,XrT71to_key(_fn)));
rT48add_position(/*XrT*FEATURE_NAME*/((T70*)_fn)->_start_position);
rT48add_position(/*XrT*FEATURE_NAME*/((T70*)rT130item((T130*)(C)->_names,_i))->_start_position);
rT48error((T48*)oRBC27eh,(T0 *)ms12_66);
rT48append(/*XrT*FEATURE_NAME*/((T70*)_fn)->_to_string);
rT48error((T48*)oRBC27eh,(T0 *)ms102_27);
}
else {
rT65put((T65*)a1,(T0 *)C,XrT71to_key(_fn));
}
/*FI*/_i=(_i)+(1);
}
}/*CST_ATT_CHARACTER*/T0* rT153try_to_undefine(T153 *C,T0* a1,T0* a2){
T0* R=NULL;
XrT71undefine_in(a1,a2);
R=rT153try_to_undefine_aux(C,a1,a2);
/*IF*/if (((int)R)) {
/*XrT*DEFERRED_ROUTINE*//*[IRF3:set_clients*//*AW*/((T210*)R)->_clients=((C)->_clients);/*]*/
}
else {
rT53fatal_undefine((T53*)a2,a1);
}
/*FI*/return R;
}
/*CST_ATT_CHARACTER*/T0* rT153try_to_undefine_aux(T153 *C,T0* a1,T0* a2){
T0* R=NULL;
rT48add_position(rT153start_position(C));
rT153error(/*XrT*FEATURE_NAME*/((T70*)a1)->_start_position,(T0 *)ms1_150);
rT53fatal_undefine((T53*)a2,a1);
return R;
}
/*CST_ATT_CHARACTER*/int rT153stupid_switch(/*C*/T0* a1,T0* a2){
int R=0;
R=1;
return R;
}
/*CST_ATT_CHARACTER*/int rT153can_hide(T153 *C,T0* a1,T0* a2){
int R=0;
/*IF*/if (((T0 *)(C)->_result_type)!=((T0 *)/*XrT*E_FEATURE*/((T148*)a1)->_result_type)) {
/*IF*/if (((!((C)->_result_type))||(!(/*XrT*E_FEATURE*/((T148*)a1)->_result_type)))) {
rT48add_position(XrT66start_position(a1));
rT153error(rT153start_position(C),(T0 *)ms4_66);
}
/*FI*/}
/*FI*//*IF*/if (((T0 *)/*(IRF4*/NULL/*)*/)!=((T0 *)XrT66arguments(a1))) {
/*IF*/if (((!(/*(IRF4*/NULL/*)*/))||(!(XrT66arguments(a1))))) {
rT48add_position(XrT66start_position(a1));
rT153error(rT153start_position(C),(T0 *)ms5_66);
}
 else if ((rT97count((T97*)/*(IRF4*/NULL/*)*/))!=(rT97count((T97*)XrT66arguments(a1)))) {
rT48add_position(XrT66start_position(a1));
rT153error(rT153start_position(C),(T0 *)ms6_66);
}
/*FI*/}
/*FI*//*IF*/if ((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)==(0)) {
/*IF*/if (((int)(C)->_result_type)) {
/*IF*/if (!(XrT62is_a_in((C)->_result_type,/*XrT*E_FEATURE*/((T148*)a1)->_result_type,a2))) {
rT48append((T0 *)ms14_66);
rT48append(XrT62run_time_mark(((T269*)a2)->_current_type));
rT48error((T48*)oRBC27eh,(T0 *)ms7_66);
}
/*FI*/}
/*FI*/}
/*FI*//*IF*/if ((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)==(0)) {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
/*IF*/if (!(rT97is_a_in((T97*)/*(IRF4*/NULL/*)*/,XrT66arguments(a1),a2))) {
rT48add_position(XrT66start_position(a1));
rT48add_position(rT153start_position(C));
rT48append((T0 *)ms14_66);
rT48append(XrT62run_time_mark(((T269*)a2)->_current_type));
rT48error((T48*)oRBC27eh,(T0 *)ms8_66);
}
/*FI*/}
/*FI*/}
/*FI*/R=(/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)==(0);
return R;
}
/*CST_ATT_CHARACTER*/T0* rT153base_class_name(T153 *C){
T0* R=NULL;
R=((T53*)(C)->_base_class)->_base_class_name;
return R;
}
/*CST_ATT_CHARACTER*/T0* rT153value(T153 *C,int a1){
T0* R=NULL;
R=(C)->_value_mem;
return R;
}
/*CST_ATT_CHARACTER*/void rT153make_e_feature(T153 *C,T0* a1,T0* a2){
C->_names=a1;
C->_result_type=a2;
}/*CST_ATT_CHARACTER*/void rT153make(T153 *C,T0* a1,T0* a2,T0* a3){
rT153make_e_feature(C,a1,a2);
C->_value_mem=a3;
}/*CST_ATT_STRING*/T0* rT154first_name(T154 *C){
T0* R=NULL;
R=rT130item((T130*)(C)->_names,1);
return R;
}
/*CST_ATT_STRING*/T0* rT154to_run_feature(T154 *C,T0* a1,T0* a2){
T0* R=NULL;
T0* _rc=NULL;
_rc=XrT62run_class(a1);
R=rT269at((T269*)_rc,a2);
if ((int)R) switch (((T0 *)R)->id) {
case 285: 
break;
default:
R = NULL;
};/*IF*/if (!(R)) {
{T285 *n=((T285*)se_new(285));
rT285make(n,a1,a2,(T0 *)C);
R=(T0 *)n;}
}
/*FI*/return R;
}
/*CST_ATT_STRING*/void rT154error(/*C*/T0* a1,T0* a2){
rT48add_position(a1);
rT48error((T48*)oRBC27eh,a2);
}/*CST_ATT_STRING*/int rT154is_merge_with(T154 *C,T0* a1,T0* a2){
int R=0;
int _ne=0;
_ne=/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/;
/*IF*/if (((T0 *)(C)->_result_type)!=((T0 *)/*XrT*E_FEATURE*/((T148*)a1)->_result_type)) {
/*IF*/if (((!((C)->_result_type))||(!(/*XrT*E_FEATURE*/((T148*)a1)->_result_type)))) {
rT48add_position(XrT66start_position(a1));
rT154error(rT154start_position(C),(T0 *)ms1_66);
}
/*FI*/}
/*FI*//*IF*/if (((T0 *)/*(IRF4*/NULL/*)*/)!=((T0 *)XrT66arguments(a1))) {
/*IF*/if (((!(/*(IRF4*/NULL/*)*/))||(!(XrT66arguments(a1))))) {
rT48add_position(XrT66start_position(a1));
rT154error(rT154start_position(C),(T0 *)ms2_66);
}
 else if ((rT97count((T97*)/*(IRF4*/NULL/*)*/))!=(rT97count((T97*)XrT66arguments(a1)))) {
rT48add_position(XrT66start_position(a1));
rT154error(rT154start_position(C),(T0 *)ms3_66);
}
/*FI*/}
/*FI*//*IF*/if (((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)-(_ne))==(0)) {
/*IF*/if (((int)(C)->_result_type)) {
/*IF*/if (!(XrT62is_a_in((C)->_result_type,/*XrT*E_FEATURE*/((T148*)a1)->_result_type,a2))) {
rT48error((T48*)oRBC27eh,(T0 *)ms13_66);
}
/*FI*/}
/*FI*/}
/*FI*//*IF*/if (((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)-(_ne))==(0)) {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
/*IF*/if (!(rT97is_a_in((T97*)/*(IRF4*/NULL/*)*/,XrT66arguments(a1),a2))) {
rT48add_position(XrT66start_position(a1));
rT154error(rT154start_position(C),(T0 *)ms13_66);
}
/*FI*/}
/*FI*/}
/*FI*/R=((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)-(_ne))==(0);
return R;
}
/*CST_ATT_STRING*/T0* rT154start_position(T154 *C){
T0* R=NULL;
R=/*XrT*FEATURE_NAME*/((T70*)rT154first_name(C))->_start_position;
return R;
}
/*CST_ATT_STRING*/void rT154collect_for(/*C*/int a1){
/*IF*/if ((a1)==(1001)) {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
/*IF*/if (!(rT276fast_has((T276*)oRBC66require_collector,/*(IRF4*/NULL/*)*/))) {
rT276add_last((T276*)oRBC66require_collector,/*(IRF4*/NULL/*)*/);
}
/*FI*/}
/*FI*/}
else {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
rT161add_into((T161*)/*(IRF4*/NULL/*)*/,oRBC66assertion_collector);
}
/*FI*/}
/*FI*/}/*CST_ATT_STRING*/void rT154add_into(T154 *C,T0* a1){
T0* _fn=NULL;
int _i=0;
C->_base_class=rT49base_class((T49*)/*XrT*FEATURE_NAME*/((T70*)rT130item((T130*)(C)->_names,1))->_start_position);
_i=1;
while (!((_i)>(rT130count((T130*)(C)->_names)))) {
_fn=rT130item((T130*)(C)->_names,_i);
/*IF*/if (rT65has((T65*)a1,XrT71to_key(_fn))) {
_fn=XrT66first_name(rT65at((T65*)a1,XrT71to_key(_fn)));
rT48add_position(/*XrT*FEATURE_NAME*/((T70*)_fn)->_start_position);
rT48add_position(/*XrT*FEATURE_NAME*/((T70*)rT130item((T130*)(C)->_names,_i))->_start_position);
rT48error((T48*)oRBC27eh,(T0 *)ms12_66);
rT48append(/*XrT*FEATURE_NAME*/((T70*)_fn)->_to_string);
rT48error((T48*)oRBC27eh,(T0 *)ms102_27);
}
else {
rT65put((T65*)a1,(T0 *)C,XrT71to_key(_fn));
}
/*FI*/_i=(_i)+(1);
}
}/*CST_ATT_STRING*/T0* rT154try_to_undefine(T154 *C,T0* a1,T0* a2){
T0* R=NULL;
XrT71undefine_in(a1,a2);
R=rT154try_to_undefine_aux(C,a1,a2);
/*IF*/if (((int)R)) {
/*XrT*DEFERRED_ROUTINE*//*[IRF3:set_clients*//*AW*/((T210*)R)->_clients=((C)->_clients);/*]*/
}
else {
rT53fatal_undefine((T53*)a2,a1);
}
/*FI*/return R;
}
/*CST_ATT_STRING*/T0* rT154try_to_undefine_aux(T154 *C,T0* a1,T0* a2){
T0* R=NULL;
rT48add_position(rT154start_position(C));
rT154error(/*XrT*FEATURE_NAME*/((T70*)a1)->_start_position,(T0 *)ms1_150);
rT53fatal_undefine((T53*)a2,a1);
return R;
}
/*CST_ATT_STRING*/int rT154stupid_switch(/*C*/T0* a1,T0* a2){
int R=0;
R=1;
return R;
}
/*CST_ATT_STRING*/int rT154can_hide(T154 *C,T0* a1,T0* a2){
int R=0;
/*IF*/if (((T0 *)(C)->_result_type)!=((T0 *)/*XrT*E_FEATURE*/((T148*)a1)->_result_type)) {
/*IF*/if (((!((C)->_result_type))||(!(/*XrT*E_FEATURE*/((T148*)a1)->_result_type)))) {
rT48add_position(XrT66start_position(a1));
rT154error(rT154start_position(C),(T0 *)ms4_66);
}
/*FI*/}
/*FI*//*IF*/if (((T0 *)/*(IRF4*/NULL/*)*/)!=((T0 *)XrT66arguments(a1))) {
/*IF*/if (((!(/*(IRF4*/NULL/*)*/))||(!(XrT66arguments(a1))))) {
rT48add_position(XrT66start_position(a1));
rT154error(rT154start_position(C),(T0 *)ms5_66);
}
 else if ((rT97count((T97*)/*(IRF4*/NULL/*)*/))!=(rT97count((T97*)XrT66arguments(a1)))) {
rT48add_position(XrT66start_position(a1));
rT154error(rT154start_position(C),(T0 *)ms6_66);
}
/*FI*/}
/*FI*//*IF*/if ((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)==(0)) {
/*IF*/if (((int)(C)->_result_type)) {
/*IF*/if (!(XrT62is_a_in((C)->_result_type,/*XrT*E_FEATURE*/((T148*)a1)->_result_type,a2))) {
rT48append((T0 *)ms14_66);
rT48append(XrT62run_time_mark(((T269*)a2)->_current_type));
rT48error((T48*)oRBC27eh,(T0 *)ms7_66);
}
/*FI*/}
/*FI*/}
/*FI*//*IF*/if ((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)==(0)) {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
/*IF*/if (!(rT97is_a_in((T97*)/*(IRF4*/NULL/*)*/,XrT66arguments(a1),a2))) {
rT48add_position(XrT66start_position(a1));
rT48add_position(rT154start_position(C));
rT48append((T0 *)ms14_66);
rT48append(XrT62run_time_mark(((T269*)a2)->_current_type));
rT48error((T48*)oRBC27eh,(T0 *)ms8_66);
}
/*FI*/}
/*FI*/}
/*FI*/R=(/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)==(0);
return R;
}
/*CST_ATT_STRING*/T0* rT154base_class_name(T154 *C){
T0* R=NULL;
R=((T53*)(C)->_base_class)->_base_class_name;
return R;
}
/*CST_ATT_STRING*/T0* rT154value(T154 *C,int a1){
T0* R=NULL;
R=rT155item((T155*)(C)->_values,a1);
return R;
}
/*CST_ATT_STRING*/void rT154make_e_feature(T154 *C,T0* a1,T0* a2){
C->_names=a1;
C->_result_type=a2;
}/*CST_ATT_STRING*/void rT154make(T154 *C,T0* a1,T0* a2,T0* a3){
T0* _ms=NULL;
int _i=0;
rT154make_e_feature(C,a1,a2);
{T155 *n=((T155*)se_new(155));
rT155make(n,1,rT130count((T130*)(C)->_names));
C->_values=(T0 *)n;}
rT155put((T155*)(C)->_values,a3,1);
_i=2;
while (!((_i)>(((T155*)(C)->_values)->_upper))) {
{T80 *n=((T80*)se_new(80));
rT80from_manifest_string(n,a3,_i);
_ms=(T0 *)n;}
rT155put((T155*)(C)->_values,_ms,_i);
_i=(_i)+(1);
}
}/*CST_ATT_BIT*/T0* rT156first_name(T156 *C){
T0* R=NULL;
R=rT130item((T130*)(C)->_names,1);
return R;
}
/*CST_ATT_BIT*/T0* rT156to_run_feature(T156 *C,T0* a1,T0* a2){
T0* R=NULL;
T0* _rc=NULL;
_rc=XrT62run_class(a1);
R=rT269at((T269*)_rc,a2);
if ((int)R) switch (((T0 *)R)->id) {
case 285: 
break;
default:
R = NULL;
};/*IF*/if (!(R)) {
{T285 *n=((T285*)se_new(285));
rT285make(n,a1,a2,(T0 *)C);
R=(T0 *)n;}
}
/*FI*/return R;
}
/*CST_ATT_BIT*/void rT156error(/*C*/T0* a1,T0* a2){
rT48add_position(a1);
rT48error((T48*)oRBC27eh,a2);
}/*CST_ATT_BIT*/int rT156is_merge_with(T156 *C,T0* a1,T0* a2){
int R=0;
int _ne=0;
_ne=/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/;
/*IF*/if (((T0 *)(C)->_result_type)!=((T0 *)/*XrT*E_FEATURE*/((T148*)a1)->_result_type)) {
/*IF*/if (((!((C)->_result_type))||(!(/*XrT*E_FEATURE*/((T148*)a1)->_result_type)))) {
rT48add_position(XrT66start_position(a1));
rT156error(rT156start_position(C),(T0 *)ms1_66);
}
/*FI*/}
/*FI*//*IF*/if (((T0 *)/*(IRF4*/NULL/*)*/)!=((T0 *)XrT66arguments(a1))) {
/*IF*/if (((!(/*(IRF4*/NULL/*)*/))||(!(XrT66arguments(a1))))) {
rT48add_position(XrT66start_position(a1));
rT156error(rT156start_position(C),(T0 *)ms2_66);
}
 else if ((rT97count((T97*)/*(IRF4*/NULL/*)*/))!=(rT97count((T97*)XrT66arguments(a1)))) {
rT48add_position(XrT66start_position(a1));
rT156error(rT156start_position(C),(T0 *)ms3_66);
}
/*FI*/}
/*FI*//*IF*/if (((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)-(_ne))==(0)) {
/*IF*/if (((int)(C)->_result_type)) {
/*IF*/if (!(XrT62is_a_in((C)->_result_type,/*XrT*E_FEATURE*/((T148*)a1)->_result_type,a2))) {
rT48error((T48*)oRBC27eh,(T0 *)ms13_66);
}
/*FI*/}
/*FI*/}
/*FI*//*IF*/if (((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)-(_ne))==(0)) {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
/*IF*/if (!(rT97is_a_in((T97*)/*(IRF4*/NULL/*)*/,XrT66arguments(a1),a2))) {
rT48add_position(XrT66start_position(a1));
rT156error(rT156start_position(C),(T0 *)ms13_66);
}
/*FI*/}
/*FI*/}
/*FI*/R=((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)-(_ne))==(0);
return R;
}
/*CST_ATT_BIT*/T0* rT156start_position(T156 *C){
T0* R=NULL;
R=/*XrT*FEATURE_NAME*/((T70*)rT156first_name(C))->_start_position;
return R;
}
/*CST_ATT_BIT*/void rT156collect_for(/*C*/int a1){
/*IF*/if ((a1)==(1001)) {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
/*IF*/if (!(rT276fast_has((T276*)oRBC66require_collector,/*(IRF4*/NULL/*)*/))) {
rT276add_last((T276*)oRBC66require_collector,/*(IRF4*/NULL/*)*/);
}
/*FI*/}
/*FI*/}
else {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
rT161add_into((T161*)/*(IRF4*/NULL/*)*/,oRBC66assertion_collector);
}
/*FI*/}
/*FI*/}/*CST_ATT_BIT*/void rT156add_into(T156 *C,T0* a1){
T0* _fn=NULL;
int _i=0;
C->_base_class=rT49base_class((T49*)/*XrT*FEATURE_NAME*/((T70*)rT130item((T130*)(C)->_names,1))->_start_position);
_i=1;
while (!((_i)>(rT130count((T130*)(C)->_names)))) {
_fn=rT130item((T130*)(C)->_names,_i);
/*IF*/if (rT65has((T65*)a1,XrT71to_key(_fn))) {
_fn=XrT66first_name(rT65at((T65*)a1,XrT71to_key(_fn)));
rT48add_position(/*XrT*FEATURE_NAME*/((T70*)_fn)->_start_position);
rT48add_position(/*XrT*FEATURE_NAME*/((T70*)rT130item((T130*)(C)->_names,_i))->_start_position);
rT48error((T48*)oRBC27eh,(T0 *)ms12_66);
rT48append(/*XrT*FEATURE_NAME*/((T70*)_fn)->_to_string);
rT48error((T48*)oRBC27eh,(T0 *)ms102_27);
}
else {
rT65put((T65*)a1,(T0 *)C,XrT71to_key(_fn));
}
/*FI*/_i=(_i)+(1);
}
}/*CST_ATT_BIT*/T0* rT156try_to_undefine(T156 *C,T0* a1,T0* a2){
T0* R=NULL;
XrT71undefine_in(a1,a2);
R=rT156try_to_undefine_aux(C,a1,a2);
/*IF*/if (((int)R)) {
/*XrT*DEFERRED_ROUTINE*//*[IRF3:set_clients*//*AW*/((T210*)R)->_clients=((C)->_clients);/*]*/
}
else {
rT53fatal_undefine((T53*)a2,a1);
}
/*FI*/return R;
}
/*CST_ATT_BIT*/T0* rT156try_to_undefine_aux(T156 *C,T0* a1,T0* a2){
T0* R=NULL;
rT48add_position(rT156start_position(C));
rT156error(/*XrT*FEATURE_NAME*/((T70*)a1)->_start_position,(T0 *)ms1_150);
rT53fatal_undefine((T53*)a2,a1);
return R;
}
/*CST_ATT_BIT*/int rT156stupid_switch(/*C*/T0* a1,T0* a2){
int R=0;
R=1;
return R;
}
/*CST_ATT_BIT*/int rT156can_hide(T156 *C,T0* a1,T0* a2){
int R=0;
/*IF*/if (((T0 *)(C)->_result_type)!=((T0 *)/*XrT*E_FEATURE*/((T148*)a1)->_result_type)) {
/*IF*/if (((!((C)->_result_type))||(!(/*XrT*E_FEATURE*/((T148*)a1)->_result_type)))) {
rT48add_position(XrT66start_position(a1));
rT156error(rT156start_position(C),(T0 *)ms4_66);
}
/*FI*/}
/*FI*//*IF*/if (((T0 *)/*(IRF4*/NULL/*)*/)!=((T0 *)XrT66arguments(a1))) {
/*IF*/if (((!(/*(IRF4*/NULL/*)*/))||(!(XrT66arguments(a1))))) {
rT48add_position(XrT66start_position(a1));
rT156error(rT156start_position(C),(T0 *)ms5_66);
}
 else if ((rT97count((T97*)/*(IRF4*/NULL/*)*/))!=(rT97count((T97*)XrT66arguments(a1)))) {
rT48add_position(XrT66start_position(a1));
rT156error(rT156start_position(C),(T0 *)ms6_66);
}
/*FI*/}
/*FI*//*IF*/if ((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)==(0)) {
/*IF*/if (((int)(C)->_result_type)) {
/*IF*/if (!(XrT62is_a_in((C)->_result_type,/*XrT*E_FEATURE*/((T148*)a1)->_result_type,a2))) {
rT48append((T0 *)ms14_66);
rT48append(XrT62run_time_mark(((T269*)a2)->_current_type));
rT48error((T48*)oRBC27eh,(T0 *)ms7_66);
}
/*FI*/}
/*FI*/}
/*FI*//*IF*/if ((/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)==(0)) {
/*IF*/if (((int)/*(IRF4*/NULL/*)*/)) {
/*IF*/if (!(rT97is_a_in((T97*)/*(IRF4*/NULL/*)*/,XrT66arguments(a1),a2))) {
rT48add_position(XrT66start_position(a1));
rT48add_position(rT156start_position(C));
rT48append((T0 *)ms14_66);
rT48append(XrT62run_time_mark(((T269*)a2)->_current_type));
rT48error((T48*)oRBC27eh,(T0 *)ms8_66);
}
/*FI*/}
/*FI*/}
/*FI*/R=(/*(IRF4*/((T48*)oRBC27eh)->_nb_errors/*)*/)==(0);
return R;
}
/*CST_ATT_BIT*/T0* rT156base_class_name(T156 *C){
T0* R=NULL;
R=((T53*)(C)->_base_class)->_base_class_name;
return R;
}
/*CST_ATT_BIT*/T0* rT156value(T156 *C,int a1){
T0* R=NULL;
R=(C)->_value_mem;
return R;
}
/*CST_ATT_BIT*/void rT156make_e_feature(T156 *C,T0* a1,T0* a2){
C->_names=a1;
C->_result_type=a2;
}/*CST_ATT_BIT*/void rT156make(T156 *C,T0* a1,T0* a2,T0* a3){
rT156make_e_feature(C,a1,a2);
C->_value_mem=a3;
}

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.