-
Notifications
You must be signed in to change notification settings - Fork 131
Expand file tree
/
Copy pathinfo.c
More file actions
35 lines (31 loc) · 1.42 KB
/
info.c
File metadata and controls
35 lines (31 loc) · 1.42 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
#include <stdio.h>
#include <stdlib.h>
#include "express/info.h"
#include "express/express.h"
char * EXPRESSversion( void ) {
return( "Express Language, IS (N65), October 24, 1994" );
}
void EXPRESSusage( int _exit ) {
fprintf( stderr, "usage: %s [-v] [-d #] [-p <object_type>] {-w|-i <warning>} express_file\n", EXPRESSprogram_name );
fprintf( stderr, "where\t-v produces the following version description:\n" );
fprintf( stderr, "Build info for %s: %s\nhttp://github.com/stepcode/stepcode\n", EXPRESSprogram_name, SC_VERSION );
fprintf( stderr, "\t-d turns on debugging (\"-d 0\" describes this further\n" );
fprintf( stderr, "\t-p turns on printing when processing certain objects (see below)\n" );
fprintf( stderr, "\t-w warning enable\n" );
fprintf( stderr, "\t-i warning ignore\n" );
fprintf( stderr, "and <warning> is one of:\n" );
fprintf( stderr, "\tnone\n\tall\n" );
fprintf( stderr, "%s", ERRORget_warnings_help( "\t", "\n" ) );
fprintf( stderr, "and <object_type> is one or more of:\n" );
fprintf( stderr, " e entity\n" );
fprintf( stderr, " p procedure\n" );
fprintf( stderr, " r rule\n" );
fprintf( stderr, " f function\n" );
fprintf( stderr, " t type\n" );
fprintf( stderr, " s schema or file\n" );
fprintf( stderr, " # pass #\n" );
fprintf( stderr, " E everything (all of the above)\n" );
if( _exit ) {
exit( 2 );
}
}