X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;ds=sidebyside;f=JVM%2FDump.hs;h=53c8a2d81a1acff2c30d5f88f01a7898619cb7cb;hb=d47b4af2d4cf72352782e8c88a6e03670ca15737;hp=a2c4c2e6f45583d6c0dd75f89c8df4862f30269d;hpb=26a29502e585cef2e9c35d508d9e6b82fa0fcef9;p=hs-java.git diff --git a/JVM/Dump.hs b/JVM/Dump.hs index a2c4c2e..53c8a2d 100644 --- a/JVM/Dump.hs +++ b/JVM/Dump.hs @@ -12,7 +12,7 @@ import JVM.Converter import JVM.Assembler -- | Dump a class to console. -dumpClass :: Class Resolved -> IO () +dumpClass :: Class Direct -> IO () dumpClass cls = do putStr "Class: " B.putStrLn (thisClass cls)