From 91f82aca82dc282d5630c1bddd8dc773c679cc76 Mon Sep 17 00:00:00 2001 From: Csaba Hruska Date: Thu, 30 Apr 2015 14:28:27 +0200 Subject: split dsl compiler and ir backend --- Backend/GL.hs | 86 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 86 insertions(+) create mode 100644 Backend/GL.hs (limited to 'Backend/GL.hs') diff --git a/Backend/GL.hs b/Backend/GL.hs new file mode 100644 index 0000000..04d5dde --- /dev/null +++ b/Backend/GL.hs @@ -0,0 +1,86 @@ +module Backend.GL ( + -- IR + V2(..),V3(..),V4(..), + -- Array, Buffer, Texture + Array(..), + ArrayType(..), + Buffer, + BufferSetter, + IndexStream(..), + Stream(..), + StreamSetter, + StreamType(..), + Primitive(..), + SetterFun, + TextureData, + InputSetter(..), + fromStreamType, + sizeOfArrayType, + toStreamType, + compileBuffer, + updateBuffer, + bufferSize, + arraySize, + arrayType, + compileTexture2DRGBAF, + + -- GL Pipeline Input, Object + GLPipeline, + GLPipelineInput, + Object, + PipelineSchema(..), + SlotSchema(..), + schema, + schemaFromPipeline, + allocPipeline, + disposePipeline, + setPipelineInput, + renderPipeline, + mkGLPipelineInput, + uniformSetter, + addObject, + removeObject, + enableObject, + setObjectOrder, + objectUniformSetter, + setScreenSize, + sortSlotObjects, + + uniformBool, + uniformV2B, + uniformV3B, + uniformV4B, + + uniformWord, + uniformV2U, + uniformV3U, + uniformV4U, + + uniformInt, + uniformV2I, + uniformV3I, + uniformV4I, + + uniformFloat, + uniformV2F, + uniformV3F, + uniformV4F, + + uniformM22F, + uniformM23F, + uniformM24F, + uniformM32F, + uniformM33F, + uniformM34F, + uniformM42F, + uniformM43F, + uniformM44F, + + uniformFTexture2D +) where + +import Backend.GL.Type +import Backend.GL.Backend +import Backend.GL.Data +import Backend.GL.Input +import IR \ No newline at end of file -- cgit v1.2.3