module Rattletrap.Encode.Int64Attribute ( putInt64Attribute ) where import Rattletrap.Encode.Int64le import Rattletrap.Type.Int64Attribute import qualified Data.Binary.Bits.Put as BinaryBits putInt64Attribute :: Int64Attribute -> BinaryBits.BitPut () putInt64Attribute :: Int64Attribute -> BitPut () putInt64Attribute Int64Attribute int64Attribute = Int64le -> BitPut () putInt64Bits (Int64Attribute -> Int64le int64AttributeValue Int64Attribute int64Attribute)