-- GENERATED by C->Haskell Compiler, version 0.16.3 Crystal Seed, 24 Jan 2009 (Haskell) -- Edit the ORIGNAL .chs file instead! {-# LINE 1 ".\\HGamer3D\\Bindings\\Ogre\\EnumRenderTargetStatFlags.chs" #-}{-# LANGUAGE ForeignFunctionInterface #-} {-# LANGUAGE TypeSynonymInstances #-} -- This source file is part of HGamer3D -- (A project to enable 3D game development in Haskell) -- For the latest info, see http://www.althainz.de/HGamer3D.html -- -- (c) 2011, 2012 Peter Althainz -- -- Licensed under the Apache License, Version 2.0 (the "License"); -- you may not use this file except in compliance with the License. -- You may obtain a copy of the License at -- -- http://www.apache.org/licenses/LICENSE-2.0 -- -- Unless required by applicable law or agreed to in writing, software -- distributed under the License is distributed on an "AS IS" BASIS, -- WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. -- See the License for the specific language governing permissions and -- limitations under the License. -- -- EnumRenderTargetStatFlags.chs -- module HGamer3D.Bindings.Ogre.EnumRenderTargetStatFlags where import C2HS import Foreign import Foreign.Ptr import Foreign.C import Monad (liftM, liftM2) import HGamer3D.Data.HG3DClass import HGamer3D.Data.Vector import HGamer3D.Data.Colour import HGamer3D.Data.Angle data EnumRenderTargetStatFlags = -- | SF_NONE -- | | SF_FPS -- | | SF_AVG_FPS -- | | SF_BEST_FPS -- | | SF_WORST_FPS -- | | SF_TRIANGLE_COUNT -- | | SF_ALL deriving (Eq) instance Enum EnumRenderTargetStatFlags where fromEnum SF_NONE = 0 fromEnum SF_FPS = 1 fromEnum SF_AVG_FPS = 2 fromEnum SF_BEST_FPS = 4 fromEnum SF_WORST_FPS = 8 fromEnum SF_TRIANGLE_COUNT = 16 fromEnum SF_ALL = 65535 toEnum 0 = SF_NONE toEnum 1 = SF_FPS toEnum 2 = SF_AVG_FPS toEnum 4 = SF_BEST_FPS toEnum 8 = SF_WORST_FPS toEnum 16 = SF_TRIANGLE_COUNT toEnum 65535 = SF_ALL toEnum unmatched = error ("EnumRenderTargetStatFlags.toEnum: Cannot match " ++ show unmatched)