Update Trac ticket URLs to point to GitLab
[ghc.git] / testsuite / tests / ffi / should_fail / ccfail002.hs
1
2 {-# LANGUAGE ForeignFunctionInterface, UnboxedTuples, MagicHash, UnliftedFFITypes #-}
3
4 -- Test for #1680
5
6 module ShouldFail where
7
8 import GHC.Exts
9
10 foreign import ccall unsafe "foo"
11 foo :: Int# -> Int# -> Int# -> (# Int# , Int#, Int# #)