20 lines
378 B
Haskell
20 lines
378 B
Haskell
{-# LANGUAGE TemplateHaskell #-}
|
|
module Data.Preload
|
|
where
|
|
import Data.Preload.Render
|
|
import Sound.Data
|
|
import Music
|
|
|
|
import Control.Lens
|
|
import GHC.Word (Word32)
|
|
|
|
data PreloadData = PreloadData
|
|
{ _renderData :: RenderData
|
|
, _soundData :: SoundData
|
|
, _musicData :: MusicData
|
|
, _frameTimer :: Word32
|
|
}
|
|
| DummyPdata
|
|
|
|
makeLenses ''PreloadData
|