packages feed

HGamer3D-OIS-Binding-0.1.0: HGamer3D/Bindings/OIS/EnumKeyCode.hs

-- 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\\OIS\\EnumKeyCode.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
-- 
-- Copyright 2011 Dr. 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.
-- 
-- EnumKeyCode.h
-- 
-- 
-- 
-- 
-- File for type, method, enum or function stubs  
-- in: "..\OgreSDK_vc10_v1-7-3\include\OIS\OISKeyboard.h"
-- 
-- each stub combines the following files: 
--     a C++ implementation file, transforming cpp calls into C-functions
--     a C-header file, making this C-functions available for the C2HS parser
--     a chs file, give instructions to the C2HS parser.
-- 
-- 

module HGamer3D.Bindings.OIS.EnumKeyCode where

import C2HS
import Foreign
import Foreign.Ptr
import Foreign.C
import Monad         (liftM, liftM2)




{- enum from ..\OgreSDK_vc10_v1-7-3\include\OIS\OISKeyboard.h line:31 -}
data EnumKeyCode = KcUnassigned
                 | KcEscape
                 | Kc1
                 | Kc2
                 | Kc3
                 | Kc4
                 | Kc5
                 | Kc6
                 | Kc7
                 | Kc8
                 | Kc9
                 | Kc0
                 | KcMinus
                 | KcEquals
                 | KcBack
                 | KcTab
                 | KcQ
                 | KcW
                 | KcE
                 | KcR
                 | KcT
                 | KcY
                 | KcU
                 | KcI
                 | KcO
                 | KcP
                 | KcLbracket
                 | KcRbracket
                 | KcReturn
                 | KcLcontrol
                 | KcA
                 | KcS
                 | KcD
                 | KcF
                 | KcG
                 | KcH
                 | KcJ
                 | KcK
                 | KcL
                 | KcSemicolon
                 | KcApostrophe
                 | KcGrave
                 | KcLshift
                 | KcBackslash
                 | KcZ
                 | KcX
                 | KcC
                 | KcV
                 | KcB
                 | KcN
                 | KcM
                 | KcComma
                 | KcPeriod
                 | KcSlash
                 | KcRshift
                 | KcMultiply
                 | KcLmenu
                 | KcSpace
                 | KcCapital
                 | KcF1
                 | KcF2
                 | KcF3
                 | KcF4
                 | KcF5
                 | KcF6
                 | KcF7
                 | KcF8
                 | KcF9
                 | KcF10
                 | KcNumlock
                 | KcScroll
                 | KcNumpad7
                 | KcNumpad8
                 | KcNumpad9
                 | KcSubtract
                 | KcNumpad4
                 | KcNumpad5
                 | KcNumpad6
                 | KcAdd
                 | KcNumpad1
                 | KcNumpad2
                 | KcNumpad3
                 | KcNumpad0
                 | KcDecimal
                 | KcOem102
                 | KcF11
                 | KcF12
                 | KcF13
                 | KcF14
                 | KcF15
                 | KcKana
                 | KcAbntC1
                 | KcConvert
                 | KcNoconvert
                 | KcYen
                 | KcAbntC2
                 | KcNumpadequals
                 | KcPrevtrack
                 | KcAt
                 | KcColon
                 | KcUnderline
                 | KcKanji
                 | KcStop
                 | KcAx
                 | KcUnlabeled
                 | KcNexttrack
                 | KcNumpadenter
                 | KcRcontrol
                 | KcMute
                 | KcCalculator
                 | KcPlaypause
                 | KcMediastop
                 | KcVolumedown
                 | KcVolumeup
                 | KcWebhome
                 | KcNumpadcomma
                 | KcDivide
                 | KcSysrq
                 | KcRmenu
                 | KcPause
                 | KcHome
                 | KcUp
                 | KcPgup
                 | KcLeft
                 | KcRight
                 | KcEnd
                 | KcDown
                 | KcPgdown
                 | KcInsert
                 | KcDelete
                 | KcLwin
                 | KcRwin
                 | KcApps
                 | KcPower
                 | KcSleep
                 | KcWake
                 | KcWebsearch
                 | KcWebfavorites
                 | KcWebrefresh
                 | KcWebstop
                 | KcWebforward
                 | KcWebback
                 | KcMycomputer
                 | KcMail
                 | KcMediaselect
                 deriving (Eq)
