projects
/
fiveam.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
52208b4
)
minor indentation fix
author
Marco Baringer
<mb@bese.it>
Wed, 18 Jan 2006 10:47:06 +0000
(11:47 +0100)
committer
Marco Baringer
<mb@bese.it>
Wed, 18 Jan 2006 10:47:06 +0000
(11:47 +0100)
src/run.lisp
patch
|
blob
|
history
diff --git
a/src/run.lisp
b/src/run.lisp
index
54a9020
..
274521e
100644
(file)
--- a/
src/run.lisp
+++ b/
src/run.lisp
@@
-125,11
+125,11
@@
run."))
(with-run-state (result-list)
(bind-run-state ((current-test test))
(labels ((abort-test (e)
(with-run-state (result-list)
(bind-run-state ((current-test test))
(labels ((abort-test (e)
- (add-result 'unexpected-test-failure
- :test-expr nil
- :test-case test
- :reason (format nil "Unexpected Error: ~S." e)
- :condition e))
+ (add-result 'unexpected-test-failure
+ :test-expr nil
+ :test-case test
+ :reason (format nil "Unexpected Error: ~S." e)
+ :condition e))
(run-it ()
(let ((result-list '()))
(declare (special result-list))
(run-it ()
(let ((result-list '()))
(declare (special result-list))