emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] scratch/merge-cedet-tests 4972b30 176/316: (ede, ede-make)


From: Edward John Steere
Subject: [Emacs-diffs] scratch/merge-cedet-tests 4972b30 176/316: (ede, ede-make): New require (cit-srecode-verify-tags): Fix debugging output on failure. Patch from David Engster (cit-compile-and-wait): Use ede-make-command
Date: Fri, 27 Jan 2017 20:03:38 +0000 (UTC)

branch: scratch/merge-cedet-tests
commit 4972b30edb21b3644f5c31a31edeadd6541c1c72
Author: zappo <address@hidden>
Commit: Edward John Steere <address@hidden>

    (ede, ede-make): New require (cit-srecode-verify-tags): Fix debugging 
output on failure. Patch from David Engster (cit-compile-and-wait): Use 
ede-make-command
---
 test/manual/cedet/cedet-integ-test.el |   14 ++++++++++----
 1 file changed, 10 insertions(+), 4 deletions(-)

diff --git a/test/manual/cedet/cedet-integ-test.el 
b/test/manual/cedet/cedet-integ-test.el
index 50a1132..bac2624 100644
--- a/test/manual/cedet/cedet-integ-test.el
+++ b/test/manual/cedet/cedet-integ-test.el
@@ -64,6 +64,9 @@
 ;;    a Make sure the semanticdb cleans up the dead cache files.
 ;;    b Make sure EDE clears this project from it's project cache.
 (require 'semantic)
+(require 'ede)
+(require 'data-debug)
+(require 'ede-make)
 (require 'cit-cpp)
 (require 'cit-srec)
 (require 'cit-el)
@@ -224,8 +227,11 @@ are found, but don't error if they are not their."
        )
 
        (t ;; Not the same
-       (semantic-adebug-show (cit-tag-verify-error-debug
-                              "Dbg" :actual T1 :expected T2))
+       (data-debug-new-buffer "*Test Failure*")
+       (data-debug-insert-thing
+        (cit-tag-verify-error-debug "Dbg" :actual T1 :expected T2)
+        ">" "")
+        )
 
        (error "Tag %s does not match %s"
               (semantic-format-tag-name T1)
@@ -234,7 +240,7 @@ are found, but don't error if they are not their."
        ))
 
     (setq actual (cdr actual))
-    ))
+    )
 
 (defun cit-compile-and-wait ()
   "Compile our current project, but wait for it to finish."
@@ -242,7 +248,7 @@ are found, but don't error if they are not their."
   ;; 1 f) Create a build file.
   (ede-proj-regenerate)
   ;; 1 g) build the sources.
-  (compile "make")
+  (compile ede-make-command)
 
   (while compilation-in-progress
     (accept-process-output)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]