[Emacs-diffs] master 89b5a82: Fix last change for MS-Windows

[Eli Zaretskii]

branch: master
commit 89b5a8283375f83b8f0e174a3a8760158b99be6e
Author: Eli Zaretskii <address@hidden>
Commit: Eli Zaretskii <address@hidden>

    Fix last change for MS-Windows
    
    * test/src/emacs-module-tests.el (module-function-object): Port to
    MS-Windows.
---
 test/src/emacs-module-tests.el | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/test/src/emacs-module-tests.el b/test/src/emacs-module-tests.el
index 7859fc5..8cef1cf 100644
--- a/test/src/emacs-module-tests.el
+++ b/test/src/emacs-module-tests.el
@@ -78,7 +78,12 @@ changes."
       (let ((obj (nth 2 body)))
         (should (equal (type-of obj) 'module-function))
         (should (string-match-p
-                 (rx "#<module function Fmod_test_sum from "
+                 (rx (or "#<module function Fmod_test_sum from "
+                         ;; MS-Windows doesn't allow us to get the
+                         ;; function name, only the address.
+                         "#<module function at 0x"
+                         (one-or-more hex-digit)
+                         "from ")
                      (* nonl) "mod-test" (* nonl) ">")
                  (prin1-to-string obj)))))))