Mercurial > emacs
comparison lisp/cedet/semantic/db.el @ 104470:6ccad1511df1
Minor whitespace changes and `require' fixes.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Sun, 06 Sep 2009 21:22:05 +0000 |
parents | 273e528a9f9b |
children | 9787b67f48d7 |
comparison
equal
deleted
inserted
replaced
104469:ce081012a7d6 | 104470:6ccad1511df1 |
---|---|
28 ;; | 28 ;; |
29 ;; By default, assume one database per directory. | 29 ;; By default, assume one database per directory. |
30 ;; | 30 ;; |
31 | 31 |
32 (require 'eieio) | 32 (require 'eieio) |
33 ;; (require 'inversion) | |
34 ;; (eval-and-compile | |
35 ;; (inversion-require 'eieio "1.0")) | |
36 (require 'eieio-base) | 33 (require 'eieio-base) |
37 (require 'semantic) | 34 (require 'semantic) |
38 (eval-when-compile | 35 (eval-when-compile |
39 (require 'semantic/lex-spp)) | 36 (require 'semantic/lex-spp)) |
40 | 37 |
588 (oset table lastmodtime (nth 5 fattr)) | 585 (oset table lastmodtime (nth 5 fattr)) |
589 ) | 586 ) |
590 ;; Assume it is now up to date. | 587 ;; Assume it is now up to date. |
591 (oset table unmatched-syntax semantic-unmatched-syntax-cache) | 588 (oset table unmatched-syntax semantic-unmatched-syntax-cache) |
592 ;; The lexical table should be good too. | 589 ;; The lexical table should be good too. |
593 (when (featurep 'semantic-lex-spp) | 590 (when (featurep 'semantic/lex-spp) |
594 (oset table lexical-table (semantic-lex-spp-save-table))) | 591 (oset table lexical-table (semantic-lex-spp-save-table))) |
595 ;; this implies dirtyness | 592 ;; this implies dirtyness |
596 (semanticdb-set-dirty table) | 593 (semanticdb-set-dirty table) |
597 | 594 |
598 ;; Synchronize the index | 595 ;; Synchronize the index |
617 ;;(oset table tags new-tags) | 614 ;;(oset table tags new-tags) |
618 ;; We do need to mark ourselves dirty. | 615 ;; We do need to mark ourselves dirty. |
619 (semanticdb-set-dirty table) | 616 (semanticdb-set-dirty table) |
620 | 617 |
621 ;; The lexical table may be modified. | 618 ;; The lexical table may be modified. |
622 (when (featurep 'semantic-lex-spp) | 619 (when (featurep 'semantic/lex-spp) |
623 (oset table lexical-table (semantic-lex-spp-save-table))) | 620 (oset table lexical-table (semantic-lex-spp-save-table))) |
624 | 621 |
625 ;; Incremental parser doesn't mokey around with this. | 622 ;; Incremental parser doesn't mokey around with this. |
626 (oset table unmatched-syntax semantic-unmatched-syntax-cache) | 623 (oset table unmatched-syntax semantic-unmatched-syntax-cache) |
627 | 624 |