Reactogon/Translator/ClientState.hs

   1 module ClientState where
   2
   3 import Sound.JACK ( NFrames
   4                   )
   5 import FRP.Yampa
   6
   7 data ClientState = ClientState { rate :: Int
   8                                , buffSize :: NFrames
   9                                , clientClock :: Time
  10                                }