1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
|
def f(name, opts):
if (ghc_with_interpreter == 0):
opts.skip = 1
setTestOpts(f)
setTestOpts(when(compiler_lt('ghc', '7.1'), skip))
test('plugins01',
[pre_cmd('$MAKE -s --no-print-directory -C simple-plugin package.plugins01'),
clean_cmd('$MAKE -s --no-print-directory -C simple-plugin clean.plugins01')],
run_command,
['$MAKE -s --no-print-directory plugins01'])
test('plugins02',
[pre_cmd('$MAKE -s --no-print-directory -C simple-plugin package.plugins02'),
clean_cmd('$MAKE -s --no-print-directory -C simple-plugin clean.plugins02')],
compile_fail,
['-package-db simple-plugin/pkg.plugins02/local.package.conf -fplugin Simple.BadlyTypedPlugin -package simple-plugin ' + config.ghci_way_flags])
test('plugins03',
[pre_cmd('$MAKE -s --no-print-directory -C simple-plugin package.plugins03'),
clean_cmd('$MAKE -s --no-print-directory -C simple-plugin clean.plugins03')],
compile_fail,
['-package-db simple-plugin/pkg.plugins03/local.package.conf -fplugin Simple.NonExistantPlugin -package simple-plugin'])
test('plugins04',
extra_clean(['HomePackagePlugin.hi', 'HomePackagePlugin.o']),
multimod_compile_fail,
['plugins04', '-package ghc -fplugin HomePackagePlugin'])
test('plugins05',
[ extra_clean(['HomePackagePlugin.hi', 'HomePackagePlugin.o']),
only_ways([config.ghc_plugin_way]) ],
multimod_compile_and_run, ['plugins05', '-package ghc'])
test('plugins06',
[ extra_clean(['LinkerTicklingPlugin.hi', 'LinkerTicklingPlugin.o']),
unless(have_dynamic(),skip),
only_ways([config.ghc_plugin_way]) ],
multimod_compile_and_run, ['plugins06', '-package ghc'])
test('plugins07',
[pre_cmd('$MAKE -s --no-print-directory -C rule-defining-plugin package.plugins07'),
clean_cmd('$MAKE -s --no-print-directory -C rule-defining-plugin clean.plugins07')],
run_command,
['$MAKE -s --no-print-directory plugins07'])
test('T10420',
[pre_cmd('$MAKE -s --no-print-directory -C rule-defining-plugin package.T10420'),
clean_cmd('$MAKE -s --no-print-directory -C rule-defining-plugin clean.T10420')],
run_command,
['$MAKE -s --no-print-directory T10420'])
test('T10294',
[pre_cmd('$MAKE -s --no-print-directory -C annotation-plugin package.T10294'),
clean_cmd('$MAKE -s --no-print-directory -C annotation-plugin clean.T10294'),
unless(have_dynamic(),expect_broken(10301))],
run_command,
['$MAKE -s --no-print-directory T10294'])
test('T10294a',
[pre_cmd('$MAKE -s --no-print-directory -C annotation-plugin package.T10294a'),
clean_cmd('$MAKE -s --no-print-directory -C annotation-plugin clean.T10294a')],
run_command,
['$MAKE -s --no-print-directory T10294a'])
test('frontend01',
[extra_clean(['FrontendPlugin.hi', 'FrontendPlugin.o',
'frontend01', 'frontend01.o', 'frontend01.hi']),
unless(have_dynamic(), expect_broken(10301))],
run_command, ['$MAKE -s --no-print-directory frontend01'])
test('T11244',
[pre_cmd('$MAKE -s --no-print-directory -C rule-defining-plugin package.T11244'),
clean_cmd('$MAKE -s --no-print-directory -C rule-defining-plugin clean.T11244')],
run_command,
['$MAKE -s --no-print-directory T11244'])
|
