even better testing

test.sh

@@ -1,7 +1,16 @@
 #!/usr/bin/env zsh
 
+typeset -a listfic
+if (($#==0)); then
+    listfic=( tests/*(.N) )
+else
+    for arg in $@; do
+        listfic=( $listfic tests/$arg )
+    done
+fi
+
 tmpfic=tests/tmp
-for input in tests/*; do
+for input in $listfic; do
     sed 's/\\/\\\\/g' $input > $tmpfic
     # set 3 as the file descriptor for the file $tmpfic
     exec 3< $tmpfic

tests/list

@@ -0,0 +1,4 @@
+(a list)
+List [Atom "a",Atom "list"]
+(a (nested) list)
+List [Atom "a",List [Atom "nested"],Atom "list"]