blob: a11ec36daf2fc54458ccb867a08e1e26964070f5 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
TH_foreignInterruptible.hs:8:3-100: Splicing declarations
return
[ForeignD
(ImportF
CCall
Interruptible
"&"
(mkName "foo")
(AppT (ConT ''Ptr) (ConT ''())))]
======>
foreign import ccall interruptible "static &foo" foo :: Ptr ()
|