home *** CD-ROM | disk | FTP | other *** search
- /* ANSI C code generated by SmallEiffel. */
- /*
- -- SmallEiffel -- Release (- 0.97) -- 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 <stdio.h>
- #include <stdlib.h>
- #include <signal.h>
- #include <stddef.h>
- typedef struct sT0 T0;
- struct sT0{int id;};
- typedef struct sTstring Tstring;
- struct sTstring{int id;int _capacity;int _count;char *_storage;};
- typedef struct sTarray Tarray;
- struct sTarray{int id;int _capacity;int _lower;
- int _upper;T0 **_storage;};
- T0 *new(int id);
- #define Tgeneral T1
- #define generalId 1
- #define integerId 2
- #define characterId 3
- #define booleanId 6
- #define realId 4
- #define doubleId 5
- #define stringId 7
- #define pointerId 8
- #define expandedId 10
- #define referenceId 11
- #define linkId 12
- #define featureTagId 13
- #define nameId 14
- #define columnId 15
- #define lineId 16
- #define pathId 17
- #define doingWhatId 18
- #define doingInvariantId 19
- #define AF_REQ_1
- #define AF_REQ_0
- #define AF_ENS_1
- #define AF_ENS_0
- #define AF_INV_1
- #define AF_INV_0
- #define AF_LIV_1
- #define AF_LIV_0
- #define AF_CIV_1
- #define AF_CIV_0
- #define AF_1 AF_CIV_1 AF_LIV_1 AF_INV_1 AF_ENS_1 AF_REQ_1
- #define AF_0 AF_CIV_0 AF_LIV_0 AF_INV_0 AF_ENS_0 AF_REQ_0
- typedef void * T8;
- typedef struct sT33 T33;
- typedef struct sT39 T39;
- typedef struct sTstring T7;
- typedef int T6;
- typedef int T2;
- typedef struct sT26 T26;
- typedef struct sT38 T38;
- typedef struct sTarray T40;
- typedef char T3;
- struct sT33{int id;void * _output_stream;};
- struct sT39{int id;T0* _mode;T0* _path;void * _input_stream;char _last_character_memory;};
- struct sT26{int id;T0* _root;int _c_code;};
- struct sT38{int id;void * _output_stream;};
- void rT33die_with_code(T33 *C,int a1);
- void rT33put_string(T33 *C,T0* a1);
- extern T0*oRBC1std_error;
- void rT33crash(T33 *C);
- void rT33copy(T33 *C,T0 * a1);
- void rT33put_character(T33 *C,char a1);
- void rT33make(T33 *C);
- int rT39end_of_input(T39 *C);
- int rT39is_connected(T39 *C);
- void rT39disconnect(T39 *C);
- extern T0*oRBC39last_string;
- char rT39last_character(T39 *C);
- void rT39connect_to(T39 *C,T0* a1);
- void rT39skip_separators(T39 *C);
- void * rT39fopen(T39 *C,T0* a1,T0* a2);
- void rT39copy(T39 *C,T0 * a1);
- void rT39read_line_in(T39 *C,T0* a1);
- void rT39read_line(T39 *C);
- void rT39read_word(T39 *C);
- void rT39read_character(T39 *C);
- char rT7_ix64(T7 *C,int a1);
- void rT7extend(T7 *C,char a1);
- void rT7to_upper(T7 *C);
- void rT7remove_suffix(T7 *C,T0* a1);
- void rT7remove_between(T7 *C,int a1,int a2);
- void rT7remove_first(T7 *C,int a1);
- void rT7remove_last(T7 *C,int a1);
- int rT7has_suffix(T7 *C,T0* a1);
- char rT7item(T7 *C,int a1);
- int rT7is_equal(T7 *C,T0* a1);
- void rT7append(T7 *C,T0* a1);
- char rT7last(T7 *C);
- void rT7put(T7 *C,char a1,int a2);
- void rT7swap(T7 *C,int a1,int a2);
- void rT7copy(T7 *C,T0* a1);
- void rT7to_lower(T7 *C);
- void rT7make(T7 *C,int a1);
- int rT2min(T2 C,int a1);
- int rT2max(T2 C,int a1);
- char rT2digit(T2 C);
- void rT2append_in(T2 C,T0* a1);
- T0* rT26get_environment_variable(T26 *C,T0* a1);
- extern int ofBC27x_suffix;
- extern T0*oRBC27x_suffix;
- T0* rT26x_suffix(T26 *C);
- void rT26automat(T26 *C);
- T0* rT26to_bcn(T26 *C,T0* a1);
- extern int ofBC27directory_separator;
- extern T3 oRBC27directory_separator;
- char rT26directory_separator(T26 *C);
- void rT26die_with_code(T26 *C,int a1);
- void rT26remove(T26 *C);
- void rT26remove_file(T26 *C,T0* a1);
- extern T0*oRBC27hlp_file_name;
- void rT26add_directory(T26 *C,T0* a1,T0* a2);
- void rT26print_hlp(T26 *C,T0* a1);
- void rT26open_read(T26 *C,T0 * a1,T0* a2);
- T0* rT26clone(T26 *C,T0* a1);
- extern int ofBC27tmp_file_read;
- extern T0*oRBC27tmp_file_read;
- T0 * rT26tmp_file_read(/*C*/void);
- void rT26system(T26 *C,T0* a1);
- extern T0*oRBC27system_list;
- extern int ofBC27system_name;
- extern T0*oRBC27system_name;
- T0* rT26system_name(T26 *C);
- extern T0*oRBC1std_output;
- extern int ofBC27small_eiffel_directory;
- extern T0*oRBC27small_eiffel_directory;
- T0* rT26small_eiffel_directory(T26 *C);
- void rT26copy(T26 *C,T0 * a1);
- extern int ofBC26make_file;
- extern T0*oRBC26make_file;
- T0 * rT26make_file(/*C*/void);
- extern int ofBC27make_suffix;
- extern T0*oRBC27make_suffix;
- T0* rT26make_suffix(T26 *C);
- void rT26echo_system(T26 *C);
- void rT26make(T26 *C);
- int rT26file_exists(T26 *C,T0* a1);
- void rT38die_with_code(T38 *C,int a1);
- void rT38put_string(T38 *C,T0* a1);
- void rT38crash(T38 *C);
- void rT38append_file(T38 *C,T0* a1);
- extern int ofBC34tmp_file_read;
- extern T0*oRBC34tmp_file_read;
- T0 * rT38tmp_file_read(/*C*/void);
- void rT38copy(T38 *C,T0 * a1);
- void rT38put_character(T38 *C,char a1);
- void rT38make(T38 *C);
- void rT40clear_all(T40 *C);
- void rT40set_all_with(T40 *C,T0* a1);
- void rT40resize(T40 *C,int a1,int a2);
- T0* rT40item(T40 *C,int a1);
- int rT40equal_like(/*C*/T0* a1,T0* a2);
- int rT40index_of(T40 *C,T0* a1);
- void rT40put(T40 *C,T0* a1,int a2);
- void rT40copy(T40 *C,T0* a1);
- void rT40make(T40 *C,int a1,int a2);
- char rT3to_upper(T3 C);
- int rT3is_digit(T3 C);
- int rT3is_letter(T3 C);
- int rT3is_separator(T3 C);
- char rT3to_lower(T3 C);
- extern int argument_count;
- extern T0 **argument;
- #include <string.h>
- char *s2e(Tstring *s);
- Tstring *e2s(char *e);
- #include <stdarg.h>
- T0 *ma(int aid,int eid,int argc,...);
-
- extern Tstring *ms1;
- extern Tstring *ms5;
- extern Tstring *ms14;
- extern Tstring *ms17;
- extern Tstring *ms18;
- extern Tstring *ms20;
- extern Tstring *ms21;
- extern Tstring *ms22;
- extern Tstring *ms24;
- extern Tstring *ms25;
- extern Tstring *ms26;
- extern Tstring *ms28;
- extern Tstring *ms29;
- extern Tstring *ms30;
- extern Tstring *ms31;
- extern Tstring *ms32;
- extern Tstring *ms33;
- extern Tstring *ms34;
- extern Tstring *ms35;
- extern Tstring *ms36;
- extern Tstring *ms37;
- extern Tstring *ms38;
- extern Tstring *ms39;
- extern Tstring *ms40;
- extern Tstring *ms41;
- extern Tstring *ms42;
- extern Tstring *ms43;
- extern Tstring *ms45;
- extern Tstring *ms46;
- extern Tstring *ms47;
- extern Tstring *ms48;
- extern Tstring *ms49;
- extern Tstring *ms50;
- extern Tstring *ms51;
- extern Tstring *ms52;
- extern Tstring *ms53;
- extern Tstring *ms54;
- extern Tstring *ms55;
- extern Tstring *ms56;
- extern Tstring *ms57;
- extern Tstring *ms58;
- extern Tstring *ms59;
- extern Tstring *ms60;
- extern Tstring *ms63;
- extern Tstring *ms64;
- extern Tstring *ms65;
- extern Tstring *ms66;
- extern Tstring *ms67;
- extern Tstring *ms68;
- extern Tstring *ms69;
- extern Tstring *ms70;
- extern Tstring *ms71;
- void rsp(void);
- void sigrsp(int sig);
- void XrT28copy(void *C,T0* a1);
- extern size_t s[];
- extern Tstring * gt[];
- extern Tstring * g[];
- extern char * p[];
- void initialize(void);
-