aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2020-12-14 20:10:06 -0500
committerMarshall Lochbaum <mwlochbaum@gmail.com>2020-12-14 20:10:06 -0500
commit5157ac6cb4518c152a2124c73241dc62cf19e59b (patch)
tree3bbf7aea8dfe0f6029c3e4fef374cdb902cf23d2
parentf686f1198b038dfda906406f5d30601f7f0318b4 (diff)
Use 𝕊 instead of a header in prim.bqn
-rwxr-xr-xtest/dz_comp2
-rwxr-xr-xtest/js3
-rw-r--r--test/prim.bqn2
3 files changed, 3 insertions, 4 deletions
diff --git a/test/dz_comp b/test/dz_comp
index 67fef043..c415bdf8 100755
--- a/test/dz_comp
+++ b/test/dz_comp
@@ -26,7 +26,7 @@ Native ← {⍎𝕩}
exec ← (rt¬nc)◶⟨Native˙, DRun˙, {𝕩⊸DRun}∘GetRT⟩ @
c ← ∾(•FLines ∾⟜"cases.bqn")¨""‿"b"
-{𝕩: c ∾↩ "1 %"⊸∾¨ (0<≠)◶0‿((¬":"⊑∘∊⊢)∧'#'≠⊑)¨⊸/ •FLines "prim.bqn" }⍟⊢ prim
+{𝕩: c ∾↩ "1 %"⊸∾¨ (0<≠)◶0‿('#'≠⊑)¨⊸/ •FLines "prim.bqn" }⍟⊢ prim
M ← {e‿b:
Err ← {(@+10)∾˜""""∾b∾""": expected "∾e∾" but received "∾⍕𝕩}
(Native e) ≢◶""‿Err Exec b
diff --git a/test/js b/test/js
index b756113e..f70a0ca4 100755
--- a/test/js
+++ b/test/js
@@ -13,8 +13,7 @@ if (prim || args.length==0) {
if (prim) {
let r = load('prim.bqn').split('\n')
.filter(x=>x.length>0
- &&x.charAt(0)!=='#'
- &&x.indexOf(':')===-1);
+ &&x.charAt(0)!=='#');
test = test.concat(r);
expt = expt.concat(r.map(e=>1));
}
diff --git a/test/prim.bqn b/test/prim.bqn
index 473810f6..03df0500 100644
--- a/test/prim.bqn
+++ b/test/prim.bqn
@@ -121,7 +121,7 @@
(<<2)≡<¨2
⟨1,⟨3,2,2‿2⥊⟨1,0,2,0⟩⟩,⟨5,4⟩⟩≡-⟨-1,⟨-3,-2,-¨2‿2⥊⟨1,0,2,0⟩⟩,⟨-5,-4⟩⟩
3(+¨≡+⌜)↕6
-3‿4‿5‿6‿6≡{F:F⍟(×≡)⊸∾⟜⥊´𝕩}⟨2,1⟩+⟨⟨⟨⟨1,2⟩,3⟩,4⟩,5⟩
+3‿4‿5‿6‿6≡{𝕊⍟(×≡)⊸∾⟜⥊´𝕩}⟨2,1⟩+⟨⟨⟨⟨1,2⟩,3⟩,4⟩,5⟩
(=¨⟜(⥊⟜(↕×´)3‿4)≡(↕4)=⌜˜4|⊢)1‿6‿8
# LAYER 3