[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] scratch/last-cedet-merge b893e8a 41/50: semantic: Allow em
From: |
David Engster |
Subject: |
[Emacs-diffs] scratch/last-cedet-merge b893e8a 41/50: semantic: Allow empty type relation separation character |
Date: |
Wed, 25 Jan 2017 22:15:23 +0000 (UTC) |
branch: scratch/last-cedet-merge
commit b893e8a66b5599f28bf358ff7bafbc0386e250e1
Author: Eric Ludlam <address@hidden>
Commit: David Engster <address@hidden>
semantic: Allow empty type relation separation character
* lisp/cedet/semantic/ctxt.el (semantic-ctxt-current-symbol-default):
Allow the type relation separator to be empty for languages that
don't have symbol sequences, such as grammars and Lisp.
---
lisp/cedet/semantic/ctxt.el | 11 +++++++----
1 file changed, 7 insertions(+), 4 deletions(-)
diff --git a/lisp/cedet/semantic/ctxt.el b/lisp/cedet/semantic/ctxt.el
index 78e5ec5..4ebc68f 100644
--- a/lisp/cedet/semantic/ctxt.el
+++ b/lisp/cedet/semantic/ctxt.el
@@ -454,7 +454,8 @@ This will include a list of type/field names when
applicable.
Depends on `semantic-type-relation-separator-character'."
(save-excursion
(if point (goto-char point))
- (let* ((fieldsep1 (mapconcat (lambda (a) (regexp-quote a))
+ (let* ((dosequence (not (null semantic-type-relation-separator-character)))
+ (fieldsep1 (mapconcat (lambda (a) (regexp-quote a))
semantic-type-relation-separator-character
"\\|"))
;; NOTE: The [ \n] expression below should used \\s-, but that
@@ -491,9 +492,11 @@ Depends on `semantic-type-relation-separator-character'."
;; Now that we have gotten started, let's do the rest.
(condition-case nil
- (while (save-excursion
- (forward-char -1)
- (looking-at "\\w\\|\\s_"))
+ (while (and
+ (or dosequence (not symlist))
+ (save-excursion
+ (forward-char -1)
+ (looking-at "\\w\\|\\s_")))
;; We have a symbol.. Do symbol things
(forward-sexp -1)
(setq symlist (cons (buffer-substring-no-properties (point) end)
- [Emacs-diffs] scratch/last-cedet-merge ec4505d 17/50: semantic: Accept FLAGS in texinfo-mode for analyzing completions, (continued)
- [Emacs-diffs] scratch/last-cedet-merge ec4505d 17/50: semantic: Accept FLAGS in texinfo-mode for analyzing completions, David Engster, 2017/01/25
- [Emacs-diffs] scratch/last-cedet-merge 0a2b38b 26/50: EDE: Expand file name, David Engster, 2017/01/25
- [Emacs-diffs] scratch/last-cedet-merge 2b42323 35/50: EDE: Fix for project detection, David Engster, 2017/01/25
- [Emacs-diffs] scratch/last-cedet-merge cfd7139 28/50: semantic: Some C grammar optimizations, David Engster, 2017/01/25
- [Emacs-diffs] scratch/last-cedet-merge 278c06c 31/50: semantic: Optimize 'typeformbase' in C grammar, David Engster, 2017/01/25
- [Emacs-diffs] scratch/last-cedet-merge 8daca76 30/50: semantic: C grammar optimizations, David Engster, 2017/01/25
- [Emacs-diffs] scratch/last-cedet-merge 74263b1 37/50: semantic: Change unary expression rule, David Engster, 2017/01/25
- [Emacs-diffs] scratch/last-cedet-merge cfc56f5 38/50: semantic: Fix for db-global, David Engster, 2017/01/25
- [Emacs-diffs] scratch/last-cedet-merge ebc8418 40/50: semantic: Check if slot is bound, David Engster, 2017/01/25
- [Emacs-diffs] scratch/last-cedet-merge b4bcc84 32/50: semantic: completion fixes, David Engster, 2017/01/25
- [Emacs-diffs] scratch/last-cedet-merge b893e8a 41/50: semantic: Allow empty type relation separation character,
David Engster <=
- [Emacs-diffs] scratch/last-cedet-merge 592b5fe 48/50: semantic: Improve C++ 'friend' parsing, David Engster, 2017/01/25
- [Emacs-diffs] scratch/last-cedet-merge 742013b 42/50: semantic: Improve grammar-mode, David Engster, 2017/01/25
- [Emacs-diffs] scratch/last-cedet-merge 9c2feac 49/50: CEDET: Fix "obsolete name arg [...] to constructor" warnings, David Engster, 2017/01/25