module Rattletrap.Decode.Int32le
  ( decodeInt32le
  , decodeInt32leBits
  )
where

import Rattletrap.Decode.Common
import Rattletrap.Type.Int32le

decodeInt32le :: Decode Int32le
decodeInt32le :: Decode Int32le
decodeInt32le = Int32 -> Int32le
Int32le (Int32 -> Int32le) -> Get Int32 -> Decode Int32le
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Get Int32
getInt32le

decodeInt32leBits :: DecodeBits Int32le
decodeInt32leBits :: DecodeBits Int32le
decodeInt32leBits = Decode Int32le -> Int -> DecodeBits Int32le
forall a. Decode a -> Int -> DecodeBits a
toBits Decode Int32le
decodeInt32le Int
4