Test epc:test-add using ert

kiwanami · Jan 8, 2016 · 8b4f908 · 8b4f908
1 parent 343595a
commit 8b4f908
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/test-epc.el b/test-epc.el
@@ -72,17 +72,17 @@
      (deferred:watch it dfinish)
      (deferred:sync! it))))
 
-(defun epc:test-add ()
+(ert-deftest epc:test-add ()
   (epc:with-self-server-client
    (lambda (mngr)
      (epc:define-method mngr 'add '+))
    (deferred:$
      (epc:call-deferred client-mngr 'add '(1 2 3))
      (deferred:nextc it
        (lambda (x)
-         (if (equal 6 x) t
-           (format "Return : [%s]" x))))
-     (deferred:watch it dfinish))))
+         (should (equal 6 x))))
+     (deferred:watch it dfinish)
+     (deferred:sync! it))))
 
 (defun epc:test-deferred ()
   (epc:with-self-server-client