aboutsummaryrefslogtreecommitdiff
path: root/test/cases
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2021-01-05 19:20:54 -0500
committerMarshall Lochbaum <mwlochbaum@gmail.com>2021-01-05 19:20:54 -0500
commitf5348c073887447251c24c7d46eea50227d9fdc5 (patch)
tree8f5512d7a5ab839472f326918b832657a4f14e24 /test/cases
parent3ca28aedee807eb09f95e03f3bcd03f9ceb7c22d (diff)
Test layer 5 error checking
Diffstat (limited to 'test/cases')
-rw-r--r--test/cases/prim.bqn38
1 files changed, 37 insertions, 1 deletions
diff --git a/test/cases/prim.bqn b/test/cases/prim.bqn
index 2b80ffe7..7582e53a 100644
--- a/test/cases/prim.bqn
+++ b/test/cases/prim.bqn
@@ -203,6 +203,7 @@
! % ↕2.4
! % ↕<6
! % ↕≍2‿3
+! % ↕¯1‿2
(<6⥊0)(⊑≡<∘⊑∘⊢)(6⥊1)⥊5
¯6≡1‿0◶(2‿2⥊0‿0‿-‿0)6
! % -˙◶÷‿× 4
@@ -283,50 +284,85 @@
# LAYER 5
(<'a')≡⊏"abc"
+! % ⊏""
"a"≡⊏⥊˘"abc"
+! % ⊏0‿3⥊""
(<'c')≡2⊏"abc"
+! % 3⊏"abc"
+! % 1.5⊏"abc"
+! % 'x'⊏"abc"
(<'c')≡¯1⊏"abc"
"ccc"≡2‿¯1‿2⊏"abc"
+! % ⟨⥊0,1⟩⊏≍"abc"
((3-˜↕5)⊸⊏≡2⊸⌽)↕5‿2
(0‿3⥊0)≡⟨⟩⊏2‿3⥊↕6
⟨3‿0,2‿1‿2⟩(×⟜5⊸+⌜´∘⊣≡⊏)⥊⟜(↕×´)6‿5
+! % 0‿0<¨⊸⊏"abc"
(2‿0⥊0)≡⟨3‿¯1,⟨⟩⟩⊏4‿3⥊0
+! % ⟨3‿¯∞,⟨⟩⟩⊏4‿3⥊0
5‿1(<⊸⊏≡⊏)↕6‿2
+! % (≍≍<5‿1)⊏↕6‿2
⟨4‿0,1‿2‿3‿2‿1‿0⟩(+⌜´⊸(×⌜)≡⊏⟜(×⌜˜))+⌜˜↕5
"abc"≡3↑"abce"
"e"≡¯1↑"abce"
""≡0↑"ab"
+! % 2.5↑"abce"
(<⟜3⊸×↕5)≡5↑↕3
(6⥊0)≡¯6↑↕0
(≍↕3)≡1↑2‿3⥊↕6
(↑⟜4≡⥊⟜0)↕3
-(≍"abc")≡1↑2‿3↑"abcd"
+(≍"abc")≡(<1)↑2‿3↑"abcd"
+! % 2‿'c'↑"abcd"
+! % (≍2‿3)↑"abcd"
(6⥊1)(↑≡⥊⟜⊑)2‿3⥊↕6
(↕¨∘↕∘(1⊸+)≡↑∘↕)5
(↑≡((↕4)≍¨2)⥊¨<)3‿2⥊"abcdef"
"d"≡3↓"abcd"
+! % 0.1↓"abcd"
+! % ⟨∘⟩↓"abcd"
1‿2≡⟜(¯3⊸↓)○↕4‿2
1‿1‿3‿2‿1≡≢(5⥊0)↓↕3‿2‿1
(↓∘↕≡↕∘(1⊸+)+⟜⌽↑∘↕)5
(↕3‿4)≡1↓¨⊏↕2‿3‿4
(4+⌜○↕2)≡2↕↕5
+! % @↕↕5
+! % 2‿1↕↕5
+! % ¯1↕↕5
+! % 7↕↕5
⟨⟩(↕≡⊢)4‿3⥊"abcd"
(0⊸↕≡(0≍˜1+≠)⊸⥊)↕6
(7↕6‿0⥊"")≡0‿7‿0⥊""
+! % ⌽'a'
+! % ⌽<∞
≡⟜⌽⟨⟩
≡⟜⌽"a"
"ba"≡⟜⌽"ab"
(⌽≡(1-˜≠)(-○⊑∾1↓⊢)⚇1⊢)↕3‿2‿4
≡⟜⌽↕↕3
+! % 2⌽'a'
+! % 1‿2⌽↕4
+! % ⌽‿2⌽3+⌜○↕4
+! % (<<3)⌽↕4
∧´5(⌽≡⊢)¨⟨"",⥊∞,↕5,↕0‿4,2‿0‿3⥊""⟩
∧´("bcdea"≡⌽⟜"abcde")¨1+5ׯ10‿¯2‿¯1‿0‿1‿6‿61
∧´⟨1,0‿2,¯1‿1‿3⟩(⊑∘⌽≡(3⊸↑)⊸⊑)⚇¯1‿∞ 2‿3‿5⥊"abcdef"
⟨⟩(⌽≡⊢)'a'
+! % /2
+! % /1‿¯1‿0
+! % /=⌜˜↕2
0‿4≡/1‿0‿0‿0‿1‿0
1‿1‿2≡/0‿2‿1
≡⟜/⟨⟩
+! % 2/<2
+! % 0‿1/"abc"
+! % ⟨↕3,↕3⟩/"abc"
+! % 1‿2/○≍"ab"
+! % ¯1‿2/"ab"
"aabbcc"≡2/"abc"
+""≡4/""
+(6‿0⥊"")≡⟨5,1⟩‿⟨⟩/2‿0⥊""
3‿3‿3‿2‿2‿1≡/˜3‿2‿1
+3‿3‿3‿2‿2‿1≡<⊸/3‿2‿1
(≍1∾¨1‿2‿2)≡(↕¨/↕)2‿3
⟨⟩(/≡⊢)≍"ab"