summaryrefslogtreecommitdiff
path: root/conform/conformtest.pl
diff options
context:
space:
mode:
authorThomas Schwinge <thomas@codesourcery.com>2012-03-21 18:10:03 +0100
committerThomas Schwinge <thomas@codesourcery.com>2012-03-21 18:10:03 +0100
commit8149f976066c922eeafc10d72572c8ae59d54d31 (patch)
treea369b34c4684b47196b52989a4d80836615006f4 /conform/conformtest.pl
parentbe22ce65d7643ffcd2dcb55b73eae4d7da6f0d71 (diff)
Don't tamper with $HOME.
Diffstat (limited to 'conform/conformtest.pl')
-rw-r--r--conform/conformtest.pl11
1 files changed, 3 insertions, 8 deletions
diff --git a/conform/conformtest.pl b/conform/conformtest.pl
index 6a780203ce..83650c2454 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;