mirror of https://github.com/lianthony/NT4.0
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
33 lines
459 B
33 lines
459 B
%Start RULES EPILOG PROLOG
|
|
|
|
#include <stdio.h>
|
|
|
|
char *PgmName=0;
|
|
int ErrorCnt=0;
|
|
int Flag1 = 0;
|
|
int Flag2 = 0;
|
|
|
|
void
|
|
main(argc, argv)
|
|
int argc;
|
|
char **argv;
|
|
{
|
|
PgmName = *argv;
|
|
--argc, ++argv;
|
|
|
|
if (argc && (freopen(*argv, "r", stdin) == NULL)) {
|
|
perror(PgmName);
|
|
exit(-1);
|
|
}
|
|
yylex();
|
|
exit(ErrorCnt);
|
|
}
|
|
|
|
%%
|
|
^"%include ".*"\n" { if (!Flag1) {
|
|
Flag1=1;
|
|
}
|
|
}
|
|
^.*"\n" if (!Flag1) ECHO;
|
|
%%
|
|
|