aboutsummaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
Diffstat (limited to 'test')
-rwxr-xr-xtest/bt5
1 files changed, 2 insertions, 3 deletions
diff --git a/test/bt b/test/bt
index 29c1e1e5..c5ca1399 100755
--- a/test/bt
+++ b/test/bt
@@ -1,9 +1,8 @@
#! /usr/bin/env dbqn
dRun ← ⟨"dRun"⟩ •EX •path∾"../cshim.bqn"
-l ← ∾(•LNS •path∾∾⟜"cases.bqn")¨""‿"b"
-{ l ∾↩ "1 %"⊸∾¨ (3≤≠)◶0‿(('#'≠2⊸⊑)∧" "≡2⊸↑)¨⊸/ •LNS •path∾"testref.bqn" }⍟⊢(<"-ref")∊•args
-c ← (¬"{"⊑∘∊⊢)¨⊸/ l
+c ← ∾(•LNS •path∾∾⟜"cases.bqn")¨""‿"b"
+{ c ∾↩ (¬"{"⊑∘∊⊢)¨⊸/ "1 %"⊸∾¨ (3≤≠)◶0‿(('#'≠2⊸⊑)∧" "≡2⊸↑)¨⊸/ •LNS •path∾"testref.bqn" }⍟⊢(<"-ref")∊•args
M ← {e‿b: (⍎e)⊸≢◶""‿{(•UCS 10)∾˜""""∾b∾""": expected "∾e∾" but received "∾⍕𝕩} DRun b}
r ← '%' M∘((+`-2⊸×)∘=⊔⊢)¨ c
• ← ("All "∾(⍕≠c)∾" passed!")⍟(0=≠) ∾r