all repos — hex @ fe7ab6a66e763b0f2d5c1b97c15566ddeb00b7eb

A tiny, minimalist, slightly-esoteric concatenative programming lannguage. 

Improvements to test failure reporting.
h3rald h3rald@h3rald.com
Tue, 03 Dec 2024 09:18:57 +0100
commit

fe7ab6a66e763b0f2d5c1b97c15566ddeb00b7eb

parent

77191c38902b63d51b0d43541f09a2efc56d11e3

1 files changed, 10 insertions(+), 0 deletions(-)

jump to
M test.hex → test.hex 
@@ -2,6 +2,7 @@ 0x0 "test-count" store
 0x0 "successes" store
 0x0 "failures" store
 () "errors" store
+() "fails" store
 
 (
     "current-test" store

@@ -15,6 +16,7 @@ )
             (
                 "x" print
                 failures 0x1 + "failures" store
+                fails test-count dec q cat "fails" store
             )
         if
     ) 

@@ -23,6 +25,7 @@ ; Store error
             errors " - Test #" test-count dec cat ": " cat error cat q cat "errors" store  
             "x" print
             failures 0x1 + "failures" store
+            fails test-count dec q cat "fails" store
         )
     try
 ) "test" store

@@ -154,5 +157,12 @@ errors (warn) each
         0x1 exit
     )
 when
+(fails len 0x0 >)
+    (
+        "Failed Tests: " fails ", " join cat warn
+        0x1 exit
+    )
+when
+
 
 0x0 exit