diff options
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/emacs-module-tests.el | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/test/src/emacs-module-tests.el b/test/src/emacs-module-tests.el index a2cb3e9b498..4f5871be5eb 100644 --- a/test/src/emacs-module-tests.el +++ b/test/src/emacs-module-tests.el | |||
| @@ -402,4 +402,12 @@ See Bug#36226." | |||
| 402 | (load so nil nil :nosuffix :must-suffix) | 402 | (load so nil nil :nosuffix :must-suffix) |
| 403 | (delete-file so)))) | 403 | (delete-file so)))) |
| 404 | 404 | ||
| 405 | (ert-deftest module/function-finalizer () | ||
| 406 | (mod-test-make-function-with-finalizer) | ||
| 407 | (let* ((previous-calls (mod-test-function-finalizer-calls)) | ||
| 408 | (expected-calls (copy-sequence previous-calls))) | ||
| 409 | (cl-incf (car expected-calls)) | ||
| 410 | (garbage-collect) | ||
| 411 | (should (equal (mod-test-function-finalizer-calls) expected-calls)))) | ||
| 412 | |||
| 405 | ;;; emacs-module-tests.el ends here | 413 | ;;; emacs-module-tests.el ends here |