From a3532279d5d16f1f69bff1bae06f477cdbc53b0f Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Sun, 15 Dec 2024 22:37:17 -0800
Subject: string ranges: bug: ranges of length 1.

* lib.c (seq_iter_init_with_info): String ranges are
inclusive. We must not assume at a range whose endpoints are
the same is empty; we must check that case for the endpoints
being strings.

* tests/012/seq.tl: New tests.
---
 tests/010/range.tl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'tests/010/range.tl')

diff --git a/tests/010/range.tl b/tests/010/range.tl
index 4cc9ee95..c116cf87 100644
--- a/tests/010/range.tl
+++ b/tests/010/range.tl
@@ -67,7 +67,7 @@
   (range* 0 1.25 0.5) (0 0.5 1.0))
 
 (mtest
-  (range "A" "A") nil
+  (range "A" "A") ("A")
   (range "A" "A" 0) :error
   (range "A" "A" -2) :error)
 
-- 
cgit v1.2.3