Skip to content

Commit 4e6cb64

Browse files
committed
Removed totally untested Hugs support. Removed useless pragmas.
1 parent cd7fdad commit 4e6cb64

File tree

1 file changed

+0
-6
lines changed

1 file changed

+0
-6
lines changed

src/Graphics/Rendering/OpenGL/Raw/GetProcAddress.hs

Lines changed: 0 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,3 @@
1-
{-# LANGUAGE ForeignFunctionInterface, CPP #-}
21
--------------------------------------------------------------------------------
32
-- |
43
-- Module : Graphics.Rendering.OpenGL.Raw.GetProcAddress
@@ -24,18 +23,13 @@ module Graphics.Rendering.OpenGL.Raw.GetProcAddress (
2423
getProcAddressChecked,
2524
getProcAddressWithSuffixesChecked,
2625
getExtensionChecked
27-
2826
) where
2927

3028
import Control.Monad.IO.Class ( MonadIO(..) )
3129
import Foreign.C.String ( withCString, CString )
3230
import Foreign.Marshal.Error ( throwIf )
3331
import Foreign.Ptr ( FunPtr, nullFunPtr )
3432

35-
#ifdef __HUGS__
36-
{-# CFILES cbits/HsOpenGLRaw.c #-}
37-
#endif
38-
3933
--------------------------------------------------------------------------------
4034

4135
-- | Retrieve an OpenGL function by name. Returns 'nullFunPtr' when no function

0 commit comments

Comments
 (0)