mirror of
https://github.com/GnoConsortium/gno.git
synced 2024-12-21 07:30:05 +00:00
9a65f3585a
This is a common test script used by many of the utilities.
30 lines
935 B
Plaintext
Executable File
30 lines
935 B
Plaintext
Executable File
# gsh script to run tests and collect results
|
|
# Written by Dave Tribby * August 1997
|
|
# $Id: fulltests,v 1.1 1998/03/11 05:19:56 gdr-ftp Exp $
|
|
|
|
# Name of gsh script containing test cases
|
|
set command="dotests"
|
|
# Sometimes the file type is modified by editing; make it executable
|
|
chtyp -l exec $command
|
|
|
|
# Filenames for raw and modified results
|
|
set raw_file="/tmp/rawlist"
|
|
set result_file="test.list"
|
|
|
|
# Location of tr command that knows how to handle classes
|
|
set trcmd="/obj/gno/usr.bin/tr/tr"
|
|
|
|
# --- Begin the tests ---
|
|
|
|
echo -n "Executing test script \"$command\" from directory "
|
|
pwd
|
|
|
|
# Create a new gsh invocation and record all I/O
|
|
echo "$command ; exit" | script $raw_file
|
|
|
|
# Cleanup control chars using either of the following...
|
|
echo "Done with tests. Removing control characters from results file"
|
|
$trcmd -c -ds '[:print:]\r' '\r' < $raw_file > $result_file
|
|
|
|
echo "Tests results have been saved as \"$result_file\""
|