hs-java: upgrade to 0.3.1

[mate.git] / Mate.hs

diff --git a/Mate.hs b/Mate.hs
index d60df06367cd69bc5c6e85d00bff3940acef3c26..911c1dbd1c1ef1b892a511c65835f3e3c73537e9 100644 (file)
--- a/Mate.hs
+++ b/Mate.hs
@@ -30,7 +30,7 @@ main = do
       hmap <- parseMethod cls "main"
       case hmap of
         Just hmap' -> do
-          let methods = classMethods cls; methods :: [Method Resolved]
+          let methods = classMethods cls; methods :: [Method Direct]
           let method = find (\x -> methodName x == "main") methods
           case method of
             Just m -> do