summaryrefslogtreecommitdiff
path: root/test/src
diff options
context:
space:
mode:
Diffstat (limited to 'test/src')
-rw-r--r--test/src/emacs-module-tests.el8
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."
(load so nil nil :nosuffix :must-suffix)
(delete-file so))))
+(ert-deftest module/function-finalizer ()
+ (mod-test-make-function-with-finalizer)
+ (let* ((previous-calls (mod-test-function-finalizer-calls))
+ (expected-calls (copy-sequence previous-calls)))
+ (cl-incf (car expected-calls))
+ (garbage-collect)
+ (should (equal (mod-test-function-finalizer-calls) expected-calls))))
+
;;; emacs-module-tests.el ends here