diff options
| author | Thomas Schwinge <thomas@codesourcery.com> | 2012-03-21 18:10:03 +0100 |
|---|---|---|
| committer | Thomas Schwinge <thomas@codesourcery.com> | 2012-03-21 18:10:03 +0100 |
| commit | 8149f976066c922eeafc10d72572c8ae59d54d31 (patch) | |
| tree | a369b34c4684b47196b52989a4d80836615006f4 /conform/conformtest.pl | |
| parent | be22ce65d7643ffcd2dcb55b73eae4d7da6f0d71 (diff) | |
| download | glibc-8149f976066c922eeafc10d72572c8ae59d54d31.zip glibc-8149f976066c922eeafc10d72572c8ae59d54d31.tar.gz glibc-8149f976066c922eeafc10d72572c8ae59d54d31.tar.bz2 | |
Don't tamper with $HOME.
Diffstat (limited to 'conform/conformtest.pl')
| -rw-r--r-- | conform/conformtest.pl | 11 |
1 files changed, 3 insertions, 8 deletions
diff --git a/conform/conformtest.pl b/conform/conformtest.pl index 6a78020..83650c2 100644 --- a/conform/conformtest.pl +++ b/conform/conformtest.pl @@ -3,11 +3,11 @@ use Getopt::Long; use POSIX; +$standard = "XOPEN2K8"; $CC = "gcc"; - -$standard="XOPEN2K8"; +$tmpdir = "/tmp"; GetOptions ('headers=s' => \@headers, 'standard=s' => \$standard, - 'flags=s' => \$flags, 'cc=s' => \$CC); + 'flags=s' => \$flags, 'cc=s' => \$CC, 'tmpdir=s' => \$tmpdir); @headers = split(/,/,join(',',@headers)); # List of the headers we are testing. @@ -84,11 +84,6 @@ while ($#knownproblems >= 0) { $isknown{pop (@knownproblems)} = 1; } -$uid = getuid(); -($pwname,$pwpasswd,$pwuid,$pwgid, - $pwquota,$pwcomment,$pwgcos,$pwdir,$pwshell,$pwexpire) = getpwuid($uid); -$tmpdir = "$pwdir"; - $verbose = 1; $total = 0; |