]> code.delx.au - gnu-emacs/blobdiff - lisp/cedet/srecode/semantic.el
Update copyright year to 2015
[gnu-emacs] / lisp / cedet / srecode / semantic.el
index 5991b0f9b6e75e4a78d49d034c5d266573f8345d..2313fa73b7337b57f483276b1158e31868ffff33 100644 (file)
@@ -1,6 +1,6 @@
 ;;; srecode/semantic.el --- Semantic specific extensions to SRecode.
 
-;; Copyright (C) 2007, 2008, 2009, 2010, 2011 Free Software Foundation, Inc.
+;; Copyright (C) 2007-2015 Free Software Foundation, Inc.
 
 ;; Author: Eric M. Ludlam <eric@siege-engine.com>
 
@@ -351,6 +351,12 @@ as `function' will leave point where code might be inserted."
           (setq temp (srecode-semantic-find-template
                       "variable-const" prototype ctxt))
           )
+
+         ((and (semantic-tag-of-class-p tag 'include)
+               (semantic-tag-get-attribute tag :system-flag))
+          (setq temp (srecode-semantic-find-template
+                      "system-include" prototype ctxt))
+          )
          )
 
     (when (not temp)
@@ -394,7 +400,7 @@ as `function' will leave point where code might be inserted."
        (srecode-semantic-apply-tag-to-dict tagobj dict)))
 
     ;; Insert dict-entries into the dictionary LAST so that previous
-    ;; items can be overriden.
+    ;; items can be overridden.
     (let ((entries dict-entries))
       (while entries
        (srecode-dictionary-set-value dict