[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Stange code in semantic/db-el.el
From: |
Stefan Monnier |
Subject: |
Stange code in semantic/db-el.el |
Date: |
Thu, 12 Feb 2015 09:49:36 -0500 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/25.0.50 (gnu/linux) |
In semanticdb-elisp-sym->tag (cedet/semantic/db-el.el) I see the code below:
[ This is the code in the emacs-24 branch. ]
((and (eq toktype 'type) (class-p sym))
(semantic-tag-new-type
(symbol-name sym)
"class"
(semantic-elisp-desymbolify
(eieio--class-public-a (class-v semanticdb-project-database))) ;;
slots
(semantic-elisp-desymbolify (eieio-class-parents sym)) ;; parents
))
I'm not exactly sure what this code is supposed to do, but I have the
impression that `semanticdb-project-database' above makes no sense:
I would expect to see `sym' there instead.
Is my intuition correct, or else what is this
`semanticdb-project-database' doing there?
Stefan
- Stange code in semantic/db-el.el,
Stefan Monnier <=