; Suppress empty-body warnings in cedet/semantic

diff --git a/lisp/cedet/semantic/lex-spp.el b/lisp/cedet/semantic/lex-spp.el
index 390c13ec98bb4955a3eb9dd8b5bd41178c1e05ac..f3704f9a4d4e9b9d79e60c01802442be47171eef 100644 (file)
--- a/lisp/cedet/semantic/lex-spp.el
+++ b/lisp/cedet/semantic/lex-spp.el
@@ -1243,7 +1243,7 @@ Finds the header file belonging to NAME, gets the macros
 from that file, and then merge the macros with our current
 symbol table."
   (when semantic-lex-spp-use-headers-flag
-    ;; @todo - do this someday, ok?
+    nil  ; @todo - do this someday, ok?
     ))
 
 (defmacro define-lex-spp-include-analyzer (name doc regexp tokidx

diff --git a/lisp/cedet/semantic/lex.el b/lisp/cedet/semantic/lex.el
index 264b2027711a04185529a4c61f0bee6f41bcc797..e4bce67c6f7cda17f152094758bba2ca6221b9e9 100644 (file)
--- a/lisp/cedet/semantic/lex.el
+++ b/lisp/cedet/semantic/lex.el
@@ -1108,7 +1108,7 @@ This can be done by using `semantic-lex-push-token'."
             (semantic-lex-analysis-bounds (cons (point) (point-max)))
             (semantic-lex-current-depth 0)
             (semantic-lex-maximum-depth semantic-lex-depth))
-        (when ,condition ,@forms)
+        (when ,condition nil ,@forms)  ; `nil' avoids an empty-body warning.
         semantic-lex-token-stream))))
 
 (defmacro define-lex-regex-analyzer (name doc regexp &rest forms)