on 00a3069 help sign in
elk/src/AST/Utils/Shader.hs
36 lines 402 B history raw
1{-# OPTIONS_GHC -Wall #-}
2module AST.Utils.Shader
3 ( Shader(..)
4 , Type(..)
5 )
6 where
9import qualified Data.Map as Map
10import qualified Elm.Name as N
14-- SHADERS
17data Shader =
18 Shader
19 { _attribute :: Map.Map N.Name Type
20 , _uniform :: Map.Map N.Name Type
21 , _varying :: Map.Map N.Name Type
22 }
26-- GL TYPES
29data Type
30 = Int
31 | Float
32 | V2
33 | V3
34 | V4
35 | M4
36 | Texture