1#!/bin/sh
2
3# Usage:
4#   runtests [-T] [prefix]
5#
6# Runs all tests (or those starting with prefix),optionally in taint mode
7
8if [ -z "$TI_MODE" ]; then
9   TI_MODE='inter'
10   export TI_MODE
11fi
12
13if [ -z "$TI_QUIET" ]; then
14   TI_QUIET=2
15   export TI_QUIET
16fi
17
18if [ "$RELEASE_TESTING" != "0" ]; then
19   RELEASE_TESTING=1
20   export RELEASE_TESTING
21fi
22
23if [ "$1" = "-T" ]; then
24   taint="-T -I../lib -I."
25   shift
26else
27   taint=
28fi
29
30subset=$1
31
32for test in ${subset}*.t ;do
33  perl $taint ./$test
34done
35