summaryrefslogtreecommitdiff
path: root/testsuite/tests/th/TH_foreignInterruptible.stderr
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/th/TH_foreignInterruptible.stderr')
-rw-r--r--testsuite/tests/th/TH_foreignInterruptible.stderr13
1 files changed, 13 insertions, 0 deletions
diff --git a/testsuite/tests/th/TH_foreignInterruptible.stderr b/testsuite/tests/th/TH_foreignInterruptible.stderr
new file mode 100644
index 0000000000..b9aab05755
--- /dev/null
+++ b/testsuite/tests/th/TH_foreignInterruptible.stderr
@@ -0,0 +1,13 @@
+TH_foreignInterruptible.hs:1:1: Splicing declarations
+ return
+ [ForeignD
+ (ImportF
+ CCall
+ Interruptible
+ "&"
+ (mkName "foo")
+ (AppT (ConT 'Ptr) (ConT '())))]
+ ======>
+ TH_foreignInterruptible.hs:8:3-100
+ foreign import ccall interruptible "static &foo" foo
+ :: Ptr GHC.Unit.()