1 {-# LANGUAGE OverloadedStrings #-}
7 import System.Environment
8 import qualified Data.ByteString.Lazy as B
20 clsFile <- decodeFile clspath
21 putStrLn $ showListIx $ constsPool clsFile
22 cls <- parseClassFile clspath
24 _ -> error "Synopsis: dump-class File.class"