From 9f1bda18f2aea55284579e90a3519bf46bbb5a1f Mon Sep 17 00:00:00 2001
From: =?utf8?q?P=C3=A1draig=20Brady?= <P@draigBrady.com>
Date: Mon, 29 Mar 2021 15:47:20 +0100
Subject: [PATCH] tests: add a test case for recent env fix

* tests/misc/env-S.pl: Add a test case for recent commit ec6904f0.
---
 tests/misc/env-S.pl | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/tests/misc/env-S.pl b/tests/misc/env-S.pl
index aa174a7516..73dcb5cfe1 100755
--- a/tests/misc/env-S.pl
+++ b/tests/misc/env-S.pl
@@ -60,6 +60,10 @@ my @Tests =
      # to env, resulting in two arguments ("A" <whitespace> "B").
      ['t3',  qq[-S'printf x%sx\\n A\tB'],     {OUT=>"xAx\nxBx"}],
      ['t4',  qq[-S'printf x%sx\\n A \t B'],   {OUT=>"xAx\nxBx"}],
+     # Ensure \v\f\r\n treated like other whitespace.
+     # From 8.30 - 8.32 these would introduce arguments to printf,
+     # and also crash ASAN builds with out of bounds access.
+     ['t5',  qq[-S'printf x%sx\\n A \t B \013\f\r\n'],   {OUT=>"xAx\nxBx"}],
 
 
      # Test empty strings
-- 
2.47.2