module Data.ByteString.IsoBaseFileFormat.Boxes.NullMediaHeader where
import Data.ByteString.IsoBaseFileFormat.Box
import Data.ByteString.IsoBaseFileFormat.Util.FullBox
import Data.ByteString.IsoBaseFileFormat.ReExports
data NullMediaHeader = NullMediaHeader
nullMediaHeader :: Box (FullBox NullMediaHeader 0)
nullMediaHeader = fullBox 0 NullMediaHeader
instance IsBox NullMediaHeader
type instance BoxTypeSymbol NullMediaHeader = "nmhd"
instance Default NullMediaHeader where
def = NullMediaHeader
instance IsBoxContent NullMediaHeader where
boxSize _ = 0
boxBuilder _ = mempty