t.c
上传用户:romrleung
上传日期:2022-05-23
资源大小:18897k
文件大小:1k
- #include <sys/types.h>
- #include <ctype.h>
- #include <errno.h>
- #include <stdio.h>
- #include <strings.h>
- int
- chk(f)
- char *f;
- {
- int ch, l, r;
- if (freopen(f, "r", stdin) == NULL) {
- fprintf(stderr, "%s: %sn", f, strerror(errno));
- exit (1);
- }
- for (l = 1, r = 0; (ch = getchar()) != EOF;) {
- if (ch != ',')
- goto next;
- do { ch = getchar(); } while (isblank(ch));
- if (ch != 'n')
- goto next;
- ++l;
- do { ch = getchar(); } while (isblank(ch));
- if (ch != '}')
- goto next;
- r = 1;
- printf("%s: line %dn", f, l);
- next: if (ch == 'n')
- ++l;
- }
- return (r);
- }
- int
- main(int argc, char *argv[])
- {
- int r;
- for (r = 0; *++argv != NULL;)
- if (chk(*argv))
- r = 1;
- return (r);
- }