From: Paul Eggert <eggert@cs.ucla.edu>
Date: Thu, 15 Aug 2019 09:06:04 +0000 (-0700)
Subject: Port mod-test-nanoseconds to 32-bit Emacs
X-Git-Tag: emacs-27.0.90~1615
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=311fcab8f805cd5cc6eacfe37e97423cd73a795b;p=emacs.git

Port mod-test-nanoseconds to 32-bit Emacs

* test/src/emacs-module-tests.el (mod-test-nanoseconds):
Don’t assume -1000000000 is a fixnum.
---

diff --git a/test/src/emacs-module-tests.el b/test/src/emacs-module-tests.el
index 96a604f9824..c44c386d30b 100644
--- a/test/src/emacs-module-tests.el
+++ b/test/src/emacs-module-tests.el
@@ -368,7 +368,7 @@ Interactively, you can try hitting \\[keyboard-quit] to quit."
     (let ((input (car test-case))
           (expected (cdr test-case)))
       (ert-info ((format "input: %S, expected result: %d" input expected))
-        (should (eq (mod-test-nanoseconds input) expected))))))
+        (should (= (mod-test-nanoseconds input) expected))))))
 
 (ert-deftest mod-test-double ()
   (dolist (input (list 0 1 2 -1 42 12345678901234567890