From 0741f2df4d33a1cb57d661a122c1923da734859a Mon Sep 17 00:00:00 2001
From: mainzelm <mainzelm>
Date: Sun, 21 Apr 2002 16:26:09 +0000
Subject: [PATCH] Small renaming of a structure.

---
 scsh/test/test-packages.scm | 24 ++++++++++++++++--------
 1 file changed, 16 insertions(+), 8 deletions(-)

diff --git a/scsh/test/test-packages.scm b/scsh/test/test-packages.scm
index 924276c..86b2140 100644
--- a/scsh/test/test-packages.scm
+++ b/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))
+
+    
+