aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--src/Vivant/Renderer.hs15
-rw-r--r--src/Vivant/Terrain.hs6
2 files changed, 21 insertions, 0 deletions
diff --git a/src/Vivant/Renderer.hs b/src/Vivant/Renderer.hs
new file mode 100644
index 0000000..ca623e7
--- /dev/null
+++ b/src/Vivant/Renderer.hs
@@ -0,0 +1,15 @@
+module Vivant.Renderer
+ (Renderer(..))
+where
+
+import qualified Graphics.Rendering.OpenGL as GL
+import Linear
+import Foreign.Ptr
+
+data Renderer = Renderer
+ { rendererProgram :: Maybe GL.Program,
+ rendererVao :: Maybe GL.VertexArrayObject,
+ rendererModelP :: Ptr (M44 Float)
+ } deriving Show
+
+draw :: Renderer -> IO ()
diff --git a/src/Vivant/Terrain.hs b/src/Vivant/Terrain.hs
new file mode 100644
index 0000000..9d5201a
--- /dev/null
+++ b/src/Vivant/Terrain.hs
@@ -0,0 +1,6 @@
+module Vivant.Terrain where
+
+data Terrain = Terrain
+ {
+ terrainVao ::
+ }