From 9ca9555fede912e5a3c9cebaa2050bb2c7cc7b1c Mon Sep 17 00:00:00 2001
From: Matthias Schiffer <matthias@gamezock.de>
Date: Thu, 25 Feb 2010 04:49:30 +0100
Subject: Renamed some files and added Makefile

---
 Bindings/GLPng.hs | 58 +++++++++++++++++++++++++++----------------------------
 1 file changed, 29 insertions(+), 29 deletions(-)

(limited to 'Bindings/GLPng.hs')

diff --git a/Bindings/GLPng.hs b/Bindings/GLPng.hs
index 6be3b82..3a6baab 100644
--- a/Bindings/GLPng.hs
+++ b/Bindings/GLPng.hs
@@ -1,8 +1,8 @@
 {-# INCLUDE <GL/gl.h> #-}
 {-# INCLUDE <GL/glpng.h> #-}
-{-# LINE 1 "GLPng.chs" #-}
+{-# LINE 1 "Bindings/GLPng.hsc" #-}
 {-# LANGUAGE ForeignFunctionInterface, DeriveDataTypeable  #-}
-{-# LINE 2 "GLPng.chs" #-}
+{-# LINE 2 "Bindings/GLPng.hsc" #-}
 
 module Bindings.GLPng ( PngInfo(..)
                       , Mipmap(..)
@@ -22,9 +22,9 @@ import Graphics.Rendering.OpenGL.GL.Texturing.Parameters (Repetition(..), Clampi
 
 
 
-{-# LINE 21 "GLPng.chs" #-}
+{-# LINE 21 "Bindings/GLPng.hsc" #-}
 
-{-# LINE 22 "GLPng.chs" #-}
+{-# LINE 22 "Bindings/GLPng.hsc" #-}
 
 
 data PngInfo = PngInfo
@@ -36,45 +36,45 @@ data PngInfo = PngInfo
 
 instance Storable PngInfo where
     sizeOf _ = ((16))
-{-# LINE 33 "GLPng.chs" #-}
+{-# LINE 33 "Bindings/GLPng.hsc" #-}
     alignment _ = alignment (undefined :: CUInt)
     
     peek pi = do
       w <- ((\hsc_ptr -> peekByteOff hsc_ptr 0)) pi
-{-# LINE 37 "GLPng.chs" #-}
+{-# LINE 37 "Bindings/GLPng.hsc" #-}
       h <- ((\hsc_ptr -> peekByteOff hsc_ptr 4)) pi
-{-# LINE 38 "GLPng.chs" #-}
+{-# LINE 38 "Bindings/GLPng.hsc" #-}
       d <- ((\hsc_ptr -> peekByteOff hsc_ptr 8)) pi
-{-# LINE 39 "GLPng.chs" #-}
+{-# LINE 39 "Bindings/GLPng.hsc" #-}
       a <- ((\hsc_ptr -> peekByteOff hsc_ptr 12)) pi
-{-# LINE 40 "GLPng.chs" #-}
+{-# LINE 40 "Bindings/GLPng.hsc" #-}
       
       return (PngInfo w h d a)
     
     poke pi (PngInfo w h d a) = do
                             ((\hsc_ptr -> pokeByteOff hsc_ptr 0)) pi w
-{-# LINE 45 "GLPng.chs" #-}
+{-# LINE 45 "Bindings/GLPng.hsc" #-}
                             ((\hsc_ptr -> pokeByteOff hsc_ptr 4)) pi h
-{-# LINE 46 "GLPng.chs" #-}
+{-# LINE 46 "Bindings/GLPng.hsc" #-}
                             ((\hsc_ptr -> pokeByteOff hsc_ptr 8)) pi d
-{-# LINE 47 "GLPng.chs" #-}
+{-# LINE 47 "Bindings/GLPng.hsc" #-}
                             ((\hsc_ptr -> pokeByteOff hsc_ptr 12)) pi a
-{-# LINE 48 "GLPng.chs" #-}
+{-# LINE 48 "Bindings/GLPng.hsc" #-}
     
     
 
 
 png_NoMipmap :: CInt
 png_NoMipmap = (0)
-{-# LINE 54 "GLPng.chs" #-}
+{-# LINE 54 "Bindings/GLPng.hsc" #-}
 
 png_BuildMipmap :: CInt
 png_BuildMipmap = (-1)
-{-# LINE 57 "GLPng.chs" #-}
+{-# LINE 57 "Bindings/GLPng.hsc" #-}
 
 png_SimpleMipmap :: CInt
 png_SimpleMipmap = (-2)
-{-# LINE 60 "GLPng.chs" #-}
+{-# LINE 60 "Bindings/GLPng.hsc" #-}
 
 
 data Mipmap = NoMipmap | BuildMipmap | SimpleMipmap
@@ -89,11 +89,11 @@ marshalMipmap m
 
 png_Alpha :: CInt
 png_Alpha = (-2)
-{-# LINE 74 "GLPng.chs" #-}
+{-# LINE 74 "Bindings/GLPng.hsc" #-}
 
 png_Solid :: CInt
 png_Solid = (-1)
-{-# LINE 77 "GLPng.chs" #-}
+{-# LINE 77 "Bindings/GLPng.hsc" #-}
 
 data Trans = Alpha | Solid
            deriving (Eq, Show)
@@ -110,27 +110,27 @@ magToMin magFilter = (magFilter, Nothing)
 
 gl_NEAREST :: CInt
 gl_NEAREST = (9728)
-{-# LINE 93 "GLPng.chs" #-}
+{-# LINE 93 "Bindings/GLPng.hsc" #-}
 
 gl_LINEAR :: CInt
 gl_LINEAR = (9729)
-{-# LINE 96 "GLPng.chs" #-}
+{-# LINE 96 "Bindings/GLPng.hsc" #-}
 
 gl_NEAREST_MIPMAP_NEAREST :: CInt
 gl_NEAREST_MIPMAP_NEAREST = (9984)
-{-# LINE 99 "GLPng.chs" #-}
+{-# LINE 99 "Bindings/GLPng.hsc" #-}
 
 gl_LINEAR_MIPMAP_NEAREST :: CInt
 gl_LINEAR_MIPMAP_NEAREST = (9985)
-{-# LINE 102 "GLPng.chs" #-}
+{-# LINE 102 "Bindings/GLPng.hsc" #-}
 
 gl_NEAREST_MIPMAP_LINEAR :: CInt
 gl_NEAREST_MIPMAP_LINEAR = (9986)
-{-# LINE 105 "GLPng.chs" #-}
+{-# LINE 105 "Bindings/GLPng.hsc" #-}
 
 gl_LINEAR_MIPMAP_LINEAR :: CInt
 gl_LINEAR_MIPMAP_LINEAR = (9987)
-{-# LINE 108 "GLPng.chs" #-}
+{-# LINE 108 "Bindings/GLPng.hsc" #-}
 
 
 marshalMinificationFilter :: MinificationFilter -> CInt
@@ -148,23 +148,23 @@ marshalMagnificationFilter = marshalMinificationFilter . magToMin
 
 gl_CLAMP :: CInt
 gl_CLAMP = (10496)
-{-# LINE 125 "GLPng.chs" #-}
+{-# LINE 125 "Bindings/GLPng.hsc" #-}
 
 gl_REPEAT :: CInt
 gl_REPEAT = (10497)
-{-# LINE 128 "GLPng.chs" #-}
+{-# LINE 128 "Bindings/GLPng.hsc" #-}
 
 gl_CLAMP_TO_EDGE :: CInt
 gl_CLAMP_TO_EDGE = (33071)
-{-# LINE 131 "GLPng.chs" #-}
+{-# LINE 131 "Bindings/GLPng.hsc" #-}
 
 gl_CLAMP_TO_BORDER :: CInt
 gl_CLAMP_TO_BORDER = (33069)
-{-# LINE 134 "GLPng.chs" #-}
+{-# LINE 134 "Bindings/GLPng.hsc" #-}
 
 gl_MIRRORED_REPEAT :: CInt
 gl_MIRRORED_REPEAT = (33648)
-{-# LINE 137 "GLPng.chs" #-}
+{-# LINE 137 "Bindings/GLPng.hsc" #-}
 
 
 marshalTextureWrapMode :: (Repetition, Clamping) -> CInt
-- 
cgit v1.2.3