Test reference layer 0 (assumed) primitives on non-numbers

1 files changed, 25 insertions, 0 deletions

diff --git a/test/cases/prim.bqn b/test/cases/prim.bqn
index 03df0500..a191ee30 100644
--- a/test/cases/prim.bqn
+++ b/test/cases/prim.bqn
@@ -4,28 +4,53 @@
 # LAYER 0
 0≡¯2+2
 1e4≡5e3+5e3
+'c'≡'a'+2
+'a'≡¯2+'c'
+! % 'a'+'c'
+! % F←-⋄f+2
 ¯∞≡1e6-∞
 4≡-¯4
 ¯∞≡-∞
 ∞≡-¯∞
 4≡9-5
+@≡'a'-97
+! % 97-'a'
+! % @-1
+! % -'a'
+! % F←÷⋄-f
 1.5≡3×0.5
+! % 2×'a'
 4≡÷0.25
 ∞≡÷0
 0≡÷∞
+! % ÷'b'
+! % F←√-⋄÷f
 1≡⋆0
 ¯1≡¯1⋆5
 1≡¯1⋆¯6
+! % ⋆'π'
+! % 'e'⋆'π'
 3≡⌊3.9
 ¯4≡⌊¯3.9
 ∞≡⌊∞
 ¯∞≡⌊¯∞
 ¯1e30≡⌊¯1e30
+! % F←⌈⋄⌊f
 1≡1=1
 0≡¯1=∞
+1≡'a'='a'
+0≡'a'='A'
+1≡{F←+⋄f=f}
+0≡{_op←{𝕗}⋄op='o'}
+0≡{F←{𝕩}⋄G←{𝕩}⋄f=g}
+1≡{F←{𝕩}⋄f=f}
 1≡1≤1
 1≡¯∞≤¯1e3
 0≡∞≤¯∞
+1≡∞≤@
+0≡'z'≤¯0.5
+0≡'c'≤'a'
+! % F←+⋄G←-⋄f≤g
 ⟨⟩≡≢<2
 ⟨3⟩≡≢"abc"
 ⟨2,3⟩≡≢>"abc"‿"fed"