mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2026-09-10 07:46:51 -04:00
Port emacs-module-tests to Solaris 10
* test/src/emacs-module-tests.el (mod-test-sum-test) (module-function-object): Also allow a function name "_DYNAMIC" (Bug#81471).
This commit is contained in:
parent
6c54097767
commit
89100e9c71
|
|
@ -69,7 +69,8 @@
|
|||
(concat "#<module function "
|
||||
"\\(at \\(0x\\)?[[:xdigit:]]+ "
|
||||
"with data 0x1234\\( from .*\\)?"
|
||||
"\\|Fmod_test_sum with data 0x1234 from .*\\)>")
|
||||
"\\|\\(Fmod_test_sum\\|_DYNAMIC\\) "
|
||||
"with data 0x1234 from .*\\)>")
|
||||
(prin1-to-string (nth 1 descr)))))
|
||||
(should (= (nth 2 descr) 3)))
|
||||
(should-error (mod-test-sum "1" 2) :type 'wrong-type-argument)
|
||||
|
|
@ -104,6 +105,7 @@ changes."
|
|||
(should (string-match-p
|
||||
(rx bos "#<module function "
|
||||
(or "Fmod_test_sum"
|
||||
"_DYNAMIC"
|
||||
(and "at 0x" (+ hex-digit)))
|
||||
" with data 0x1234"
|
||||
(? " from " (* nonl) "mod-test" (* nonl) )
|
||||
|
|
|
|||
Loading…
Reference in a new issue