vegowotenks/java-classfile
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

doc: everything

Browse source
This commit is contained in:
vegowotenks 2025-07-13 11:54:33 +02:00
parent e30e3b02e1
commit f85f3f8b79
23 changed files with 227 additions and 77 deletions
Download patch file Download diff file Expand all files Collapse all files

10
src/Language/Java/Classfile/Fields.hs
View file

@ -1,3 +1,5 @@
-- | Fields array of a class.
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE DerivingVia #-}
{-# LANGUAGE DeriveGeneric #-}
@ -9,15 +11,18 @@ import Data.Array.IArray (Array)
import Data.Word (Word16)
import Language.Java.Classfile.Extractable (Extractable)
import GHC.Generics ( Generically, Generic, Generically(..) )
import Language.Java.Classfile.Flags (Flags)
import Language.Java.Classfile.Flag (FlagMask (..))
import Language.Java.Classfile.Flags (Flags, FlagMask (..))
import Language.Java.Classfile.ConstantPool.References (Utf8Reference)
import Language.Java.Classfile.Attributes (Attributes)
-- | Word16-Array of Fields.
newtype Fields = Fields (Array Word16 Field)
deriving stock Show
deriving newtype Extractable
-- | All the access flags a field can have
data FieldFlag
= Public
| Private
@ -44,6 +49,7 @@ instance FlagMask FieldFlag where
Synthetic -> 0x1000
Enumeration -> 0x4000
-- | A singular field of a class.
data Field = Field
{ flags :: Flags FieldFlag