Merge pull request #942 from dpk/newlines-in-verbose-test-output

`(chibi test)`: Put newlines after test results etc in verbose mode
ashinn · Nov 7, 2023 · af41e2b · af41e2b
2 parents fe93067 + a277a5d
commit af41e2b
Showing 1 changed file with 9 additions and 4 deletions.
diff --git a/lib/chibi/test.scm b/lib/chibi/test.scm
@@ -701,7 +701,8 @@
     (if (not (eq? status 'ERROR)) (display " ")) ; pad
     (display (test-status-message status))
     (display "]")
-    (test-print-failure indent status info))
+    (test-print-failure indent status info)
+    (newline))
    ((eq? status 'SKIP))
    (else
     (display (test-status-code status))
@@ -816,7 +817,8 @@
         (display (plural " subgroup" subgroups-pass))
         (display " passed.")))
     (when (test-group-ref group 'verbose)
-      (display (test-group-line group #f)))
+      (display (test-group-line group #f))
+      (newline))
     (cond
      ((test-group-ref group 'parent)
       => (lambda (parent)
@@ -830,8 +832,11 @@
 
 (define test-default-group-reporter
   (case-lambda
-   ((group)        (close-group group))
-   ((group parent) (display (test-group-line group 'open)))))
+    ((group)
+     (close-group group))
+    ((group parent)
+     (display (test-group-line group 'open))
+     (newline))))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; parameters