98 |
|
|
99 |
|
{ |
100 |
|
FILE *fp; |
101 |
– |
#ifdef UNIX |
101 |
|
FILE *popen(); |
103 |
– |
#endif |
102 |
|
char comargs[200], command[300]; |
103 |
|
|
106 |
– |
#ifdef CPM |
107 |
– |
fixargs("mt160l", &argc, &argv); |
108 |
– |
#endif |
109 |
– |
|
104 |
|
progname = *argv++; |
105 |
|
argc--; |
106 |
|
|
107 |
|
condonly = FALSE; |
114 |
– |
#ifdef CPM |
115 |
– |
conditioned = TRUE; |
116 |
– |
#else |
108 |
|
conditioned = FALSE; |
118 |
– |
#endif |
109 |
|
|
110 |
|
while (argc && **argv == '-') { |
111 |
|
switch (*(*argv+1)) { |
122 |
– |
#ifdef UNIX |
112 |
|
case 'c': |
113 |
|
condonly = TRUE; |
114 |
|
break; |
115 |
|
case 'r': |
116 |
|
conditioned = TRUE; |
117 |
|
break; |
129 |
– |
#endif |
118 |
|
default: |
119 |
|
error(WARNING, "unknown option"); |
120 |
|
break; |
147 |
|
argc--; |
148 |
|
} |
149 |
|
sprintf(command, XCOM, comargs); |
162 |
– |
#ifdef UNIX |
150 |
|
if (condonly) |
151 |
|
return(system(command)); |
152 |
|
else { |
159 |
|
nextpage(); |
160 |
|
fputs(PUNINIT, stdout); |
161 |
|
} |
175 |
– |
#endif |
162 |
|
} |
163 |
|
|
164 |
|
return(0); |