module Rattletrap.Decode.IntAttribute ( decodeIntAttributeBits ) where import Rattletrap.Decode.Common import Rattletrap.Decode.Int32le import Rattletrap.Type.IntAttribute decodeIntAttributeBits :: DecodeBits IntAttribute decodeIntAttributeBits :: DecodeBits IntAttribute decodeIntAttributeBits = Int32le -> IntAttribute IntAttribute (Int32le -> IntAttribute) -> BitGet Int32le -> DecodeBits IntAttribute forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> BitGet Int32le decodeInt32leBits