Mercurial > emacs
changeset 17785:5b92f8ba5c6d
Added support for the Java language.
author | Francesco Potortì <pot@gnu.org> |
---|---|
date | Tue, 13 May 1997 09:38:23 +0000 |
parents | 5b2fa4a13a8b |
children | 90d9682afa28 |
files | lib-src/etags.c |
diffstat | 1 files changed, 11 insertions(+), 10 deletions(-) [+] |
line wrap: on
line diff
--- a/lib-src/etags.c Mon May 12 23:22:22 1997 +0000 +++ b/lib-src/etags.c Tue May 13 09:38:23 1997 +0000 @@ -31,7 +31,7 @@ * Francesco Potorti` (F.Potorti@cnuce.cnr.it) is the current maintainer. */ -char pot_etags_version[] = "@(#) pot revision number is 11.90"; +char pot_etags_version[] = "@(#) pot revision number is 11.91"; #define TRUE 1 #define FALSE 0 @@ -438,7 +438,7 @@ { "c*", Cstar_entries, Cstar_suffixes, NULL }, { "erlang", Erlang_functions, Erlang_suffixes, NULL }, { "fortran", Fortran_functions, Fortran_suffixes, NULL }, -/*{ "java", Cjava_entries, Cjava_suffixes, NULL },*/ + { "java", Cjava_entries, Cjava_suffixes, NULL }, { "lisp", Lisp_functions, Lisp_suffixes, NULL }, { "pascal", Pascal_functions, Pascal_suffixes, NULL }, { "perl", Perl_functions, Perl_suffixes, Perl_interpreters }, @@ -1539,7 +1539,7 @@ { st_none, st_C_objprot, st_C_objimpl, st_C_objend, st_C_gnumacro, st_C_struct, st_C_enum, st_C_define, st_C_typedef, st_C_typespec, - st_C_jstruct + st_C_javastruct }; /* Feed stuff between (but not including) %[ and %] lines to: @@ -1551,8 +1551,8 @@ @protocol, 0, st_C_objprot @implementation,0, st_C_objimpl @end, 0, st_C_objend -extends, C_JAVA, st_C_jstruct -implements, C_JAVA, st_C_jstruct +extends, C_JAVA, st_C_javastruct +implements, C_JAVA, st_C_javastruct class, C_PLPL, st_C_struct namespace, C_PLPL, st_C_struct domain, C_STAR, st_C_struct @@ -1650,7 +1650,7 @@ {"",}, {"",}, {"bool", C_PLPL, st_C_typespec}, {"extern", 0, st_C_typespec}, - {"extends", C_JAVA, st_C_jstruct}, + {"extends", C_JAVA, st_C_javastruct}, {"",}, {"",}, {"@implementation", 0, st_C_objimpl}, {"",}, {"",}, {"",}, @@ -1684,7 +1684,7 @@ {"typename", C_PLPL, st_C_typespec}, {"volatile", 0, st_C_typespec}, {"",}, {"",}, {"",}, {"",}, {"",}, {"",}, - {"implements", C_JAVA, st_C_jstruct}, + {"implements", C_JAVA, st_C_javastruct}, {"",}, {"",}, {"union", 0, st_C_struct}, {"",}, @@ -1797,6 +1797,7 @@ /* * State machine for Objective C protocols and implementations. + * Tom R.Hageman <tom@basil.icce.rug.nl> */ enum { @@ -1950,7 +1951,7 @@ */ switch (toktype) { - case st_C_jstruct: + case st_C_javastruct: if (structdef == stagseen) structdef = scolonseen; return FALSE; @@ -3303,6 +3304,7 @@ /* * Postscript tag functions * Just look for lines where the first character is '/' + * Richard Mlynarik <mly@adoc.xerox.com> */ void Postscript_functions (inf) @@ -4073,8 +4075,7 @@ return; } if (regex_arg[0] == '@' - && stat (regex_arg + 1, &stat_buf) == 0 - && S_ISREG (stat_buf.st_mode)) + && stat (regex_arg + 1, &stat_buf) == 0) { FILE *regexfp; struct linebuffer regexbuf;