/*
-- ANSI C code generated by :
-- SmallEiffel The GNU Eiffel Compiler -- Release (- 0.82)      --
-- Copyright (C), 1994-98 - LORIA - UHP - CRIN - INRIA - FRANCE --
-- Dominique COLNET and Suzanne COLLIN -    colnet@loria.fr     --
--                 http://www.loria.fr/SmallEiffel              --
*/

#include <stdio.h>
#include <string.h>
#include <math.h>
#include <stdlib.h>
#include <signal.h>
#include <stddef.h>
#include <stdarg.h>
#include <limits.h>
#include <float.h>
#include <setjmp.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#ifndef O_RDONLY
#include <sys/file.h>
#endif
#ifndef O_RDONLY
#define O_RDONLY 0000
#endif
typedef struct S0 T0;
struct S0{int id;};
#define INTEGERid 2
#define CHARACTERid 3
#define REALid 4
#define DOUBLEid 5
#define BOOLEANid 6
#define POINTERid 8
#define expandedid 10
#define REFid 11
#define LINKid 12
#define FTAGid 13
#define NAMEid 14
#define COLUMNid 15
#define LINEid 16
#define PATHid 17
#define DOINGid 18
#define INVid 19
#define BITid 20

/* --- Mangling Table Start ---
A*1  T7    R STRING 7
A*1  T675  R STD_FILE_READ 675
A*1  T441  R STD_ERROR 441
A 1  T2    E INTEGER 2
A 1  T6    E BOOLEAN 6
A*1  T830  R STD_OUTPUT 830
A 1  T400  E NATIVE_ARRAY[STRING] 400
A*1  T479  R BOOLEAN_REF 479
A 1  T3    E CHARACTER 3
A*1  T309  R COMPILE 309
A*1  T467  R STD_INPUT 467
A 1  T9    E NATIVE_ARRAY[CHARACTER] 9
A 1  T670  E FILE_TOOLS 670
A*1  T306  R ECHO 306
A*1  T927  R FIXED_ARRAY[STRING] 927
A*1  T52   R ARRAY[STRING] 52
A 1  T8    E POINTER 8
 --- Mangling Table End --- */

/*C Header Pass 1 :*/
typedef struct S7 T7;
typedef struct S675 T675;
typedef void*T441;
typedef int T2;
typedef int T6;
typedef void*T830;
typedef struct S479 T479;
typedef char T3;
typedef struct S309 T309;
typedef struct S467 T467;
typedef int T670;
typedef struct S306 T306;
typedef struct S927 T927;
typedef struct S52 T52;
typedef void* T8;

/*C Header Pass 2 :*/
typedef T0**T400;
typedef T3*T9;

/*C Header Pass 3 :*/

