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