aboutsummaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
authorDaniel Colascione2015-03-02 19:08:06 -0800
committerDaniel Colascione2015-03-02 19:08:06 -0800
commit2cc23f170f920cbfc9df4c28bce6ca9d82c4e6cd (patch)
treeba2ba78402bf75eed26d3f20abeac5c02eb74694 /test
parent8af3e1848cbdc570b6c173480c2988a552f3f74d (diff)
downloademacs-2cc23f170f920cbfc9df4c28bce6ca9d82c4e6cd.tar.gz
emacs-2cc23f170f920cbfc9df4c28bce6ca9d82c4e6cd.zip
Finalizer documentation, minor improvements
* doc/lispref/objects.texi (Finalizer Type): New section (Type Predicates): Mention finalizers in `type-of' documentation. * doc/lispref/elisp.texi (Top): Link to finalizer type. * src/data.c (Ftype_of): Make `type-of' work with finalizers. (syms_of_data): Register Qfinalizer. * src/print.c (print_object): Print whether a finalizer has been called. * test/automated/finalizer-tests.el (finalizer-object-type): Test that `type-of' works correctly for finalizers.
Diffstat (limited to 'test')
-rw-r--r--test/ChangeLog5
-rw-r--r--test/automated/finalizer-tests.el3
2 files changed, 8 insertions, 0 deletions
diff --git a/test/ChangeLog b/test/ChangeLog
index 64ad85198af..3a311e97aa5 100644
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -1,3 +1,8 @@
12015-03-03 Daniel Colascione <dancol@dancol.org>
2
3 * automated/finalizer-tests.el (finalizer-object-type): Test that
4 `type-of' works correctly for finalizers.
5
12015-03-02 Daniel Colascione <dancol@dancol.org> 62015-03-02 Daniel Colascione <dancol@dancol.org>
2 7
3 * automated/generator-tests.el: New tests 8 * automated/generator-tests.el: New tests
diff --git a/test/automated/finalizer-tests.el b/test/automated/finalizer-tests.el
index 5308f01085b..4746dbea9b7 100644
--- a/test/automated/finalizer-tests.el
+++ b/test/automated/finalizer-tests.el
@@ -76,3 +76,6 @@
76 (should (equal 76 (should (equal
77 (buffer-substring (point) (point-at-eol)) 77 (buffer-substring (point) (point-at-eol))
78 "finalizer failed: (error \"ABCDEF\")"))))) 78 "finalizer failed: (error \"ABCDEF\")")))))
79
80(ert-deftest finalizer-object-type ()
81 (should (equal (type-of (make-finalizer nil)) 'finalizer)))