diff --git a/src/list.c b/src/list.c
index 9d07b7e..04ddbfc 100644
--- a/src/list.c
+++ b/src/list.c
@@ -1146,15 +1146,19 @@
 	n1 = len + n1;
     if (n1 < 0 || n1 >= len)
     {
-	// For a range we allow invalid values and return an empty
-	// list.  A list index out of range is an error.
+	// For a range we allow invalid values and for legacy script return an
+	// empty list, for Vim9 script start at the first item.
+	// A list index out of range is an error.
 	if (!range)
 	{
 	    if (verbose)
 		semsg(_(e_listidx), (long)n1_arg);
 	    return FAIL;
 	}
-	n1 = n1 < 0 ? 0 : len;
+	if (in_vim9script())
+	    n1 = n1 < 0 ? 0 : len;
+	else
+	    n1 = len;
     }
     if (range)
     {
diff --git a/src/testdir/test_listdict.vim b/src/testdir/test_listdict.vim
index bef4581..8f8e34c 100644
--- a/src/testdir/test_listdict.vim
+++ b/src/testdir/test_listdict.vim
@@ -42,6 +42,23 @@
   let l[:1] += [1, 2]
   let l[2:] -= [1]
   call assert_equal([2, 4, 2], l)
+
+  let lines =<< trim END
+      VAR l = [1, 2]
+      call assert_equal([1, 2], l[:])
+      call assert_equal([2], l[-1 : -1])
+      call assert_equal([1, 2], l[-2 : -1])
+  END
+  call CheckLegacyAndVim9Success(lines)
+
+  let l = [1, 2]
+  call assert_equal([], l[-3 : -1])
+
+  let lines =<< trim END
+      var l = [1, 2]
+      assert_equal([1, 2], l[-3 : -1])
+  END
+  call CheckDefAndScriptSuccess(lines)
 endfunc
 
 " List identity
diff --git a/src/version.c b/src/version.c
index 7fd4d80..a31b494 100644
--- a/src/version.c
+++ b/src/version.c
@@ -756,6 +756,8 @@
 static int included_patches[] =
 {   /* Add new patch number below this line */
 /**/
+    3336,
+/**/
     3335,
 /**/
     3334,