dac31aeec6a1492968ccc01a8ab66fbe5d7491e0
[ghc.git] / testsuite / tests / ffi / should_compile / all.T
1
2 def ffi( name, opts ):
3   opts.extra_hc_opts = '-XForeignFunctionInterface -optc-Wno-implicit'
4
5 setTestOpts(ffi)
6
7 test('cc001', normal, compile, [''])
8
9 # Non-static C call
10 # cc004 test also uses stdcall, so it only works on i386.
11 if config.platform.startswith('i386-'):
12     ways = normal
13 else:
14     ways = expect_fail
15 test('cc004', ways, compile, [''])
16
17 test('cc005', normal, compile, [''])
18 test('cc007', normal, compile, [''])
19 test('cc008', normal, compile, [''])
20 test('cc009', normal, compile, [''])
21 test('cc010', normal , compile, [''])
22 test('cc011', normal, compile, [''])
23 test('cc012', normal, compile, [''])
24 test('cc013', normal, compile, [''])
25 test('cc014', normal, compile, [''])
26 test('ffi-deriv1', normal, compile, [''])
27 test('T1357', normal, compile, [''])
28 test('T3624', normal, compile, [''])
29 test('T3742', normal, compile, [''])
30 test('cc015', normal, compile, [''])
31 test('cc016', normal, compile, [''])
32 test('T10460', normal, compile, [''])
33 test('T11983', [ omit_ways(['ghci']), extra_clean(['T11983.o']) ],
34                compile, ['T11983.c'])