test/scm.test: update.

This commit is contained in:
Jan Nieuwenhuizen 2016-10-10 22:42:05 +02:00
parent 2e1685dc2d
commit c6ce1662e4

View file

@ -177,9 +177,4 @@
(pass-if "char-alphabetic?" (seq? (char-alphabetic? #\a) #t))
(pass-if "char-alphabetic? 2" (seq? (char-alphabetic? #\[) #f))
(newline)
(display "passed: ") (display (car (result))) (newline)
(display "failed: ") (display (cadr (result))) (newline)
(display "total: ") (display (apply + (result))) (newline)
(exit (cadr (result)))
(result 'report)