More docs.

[hs-java.git] / dump-class.hs

diff --git a/dump-class.hs b/dump-class.hs
index 76fd6813d725a5054adf0d848b8bb73aad5e5f46..a87c1cbd698b255bc7d2391a64f81a13fbdf28bd 100644 (file)
--- a/dump-class.hs
+++ b/dump-class.hs
@@ -15,7 +15,7 @@ main = do
   case args of
     [clspath] -> do
       clsFile <- decodeFile clspath
-      putStrLn $ showListIx $ M.elems $ constsPool (clsFile :: Class Pointers)
+      putStrLn $ showListIx $ M.elems $ constsPool (clsFile :: Class File)
       cls <- parseClassFile clspath
       dumpClass cls
     _ -> error "Synopsis: dump-class File.class"