Finish the testsuite.

* scheme/Makefile.am: Rewrite.
* src/frametab.gperf (frametab_enumerate): Minor fix.
* tests/Makefile.am (TESTSUITE_AT): Add new testcases.
(EXTRA_DIST): Add idest-32.png and idest-68.png.
* tests/testsuite.at: Add new testcases.
* tests/atlocal.in (GUILE_VERSION,INSTALL_PROG): New variables.
* tests/id3v2: Remove trailing whitespace from USLT.
* tests/delcomm.at: New file.
* tests/fmt-shortlist.at: New file.
* tests/framelist00.at: New file.
* tests/framelist01.at: New file.
* tests/framelist02.at: New file.
* tests/list1.at: New file.
* tests/list2.at: New file.
* tests/lyrics00.at: New file.
* tests/pic00.at: New file.
* tests/pic01.at: New file.
* tests/script00.at: New file.
* tests/script01.at: New file.
* tests/script02.at: New file.
* tests/script03.at: New file.
* tests/script04.at: New file.
* tests/script05.at: New file.
* tests/script06.at: New file.
* tests/script07.at: New file.
* tests/script08.at: New file.
* tests/setlyrics.at: New file.
* tests/setpic.at: New file.
* tests/settitle.at: New file.
* tests/shortlist.at: New file.
* tests/version.at: Remove useless prereq.

1 files changed, 34 insertions, 1 deletions

diff --git a/tests/testsuite.at b/tests/testsuite.at
index 9860967..196567d 100644
--- a/tests/testsuite.at
+++ b/tests/testsuite.at
@@ -18,7 +18,7 @@ m4_version_prereq([2.52g])
 
 m4_define([AT_SKIP_TEST],[exit 77])
 
-m4_define([PREREQ_GUILE],[m4_if(AT_PACKAGE_GUILE,[],AT_SKIP_TEST)])
+m4_define([PREREQ_GUILE],[test -z "$GUILE_VERSION" && AT_SKIP_TEST])
 
 dnl # Begin tests
 
@@ -53,4 +53,37 @@ m4_include([copy-v1-00.at])
 m4_include([copy-v2-00.at])
 m4_include([copy-v12-00.at])
 
+# Scheme Scripting
+m4_include([script00.at])
+m4_include([script01.at])
+m4_include([script02.at])
+m4_include([script03.at])
+m4_include([script04.at])
+m4_include([script05.at])
+m4_include([script06.at])
+m4_include([script07.at])
+m4_include([script08.at])
+
+# Examples
+m4_include([shortlist.at])
+m4_include([list1.at])
+m4_include([list2.at])
+m4_include([settitle.at])
+m4_include([delcomm.at])
+
+# Formats
+m4_include([fmt-shortlist.at])
+m4_include([framelist00.at])
+m4_include([framelist01.at])
+m4_include([framelist02.at])
+
+m4_include([lyrics00.at])
+
+m4_include([pic00.at])
+m4_include([pic01.at])
+
+# Batches
+m4_include([setlyrics.at])
+m4_include([setpic.at])
+
 # End of testsuite.at