This is finder4.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 "finder.h"
int se_argc;
char **se_argv;
void main(int argc,char *argv[]){
se_sz_initialize();{
T26 *n=((T26*)se_new(26));
se_argc=argc;
se_argv=argv;
signal(SIGINT,sigrsp);
signal(SIGQUIT,sigrsp);
signal(SIGKILL,sigrsp);
se_manifest_strings();
{T0* R;
{T43 *n=((T43*)se_new(43));
/*[IRF3:make*//*AW*/(n)->_mode=((T0 *)ms1_43);/*]*/
R=(T0 *)n;}
oRBC39tmp_file_read=R;}/*PCO*/
{T0* R;
{T38 *n=((T38*)se_new(38));
rT38make(n);
R=(T0 *)n;}
oRBC1std_error=R;}/*PCO*/
{T0* R;
{T43 *n=((T43*)se_new(43));
/*[IRF3:make*//*AW*/(n)->_mode=((T0 *)ms1_43);/*]*/
R=(T0 *)n;}
oRBC27tmp_file_read=R;}/*PCO*/
{T0* R;
{T7 *n=((T7*)se_new(7));
rT7make(n,256);
R=(T0 *)n;}
oRBC43last_string=R;}/*PCO*/
{T0* R;
{T42 *n=((T42*)se_new(42));
rT42make(n);
R=(T0 *)n;}
oRBC1std_output=R;}/*PCO*/
{T0* R;
{T44 *n=((T44*)se_new(44));
/*[IRF3:make*//*]*/
R=(T0 *)n;}
oRBC27small_eiffel=R;}/*PCO*/
{T0* R;
T0* _arg=NULL;
int _i=0;
_i=se_argc;
{T34 *n=((T34*)se_new(34));
rT34make(n,_i);
R=(T0 *)n;}
while (!((_i)<(0))) {
_arg=((T0*)e2s(se_argv[_i]));
rT34put((T34*)R,_arg,_i);
_i=(_i)-(1);
}
oRBC1command_arguments=R;}/*PCO*/
{T0* R;
{T7 *n=((T7*)se_new(7));
rT7make(n,256);
R=(T0 *)n;}
oRBC27hlp_file_name=R;}/*PCO*/
/*[IRF3:make*/{T0* _file_name=NULL;
T0* _class_name=NULL;
/*IF*/if ((/*(IRF4*/((T34*)oRBC1command_arguments)->_upper/*)*/)!=(1)) {
rT38put_string((T38*)oRBC1std_error,(T0 *)ms1_26);
rT26print_hlp((T0 *)ms2_26);
rT26die_with_code(1);
}
/*FI*/_class_name=rT26argument(1);
_file_name=rT44find_path_for(_class_name);
/*IF*/if (!(_file_name)) {
rT42put_string((T42*)oRBC1std_output,_class_name);
rT42put_string((T42*)oRBC1std_output,(T0 *)ms3_26);
rT26die_with_code(1);
}
else {
rT42put_string((T42*)oRBC1std_output,_file_name);
rT42put_character((T42*)oRBC1std_output,'\12');
}
/*FI*/}/*]*/
exit(0);}}
Tstring *ms3_26;
Tstring *ms12_44;
Tstring *ms11_44;
Tstring *ms10_44;
Tstring *ms9_44;
Tstring *ms8_44;
Tstring *ms7_44;
Tstring *ms25_44;
Tstring *ms24_44;
Tstring *ms23_44;
Tstring *ms22_44;
Tstring *ms30_44;
Tstring *ms29_44;
Tstring *ms28_44;
Tstring *ms27_44;
Tstring *ms26_44;
Tstring *ms20_44;
Tstring *ms3_44;
Tstring *ms4_44;
Tstring *ms5_44;
Tstring *ms8_27;
Tstring *ms7_27;
Tstring *ms2_44;
Tstring *ms24_27;
Tstring *ms21_44;
Tstring *ms2_26;
Tstring *ms1_43;
Tstring *ms4_27;
Tstring *ms3_27;
Tstring *ms35_27;
Tstring *ms2_27;
Tstring *ms1_27;
Tstring *ms124_27;
Tstring *ms1_26;
Tstring *ms2_39;
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.