aboutsummaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
authorDaniel Colascione2015-03-03 09:59:23 -0800
committerDaniel Colascione2015-03-03 10:08:08 -0800
commit15ddf7a6f211545b34f22bbab286df91e391b5aa (patch)
tree813965a0cc281143044739d945f4ebc282c1e7b5 /test
parenta6fb5e2de55b936761274f5d0895de178640ec68 (diff)
downloademacs-15ddf7a6f211545b34f22bbab286df91e391b5aa.tar.gz
emacs-15ddf7a6f211545b34f22bbab286df91e391b5aa.zip
Rename gc-precise-p to gc-precise
2015-03-03 Daniel Colascione <dancol@dancol.org> * alloc.c (syms_of_alloc): Rename `gc-precise-p' to `gc-precise'. 2015-03-03 Daniel Colascione <dancol@dancol.org> * automated/finalizer-tests.el (finalizer-basic) (finalizer-circular-reference, finalizer-cross-reference) (finalizer-error): Rename `gc-precise-p' to `gc-precise'. * automated/generator-tests.el (cps-test-iter-close-finalizer): Rename `gc-precise-p' to `gc-precise'.
Diffstat (limited to 'test')
-rw-r--r--test/ChangeLog9
-rw-r--r--test/automated/finalizer-tests.el8
-rw-r--r--test/automated/generator-tests.el2
3 files changed, 14 insertions, 5 deletions
diff --git a/test/ChangeLog b/test/ChangeLog
index d8d3fc80f06..6ff35afa66b 100644
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -1,3 +1,12 @@
12015-03-03 Daniel Colascione <dancol@dancol.org>
2
3 * automated/finalizer-tests.el (finalizer-basic)
4 (finalizer-circular-reference, finalizer-cross-reference)
5 (finalizer-error): Rename `gc-precise-p' to `gc-precise'.
6
7 * automated/generator-tests.el (cps-test-iter-close-finalizer):
8 Rename `gc-precise-p' to `gc-precise'.
9
12015-03-03 Glenn Morris <rgm@gnu.org> 102015-03-03 Glenn Morris <rgm@gnu.org>
2 11
3 * automated/generator-tests.el (cps-while-incf): 12 * automated/generator-tests.el (cps-while-incf):
diff --git a/test/automated/finalizer-tests.el b/test/automated/finalizer-tests.el
index 4bf8bb1a318..142152e3fb0 100644
--- a/test/automated/finalizer-tests.el
+++ b/test/automated/finalizer-tests.el
@@ -31,7 +31,7 @@
31 31
32(ert-deftest finalizer-basic () 32(ert-deftest finalizer-basic ()
33 "Test that finalizers run at all." 33 "Test that finalizers run at all."
34 (skip-unless gc-precise-p) 34 (skip-unless gc-precise)
35 (let* ((finalized nil) 35 (let* ((finalized nil)
36 (finalizer (make-finalizer (lambda () (setf finalized t))))) 36 (finalizer (make-finalizer (lambda () (setf finalized t)))))
37 (garbage-collect) 37 (garbage-collect)
@@ -42,7 +42,7 @@
42 42
43(ert-deftest finalizer-circular-reference () 43(ert-deftest finalizer-circular-reference ()
44 "Test references from a callback to a finalizer." 44 "Test references from a callback to a finalizer."
45 (skip-unless gc-precise-p) 45 (skip-unless gc-precise)
46 (let ((finalized nil)) 46 (let ((finalized nil))
47 (let* ((value nil) 47 (let* ((value nil)
48 (finalizer (make-finalizer (lambda () (setf finalized value))))) 48 (finalizer (make-finalizer (lambda () (setf finalized value)))))
@@ -53,7 +53,7 @@
53 53
54(ert-deftest finalizer-cross-reference () 54(ert-deftest finalizer-cross-reference ()
55 "Test that between-finalizer references do not prevent collection." 55 "Test that between-finalizer references do not prevent collection."
56 (skip-unless gc-precise-p) 56 (skip-unless gc-precise)
57 (let ((d nil) (fc 0)) 57 (let ((d nil) (fc 0))
58 (let* ((f1-data (cons nil nil)) 58 (let* ((f1-data (cons nil nil))
59 (f2-data (cons nil nil)) 59 (f2-data (cons nil nil))
@@ -68,7 +68,7 @@
68 68
69(ert-deftest finalizer-error () 69(ert-deftest finalizer-error ()
70 "Test that finalizer errors are suppressed" 70 "Test that finalizer errors are suppressed"
71 (skip-unless gc-precise-p) 71 (skip-unless gc-precise)
72 (make-finalizer (lambda () (error "ABCDEF"))) 72 (make-finalizer (lambda () (error "ABCDEF")))
73 (garbage-collect) 73 (garbage-collect)
74 (with-current-buffer "*Messages*" 74 (with-current-buffer "*Messages*"
diff --git a/test/automated/generator-tests.el b/test/automated/generator-tests.el
index 0721009d70b..a8607f9274d 100644
--- a/test/automated/generator-tests.el
+++ b/test/automated/generator-tests.el
@@ -261,7 +261,7 @@ identical output.
261 (should (not cps-test-closed-flag))))) 261 (should (not cps-test-closed-flag)))))
262 262
263(ert-deftest cps-test-iter-close-finalizer () 263(ert-deftest cps-test-iter-close-finalizer ()
264 (skip-unless gc-precise-p) 264 (skip-unless gc-precise)
265 (garbage-collect) 265 (garbage-collect)
266 (let ((cps-test-closed-flag nil)) 266 (let ((cps-test-closed-flag nil))
267 (let ((iter (funcall 267 (let ((iter (funcall