instance Enum EnumKeyCode where
  fromEnum KcUnassigned = 0
  fromEnum KcEscape = 1
  fromEnum Kc1 = 2
  fromEnum Kc2 = 3
  fromEnum Kc3 = 4
  fromEnum Kc4 = 5
  fromEnum Kc5 = 6
  fromEnum Kc6 = 7
  fromEnum Kc7 = 8
  fromEnum Kc8 = 9
  fromEnum Kc9 = 10
  fromEnum Kc0 = 11
  fromEnum KcMinus = 12
  fromEnum KcEquals = 13
  fromEnum KcBack = 14
  fromEnum KcTab = 15
  fromEnum KcQ = 16
  fromEnum KcW = 17
  fromEnum KcE = 18
  fromEnum KcR = 19
  fromEnum KcT = 20
  fromEnum KcY = 21
  fromEnum KcU = 22
  fromEnum KcI = 23
  fromEnum KcO = 24
  fromEnum KcP = 25
  fromEnum KcLbracket = 26
  fromEnum KcRbracket = 27
  fromEnum KcReturn = 28
  fromEnum KcLcontrol = 29
  fromEnum KcA = 30
  fromEnum KcS = 31
  fromEnum KcD = 32
  fromEnum KcF = 33
  fromEnum KcG = 34
  fromEnum KcH = 35
  fromEnum KcJ = 36
  fromEnum KcK = 37
  fromEnum KcL = 38
  fromEnum KcSemicolon = 39
  fromEnum KcApostrophe = 40
  fromEnum KcGrave = 41
  fromEnum KcLshift = 42
  fromEnum KcBackslash = 43
  fromEnum KcZ = 44
  fromEnum KcX = 45
  fromEnum KcC = 46
  fromEnum KcV = 47
  fromEnum KcB = 48
  fromEnum KcN = 49
  fromEnum KcM = 50
  fromEnum KcComma = 51
  fromEnum KcPeriod = 52
  fromEnum KcSlash = 53
  fromEnum KcRshift = 54
  fromEnum KcMultiply = 55
  fromEnum KcLmenu = 56
  fromEnum KcSpace = 57
  fromEnum KcCapital = 58
  fromEnum KcF1 = 59
  fromEnum KcF2 = 60
  fromEnum KcF3 = 61
  fromEnum KcF4 = 62
  fromEnum KcF5 = 63
  fromEnum KcF6 = 64
  fromEnum KcF7 = 65
  fromEnum KcF8 = 66
  fromEnum KcF9 = 67
  fromEnum KcF10 = 68
  fromEnum KcNumlock = 69
  fromEnum KcScroll = 70
  fromEnum KcNumpad7 = 71
  fromEnum KcNumpad8 = 72
  fromEnum KcNumpad9 = 73
  fromEnum KcSubtract = 74
  fromEnum KcNumpad4 = 75
  fromEnum KcNumpad5 = 76
  fromEnum KcNumpad6 = 77
  fromEnum KcAdd = 78
  fromEnum KcNumpad1 = 79
  fromEnum KcNumpad2 = 80
  fromEnum KcNumpad3 = 81
  fromEnum KcNumpad0 = 82
  fromEnum KcDecimal = 83
  fromEnum KcOem102 = 86
  fromEnum KcF11 = 87
  fromEnum KcF12 = 88
  fromEnum KcF13 = 100
  fromEnum KcF14 = 101
  fromEnum KcF15 = 102
  fromEnum KcKana = 112
  fromEnum KcAbntC1 = 115
  fromEnum KcConvert = 121
  fromEnum KcNoconvert = 123
  fromEnum KcYen = 125
  fromEnum KcAbntC2 = 126
  fromEnum KcNumpadequals = 141
  fromEnum KcPrevtrack = 144
  fromEnum KcAt = 145
  fromEnum KcColon = 146
  fromEnum KcUnderline = 147
  fromEnum KcKanji = 148
  fromEnum KcStop = 149
  fromEnum KcAx = 150
  fromEnum KcUnlabeled = 151
  fromEnum KcNexttrack = 153
  fromEnum KcNumpadenter = 156
  fromEnum KcRcontrol = 157
  fromEnum KcMute = 160
  fromEnum KcCalculator = 161
  fromEnum KcPlaypause = 162
  fromEnum KcMediastop = 164
  fromEnum KcVolumedown = 174
  fromEnum KcVolumeup = 176
  fromEnum KcWebhome = 178
  fromEnum KcNumpadcomma = 179
  fromEnum KcDivide = 181
  fromEnum KcSysrq = 183
  fromEnum KcRmenu = 184
  fromEnum KcPause = 197
  fromEnum KcHome = 199
  fromEnum KcUp = 200
  fromEnum KcPgup = 201
  fromEnum KcLeft = 203
  fromEnum KcRight = 205
  fromEnum KcEnd = 207
  fromEnum KcDown = 208
  fromEnum KcPgdown = 209
  fromEnum KcInsert = 210
  fromEnum KcDelete = 211
  fromEnum KcLwin = 219
  fromEnum KcRwin = 220
  fromEnum KcApps = 221
  fromEnum KcPower = 222
  fromEnum KcSleep = 223
  fromEnum KcWake = 227
  fromEnum KcWebsearch = 229
  fromEnum KcWebfavorites = 230
  fromEnum KcWebrefresh = 231
  fromEnum KcWebstop = 232
  fromEnum KcWebforward = 233
  fromEnum KcWebback = 234
  fromEnum KcMycomputer = 235
  fromEnum KcMail = 236
  fromEnum KcMediaselect = 237

  toEnum 0 = KcUnassigned
  toEnum 1 = KcEscape
  toEnum 2 = Kc1
  toEnum 3 = Kc2
  toEnum 4 = Kc3
  toEnum 5 = Kc4
  toEnum 6 = Kc5
  toEnum 7 = Kc6
  toEnum 8 = Kc7
  toEnum 9 = Kc8
  toEnum 10 = Kc9
  toEnum 11 = Kc0
  toEnum 12 = KcMinus
  toEnum 13 = KcEquals
  toEnum 14 = KcBack
  toEnum 15 = KcTab
  toEnum 16 = KcQ
  toEnum 17 = KcW
  toEnum 18 = KcE
  toEnum 19 = KcR
  toEnum 20 = KcT
  toEnum 21 = KcY
  toEnum 22 = KcU
  toEnum 23 = KcI
  toEnum 24 = KcO
  toEnum 25 = KcP
  toEnum 26 = KcLbracket
  toEnum 27 = KcRbracket
  toEnum 28 = KcReturn
  toEnum 29 = KcLcontrol
  toEnum 30 = KcA
  toEnum 31 = KcS
  toEnum 32 = KcD
  toEnum 33 = KcF
  toEnum 34 = KcG
  toEnum 35 = KcH
  toEnum 36 = KcJ
  toEnum 37 = KcK
  toEnum 38 = KcL
  toEnum 39 = KcSemicolon
  toEnum 40 = KcApostrophe
  toEnum 41 = KcGrave
  toEnum 42 = KcLshift
  toEnum 43 = KcBackslash
  toEnum 44 = KcZ
  toEnum 45 = KcX
  toEnum 46 = KcC
  toEnum 47 = KcV
  toEnum 48 = KcB
  toEnum 49 = KcN
  toEnum 50 = KcM
  toEnum 51 = KcComma
  toEnum 52 = KcPeriod
  toEnum 53 = KcSlash
  toEnum 54 = KcRshift
  toEnum 55 = KcMultiply
  toEnum 56 = KcLmenu
  toEnum 57 = KcSpace
  toEnum 58 = KcCapital
  toEnum 59 = KcF1
  toEnum 60 = KcF2
  toEnum 61 = KcF3
  toEnum 62 = KcF4
  toEnum 63 = KcF5
  toEnum 64 = KcF6
  toEnum 65 = KcF7
  toEnum 66 = KcF8
  toEnum 67 = KcF9
  toEnum 68 = KcF10
  toEnum 69 = KcNumlock
  toEnum 70 = KcScroll
  toEnum 71 = KcNumpad7
  toEnum 72 = KcNumpad8
  toEnum 73 = KcNumpad9
  toEnum 74 = KcSubtract
  toEnum 75 = KcNumpad4
  toEnum 76 = KcNumpad5
  toEnum 77 = KcNumpad6
  toEnum 78 = KcAdd
  toEnum 79 = KcNumpad1
  toEnum 80 = KcNumpad2
  toEnum 81 = KcNumpad3
  toEnum 82 = KcNumpad0
  toEnum 83 = KcDecimal
  toEnum 86 = KcOem102
  toEnum 87 = KcF11
  toEnum 88 = KcF12
  toEnum 100 = KcF13
  toEnum 101 = KcF14
  toEnum 102 = KcF15
  toEnum 112 = KcKana
  toEnum 115 = KcAbntC1
  toEnum 121 = KcConvert
  toEnum 123 = KcNoconvert
  toEnum 125 = KcYen
  toEnum 126 = KcAbntC2
  toEnum 141 = KcNumpadequals
  toEnum 144 = KcPrevtrack
  toEnum 145 = KcAt
  toEnum 146 = KcColon
  toEnum 147 = KcUnderline
  toEnum 148 = KcKanji
  toEnum 149 = KcStop
  toEnum 150 = KcAx
  toEnum 151 = KcUnlabeled
  toEnum 153 = KcNexttrack
  toEnum 156 = KcNumpadenter
  toEnum 157 = KcRcontrol
  toEnum 160 = KcMute
  toEnum 161 = KcCalculator
  toEnum 162 = KcPlaypause
  toEnum 164 = KcMediastop
  toEnum 174 = KcVolumedown
  toEnum 176 = KcVolumeup
  toEnum 178 = KcWebhome
  toEnum 179 = KcNumpadcomma
  toEnum 181 = KcDivide
  toEnum 183 = KcSysrq
  toEnum 184 = KcRmenu
  toEnum 197 = KcPause
  toEnum 199 = KcHome
  toEnum 200 = KcUp
  toEnum 201 = KcPgup
  toEnum 203 = KcLeft
  toEnum 205 = KcRight
  toEnum 207 = KcEnd
  toEnum 208 = KcDown
  toEnum 209 = KcPgdown
  toEnum 210 = KcInsert
  toEnum 211 = KcDelete
  toEnum 219 = KcLwin
  toEnum 220 = KcRwin
  toEnum 221 = KcApps
  toEnum 222 = KcPower
  toEnum 223 = KcSleep
  toEnum 227 = KcWake
  toEnum 229 = KcWebsearch
  toEnum 230 = KcWebfavorites
  toEnum 231 = KcWebrefresh
  toEnum 232 = KcWebstop
  toEnum 233 = KcWebforward
  toEnum 234 = KcWebback
  toEnum 235 = KcMycomputer
  toEnum 236 = KcMail
  toEnum 237 = KcMediaselect
  toEnum unmatched = error ("EnumKeyCode.toEnum: Cannot match " ++ show unmatched)