Mercurial > emacs
comparison lib-src/etags.c @ 4905:710950ca1b49
Tue Nov 2 19:46:52 1993 Francesco Potorti` (pot@cnuce.cnr.it)
* etags.c (consider_token): removed unused variable firsttok.
(prolog_getit): call pfnote with the right number of arguments.
author | Francesco Potortì <pot@gnu.org> |
---|---|
date | Tue, 02 Nov 1993 18:55:40 +0000 |
parents | 7b1e944f583a |
children | 50db67ef8d64 |
comparison
equal
deleted
inserted
replaced
4904:7b1e944f583a | 4905:710950ca1b49 |
---|---|
23 * FORTRAN added by Jim Kleckner. | 23 * FORTRAN added by Jim Kleckner. |
24 * Ed Pelegri-Llopart added C typedefs. | 24 * Ed Pelegri-Llopart added C typedefs. |
25 * Gnu Emacs TAGS format and modifications by RMS? | 25 * Gnu Emacs TAGS format and modifications by RMS? |
26 * Sam Kendall added C++. | 26 * Sam Kendall added C++. |
27 * | 27 * |
28 * Francesco Potorti` (pot@cnuce.cnr.it) is the current maintainer. 9.5 | 28 * Francesco Potorti` (pot@cnuce.cnr.it) is the current maintainer. 9.7 |
29 */ | 29 */ |
30 | 30 |
31 #ifdef HAVE_CONFIG_H | 31 #ifdef HAVE_CONFIG_H |
32 #include <../src/config.h> | 32 #include <../src/config.h> |
33 #endif | 33 #endif |
1786 register TOKEN *tokp; /* IN: token pointer */ | 1786 register TOKEN *tokp; /* IN: token pointer */ |
1787 int c_ext; /* IN: C extensions mask */ | 1787 int c_ext; /* IN: C extensions mask */ |
1788 int cblev; /* IN: curly brace level */ | 1788 int cblev; /* IN: curly brace level */ |
1789 logical *is_func; /* OUT */ | 1789 logical *is_func; /* OUT */ |
1790 { | 1790 { |
1791 logical firsttok; /* TRUE if have seen first token in ()'s */ | |
1792 Stab_entry *tokse = stab_find (get_C_stab (c_ext), tokp->p, tokp->len); | 1791 Stab_entry *tokse = stab_find (get_C_stab (c_ext), tokp->p, tokp->len); |
1793 enum sym_type toktype = stab_type (tokse); | 1792 enum sym_type toktype = stab_type (tokse); |
1794 | 1793 |
1795 /* | 1794 /* |
1796 * Advance the definedef state machine. | 1795 * Advance the definedef state machine. |
2774 } | 2773 } |
2775 tmpc = *s; | 2774 tmpc = *s; |
2776 *s = '\0'; | 2775 *s = '\0'; |
2777 strcpy (nambuf, save_s); | 2776 strcpy (nambuf, save_s); |
2778 *s = tmpc; | 2777 *s = tmpc; |
2779 pfnote (nambuf, TRUE, save_s, strlen (nambuf), lineno, linecharno); | 2778 pfnote (nambuf, TRUE, FALSE, save_s, strlen (nambuf), lineno, linecharno); |
2780 } | 2779 } |
2781 | 2780 |
2782 /* It is assumed that prolog predicate starts from column 0. */ | 2781 /* It is assumed that prolog predicate starts from column 0. */ |
2783 | 2782 |
2784 void | 2783 void |