From 34c3042f44289888c27e12ae80c33d9e081466ca Mon Sep 17 00:00:00 2001 From: rillig Date: Thu, 24 Nov 2005 19:18:45 +0000 Subject: Factored out the generally useable shell functions into tests.subr, as they will be used by almost all test cases. --- regress/tools/files/awk-test.sh | 34 +++------------------------------- regress/tools/files/tests.subr | 33 +++++++++++++++++++++++++++++++++ 2 files changed, 36 insertions(+), 31 deletions(-) create mode 100644 regress/tools/files/tests.subr (limited to 'regress') diff --git a/regress/tools/files/awk-test.sh b/regress/tools/files/awk-test.sh index 828904ec209..2b28eb03cd1 100644 --- a/regress/tools/files/awk-test.sh +++ b/regress/tools/files/awk-test.sh @@ -1,39 +1,11 @@ #! /bin/sh -# $NetBSD: awk-test.sh,v 1.5 2005/11/19 22:55:24 rillig Exp $ +# $NetBSD: awk-test.sh,v 1.6 2005/11/24 19:18:45 rillig Exp $ # set -e -# usage: testcase_start -testcase_start() { - printf "Running testcase %s\\n" "$1" -} - -# usage: assert_equal -assert_equal() { - case $2 in - "$3") ;; - *) echo "[assert_equal:$1] expected \"$2\", got \"$3\"." 1>&2 - return 1;; - esac -} - -# usage: test_assignment -test_assignment() { - testcase_start "$1" - o=`echo "" | awk '{print var}' var="$2"` - assert_equal "$1" "$3" "${o}" -} - -# usage: test_passline -test_passline() { - testcase_start "$1" - o=`awk '{print}' < +testcase_start() { + printf " Running testcase %s\\n" "$1" +} + +# usage: assert_equal +assert_equal() { + case $2 in + "$3") ;; + *) echo "[assert_equal:$1] expected \"$2\", got \"$3\"." 1>&2 + return 1;; + esac +} + +# usage: test_assignment +test_assignment() { + testcase_start "$1" + o=`echo "" | awk '{print var}' var="$2"` + assert_equal "$1" "$3" "${o}" +} + +# usage: test_passline +test_passline() { + testcase_start "$1" + o=`awk '{print}' <