module Rattletrap.Decode.ClassMapping
  ( decodeClassMapping
  )
where

import Rattletrap.Decode.Common
import Rattletrap.Decode.Str
import Rattletrap.Decode.Word32le
import Rattletrap.Type.ClassMapping

decodeClassMapping :: Decode ClassMapping
decodeClassMapping :: Decode ClassMapping
decodeClassMapping = Str -> Word32le -> ClassMapping
ClassMapping (Str -> Word32le -> ClassMapping)
-> Get Str -> Get (Word32le -> ClassMapping)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Get Str
decodeStr Get (Word32le -> ClassMapping)
-> Get Word32le -> Decode ClassMapping
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
<*> Get Word32le
decodeWord32le