Refactor.

[hs-java.git] / TestGen.hs

diff --git a/TestGen.hs b/TestGen.hs
index 69786e995f988129d64905da5aace54b351d769b..900a422dd5778892483b970457018cfd32094ad0 100644 (file)
--- a/TestGen.hs
+++ b/TestGen.hs
@@ -47,9 +47,7 @@ test = do
 
   return ()
 
-testClass ::  Class Direct
-testClass = generate "Test" test
-
 main = do
+  testClass <- generate [] "Test" test
   B.writeFile "Test.class" (encodeClass testClass)