File tree Expand file tree Collapse file tree 4 files changed +12
-20
lines changed
src/Graphics/Rendering/OpenGL/Raw Expand file tree Collapse file tree 4 files changed +12
-20
lines changed Original file line number Diff line number Diff line change 11name : OpenGLRaw
2- version : 2.2 .0.0
2+ version : 2.3 .0.0
33synopsis : A raw binding for the OpenGL graphics system
44description :
55 OpenGLRaw is a raw Haskell binding for the OpenGL 4.5 graphics system and
Original file line number Diff line number Diff line change @@ -62,6 +62,11 @@ printFunctions api registry = do
6262 SI. hPutStrLn h . separate unCommandName . M. keys . commands $ registry
6363 SI. hPutStrLn h " ) where"
6464 SI. hPutStrLn h " "
65+ SI. hPutStrLn h " -- Make the foreign imports happy."
66+ SI. hPutStrLn h " import Data.Int"
67+ SI. hPutStrLn h " import Data.Word"
68+ SI. hPutStrLn h " import Foreign.C.Types"
69+ SI. hPutStrLn h " "
6570 SI. hPutStrLn h " import Foreign.Marshal.Error ( throwIf )"
6671 SI. hPutStrLn h " import Foreign.Ptr ( Ptr, FunPtr, nullFunPtr )"
6772 SI. hPutStrLn h " import System.IO.Unsafe ( unsafePerformIO )"
Original file line number Diff line number Diff line change @@ -3079,6 +3079,11 @@ module Graphics.Rendering.OpenGL.Raw.Functions (
30793079 glWriteMaskEXT
30803080) where
30813081
3082+ -- Make the foreign imports happy.
3083+ import Data.Int
3084+ import Data.Word
3085+ import Foreign.C.Types
3086+
30823087import Foreign.Marshal.Error ( throwIf )
30833088import Foreign.Ptr ( Ptr, FunPtr, nullFunPtr )
30843089import System.IO.Unsafe ( unsafePerformIO )
Original file line number Diff line number Diff line change @@ -56,25 +56,7 @@ module Graphics.Rendering.OpenGL.Raw.Types (
5656 GLclampx ,
5757 GLhandleARB ,
5858 GLvdpauSurfaceNV ,
59- GLeglImageOES ,
60-
61- -- * Re-exports
62- CChar (.. ),
63- CDouble (.. ),
64- CFloat (.. ),
65- CInt (.. ),
66- CPtrdiff (.. ),
67- CSChar (.. ),
68- CShort (.. ),
69- CUChar (.. ),
70- CUInt (.. ),
71- CUShort (.. ),
72-
73- Int64 (.. ),
74- Word64 (.. ),
75-
76- FunPtr (.. ),
77- Ptr (.. )
59+ GLeglImageOES
7860) where
7961
8062import Data.Int
You can’t perform that action at this time.
0 commit comments