more tests

purescript · Mar 27, 2018 · e2d4b1d · e2d4b1d
1 parent 1c518db
commit e2d4b1d
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/test/Test/Data/String.purs b/test/Test/Data/String.purs
@@ -212,4 +212,8 @@ testString = do
   assert $ slice 0 1   "purescript" == Just "p"
   assert $ slice 3 6   "purescript" == Just "esc"
   assert $ slice (-4) (-1) "purescript" == Just "rip"
-  assert $ slice (-4) 3  "purescript" == Nothing
+  assert $ slice (-4) 3  "purescript" == Nothing -- b' > e'
+  assert $ slice 1000 3  "purescript" == Nothing -- b' > e' (subsumes b > l)
+  assert $ slice 2 (-15) "purescript" == Nothing -- e' < 0
+  assert $ slice (-15) 9 "purescript" == Nothing -- b' < 0
+  assert $ slice 3 1000 "purescript"  == Nothing -- e > l