@@ -24,17 +24,17 @@
    (lambda (file)
      (print "Loading " file)
      (load file))
    files))
 
-(define *runremote* #f)
-
 (let* ((unit-test-name (list-ref (argv) 4))
        (fname          (conc "../unittests/" unit-test-name ".scm")))
   (if (file-exists? fname)
       (load fname)
       (print "ERROR: Unit test " unit-test-name " not found in unittests directory")))
+
+
  (list "abc" "abc/%" "ab%/c%" "~abc/c%" "abc/~c%" "a,b/c,%/d" "%/,%/a" "%/,%/a" "%/,%/a" "%" "%" "%/" "%/" "%abc%")
  (list "abc" "abc"   "abcd"   "abc"     "abc"     "a"         "abc"     "def"    "ghi"   "a" "a"  "a"  "a" "abc")
  (list   ""  ""      "cde"    "cde"     "cde"     ""            ""      "a"       "b"    ""  "b"  ""   "b" "abc")
  (list   #t    #t       #t    #f           #f      #t           #t       #t       #f     #t  #t   #t    #f #t))