-- | Describes writable items; items that can be saved to the disk--{-# LANGUAGE FlexibleInstances, TypeSynonymInstances #-}moduleHakyll.Core.Writable(Writable(..))whereimportData.Word(Word8)importqualifiedData.ByteStringasSBimportText.Blaze(Html)importText.Blaze.Renderer.String(renderHtml)-- | Describes an item that can be saved to the disk--classWritableawhere-- | Save an item to the given filepathwrite::FilePath->a->IO()instanceWritable[Char]wherewrite=writeFileinstanceWritableSB.ByteStringwherewritep=SB.writeFilepinstanceWritable[Word8]wherewritep=writep.SB.packinstanceWritableHtmlwherewritephtml=writep$renderHtmlhtml