Newlines at EOFs

svn: r15380

original commit: a70bf64fd9d68487c128282ca85a8964e1592711
This commit is contained in:
Eli Barzilay 2009-07-04 02:28:31 +00:00
parent 0d7e729c8b
commit b6f7d53d13
6 changed files with 5 additions and 6 deletions

View File

@ -13,4 +13,4 @@
scribble/manual)
(for-label (all-from-out scheme/base
schemeunit
schemeunit/text-ui)))
schemeunit/text-ui)))

View File

@ -51,4 +51,4 @@
;; This check should display "I didn't run"
(parameterize
([current-check-around (lambda (t) (display "I didn't run\n"))])
(check = 1 1 0.0))
(check = 1 1 0.0))

View File

@ -17,4 +17,4 @@
;; Thesse should raise failures
(test-begin (check-eq? 1 2))
(test-case "failure" (check-eq? 1 2))
(test-case "failure" (check-eq? 1 2))

View File

@ -54,4 +54,4 @@
(define yes #t)
(check-true yes)))))))
))
))

View File

@ -68,4 +68,4 @@
(provide test-suite-tests)
(provide test-suite-tests)

View File

@ -290,4 +290,3 @@
(run-test
(make-test-case "dummy" (lambda () (check-true #t)))))))
))