module Rattletrap.Encode.BooleanAttribute
  ( putBooleanAttribute
  )
where

import Rattletrap.Type.BooleanAttribute

import qualified Data.Binary.Bits.Put as BinaryBits

putBooleanAttribute :: BooleanAttribute -> BinaryBits.BitPut ()
putBooleanAttribute :: BooleanAttribute -> BitPut ()
putBooleanAttribute BooleanAttribute
booleanAttribute =
  Bool -> BitPut ()
BinaryBits.putBool (BooleanAttribute -> Bool
booleanAttributeValue BooleanAttribute
booleanAttribute)