diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-10-17 15:26:58 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-10-17 15:26:58 -0400 |
| commit | 5c6c1c73832759cfa1e89705a26b4f90b140a819 (patch) | |
| tree | 2631b4fbeb6a7afb907fdd563c1bbdd2db69c4fc /test | |
| parent | 2d381ac8c137d5fc3eb33213c1684c25d6d6e5de (diff) | |
Remove unnecessary uses of •path now that •Import imcorporates it
Diffstat (limited to 'test')
| -rwxr-xr-x | test/dz_comp | 6 | ||||
| -rwxr-xr-x | test/dz_rt | 6 |
2 files changed, 6 insertions, 6 deletions
diff --git a/test/dz_comp b/test/dz_comp index 73806102..251d7232 100755 --- a/test/dz_comp +++ b/test/dz_comp @@ -1,8 +1,8 @@ #! /usr/bin/env dbqn -⟨DRun⟩ ← •Import •path∾"../dc.bqn" -c ← ∾(•LNS •path∾∾⟜"cases.bqn")¨""‿"b" -{𝕩: c ∾↩ (¬":"⊑∘∊⊢)¨⊸/ "1 %"⊸∾¨ (3≤≠)◶0‿(('#'≠2⊸⊑)∧" "≡2⊸↑)¨⊸/ •LNS •path∾"prim.bqn" }⍟⊢⊑(<"-prim")∊•args +⟨DRun⟩ ← •Import "../dc.bqn" +c ← ∾(•LNS ∾⟜"cases.bqn")¨""‿"b" +{𝕩: c ∾↩ (¬":"⊑∘∊⊢)¨⊸/ "1 %"⊸∾¨ (3≤≠)◶0‿(('#'≠2⊸⊑)∧" "≡2⊸↑)¨⊸/ •LNS "prim.bqn" }⍟⊢⊑(<"-prim")∊•args M ← {e‿b: (⍎e)⊸≢◶""‿{(@+10)∾˜""""∾b∾""": expected "∾e∾" but received "∾⍕𝕩} DRun b} r ← '%' M∘((+`-2⊸×)∘=⊔⊢)¨ c • ← ("All "∾(⍕≠c)∾" passed!")⍟(0=≠) ∾r @@ -2,9 +2,9 @@ # Compile and run the primitive implementations, and prim.bqn -impl ← •LNS •path∾"../src/r.bqn" +impl ← •LNS "../src/r.bqn" -⟨DRun⟩ ← •Import •path∾"../dc.bqn" +⟨DRun⟩ ← •Import "../dc.bqn" chrs←⟨ "!+-×÷⋆√⌊⌈∧∨¬|=≠≤<>≥≡≢⊣⊢⥊∾≍↑↓↕«»⌽⍉/⍋⍒⊏⊑⊐⊒∊⍷⊔" @@ -55,6 +55,6 @@ E_redef ← { # handles [fmd] [←↩] } pre ∾↩ E_isdef◶E_proc‿E_redef¨ impl -t ← (¬∘⊑':'∊⊢)¨⊸/ 3⊸↓⌾(3⊸⊑) •LNS •path∾"prim.bqn" +t ← (¬∘⊑':'∊⊢)¨⊸/ 3⊸↓⌾(3⊸⊑) •LNS "prim.bqn" res ← DRun ∾ ∾⟜(@+10)¨ pre ∾ E_proc¨ t • ← ("All "∾(⍕≠res)∾" passed!")⍟(0=≠) /res |
