projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
sb-introspect: source locations for structure copiers
[sbcl.git]
/
tests
/
timer.impure.lisp
diff --git
a/tests/timer.impure.lisp
b/tests/timer.impure.lisp
index
bca8805
..
a610eb9
100644
(file)
--- a/
tests/timer.impure.lisp
+++ b/
tests/timer.impure.lisp
@@
-89,7
+89,7
@@
(with-test (:name (:timer :relative)
:fails-on '(and :sparc :linux)
(with-test (:name (:timer :relative)
:fails-on '(and :sparc :linux)
- :skipped-on :win32)
+ :skipped-on :win32)
(let* ((has-run-p nil)
(timer (make-timer (lambda () (setq has-run-p t))
:name "simple timer")))
(let* ((has-run-p nil)
(timer (make-timer (lambda () (setq has-run-p t))
:name "simple timer")))
@@
-102,7
+102,7
@@
(with-test (:name (:timer :absolute)
:fails-on '(and :sparc :linux)
(with-test (:name (:timer :absolute)
:fails-on '(and :sparc :linux)
- :skipped-on :win32)
+ :skipped-on :win32)
(let* ((has-run-p nil)
(timer (make-timer (lambda () (setq has-run-p t))
:name "simple timer")))
(let* ((has-run-p nil)
(timer (make-timer (lambda () (setq has-run-p t))
:name "simple timer")))
@@
-131,7
+131,7
@@
(with-test (:name (:timer :repeat-and-unschedule)
:fails-on '(and :sparc :linux)
(with-test (:name (:timer :repeat-and-unschedule)
:fails-on '(and :sparc :linux)
- :skipped-on :win32)
+ :skipped-on :win32)
(let* ((run-count 0)
timer)
(setq timer
(let* ((run-count 0)
timer)
(setq timer