projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
[project @ 2003-11-10 12:04:25 by simonpj]
[ghc-hetmet.git]
/
ghc
/
utils
/
hstags
/
hstags.prl
diff --git
a/ghc/utils/hstags/hstags.prl
b/ghc/utils/hstags/hstags.prl
index
2b83700
..
16e770b
100644
(file)
--- a/
ghc/utils/hstags/hstags.prl
+++ b/
ghc/utils/hstags/hstags.prl
@@
-3,7
+3,7
@@
# set:
#
# INSTALLING
# set:
#
# INSTALLING
-# TMPDIR
+# DEFAULT_TMPDIR
# TOP_PWD
# libdir
# libexecdir
# TOP_PWD
# libdir
# libexecdir
@@
-13,8
+13,8
@@
if ( $ENV{'TMPDIR'} ) { # where to make tmp file names
$tmp = $ENV{'TMPDIR'} . "/$$.eht";
} else {
if ( $ENV{'TMPDIR'} ) { # where to make tmp file names
$tmp = $ENV{'TMPDIR'} . "/$$.eht";
} else {
- $tmp ="${TMPDIR}/$$.eht";
- $ENV{'TMPDIR'} = ${TMPDIR}; # set the env var as well
+ $tmp ="${DEFAULT_TMPDIR}/$$.eht";
+ $ENV{'TMPDIR'} = ${DEFAULT_TMPDIR}; # set the env var as well
}
$TopPwd = "${TOP_PWD}"; # *Only* needed when using it in-situ (i.e., INSTALLING=0).
}
$TopPwd = "${TOP_PWD}"; # *Only* needed when using it in-situ (i.e., INSTALLING=0).
@@
-56,9
+56,8
@@
while ($ARGV[0] =~ /^-./) {
push(@Files, $_);
}
push(@Files, $_);
}
-$ghc_version_info = ${ProjectVersionInt}
$DoHsCpp = ( ! $DoCpp ) ? 'cat'
$DoHsCpp = ( ! $DoCpp ) ? 'cat'
- : "$HsCpp -D__HASKELL1__=2 -D__GLASGOW_HASKELL__=$ghc_version_info $Cpp_opts";
+ : "$HsCpp -D__HASKELL1__=2 -D__GLASGOW_HASKELL__=$ProjectVersionInt $Cpp_opts";
# to find Prelude.hi and friends.
$HsP_opts .= ( $INSTALLING ?
# to find Prelude.hi and friends.
$HsP_opts .= ( $INSTALLING ?