From 7ddecde54372c25fcf526e2d24807c5dac9800aa Mon Sep 17 00:00:00 2001
From: axel <axel@liljencrantz.se>
Date: Tue, 20 Sep 2005 23:31:55 +1000
Subject: Add subdirectories

darcs-hash:20050920133155-ac50b-9a14c6c664dd03afbe8e15e7c7998fcfb5c3c750.gz
---
 tests/test.fish | 42 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 42 insertions(+)
 create mode 100755 tests/test.fish

(limited to 'tests/test.fish')

diff --git a/tests/test.fish b/tests/test.fish
new file mode 100755
index 00000000..082db468
--- /dev/null
+++ b/tests/test.fish
@@ -0,0 +1,42 @@
+#!/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
+
-- 
cgit v1.2.3