0,0 → 1,47 |
# |
# $Id$ |
# Receives the raw input as found in tests.txt |
# |
|
TESTNUM=0 |
|
G=$(tput setaf 2 ; tput bold ) |
R=$(tput setaf 1 ; tput bold) |
CLR=$(tput sgr0) |
|
RET=0 |
|
function unittest { |
let 'TESTNUM++' |
a="$@" |
fn=$(cut -d' ' -f1 <<<"$a") |
if [[ $TESTNUM -eq 1 ]]; then |
type $fn |
fi |
args=$(cut -d' ' -f2- <<<"$a" | sed 's/:.*$//' | sed 's/ *$//') |
expected=$(cut -d' ' -f2- <<<"$a" | sed 's/.*://') |
echo "$fn($args) -> $expected" >&2 |
res=$($fn $args) |
ret=$? |
passed= |
if [[ $expected == '><' ]]; then # Expected to fail |
if [[ $ret != 0 ]]; then |
passed=1 |
else |
passed=0 |
fi |
elif [[ $res != $expected ]] && ( [[ $res ]] && ! fptest "$res" ~ "$expected" ) ; then |
passed=0 |
else |
passed=1 |
fi |
|
if [[ $passed -ne 1 ]]; then |
echo -n "${R}FAILED => $res != '$expected'" |
let 'RET++' |
else |
echo -n "${G}PASSED => $res ~= $expected" |
fi |
echo $CLR |
} |
|
Property changes: |
Added: svn:keywords |
+Rev Id Date |
\ No newline at end of property |