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

This is compile_to_c46.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"
/*RUN_FEATURE*/int XrT268is_writable(void *C){
int id=((T0*)C)->id;
if (id <= 287) {
if (id <= 285) {
if (id <= 281) {
if (id <= 274) {
return /*(IRF4*/0/*)*/;} else {
return /*(IRF4*/0/*)*/;}} else {
return /*(IRF4*/0/*)*/;}} else {
if (id <= 286) {
return /*(IRF4*/0/*)*/;} else {
return /*(IRF4*/0/*)*/;}}} else {
if (id <= 289) {
if (id <= 288) {
return /*(IRF4*/0/*)*/;} else {
return /*(IRF4*/0/*)*/;}} else {
if (id <= 290) {
return /*(IRF4*/0/*)*/;} else {
return /*(IRF4*/1/*)*/;}}}}
/*RUN_FEATURE*/void  XrT268fall_down(void *C){
int id=((T0*)C)->id;
if (id <= 287) {
if (id <= 285) {
if (id <= 281) {
if (id <= 274) {
rT274fall_down((T274 *)C);
} else {
rT281fall_down((T281 *)C);
}} else {
rT285fall_down((T285 *)C);
}} else {
if (id <= 286) {
rT286fall_down((T286 *)C);
} else {
rT287fall_down((T287 *)C);
}}} else {
if (id <= 289) {
if (id <= 288) {
rT288fall_down((T288 *)C);
} else {
rT289fall_down((T289 *)C);
}} else {
if (id <= 290) {
rT290fall_down((T290 *)C);
} else {
rT291fall_down((T291 *)C);
}}}}
/*RUN_FEATURE*/void  XrT268add_clients(void *C,T0* a1){
int id=((T0*)C)->id;
if (id <= 287) {
if (id <= 285) {
if (id <= 281) {
if (id <= 274) {
rT274add_clients((T274 *)C,a1);
} else {
rT281add_clients((T281 *)C,a1);
}} else {
rT285add_clients((T285 *)C,a1);
}} else {
if (id <= 286) {
rT286add_clients((T286 *)C,a1);
} else {
rT287add_clients((T287 *)C,a1);
}}} else {
if (id <= 289) {
if (id <= 288) {
rT288add_clients((T288 *)C,a1);
} else {
rT289add_clients((T289 *)C,a1);
}} else {
if (id <= 290) {
rT290add_clients((T290 *)C,a1);
} else {
rT291add_clients((T291 *)C,a1);
}}}}
/*RUN_FEATURE*/int XrT268is_exported_in(void *C,T0* a1){
int id=((T0*)C)->id;
if (id <= 287) {
if (id <= 285) {
if (id <= 281) {
if (id <= 274) {
return rT274is_exported_in((T274 *)C,a1);} else {
return rT281is_exported_in((T281 *)C,a1);}} else {
return rT285is_exported_in((T285 *)C,a1);}} else {
if (id <= 286) {
return rT286is_exported_in((T286 *)C,a1);} else {
return rT287is_exported_in((T287 *)C,a1);}}} else {
if (id <= 289) {
if (id <= 288) {
return rT288is_exported_in((T288 *)C,a1);} else {
return rT289is_exported_in((T289 *)C,a1);}} else {
if (id <= 290) {
return rT290is_exported_in((T290 *)C,a1);} else {
return rT291is_exported_in((T291 *)C,a1);}}}}
/*RUN_FEATURE*/void  XrT268c_define(void *C){
int id=((T0*)C)->id;
if (id <= 287) {
if (id <= 285) {
if (id <= 281) {
if (id <= 274) {
rT274c_define((T274 *)C);
} else {
rT281c_define((T281 *)C);
}} else {
/*[IRF3:c_define*//*]*/
}} else {
if (id <= 286) {
rT286c_define((T286 *)C);
} else {
rT287c_define((T287 *)C);
}}} else {
if (id <= 289) {
if (id <= 288) {
rT288c_define((T288 *)C);
} else {
rT289c_define((T289 *)C);
}} else {
if (id <= 290) {
rT290c_define((T290 *)C);
} else {
/*[IRF3:c_define*//*]*/
}}}}
/*RUN_FEATURE*/void  XrT268address_of(void *C){
int id=((T0*)C)->id;
if (id <= 287) {
if (id <= 285) {
if (id <= 281) {
if (id <= 274) {
rT274address_of((T274 *)C);
} else {
rT281address_of((T281 *)C);
}} else {
rT285address_of((T285 *)C);
}} else {
if (id <= 286) {
rT286address_of((T286 *)C);
} else {
rT287address_of((T287 *)C);
}}} else {
if (id <= 289) {
if (id <= 288) {
rT288address_of((T288 *)C);
} else {
rT289address_of((T289 *)C);
}} else {
if (id <= 290) {
rT290address_of((T290 *)C);
} else {
rT291address_of((T291 *)C);
}}}}
/*RUN_FEATURE*/T0* XrT268local_vars(void *C){
int id=((T0*)C)->id;
if (id <= 287) {
if (id <= 285) {
if (id <= 281) {
if (id <= 274) {
return ((T274 *)C)->_local_vars;} else {
return ((T281 *)C)->_local_vars;}} else {
return /*(IRF4*/NULL/*)*/;}} else {
if (id <= 286) {
return /*(IRF4*/NULL/*)*/;} else {
return /*(IRF4*/NULL/*)*/;}}} else {
if (id <= 289) {
if (id <= 288) {
return /*(IRF4*/NULL/*)*/;} else {
return ((T289 *)C)->_local_vars;}} else {
if (id <= 290) {
return ((T290 *)C)->_local_vars;} else {
return /*(IRF4*/NULL/*)*/;}}}}
/*RUN_FEATURE*/int XrT268is_pre_computable(void *C){
int id=((T0*)C)->id;
if (id <= 287) {
if (id <= 285) {
if (id <= 281) {
if (id <= 274) {
return rT274is_pre_computable((T274 *)C);} else {
return rT281is_pre_computable((T281 *)C);}} else {
return 1;}} else {
if (id <= 286) {
return 0;} else {
return 0;}}} else {
if (id <= 289) {
if (id <= 288) {
return 0;} else {
return 0;}} else {
if (id <= 290) {
return 0;} else {
return 0;}}}}
/*RUN_FEATURE*/int XrT268is_static(void *C){
int id=((T0*)C)->id;
if (id <= 287) {
if (id <= 285) {
if (id <= 281) {
if (id <= 274) {
return /*(IRF4*/0/*)*/;} else {
return /*(IRF4*/0/*)*/;}} else {
return rT285is_static((T285 *)C);}} else {
if (id <= 286) {
return 0;} else {
return 0;}}} else {
if (id <= 289) {
if (id <= 288) {
return rT288is_static((T288 *)C);} else {
return rT289is_static((T289 *)C);}} else {
if (id <= 290) {
return 0;} else {
return /*(IRF4*/0/*)*/;}}}}
/*RUN_FEATURE*/int XrT268static_value_mem(void *C){
int id=((T0*)C)->id;
if (id <= 287) {
if (id <= 285) {
if (id <= 281) {
if (id <= 274) {
return /*(IRF4*/0/*)*/;} else {
return /*(IRF4*/0/*)*/;}} else {
return rT285static_value_mem((T285 *)C);}} else {
if (id <= 286) {
return /*(IRF4*/0/*)*/;} else {
return /*(IRF4*/0/*)*/;}}} else {
if (id <= 289) {
if (id <= 288) {
return ((T288 *)C)->_static_value_mem;} else {
return ((T289 *)C)->_static_value_mem;}} else {
if (id <= 290) {
return /*(IRF4*/0/*)*/;} else {
return /*(IRF4*/0/*)*/;}}}}
/*RUN_FEATURE*/int XrT268can_be_dropped(void *C){
int id=((T0*)C)->id;
if (id <= 287) {
if (id <= 285) {
if (id <= 281) {
if (id <= 274) {
return 0;} else {
return rT281can_be_dropped((T281 *)C);}} else {
return 1;}} else {
if (id <= 286) {
return rT286can_be_dropped((T286 *)C);} else {
return 0;}}} else {
if (id <= 289) {
if (id <= 288) {
return 0;} else {
return rT289can_be_dropped((T289 *)C);}} else {
if (id <= 290) {
return 0;} else {
return 1;}}}}
/*ARRAY[RUN_FEATURE]*/void  XrT273resize(void *C,int a1,int a2){
int id=((T0*)C)->id;
if (id <= 273) {
rT273resize((T273 *)C,a1,a2);
} else {
rT282resize((T282 *)C,a1,a2);
}}
/*ARRAY[RUN_FEATURE]*/int XrT273fast_has(void *C,T0* a1){
int id=((T0*)C)->id;
if (id <= 273) {
return rT273fast_has((T273 *)C,a1);} else {
return rT282fast_has((T282 *)C,a1);}}
/*ARRAY[RUN_FEATURE]*/void  XrT273add_last(void *C,T0* a1){
int id=((T0*)C)->id;
if (id <= 273) {
rT273add_last((T273 *)C,a1);
} else {
rT282add_last((T282 *)C,a1);
}}
/*ARRAY[RUN_FEATURE]*/void  XrT273swap(void *C,int a1,int a2){
int id=((T0*)C)->id;
if (id <= 273) {
rT273swap((T273 *)C,a1,a2);
} else {
rT282swap((T282 *)C,a1,a2);
}}
/*ARRAY[RUN_FEATURE]*/int XrT273count(void *C){
int id=((T0*)C)->id;
if (id <= 273) {
return rT273count((T273 *)C);} else {
return rT282count((T282 *)C);}}
/*ARRAY[RUN_FEATURE]*/void  XrT273force(void *C,T0* a1,int a2){
int id=((T0*)C)->id;
if (id <= 273) {
rT273force((T273 *)C,a1,a2);
} else {
rT282force((T282 *)C,a1,a2);
}}

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