X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=tests%2Fautomated%2Flisp-tests.el;h=b2b6077858a3d64840530adef390fc419165fb14;hb=efdb31fd4c8db81d2414c32d491f1bf994263c74;hp=8f4bbfbb1f8da694e06f31e9cef0b42bb62d77ad;hpb=75d621fb12f4d3bc3e2eecefac39fe62eecbd431;p=chise%2Fxemacs-chise.git

diff --git a/tests/automated/lisp-tests.el b/tests/automated/lisp-tests.el
index 8f4bbfb..b2b6077 100644
--- a/tests/automated/lisp-tests.el
+++ b/tests/automated/lisp-tests.el
@@ -243,6 +243,8 @@
   (Assert (= (- one) -1))
   (Assert (= (- one one) 0))
   (Assert (= (- one one one) -1))
+  (Assert (= (- 0 one) -1))
+  (Assert (= (- 0 one one) -2))
   (Assert (= (+ one 1) 2))
   (dolist (zero '(0 0.0 ?\0))
     (Assert (= (+ 1 zero) 1))