summaryrefslogtreecommitdiff
path: root/Configure
diff options
context:
space:
mode:
authorAndy Armstrong <andy@hexten.net>2008-01-12 20:27:46 +0000
committerNicholas Clark <nick@ccl4.org>2008-01-12 21:07:14 +0000
commitea9222e0361fc718c049fb5b7d00308ef9b0978d (patch)
tree7bc31f82d8ec01788c8c04b612abd525c7a3c797 /Configure
parent1de7d430c3e295dfd482c700269ef72157f0fe82 (diff)
downloadperl-ea9222e0361fc718c049fb5b7d00308ef9b0978d.tar.gz
Re: [PATCH] Stop DTrace config option looping in non-interactive mode
Message-Id: <4C6BD298-5CD3-49EA-8FED-4A6DA24BFA7B@hexten.net> Date: Sat, 12 Jan 2008 20:27:46 +0000 p4raw-id: //depot/perl@32967
Diffstat (limited to 'Configure')
-rwxr-xr-xConfigure21
1 files changed, 17 insertions, 4 deletions
diff --git a/Configure b/Configure
index ee2662d714..712b458bab 100755
--- a/Configure
+++ b/Configure
@@ -8961,7 +8961,7 @@ DTrace is a diagnosis and performance analysis tool from Sun.
If this doesn't make any sense to you, just accept the default '$dflt'.
EOM
-while test 1 ; do
+while $test 1 ; do
case "$usedtrace" in
$define|true|[yY]*)
dflt='y'
@@ -8994,7 +8994,7 @@ while test 1 ; do
set dtrace
eval $setvar
- if test -f $dtrace
+ if $test -f $dtrace
then
if $dtrace -h -s ../perldtrace.d \
-o perldtrace.tmp >/dev/null 2>&1 \
@@ -9016,8 +9016,21 @@ EOM
break;
fi
- echo "$dtrace was not found."
- echo " "
+ case "$fastread" in
+ yes)
+ cat >&2 <<EOM
+
+*** $me: Fatal Error: $dtrace not found.
+*** Can't continue.
+
+EOM
+ exit 1
+ ;;
+ *)
+ echo "*** $dtrace was not found."
+ echo " "
+ ;;
+ esac
done
: define an is-a-typedef? function