Supppport trains in bytecode backend

1 files changed, 4 insertions, 3 deletions

diff --git a/test/bt b/test/bt
index 4dc0ab21..a6b8eeb3 100755
--- a/test/bt
+++ b/test/bt
@@ -1,6 +1,7 @@
 #! /usr/bin/env dbqn
 
 dRun ← ⟨"dRun"⟩ •EX •path∾"../dcshim.bqn"
-c ← (¬"{"⊑∘∊⊢)¨⊸/ •LNS •path∾"cases.bqn"
-p ← '%' ⍎⊸≡⟜DRun´∘((+`-2⊸×)∘=⊔⊢)¨ c
-• ← "All passed!"⍟(0=≠) /¬p
+c ← (¬"{"⊑∘∊⊢)¨⊸/ ∾(•LNS •path∾∾⟜"cases.bqn")¨""‿"b"
+M ← {e‿b: (⍎e)⊸≢◶""‿{(•UCS 10)∾˜""""∾b∾""": expected "∾e∾" but received "∾𝕩} DRun b}
+r ← '%' M∘((+`-2⊸×)∘=⊔⊢)¨ c
+• ← "All passed!"⍟(0=≠) ∾r