module Rattletrap.Encode.EnumAttribute
  ( putEnumAttribute
  )
where

import Rattletrap.Encode.Common
import Rattletrap.Type.EnumAttribute

import qualified Data.Binary.Bits.Put as BinaryBits

putEnumAttribute :: EnumAttribute -> BinaryBits.BitPut ()
putEnumAttribute :: EnumAttribute -> BitPut ()
putEnumAttribute EnumAttribute
enumAttribute =
  Int -> Word16 -> BitPut ()
forall a. Bits a => Int -> a -> BitPut ()
putBitsLE Int
11 (EnumAttribute -> Word16
enumAttributeValue EnumAttribute
enumAttribute)