From b3b3ff6c79718925d4f8b26119da871dc51537ec Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Thu, 23 Jul 2020 15:46:35 -0400
Subject: Support immediate blocks in dzaima/BQN bytecode backend

---
 test/bt | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

(limited to 'test')

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
-- 
cgit v1.2.3