--
-- Copyright (c) 2005 Sean Seefried
--
-- The API of Panic configuration files.
--
module PanicConfAPI ( PanicConf(..), point )
where

import Graphics.UI.WX
import qualified Graphics.UI.WX  as WX

data PanicConf =
  PanicConf
   { timeSamplePeriod  :: Float
     -- | Sampling period for performance stats. (e.g. frames/s)
     -- | The number of samples required before we can consider the
     --   performance figure to be "stabilised".

   , samplesToStabilise :: Int
   , placesToShow :: Int -- ^ decimal places to show in frame counter
   , defaultMainPos :: WX.Point
   , defaultEffectPos :: WX.Point
   , maxLines :: Int -- maxLines of errors from effect compilation
   , defaultWidth :: Int -- default width of effect canvas
   , defaultHeight :: Int  -- default height of effect canvas
   , marginWidth :: Int -- width of margin around effect window
   , zoomStep :: Float -- the zoom is multipled by this factor when invoked.
     -- | The name of the effect function in user written code.
   , effectFunctionName :: String
   , maxAliasIterations :: Int -- number of interations until anti-aliased
                               -- image looks good
   , extraGhcFlags :: [String]  -- Flags to pass to GHC while compiling effect
   }