diff options
| author | Karl Heuer | 1995-04-04 21:11:29 +0000 |
|---|---|---|
| committer | Karl Heuer | 1995-04-04 21:11:29 +0000 |
| commit | 5c579a75294bceca1bb57ba53c6792d87f9557f3 (patch) | |
| tree | 93270ae4b4543b841d1dc7c089118d97532365d7 /lib-src | |
| parent | 3ca7b46f5346984efb9e753f180b5f907452fd1f (diff) | |
| download | emacs-5c579a75294bceca1bb57ba53c6792d87f9557f3.tar.gz emacs-5c579a75294bceca1bb57ba53c6792d87f9557f3.zip | |
(aixcc, aixcc.c): Targets deleted.
(SOURCES, distclean): Removed obsolete references to aixcc.
Diffstat (limited to 'lib-src')
| -rw-r--r-- | lib-src/Makefile.in | 11 | ||||
| -rw-r--r-- | lib-src/aixcc.lex | 301 |
2 files changed, 2 insertions, 310 deletions
diff --git a/lib-src/Makefile.in b/lib-src/Makefile.in index 0511121a2d9..548a718e8ed 100644 --- a/lib-src/Makefile.in +++ b/lib-src/Makefile.in | |||
| @@ -103,7 +103,7 @@ SCRIPTS= rcs2log vcdiff | |||
| 103 | 103 | ||
| 104 | EXECUTABLES= ${UTILITIES} ${INSTALLABLES} ${SCRIPTS} ${INSTALLABLE_SCRIPTS} | 104 | EXECUTABLES= ${UTILITIES} ${INSTALLABLES} ${SCRIPTS} ${INSTALLABLE_SCRIPTS} |
| 105 | 105 | ||
| 106 | SOURCES = COPYING ChangeLog Makefile.in README aixcc.lex emacs.csh \ | 106 | SOURCES = COPYING ChangeLog Makefile.in README emacs.csh \ |
| 107 | makedoc.com *.[chy] rcs2log vcdiff | 107 | makedoc.com *.[chy] rcs2log vcdiff |
| 108 | 108 | ||
| 109 | # Additional -D flags for movemail (add to MOVE_FLAGS if desired): | 109 | # Additional -D flags for movemail (add to MOVE_FLAGS if desired): |
| @@ -262,7 +262,7 @@ clean: mostlyclean | |||
| 262 | -rm -f ../etc/DOC* *.tab.c *.tab.h | 262 | -rm -f ../etc/DOC* *.tab.c *.tab.h |
| 263 | 263 | ||
| 264 | distclean: clean | 264 | distclean: clean |
| 265 | -rm -f aixcc.c TAGS | 265 | -rm -f TAGS |
| 266 | -rm -f Makefile Makefile.in blessmail | 266 | -rm -f Makefile Makefile.in blessmail |
| 267 | 267 | ||
| 268 | maintainer-clean: distclean | 268 | maintainer-clean: distclean |
| @@ -389,10 +389,3 @@ xveterm: ${srcdir}/emacstool.c | |||
| 389 | $(CC) -o xveterm -DXVIEW -DTTERM ${ALL_CFLAGS} ${srcdir}/emacstool.c \ | 389 | $(CC) -o xveterm -DXVIEW -DTTERM ${ALL_CFLAGS} ${srcdir}/emacstool.c \ |
| 390 | -lxview -lolgx -lX -I$(OPENWINHOME)/include -L$(OPENWINHOME)/lib \ | 390 | -lxview -lolgx -lX -I$(OPENWINHOME)/include -L$(OPENWINHOME)/lib \ |
| 391 | $(LOADLIBES) | 391 | $(LOADLIBES) |
| 392 | |||
| 393 | aixcc: ${srcdir}/aixcc.c | ||
| 394 | $(CC) $(ALL_CFLAGS) -o aixcc ${srcdir}/aixcc.c | ||
| 395 | |||
| 396 | aixcc.c: ${srcdir}/aixcc.lex | ||
| 397 | lex ${srcdir}/aixcc.lex | ||
| 398 | mv lex.yy.c aixcc.c | ||
diff --git a/lib-src/aixcc.lex b/lib-src/aixcc.lex deleted file mode 100644 index b7b44701b18..00000000000 --- a/lib-src/aixcc.lex +++ /dev/null | |||
| @@ -1,301 +0,0 @@ | |||
| 1 | %Start ErrorText ErrorMessage OtherText | ||
| 2 | |||
| 3 | EC [0-9][0-9][0-9][0-9]-[0-9][0-9][0-9] | ||
| 4 | D [0-9] | ||
| 5 | D3 [0-9 ][0-9 ][0-9] | ||
| 6 | D4 [0-9 ][0-9 ][0-9 ][0-9] | ||
| 7 | D5 [0-9 ][0-9 ][0-9 ][0-9 ][0-9] | ||
| 8 | DS [0-9 ] | ||
| 9 | |||
| 10 | %{ | ||
| 11 | /* moore@wilma.cs.utk.edu | ||
| 12 | |||
| 13 | * Hack to work around the AIX C compiler's brain-damaged error messages | ||
| 14 | * so that emacs can parse them. It runs /bin/cc as a subprocess, and | ||
| 15 | * tries to rearrange the error messages so that (a) each message contains | ||
| 16 | * both the filename and line number where the error occurred, and (b) | ||
| 17 | * the error message(s) for a particular line get displayed *before* the | ||
| 18 | * line itself. | ||
| 19 | * | ||
| 20 | * to compile: | ||
| 21 | * lex aixcc.lex | ||
| 22 | * cc -o aixcc lex.yy.c | ||
| 23 | * | ||
| 24 | * | ||
| 25 | * Copyright December 1991 by Keith Moore | ||
| 26 | * | ||
| 27 | * This program is free software; you can redistribute it and/or modify | ||
| 28 | * it under the terms of the GNU General Public License as published by | ||
| 29 | * the Free Software Foundation; either version 2 of the License, or | ||
| 30 | * (at your option) any later version. | ||
| 31 | * | ||
| 32 | * This program is distributed in the hope that it will be useful, | ||
| 33 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
| 34 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||
| 35 | * GNU General Public License for more details. | ||
| 36 | * | ||
| 37 | * You should have received a copy of the GNU General Public License | ||
| 38 | * along with this program; if not, write to the Free Software | ||
| 39 | * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. | ||
| 40 | * | ||
| 41 | * | ||
| 42 | * TODO: figure out how the compiler counts file numbers for included | ||
| 43 | * files, keep track of which file corresponds to which number, and | ||
| 44 | * always output the right file name. | ||
| 45 | */ | ||
| 46 | |||
| 47 | #include <stdio.h> | ||
| 48 | #include <string.h> | ||
| 49 | |||
| 50 | char *current_file; | ||
| 51 | int line; | ||
| 52 | int debug = 0; | ||
| 53 | char bigbuf[10240]; | ||
| 54 | char *bufptr = bigbuf; | ||
| 55 | int last_line_was_error = 0; | ||
| 56 | |||
| 57 | spaces (s) | ||
| 58 | char *s; | ||
| 59 | { | ||
| 60 | while (*s++) | ||
| 61 | *bufptr++ = ' '; | ||
| 62 | } | ||
| 63 | |||
| 64 | char * | ||
| 65 | strsave (s) | ||
| 66 | char *s; | ||
| 67 | { | ||
| 68 | char *ptr = malloc (strlen (s) + 1); | ||
| 69 | strcpy (ptr, s); | ||
| 70 | return ptr; | ||
| 71 | } | ||
| 72 | |||
| 73 | yywrap () | ||
| 74 | { | ||
| 75 | *bufptr = '\0'; | ||
| 76 | bufptr = bigbuf; | ||
| 77 | while (*bufptr) | ||
| 78 | putc (*bufptr++, yyout); | ||
| 79 | return 1; | ||
| 80 | } | ||
| 81 | |||
| 82 | %} | ||
| 83 | %% | ||
| 84 | ^File\ Line\ Column\ Message\ text[^\n]* { | ||
| 85 | /* | ||
| 86 | * ignore this. don't treat it as error text | ||
| 87 | */ | ||
| 88 | } | ||
| 89 | |||
| 90 | ^{DS}{DS}{DS}\ {D5}\ \| { | ||
| 91 | /* | ||
| 92 | * (optional) nesting level, followed by line number, followed | ||
| 93 | * by the source code fragment that caused the error | ||
| 94 | */ | ||
| 95 | |||
| 96 | /* | ||
| 97 | * save the line number for later | ||
| 98 | */ | ||
| 99 | line = atoi (yytext+4); | ||
| 100 | |||
| 101 | if (debug) { | ||
| 102 | fprintf (yyout, "line <= %d\n", line); | ||
| 103 | fprintf (yyout, "%s\n", yytext); | ||
| 104 | } | ||
| 105 | |||
| 106 | /* | ||
| 107 | * if the last line was an error message, to flush out all of | ||
| 108 | * the old source text before starting to save the new source text. | ||
| 109 | */ | ||
| 110 | if (last_line_was_error) { | ||
| 111 | *bufptr = '\0'; | ||
| 112 | bufptr = bigbuf; | ||
| 113 | while (*bufptr) | ||
| 114 | putc (*bufptr++, yyout); | ||
| 115 | bufptr = bigbuf; | ||
| 116 | last_line_was_error = 0; | ||
| 117 | } | ||
| 118 | /* | ||
| 119 | * stuff enough spaces in the text buffer so that the | ||
| 120 | * saved text will line up properly when displayed. | ||
| 121 | */ | ||
| 122 | spaces (yytext); | ||
| 123 | |||
| 124 | BEGIN ErrorText; /* continue below */ | ||
| 125 | } | ||
| 126 | |||
| 127 | <ErrorText>[^\n]*$ { | ||
| 128 | char *ptr; | ||
| 129 | |||
| 130 | /* | ||
| 131 | * Save the text until we see the error message(s), then print it. | ||
| 132 | * This because emacs puts the error message at the top of the | ||
| 133 | * window, and it's nice to be able to see the text below it. | ||
| 134 | */ | ||
| 135 | |||
| 136 | ptr = yytext; | ||
| 137 | while (*ptr) | ||
| 138 | *bufptr++ = *ptr++; | ||
| 139 | *bufptr++ = '\n'; | ||
| 140 | |||
| 141 | BEGIN 0; | ||
| 142 | } | ||
| 143 | |||
| 144 | ^Processing\ include\ file\ .*$ { | ||
| 145 | /* | ||
| 146 | * name of a new include file being processed. Increment file number | ||
| 147 | * and remember the file name corresponding to this file number. | ||
| 148 | */ | ||
| 149 | |||
| 150 | current_file = strsave (yytext+24); | ||
| 151 | |||
| 152 | if (debug) { | ||
| 153 | fprintf (yyout, "current_file <= %s\n", current_file); | ||
| 154 | fprintf (yyout, "%s\n", yytext); | ||
| 155 | } | ||
| 156 | } | ||
| 157 | |||
| 158 | ^([a-z]\ -)?\ *{EC}: { | ||
| 159 | /* | ||
| 160 | * error message (which we print immediately) preceded by an | ||
| 161 | * error code (which we ignore) | ||
| 162 | */ | ||
| 163 | |||
| 164 | fprintf (yyout, "\"%s\", line %d: %c -", current_file, line, *yytext); | ||
| 165 | last_line_was_error = 1; | ||
| 166 | BEGIN ErrorMessage; | ||
| 167 | } | ||
| 168 | |||
| 169 | ^{D3}\ {D5}\ {D4}\ {EC}: { | ||
| 170 | /* | ||
| 171 | * (optional) nesting level, followed by line number, followed | ||
| 172 | * by column number, followed by error message text. | ||
| 173 | */ | ||
| 174 | |||
| 175 | /* | ||
| 176 | * save the line number for later | ||
| 177 | */ | ||
| 178 | line = atoi (yytext+4); | ||
| 179 | |||
| 180 | if (debug) { | ||
| 181 | fprintf (yyout, "line <= %d\n", line); | ||
| 182 | fprintf (yyout, "%s\n", yytext); | ||
| 183 | } | ||
| 184 | |||
| 185 | /* | ||
| 186 | * if the last line was an error message, flush out all of | ||
| 187 | * the old source text before printing this error message. | ||
| 188 | */ | ||
| 189 | if (last_line_was_error) { | ||
| 190 | *bufptr = '\0'; | ||
| 191 | bufptr = bigbuf; | ||
| 192 | while (*bufptr) | ||
| 193 | putc (*bufptr++, yyout); | ||
| 194 | bufptr = bigbuf; | ||
| 195 | last_line_was_error = 0; | ||
| 196 | } | ||
| 197 | fprintf (yyout, "\"%s\", line %d:", current_file, line); | ||
| 198 | last_line_was_error = 1; | ||
| 199 | BEGIN ErrorMessage; | ||
| 200 | } | ||
| 201 | |||
| 202 | <ErrorMessage>[^\n]*$ { | ||
| 203 | fprintf (yyout, "%s\n", yytext); | ||
| 204 | BEGIN 0; | ||
| 205 | } | ||
| 206 | |||
| 207 | |||
| 208 | ^[^ :]+".c:"\ *$ { | ||
| 209 | /* name of new source file being processed */ | ||
| 210 | |||
| 211 | char *ptr; | ||
| 212 | |||
| 213 | if (current_file) | ||
| 214 | free (current_file); | ||
| 215 | ptr = strchr (yytext, ':'); | ||
| 216 | *ptr = '\0'; | ||
| 217 | current_file = strsave (yytext); | ||
| 218 | } | ||
| 219 | |||
| 220 | ^[^\n] { | ||
| 221 | /* | ||
| 222 | * other text starting with a newline. We have to break it up this | ||
| 223 | * way to keep this rule from matching any of the above patterns | ||
| 224 | */ | ||
| 225 | |||
| 226 | if (last_line_was_error) { | ||
| 227 | *bufptr = '\0'; | ||
| 228 | bufptr = bigbuf; | ||
| 229 | while (*bufptr) | ||
| 230 | putc (*bufptr++, yyout); | ||
| 231 | bufptr = bigbuf; | ||
| 232 | last_line_was_error = 0; | ||
| 233 | } | ||
| 234 | |||
| 235 | *bufptr++ = *yytext; | ||
| 236 | BEGIN OtherText; | ||
| 237 | } | ||
| 238 | |||
| 239 | <OtherText>[^\n]*$ { | ||
| 240 | char *ptr; | ||
| 241 | |||
| 242 | ptr = yytext; | ||
| 243 | while (*ptr) | ||
| 244 | *bufptr++ = *ptr++; | ||
| 245 | *bufptr++ = '\n'; | ||
| 246 | |||
| 247 | BEGIN 0; | ||
| 248 | } | ||
| 249 | |||
| 250 | \n ; | ||
| 251 | |||
| 252 | %% | ||
| 253 | |||
| 254 | main (argc, argv) | ||
| 255 | char **argv; | ||
| 256 | { | ||
| 257 | int pfd[2]; | ||
| 258 | int child_pid; | ||
| 259 | int i; | ||
| 260 | |||
| 261 | current_file = strsave ("/dev/null"); | ||
| 262 | |||
| 263 | line = 0; | ||
| 264 | |||
| 265 | for (i = 1; i < argc; ++i) { | ||
| 266 | char *ptr = strrchr (argv[i], '.'); | ||
| 267 | if (ptr && ptr[1] == 'c' && ptr[2] == '\0') { | ||
| 268 | current_file = strsave (argv[i]); | ||
| 269 | break; | ||
| 270 | } | ||
| 271 | } | ||
| 272 | |||
| 273 | if (pipe (pfd) < 0) { | ||
| 274 | perror ("pipe"); | ||
| 275 | exit (1); | ||
| 276 | } | ||
| 277 | if ((child_pid = fork()) > 0) { | ||
| 278 | int status; | ||
| 279 | |||
| 280 | close (pfd[1]); | ||
| 281 | yyin = fdopen (pfd[0], "r"); | ||
| 282 | yyout = stderr; | ||
| 283 | yylex(); | ||
| 284 | |||
| 285 | wait (&status); | ||
| 286 | exit ((status >> 8) & 0xff); | ||
| 287 | } | ||
| 288 | else if (child_pid == 0) { | ||
| 289 | dup2 (pfd[1], 2); | ||
| 290 | close (pfd[0]); | ||
| 291 | close (pfd[1]); | ||
| 292 | argv[0] = "cc"; | ||
| 293 | execv ("/bin/cc", argv); | ||
| 294 | perror ("/bin/cc"); | ||
| 295 | exit (1); | ||
| 296 | } | ||
| 297 | else { | ||
| 298 | perror ("fork"); | ||
| 299 | exit (1); | ||
| 300 | } | ||
| 301 | } | ||