sharpetronics/make
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/make.git synced 2025-12-17 00:02:12 -05:00
Code Issues Projects Releases Wiki Activity

Get error messages in the C locale for comparision with make output.

Browse Source 
Fixes Savannah bug #35764.
This commit is contained in:
Paul Smith 2012-09-09 22:52:50 +00:00
parent 7d3743dfdc
commit 90ee335724
2 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
tests/ChangeLog
View File

@ -1,5 +1,8 @@
2012-09-09 Paul Smith <psmith@gnu.org> 2012-09-09 Paul Smith <psmith@gnu.org>
* scripts/functions/file: Get errors in the C locale, not the
current locale. Fixes Savannah bug #35764.
* scripts/features/escape: Check that backslashes before * scripts/features/escape: Check that backslashes before
non-special characters are not removed. non-special characters are not removed.

7
tests/scripts/functions/file
View File

@ -35,9 +35,16 @@ touch('file.out');
chmod(0444, 'file.out'); chmod(0444, 'file.out');
# Find the error that will be printed # Find the error that will be printed
# This seems complicated, but we need the message from the C locale
my $loc = undef;
if ($has_POSIX) {
$loc = POSIX::setlocale(POSIX::LC_MESSAGES);
POSIX::setlocale(POSIX::LC_MESSAGES, 'C');
}
my $e; my $e;
open(my $F, '>', 'file.out') and die "Opened read-only file!\n"; open(my $F, '>', 'file.out') and die "Opened read-only file!\n";
$e = "$!"; $e = "$!";
$loc and POSIX::setlocale(POSIX::LC_MESSAGES, $loc);
run_make_test(q! run_make_test(q!
define A define A