From: Bruno Haible <bruno@clisp.org>
Date: Wed, 12 Dec 2001 18:01:51 +0000 (+0000)
Subject: Portability.
X-Git-Tag: v0.11~192
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=5e135d91ceb279488c8811784efaf44917bc9f77;p=thirdparty%2Fgettext.git

Portability.
---

diff --git a/tests/ChangeLog b/tests/ChangeLog
index 1fafdf9ff..f11dc471e 100644
--- a/tests/ChangeLog
+++ b/tests/ChangeLog
@@ -9,6 +9,7 @@
 	by themselves.
 	* lang-rst: Avoid using the 'type' builtin. It always reports success
 	with SunOS4 /bin/sh.
+	* lang-pascal: Likewise.
 
 2001-12-11  Bruno Haible  <bruno@clisp.org>
 
diff --git a/tests/lang-pascal b/tests/lang-pascal
index 0b4b1eb05..5fa760b14 100755
--- a/tests/lang-pascal
+++ b/tests/lang-pascal
@@ -6,9 +6,6 @@
 tmpfiles=""
 trap 'rm -fr $tmpfiles' 1 2 3 15
 
-# Test whether a Pascal compiler is found.
-type ppc386 >/dev/null 2>&1 || { echo "SKIP: lang-pascal"; exit 77; }
-
 tmpfiles="$tmpfiles prog.pp"
 cat <<\EOF > prog.pp
 program prog;
@@ -28,7 +25,7 @@ end.
 EOF
 
 tmpfiles="$tmpfiles prog.o prog.rst prog"
-ppc386 prog.pp || exit 1
+ppc386 prog.pp >/dev/null 2>&1 || { echo "SKIP: lang-pascal"; rm -fr $tmpfiles exit 77; }
 
 tmpfiles="$tmpfiles prog.pot"
 : ${XGETTEXT=xgettext}