diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-07-23 15:46:35 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-07-23 15:47:08 -0400 |
| commit | b3b3ff6c79718925d4f8b26119da871dc51537ec (patch) | |
| tree | 6c40fdb29672ad4346415f6ea5a4f7ac6eb6b3a0 /test | |
| parent | d693585bb55b3c465d64f28d5de1a0930d2dd3a6 (diff) | |
Support immediate blocks in dzaima/BQN bytecode backend
Diffstat (limited to 'test')
| -rwxr-xr-x | test/bt | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -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 |
