~ubuntu-branches/ubuntu/trusty/haskell-llvm-base/trusty-proposed

« back to all changes in this revision

Viewing changes to LLVM/FFI/Support.hsc

  • Committer: Package Import Robot
  • Author(s): Joachim Breitner
  • Date: 2012-03-11 15:44:32 UTC
  • Revision ID: package-import@ubuntu.com-20120311154432-oewynu19bajz4ccb
Tags: upstream-3.0.0.0
ImportĀ upstreamĀ versionĀ 3.0.0.0

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
{-# LANGUAGE CPP, ForeignFunctionInterface #-}
 
2
 
 
3
module LLVM.FFI.Support
 
4
    (
 
5
      createStandardModulePasses
 
6
    , createStandardFunctionPasses
 
7
    ) where
 
8
 
 
9
#if __GLASGOW_HASKELL__ >= 704
 
10
import Foreign.C.Types (CInt(..), CUInt(..))
 
11
#else
 
12
import Foreign.C.Types (CInt, CUInt)
 
13
#endif
 
14
import LLVM.FFI.Core (PassManagerRef)
 
15
 
 
16
foreign import ccall unsafe "LLVMCreateStandardFunctionPasses" createStandardFunctionPasses
 
17
    :: PassManagerRef -> CUInt -> IO ()
 
18
 
 
19
foreign import ccall unsafe "LLVMCreateStandardModulePasses" createStandardModulePasses
 
20
    :: PassManagerRef -> CUInt -> CInt -> CInt -> CInt -> CInt -> CInt -> CInt -> IO ()