tests for a segfault and a failure-to-fail from “Jb boin on dedior” on IRC

check.t

@@ -1,4 +1,4 @@
-# $MirOS: src/bin/mksh/check.t,v 1.418 2011/03/08 18:49:48 tg Exp $
+# $MirOS: src/bin/mksh/check.t,v 1.419 2011/03/12 01:04:39 tg Exp $
 # $OpenBSD: bksl-nl.t,v 1.2 2001/01/28 23:04:56 niklas Exp $
 # $OpenBSD: history.t,v 1.5 2001/01/28 23:04:56 niklas Exp $
 # $OpenBSD: read.t,v 1.3 2003/03/10 03:48:16 david Exp $
@@ -1370,6 +1370,32 @@ expected-stdout:
 	9 EQAL brac foo x c x} baz
 	9 QSTN brac foo x c x} baz
 ---
+name: expand-threecolons-dblq
+description:
+	Check for a particular thing that used to segfault
+	XXX still does, and decide on stderr
+stdin:
+	TEST=1234
+	echo "${TEST:1:2:3}"
+	echo $? but still living
+expected-stdout:
+	1 but still living
+expected-stderr-pattern:
+	/.*/
+---
+name: expand-threecolons-unq
+description:
+	Check for a particular thing that used to not error out
+	XXX still doesn't, and decide on stderr
+stdin:
+	TEST=1234
+	echo ${TEST:1:2:3}
+	echo $? but still living
+expected-stdout:
+	1 but still living
+expected-stderr-pattern:
+	/.*/
+---
 name: eglob-bad-1
 description:
 	Check that globbing isn't done when glob has syntax error