module Rattletrap.Encode.LocationAttribute
  ( putLocationAttribute
  )
where

import Rattletrap.Encode.Vector
import Rattletrap.Type.LocationAttribute

import qualified Data.Binary.Bits.Put as BinaryBits

putLocationAttribute :: LocationAttribute -> BinaryBits.BitPut ()
putLocationAttribute :: LocationAttribute -> BitPut ()
putLocationAttribute LocationAttribute
locationAttribute =
  Vector -> BitPut ()
putVector (LocationAttribute -> Vector
locationAttributeValue LocationAttribute
locationAttribute)