Mercurial > hg > xemacs-beta
comparison lib-src/etags.c @ 278:90d73dddcdc4 r21-0b37
Import from CVS: tag r21-0b37
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:31:29 +0200 |
parents | 6330739388db |
children | c42ec1d1cded |
comparison
equal
deleted
inserted
replaced
277:cfdf3ff11843 | 278:90d73dddcdc4 |
---|---|
164 #define notinname(c) (_nin[CHAR(c)]) /* c is not in a name */ | 164 #define notinname(c) (_nin[CHAR(c)]) /* c is not in a name */ |
165 #define begtoken(c) (_btk[CHAR(c)]) /* c can start token */ | 165 #define begtoken(c) (_btk[CHAR(c)]) /* c can start token */ |
166 #define intoken(c) (_itk[CHAR(c)]) /* c can be in token */ | 166 #define intoken(c) (_itk[CHAR(c)]) /* c can be in token */ |
167 #define endtoken(c) (_etk[CHAR(c)]) /* c ends tokens */ | 167 #define endtoken(c) (_etk[CHAR(c)]) /* c ends tokens */ |
168 | 168 |
169 #ifdef INFODOCK | 169 /*#ifdef INFODOCK*/ |
170 #undef OO_BROWSER | 170 /*#undef OO_BROWSER*/ |
171 /* Due to the way this file is constructed, this unfortunately doesn't */ | |
172 /* work except for documentation purposes. -slb */ | |
171 #define OO_BROWSER 1 | 173 #define OO_BROWSER 1 |
172 #endif | 174 /*#endif*/ |
173 | 175 |
174 #ifdef OO_BROWSER | 176 #ifdef OO_BROWSER |
175 #define set_construct(construct) \ | 177 #define set_construct(construct) \ |
176 if (!oo_browser_construct) oo_browser_construct = construct | 178 if (!oo_browser_construct) oo_browser_construct = construct |
177 void oo_browser_clear_all_globals(); | 179 void oo_browser_clear_all_globals(); |
2877 strncpy (token_name.buffer, | 2879 strncpy (token_name.buffer, |
2878 newlb.buffer + tokoff, toklen); | 2880 newlb.buffer + tokoff, toklen); |
2879 token_name.buffer[toklen] = '\0'; | 2881 token_name.buffer[toklen] = '\0'; |
2880 token_name.len = toklen; | 2882 token_name.len = toklen; |
2881 /* Name macros. */ | 2883 /* Name macros. */ |
2884 tok.named | |
2885 = (structdef == stagseen | |
2886 || typdef == tend | |
2882 #ifdef OO_BROWSER | 2887 #ifdef OO_BROWSER |
2883 /* Also name #define constants, | 2888 /* Also name #define constants, |
2884 enumerations and enum_labels. | 2889 enumerations and enum_labels. |
2885 -- Bob Weiner, Altrasoft */ | 2890 Conditionalize `funorvar' reference |
2886 tok.named | 2891 here or #defines will appear without |
2887 = (structdef == stagseen | 2892 their #names. |
2888 || typdef == tend | 2893 -- Bob Weiner, Altrasoft, 4/25/1998 */ |
2889 || definedef == dignorerest | 2894 || ((oo_browser_format || funorvar) |
2895 && definedef == dignorerest) | |
2890 || (oo_browser_format | 2896 || (oo_browser_format |
2891 && (oo_browser_construct == C_ENUMERATION | 2897 && (oo_browser_construct == C_ENUMERATION |
2892 || oo_browser_construct == C_ENUM_LABEL))); | 2898 || oo_browser_construct == C_ENUM_LABEL)) |
2893 #else | 2899 #else |
2894 tok.named = (structdef == stagseen | 2900 || (funorvar |
2895 || typdef == tend | 2901 && definedef == dignorerest) |
2896 || (funorvar | 2902 #endif |
2897 && definedef == dignorerest)); | 2903 ); |
2898 #endif | |
2899 } | 2904 } |
2900 tok.lineno = lineno; | 2905 tok.lineno = lineno; |
2901 tok.linelen = tokoff + toklen + 1; | 2906 tok.linelen = tokoff + toklen + 1; |
2902 tok.buffer = newlb.buffer; | 2907 tok.buffer = newlb.buffer; |
2903 tok.linepos = newlinepos; | 2908 tok.linepos = newlinepos; |