module Rattletrap.Decode.ByteAttribute ( decodeByteAttributeBits ) where import Rattletrap.Decode.Common import Rattletrap.Decode.Word8le import Rattletrap.Type.ByteAttribute decodeByteAttributeBits :: DecodeBits ByteAttribute decodeByteAttributeBits :: DecodeBits ByteAttribute decodeByteAttributeBits = Word8le -> ByteAttribute ByteAttribute (Word8le -> ByteAttribute) -> BitGet Word8le -> DecodeBits ByteAttribute forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> BitGet Word8le decodeWord8leBits