From: Paul Smith <psmith@gnu.org>
Date: Sun, 24 Apr 2022 14:40:10 +0000 (-0400)
Subject: * tests/scripts/options/dash-f: [SV 62118] Close STDIN
X-Git-Tag: 4.3.90~76
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=2da3bb46f28b686da447a3c2cff728a0f21edaf6;p=thirdparty%2Fmake.git

* tests/scripts/options/dash-f: [SV 62118] Close STDIN

On Windows we can't delete open files, so close STDIN before
removing the temporary input file.
---

diff --git a/tests/scripts/options/dash-f b/tests/scripts/options/dash-f
index b3c78ad6..ab225cef 100644
--- a/tests/scripts/options/dash-f
+++ b/tests/scripts/options/dash-f
@@ -83,8 +83,6 @@ my $hello = 'hello.mk';
 my $bye = 'bye.mk';
 my $byesrc = 'bye.mk.src';
 
-unlink($hello, $bye, $byesrc);
-
 create_file($hello, 'all:; $(info hello, world)
 ');
 
@@ -157,6 +155,7 @@ for my $opt (@opts) {
     run_make_test('', "-f$bye $opt", $answer);
 }
 
+close(STDIN);
 unlink($hello, $bye, $byesrc);
 
 # This tells the test driver that the perl test script executed properly.