module Rakka.Storage
    ( Storage

    , mkStorage -- private

    , getPage
    , savePage
    )
    where

import           Rakka.Page
import           Rakka.Storage.DefaultPage


data Storage = Storage -- FIXME


mkStorage :: IO Storage -- FIXME
mkStorage = return Storage


getPage :: Storage -> PageName -> IO (Maybe Page)
getPage sto name
    = loadDefaultPage name -- FIXME


savePage :: Storage -> PageName -> Page -> IO ()
savePage sto name page
    = error "FIXME: not implemented"