:art: Fix string slice negative index

diff --git a/src/lib/string.c b/src/lib/string.c
index 0ef3a389780b3f0764455d3c03956aaccc60f55b..f1c276040d2e1a6e1594635a3be3cec0d460d3b5 100644 (file)
--- a/src/lib/string.c
+++ b/src/lib/string.c
@@ -81,7 +81,7 @@ static INSTR(StringSlice) {
   const m_int    start = *(m_uint *)REG(0);
   const size_t   strsz = strlen(str);
   m_int          end   = *(m_uint *)REG(SZ_INT);
-  if (end < 0) end = strsz + end;
+  if (end < 0) end = strsz + end - 1;
   if (bounds(str, start) < 0 || bounds(str, end) < 0) {
     handle(shred, "OutOfBoundsStringSlice");
     return;