1 files changed, 0 insertions, 18 deletions
diff --git a/csc/test-main.csc b/csc/test-main.csc
deleted file mode 100644
index 184d069..0000000
--- a/csc/test-main.csc
+++ /dev/null
@@ -1,18 +0,0 @@
-(import (scheme base)
-        (only (csc testing)
-          test-main)
-        (only (scheme eval)
-          environment))
-
-
-(define (filename->library f)
-  (list 'csc (string->symbol (substring f 0 (- (string-length f) 4)))))
-
-
-; Guile's load function allows import forms, but by a strict reading of R7RS,
-; load can only handle expressions and definitions. I'm working around this by
-; defining each test as a library, and using the environment procedure to load
-; the libraries at runtime. Somehow this should be more portable.
-(apply environment
-  (map filename->library (cdr (command-line))))
-(test-main)