/*C Header Pass 4 :*/
struct S7{T9 _storage;int _count;int _capacity;};
extern T7 M7;
struct S675{int _push_back_flag;T0* _path;void* _input_stream;int _memory;};
extern T675 M675;
extern T441 M441;
extern T830 M830;
struct S479{int _item;};
extern T479 M479;
struct S309{T0* _root;int _c_code;};
extern T309 M309;
struct S467{int _push_back_flag;int _memory;};
extern T467 M467;
extern T670 M670;
struct S306{int _verbose;};
extern T306 M306;
struct S927{T400 _storage;int _capacity;int _upper;};
extern T927 M927;
struct S52{T400 _storage;int _capacity;int _upper;int _lower;};
extern T52 M52;
int r6_ix_not(int C);
char r3to_lower(char C);
int r3is_digit(char C);
char r3to_upper(char C);
int r3is_letter(char C);
void r400set_all_with(T400 C,T0* a1,int a2);
int r400equal_like(T0* a1,T0* a2);
int r400index_of(T400 C,T0* a1,int a2);
int r9fast_memcmp(T9 C,T9 a1,int a2);
int r9fast_index_of(T9 C,char a1,int a2);
void r9copy_from(T9 C,T9 a1,int a2);
T9 r9realloc(T9 C,int a1,int a2);
void r7extend(T7* C,char a1);
void r7set_last(T7* C,char a1);
void r7to_lower(T7* C);
void r7remove_between(T7* C,int a1,int a2);
void r7make(T7* C,int a1);
void* r7to_external(T7* C);
void r7remove_first(T7* C,int a1);
T0* r7twin(T7* C);
int r7is_equal(T7* C,T0* a1);
char r7last(T7* C);
int r7has_suffix(T7* C,T0* a1);
int r7has(T7* C,char a1);
void r7copy(T7* C,T0* a1);
void r7to_upper(T7* C);
void r7remove_last(T7* C,int a1);
int r7index_of(T7* C,char a1);
void r7append(T7* C,T0* a1);
void r927make(T927* C,int a1);
T0* r52item(T52* C,int a1);
int r52index_of(T52* C,T0* a1);
void r675connect_to(T675* C,T0* a1);
extern T0*oBC762last_string;
void r675disconnect(T675* C);
void r675read_character(T675* C);
void r675read_line_in(T675* C,T0* a1);
int r675end_of_input(T675* C);
void r675read_line(T675* C);
void r441put_string(T441* C,T0* a1);
extern T0*oBC817tmp_file_read;
void r830append_file(T830* C,T0* a1);
void r830put_string(T830* C,T0* a1);
extern int fBC364x_suffix;
extern T0*oBC364x_suffix;
T0* r309x_suffix(T309* C);
extern T0*oBC364tmp_file_read;
void r309more_help(T309* C,T0* a1);
T0* r309to_bcn(T0* a1);
extern int fBC364small_eiffel_directory;
extern T0*oBC364small_eiffel_directory;
T0* r309small_eiffel_directory(T309* C);
extern int fBC364make_suffix;
extern T0*oBC364make_suffix;
T0* r309make_suffix(T309* C);
void r309automat(T309* C);
void r309make(T309* C);
extern T0*oBC364help_file_name;
void r309add_directory(T309* C,T0* a1,T0* a2);
extern T670 oBC1file_tools;
extern T0*oBC1std_output;
extern T0*oBC309make_file;
extern T0*oBC364echo;
T0* r309get_environment_variable(T309* C,T0* a1);
void r309print_help(T309* C,T0* a1);
extern int fBC1command_arguments;
extern T0*oBC1command_arguments;
T0* r309command_arguments(void);
extern T0*oBC364system_list;
extern T0*oBC1std_input;
extern int fBC364system_name;
extern T0*oBC364system_name;
T0* r309system_name(T309* C);
extern T0*oBC364tmp_path;
extern T0*oBC309tmp_string;
int r309file_exists(T0* a1);
T0* r309argument(int a1);
extern int fBC364o_suffix;
extern T0*oBC364o_suffix;
T0* r309o_suffix(T309* C);
void r467read_character(T467* C);
extern T0*oBC670std_fr1;
int r670is_readable(T0* a1);
void r306system(T0* a1);
extern T0*oBC1std_error;
void r306file_removing(T306* C,T0* a1);
void r306sfr_connect(T306* C,T0* a1,T0* a2);
void r306put_string(T306* C,T0* a1);
void r306w_put_string(T0* a1);
int r306file_exists(T0* a1);
void r306call_system(T306* C,T0* a1);
void r306w_put_character(char a1);
extern int se_argc;
extern char**se_argv;
extern T7*ms1_309;
extern T7*ms82_470;
extern T7*ms4_364;
extern T7*ms5_364;
extern T7*ms2_364;
extern T7*ms39_364;
extern T7*ms3_364;
extern T7*ms58_473;
extern T7*ms8_309;
extern T7*ms12_309;
extern T7*ms11_309;
extern T7*ms10_309;
extern T7*ms25_364;
extern T7*ms26_364;
extern T7*ms28_364;
extern T7*ms9_309;
extern T7*ms2_309;
extern T7*ms37_364;
extern T7*ms36_364;
extern T7*ms35_364;
extern T7*ms34_364;
extern T7*ms33_364;
extern T7*ms1_306;
extern T7*ms2_306;
extern T7*ms135_470;
extern T7*ms3_309;
extern T7*ms4_309;
extern T7*ms5_309;
extern T7*ms77_470;
extern T7*ms80_470;
extern T7*ms32_364;
extern T7*ms31_364;
extern T7*ms30_364;
extern T7*ms29_364;
extern T7*ms126_470;
extern T7*ms3_306;
extern T7*ms4_306;
extern T7*ms20_364;
extern T7*ms127_470;
extern T7*ms21_364;
extern T7*ms121_470;
extern T7*ms1_364;
extern T7*ms24_364;
extern T7*ms242_470;
extern T7*ms22_364;
extern T7*ms23_364;
extern T7*ms13_364;
extern T7*ms15_364;
extern T7*ms16_364;
extern T7*ms17_364;
extern T7*ms18_364;
extern T7*ms19_364;
extern T7*ms14_364;
extern T7*ms7_309;
extern T7*ms5_306;
extern T7*ms152_470;
extern T7*ms6_309;
extern T7*ms136_470;
void se_msi1(void);
void se_msi2(void);
void se_msi3(void);
T7*se_ms(int c,char*e);
T7*e2s(char*e);
char*s2e(T7*s);
void*se_ma52(int argc,...);
void rsp(void);
void sigrsp(int sig);
void se_initialize(void);