Small renaming of a structure.

scsh/test/test-packages.scm

@@ -1,4 +1,4 @@
-(define-interface scsh-test-interface
+(define-interface test-base-interface
   (export add-test!
 	  add-test-multiple!
 	  test-all
@@ -7,7 +7,7 @@
 	  test-single/args
 	  test-summary))
 
-(define-structure scsh-test scsh-test-interface
+(define-structure test-base test-base-interface
   (open scsh
 	scheme
 	list-lib
@@ -17,15 +17,14 @@
 (define-structure file-system-test (export)
   (open scsh
 	scheme
-	scsh-test)
+	test-base)
   (files file-system-tests))
 
 (define-structure process-state-test (export)
   (open scsh
 	scheme
-	scsh-test)
+	test-base)
   (files process-state-tests))
-; defines module env-test
 
 (define-structure env-test 
   (export   
@@ -49,12 +48,21 @@
 	string-lib)
   (files env-test-code))
   
-; defines module add-env-test
 (define-structure add-env-test
-  (export )
+  (export)
   (open scsh
 	scheme
-	scsh-test
+	test-base
         env-test)
   (files env-test-add))
 
+(define-structure test-all
+  (export test-all)
+  (open scheme
+	test-base
+	add-env-test
+	process-state-test
+	file-system-test))
+
+    
+