From cda7bfd068f92446b497e0683b657cdfe8c4c603 Mon Sep 17 00:00:00 2001 From: nek0 Date: Fri, 8 Feb 2019 09:19:09 +0100 Subject: [PATCH] rename --- src/Draw.hs | 4 ++-- src/Types.hs | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/src/Draw.hs b/src/Draw.hs index 5f5b730..a8dc679 100644 --- a/src/Draw.hs +++ b/src/Draw.hs @@ -73,8 +73,8 @@ initGL = do GL.clearColor $= (GL.Color4 0 0 1 1 :: GL.Color4 Float) return GLvebo - { giVBO = vertexBufferObject - , giEBO = elementBufferObject + { glVBO = vertexBufferObject + , glEBO = elementBufferObject } initVAO :: IO () diff --git a/src/Types.hs b/src/Types.hs index a6e3cfc..fba1b35 100644 --- a/src/Types.hs +++ b/src/Types.hs @@ -32,6 +32,6 @@ data State = State } data GLvebo = GLvebo - { giVBO :: GL.BufferObject - , giEBO :: GL.BufferObject + { glVBO :: GL.BufferObject + , glEBO :: GL.BufferObject }