feat: monad instance, some classfile constant-pool parsing
This commit is contained in:
parent
a4b5b06000
commit
f504462d3c
13 changed files with 153 additions and 6 deletions
12
app/Main.hs
12
app/Main.hs
|
@ -1,4 +1,14 @@
|
|||
{-# LANGUAGE ImportQualifiedPost #-}
|
||||
{-# LANGUAGE TypeApplications #-}
|
||||
module Main (main) where
|
||||
|
||||
import Data.ByteString.Lazy qualified as ByteString
|
||||
|
||||
import Language.Java.Classfile (Classfile)
|
||||
import Language.Java.Classfile.Extract (runExtract)
|
||||
import Language.Java.Classfile.Extractable (extract)
|
||||
|
||||
main :: IO ()
|
||||
main = pure ()
|
||||
main = do
|
||||
input <- ByteString.getContents
|
||||
print $ runExtract input (extract @Classfile)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue