summaryrefslogtreecommitdiff
path: root/testsuite/tests/unboxedsums/ffi1.stderr
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/unboxedsums/ffi1.stderr')
-rw-r--r--testsuite/tests/unboxedsums/ffi1.stderr7
1 files changed, 3 insertions, 4 deletions
diff --git a/testsuite/tests/unboxedsums/ffi1.stderr b/testsuite/tests/unboxedsums/ffi1.stderr
index 3a97270d0d..cdc77cea19 100644
--- a/testsuite/tests/unboxedsums/ffi1.stderr
+++ b/testsuite/tests/unboxedsums/ffi1.stderr
@@ -3,15 +3,14 @@ ffi1.hs:9:1: error:
• Unacceptable argument type in foreign declaration:
‘(# Int | Int #)’ cannot be marshalled in a foreign call
• When checking declaration:
- foreign import ccall safe "static f1" f1
- :: (# Int | Int #) -> IO Int
+ foreign import ccall safe "f1" f1 :: (# Int | Int #) -> IO Int
ffi1.hs:10:1: error:
• Unacceptable argument type in foreign declaration:
‘(# (# Int, Int #) |
(# Float#, Float# #) #)’ cannot be marshalled in a foreign call
• When checking declaration:
- foreign import ccall safe "static f2" f2
+ foreign import ccall safe "f2" f2
:: (# (# Int, Int #) | (# Float#, Float# #) #) -> IO Int
ffi1.hs:11:1: error:
@@ -19,5 +18,5 @@ ffi1.hs:11:1: error:
‘(# (# #) | Void# |
(# Int# | String #) #)’ cannot be marshalled in a foreign call
• When checking declaration:
- foreign import ccall safe "static f3" f3
+ foreign import ccall safe "f3" f3
:: (# (# #) | Void# | (# Int# | String #) #) -> IO Int