mirror of
https://github.com/fish-shell/fish-shell
synced 2024-11-15 01:17:45 +00:00
7ddecde543
darcs-hash:20050920133155-ac50b-9a14c6c664dd03afbe8e15e7c7998fcfb5c3c750.gz
42 lines
829 B
Fish
Executable file
42 lines
829 B
Fish
Executable file
#!/usr/local/bin/fish
|
|
#
|
|
# Main loop of the test suite. I wrote this
|
|
# instad of using autotest to provide additional
|
|
# testing for fish. :-)
|
|
|
|
echo Testing high level script functionality
|
|
|
|
for i in *.in
|
|
set template_out (basename $i .in).out
|
|
set template_err (basename $i .in).err
|
|
set template_status (basename $i .in).status
|
|
|
|
../fish <$i >tmp.out ^tmp.err
|
|
echo $status >tmp.status
|
|
set res ok
|
|
if diff tmp.out $template_out >/dev/null
|
|
else
|
|
set res fail
|
|
echo Output differs for file $i
|
|
end
|
|
|
|
if diff tmp.err $template_err >/dev/null
|
|
else
|
|
set res fail
|
|
echo Error output differs for file $i
|
|
end
|
|
|
|
if test (cat tmp.status) = (cat $template_status)
|
|
else
|
|
set res fail
|
|
echo Exit status differs for file $i
|
|
end
|
|
|
|
if test $res = ok;
|
|
echo File $i tested ok
|
|
else
|
|
echo File $i failed tests
|
|
end;
|
|
|
|
end
|
|
|