diff options
author | Ian Lynagh <igloo@earth.li> | 2011-11-26 14:54:47 +0000 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2011-11-28 17:04:01 +0000 |
commit | 36f8cabecd5a8320ee174abb56e73841a5cbc9c7 (patch) | |
tree | c356eaf53fd9a8d0de556d8229d884c2476373ea /compiler/typecheck | |
parent | 825e0a3e95b3e47b76b91a41d56ddd54a471efac (diff) | |
download | haskell-36f8cabecd5a8320ee174abb56e73841a5cbc9c7.tar.gz |
Implement a capi calling convention; fixes #2979
In GHC, this provides an easy way to call a C function via a C wrapper.
This is important when the function is really defined by CPP.
Requires the new CApiFFI extension.
Not documented yet, as it's still an experimental feature at this stage.
Diffstat (limited to 'compiler/typecheck')
-rw-r--r-- | compiler/typecheck/TcForeign.lhs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/compiler/typecheck/TcForeign.lhs b/compiler/typecheck/TcForeign.lhs index 5a4bf776fa..6bc5a4fcf3 100644 --- a/compiler/typecheck/TcForeign.lhs +++ b/compiler/typecheck/TcForeign.lhs @@ -453,6 +453,7 @@ Calling conventions \begin{code} checkCConv :: CCallConv -> TcM () checkCConv CCallConv = return () +checkCConv CApiConv = return () checkCConv StdCallConv = do dflags <- getDOpts let platform = targetPlatform dflags unless (platformArch platform == ArchX86) $ |