|
69 | 69 | */ |
70 | 70 |
|
71 | 71 | #include "sc_memmgr.h" |
72 | | -#include "express/basic.h" |
73 | | -#include "sc_version_string.h" |
74 | 72 | #include <ctype.h> |
75 | 73 | #include <stdlib.h> |
76 | 74 | #include <setjmp.h> |
77 | 75 | #include <errno.h> |
78 | 76 |
|
| 77 | +#include "express/basic.h" |
79 | 78 | #include "express/express.h" |
80 | 79 | #include "express/resolve.h" |
81 | 80 | #include "stack.h" |
@@ -249,39 +248,9 @@ void SCOPEinitialize( void ); |
249 | 248 |
|
250 | 249 | static Express PARSERrun PROTO( ( char *, FILE * ) ); |
251 | 250 |
|
252 | | -char * EXPRESSversion( void ) { |
253 | | - return( "Express Language, IS (N65), October 24, 1994" ); |
254 | | -} |
255 | 251 | /** name specified on command line */ |
256 | 252 | char * input_filename = 0; |
257 | 253 |
|
258 | | -void EXPRESSusage( int _exit ) { |
259 | | - fprintf( stderr, "usage: %s [-v] [-d #] [-p <object_type>] {-w|-i <warning>} express_file\n", EXPRESSprogram_name ); |
260 | | - fprintf( stderr, "where\t-v produces the following version description:\n" ); |
261 | | - fprintf( stderr, "Build info for %s: %s\nhttp://github.com/stepcode/stepcode\n", EXPRESSprogram_name, sc_version ); |
262 | | - fprintf( stderr, "\t-d turns on debugging (\"-d 0\" describes this further\n" ); |
263 | | - fprintf( stderr, "\t-p turns on printing when processing certain objects (see below)\n" ); |
264 | | - fprintf( stderr, "\t-w warning enable\n" ); |
265 | | - fprintf( stderr, "\t-i warning ignore\n" ); |
266 | | - fprintf( stderr, "and <warning> is one of:\n" ); |
267 | | - fprintf( stderr, "\tnone\n\tall\n" ); |
268 | | - LISTdo( ERRORwarnings, opt, Error_Warning ) |
269 | | - fprintf( stderr, "\t%s\n", opt->name ); |
270 | | - LISTod |
271 | | - fprintf( stderr, "and <object_type> is one or more of:\n" ); |
272 | | - fprintf( stderr, " e entity\n" ); |
273 | | - fprintf( stderr, " p procedure\n" ); |
274 | | - fprintf( stderr, " r rule\n" ); |
275 | | - fprintf( stderr, " f function\n" ); |
276 | | - fprintf( stderr, " t type\n" ); |
277 | | - fprintf( stderr, " s schema or file\n" ); |
278 | | - fprintf( stderr, " # pass #\n" ); |
279 | | - fprintf( stderr, " E everything (all of the above)\n" ); |
280 | | - if( _exit ) { |
281 | | - exit( 2 ); |
282 | | - } |
283 | | -} |
284 | | - |
285 | 254 | int EXPRESS_fail( Express model ) { |
286 | 255 | ERRORflush_messages(); |
287 | 256 |
|
|
0 commit comments