diff options
Diffstat (limited to 'src/profmain.c')
| -rw-r--r-- | src/profmain.c | 138 |
1 files changed, 69 insertions, 69 deletions
diff --git a/src/profmain.c b/src/profmain.c index eff57bf..d8d7211 100644 --- a/src/profmain.c +++ b/src/profmain.c @@ -2,12 +2,12 @@ Copyright 1991 by Stichting Mathematisch Centrum, Amsterdam, The Netherlands. - All Rights Reserved + All Rights Reserved -Permission to use, copy, modify, and distribute this software and its -documentation for any purpose and without fee is hereby granted, +Permission to use, copy, modify, and distribute this software and its +documentation for any purpose and without fee is hereby granted, provided that the above copyright notice appear in all copies and that -both that copyright notice and this permission notice appear in +both that copyright notice and this permission notice appear in supporting documentation, and that the names of Stichting Mathematisch Centrum or CWI not be used in advertising or publicity pertaining to distribution of the software without specific, written prior permission. @@ -42,92 +42,92 @@ int debugging = 1; FILE *getopenfile() { - char buf[256]; - char *p; - FILE *fp; - for (;;) { - fprintf(stderr, "File name: "); - if (fgets(buf, sizeof buf, stdin) == NULL) { - fprintf(stderr, "EOF\n"); - exit(1); - } - p = strchr(buf, '\n'); - if (p != NULL) - *p = '\0'; - if ((fp = fopen(buf, "r")) != NULL) - break; - fprintf(stderr, "Sorry, try again.\n"); - } - return fp; + char buf[256]; + char *p; + FILE *fp; + for (;;) { + fprintf(stderr, "File name: "); + if (fgets(buf, sizeof buf, stdin) == NULL) { + fprintf(stderr, "EOF\n"); + exit(1); + } + p = strchr(buf, '\n'); + if (p != NULL) + *p = '\0'; + if ((fp = fopen(buf, "r")) != NULL) + break; + fprintf(stderr, "Sorry, try again.\n"); + } + return fp; } main() { - FILE *fp; - _profile = 0; - fp = getopenfile(); + FILE *fp; + _profile = 0; + fp = getopenfile(); #if 0 - askgo("Start tokenizing"); - runtokenizer(fp); - fseek(fp, 0L, 0); + askgo("Start tokenizing"); + runtokenizer(fp); + fseek(fp, 0L, 0); #endif - if (!gram.g_accel) - addaccelerators(&gram); - askgo("Start parsing"); - _profile = 1; - runparser(fp); - _profile = 0; - freopen("prof.out", "w", stdout); - DumpProfile(); - fflush(stdout); - exit(0); + if (!gram.g_accel) + addaccelerators(&gram); + askgo("Start parsing"); + _profile = 1; + runparser(fp); + _profile = 0; + freopen("prof.out", "w", stdout); + DumpProfile(); + fflush(stdout); + exit(0); } static int runtokenizer(fp) - FILE *fp; + FILE *fp; { - struct tok_state *tok; - tok = tok_setupf(fp, "Tokenizing", "."); - for (;;) { - char *a, *b; - register char *str; - register int len; - (void) tok_get(tok, &a, &b); - if (tok->done != E_OK) - break; - len = b - a; - str = NEW(char, len + 1); - if (str == NULL) { - fprintf(stderr, "no mem for next token"); - break; - } - strncpy(str, a, len); - str[len] = '\0'; - } - fprintf(stderr, "done (%d)\n", tok->done); + struct tok_state *tok; + tok = tok_setupf(fp, "Tokenizing", "."); + for (;;) { + char *a, *b; + register char *str; + register int len; + (void) tok_get(tok, &a, &b); + if (tok->done != E_OK) + break; + len = b - a; + str = NEW(char, len + 1); + if (str == NULL) { + fprintf(stderr, "no mem for next token"); + break; + } + strncpy(str, a, len); + str[len] = '\0'; + } + fprintf(stderr, "done (%d)\n", tok->done); } static runparser(fp, start) - FILE *fp; + FILE *fp; { - node *n; - int ret; - ret = parsefile(fp, &gram, module_input, "Parsing", ".", &n); - fprintf(stderr, "done (%d)\n", ret); + node *n; + int ret; + ret = parsefile(fp, &gram, module_input, "Parsing", ".", &n); + fprintf(stderr, "done (%d)\n", ret); #if 0 - _profile = 0; - if (ret == E_DONE) - listtree(n); + _profile = 0; + if (ret == E_DONE) + listtree(n); #endif } static int askgo(prompt) - char *prompt; + char *prompt; { - char buf[256]; - fprintf(stderr, "%s: hit return when ready: ", prompt); - fgets(buf, sizeof buf, stdin); + char buf[256]; + fprintf(stderr, "%s: hit return when ready: ", prompt); + fgets(buf, sizeof buf, stdin); } |
