blob: f325ffb8dc90e72db28d0c91a4ff8ca039bafedc (
plain)
1
2
3
4
5
6
7
8
|
T3319.hs:1:1: Splicing declarations
return
[ForeignD
(ImportF
CCall Unsafe "&" (mkName "foo") (AppT (ConT ''Ptr) (ConT ''())))]
======>
T3319.hs:8:3-93
foreign import ccall unsafe "static &foo" foo :: Ptr GHC.Tuple.()
|