all.T 5.5 KB
Newer Older
1
setTestOpts(only_compiler_types(['ghc']))
2
3
# Keep optimised tests, so we test coercion optimisation
setTestOpts(omit_ways(['optasm', 'hpc']))
4

5
6
7
8
9
10
test('Simple1', normal, compile, [''])
test('Simple2', normal, compile, [''])
test('Simple3', normal, compile, [''])
test('Simple4', normal, compile, [''])
test('Simple5', normal, compile, [''])
test('Simple6', normal, compile, [''])
11
test('Simple7', normal, compile, [''])
12
test('Simple8', normal, compile, [''])
TomSchrijvers's avatar
TomSchrijvers committed
13
test('Simple9', normal, compile, [''])
14
test('Simple10', normal, compile, [''])
15
test('Simple11', normal, compile, [''])
16
test('Simple12', normal, compile, [''])
17
test('Simple13', normal, compile, [''])
18
test('Simple14', normal, compile_fail, [''])
19
test('Simple15', normal, compile, [''])
20
test('Simple16', normal, compile, [''])
simonpj's avatar
simonpj committed
21
test('Simple17', normal, compile, [''])
22
test('Simple18', normal, compile, [''])
23
test('Simple19', normal, compile, [''])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
24
test('Simple20', expect_broken(4296), compile, [''])
25
test('Simple21', normal, compile, [''])
26
27
test('Simple22', normal, compile, [''])
test('Simple23', normal, compile, [''])
28
test('Simple24', normal, compile, [''])
29

30
test('RelaxedExamples', normal, compile, [''])
31
32
test('NonLinearLHS', normal, compile, [''])

33
test('ind1', normal, compile, [''])
Ian Lynagh's avatar
Ian Lynagh committed
34
test('ind2',
Ian Lynagh's avatar
Ian Lynagh committed
35
     extra_clean(['Ind2_help.hi', 'Ind2_help.o']),
Ian Lynagh's avatar
Ian Lynagh committed
36
37
38
     multimod_compile,
     ['ind2', '-v0'])
test('impexp',
Ian Lynagh's avatar
Ian Lynagh committed
39
     extra_clean(['Exp.hi', 'Exp.o', 'Imp.hi', 'Imp.o']),
Ian Lynagh's avatar
Ian Lynagh committed
40
     multimod_compile, 
Ian Lynagh's avatar
Ian Lynagh committed
41
     ['Imp', '-w -no-hs-main -c'])
42

Ian Lynagh's avatar
Ian Lynagh committed
43
test('ATLoop',
Ian Lynagh's avatar
Ian Lynagh committed
44
     extra_clean(['ATLoop_help.o','ATLoop_help.hi']),
Ian Lynagh's avatar
Ian Lynagh committed
45
     multimod_compile,
46
     ['ATLoop.hs','-v0'])
47

48
49
test('Deriving', normal, compile, [''])
test('DerivingNewType', expect_fail, compile, [''])
50
test('Records', normal, compile, [''])
51
52
53
54

# The point about this test is that it compiles NewTyCo1 and NewTyCo2
# *separately*
#
Ian Lynagh's avatar
Ian Lynagh committed
55
56
57
58
test('NewTyCo',
     extra_clean(['NewTyCo1.o', 'NewTyCo1.hi', 'NewTyCo2.o', 'NewTyCo2.hi']),
     run_command,
     ['$MAKE -s --no-print-directory NewTyCo'])
59

60
test('Infix', normal, compile, [''])
61
test('Kind', normal, compile, [''])
62

63
test('GADT1', normal, compile, [''])
64
test('GADT2', normal, compile, [''])
65
test('GADT3', normal, compile, [''])
66
67
68
test('GADT4', normal, compile, [''])
test('GADT5', normal, compile, [''])
test('GADT6', normal, compile, [''])
69
test('GADT7', normal, compile, [''])
70
test('GADT8', normal, compile, [''])
71
test('GADT9', normal, compile, [''])
72
test('GADT10', normal, compile, [''])
Ian Lynagh's avatar
Ian Lynagh committed
73
test('GADT11', normal, compile, [''])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
74
test('GADT12', normal, compile, [''])
75
test('GADT13', normal, compile, [''])
76
test('GADT14', normal, compile, [''])
77

78
test('Class1', normal, compile, [''])
79
test('Class2', normal, compile, [''])
80
test('Class3', normal, compile, [''])
81

82
test('Refl', normal, compile, [''])
83
test('Refl2', normal, compile, [''])
84

85
86
test('Rules1', normal, compile, [''])

87
test('Numerals', normal, compile, [''])
88

89
90
91
92
93
test('ColInference', normal, compile, [''])
test('ColInference2', normal, compile, [''])
test('ColInference3', normal, compile, [''])
test('ColInference4', normal, compile, [''])
test('ColInference5', normal, compile, [''])
94
95
test('ColInference6', normal, compile, [''])

96
97
98
test('ClassEqContext', normal, compile_fail, [''])
test('ClassEqContext2', normal, compile_fail, [''])
test('ClassEqContext3', normal, compile_fail, [''])
99
100

test('Col', normal, compile, [''])
101
test('Col2', normal, compile, [''])
102
103

test('ColGivenCheck', normal, compile, [''])
104
test('ColGivenCheck2', normal, compile, [''])
105

106
test('InstEqContext', expect_fail, compile, [''])
107
test('InstEqContext2', normal, compile, [''])
108
test('InstEqContext3', expect_fail, compile, [''])
109

110
test('InstContextNorm', normal, compile, [''])
111

112
test('HO', normal, compile_fail, [''])
113
114
115

test('GivenCheck', normal, compile, [''])
test('GivenCheckSwap', normal, compile, [''])
116
test('GivenCheckDecomp', normal, compile, [''])
117
test('GivenCheckTop', normal, compile, [''])
118

119
test('Gentle', normal, compile, [''])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
120
test('T1981', normal, compile, [''])
121
test('T2238', expect_fail, compile, [''])
122
test('OversatDecomp', normal, compile, [''])
123

chak@cse.unsw.edu.au.'s avatar
chak@cse.unsw.edu.au. committed
124
test('T2219', normal, compile, [''])
chak@cse.unsw.edu.au.'s avatar
chak@cse.unsw.edu.au. committed
125
test('T2627', normal, compile, [''])
chak@cse.unsw.edu.au.'s avatar
chak@cse.unsw.edu.au. committed
126
test('T2448', normal, compile, [''])
chak@cse.unsw.edu.au.'s avatar
chak@cse.unsw.edu.au. committed
127
test('T2291', normal, compile, [''])
chak@cse.unsw.edu.au.'s avatar
chak@cse.unsw.edu.au. committed
128
test('T2639', normal, compile, [''])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
129
test('T2944', normal, compile, [''])
130
test('T3017', if_compiler_lt('ghc', '6.11', expect_fail), compile, ['-ddump-types'])
Ian Lynagh's avatar
Ian Lynagh committed
131
test('TF_GADT', if_compiler_lt('ghc', '6.11', expect_fail), compile, [''])
chak@cse.unsw.edu.au.'s avatar
chak@cse.unsw.edu.au. committed
132
test('T2203b', if_compiler_lt('ghc', '6.11', expect_fail), compile, [''])
133
134
135
test('T2767', if_compiler_lt('ghc', '6.11', expect_fail), compile, [''])
test('T3208a', if_compiler_lt('ghc', '6.11', expect_fail), compile, [''])
test('T3208b', expect_fail, compile, [''])
chak@cse.unsw.edu.au.'s avatar
chak@cse.unsw.edu.au. committed
136
test('T3418', if_compiler_lt('ghc', '6.11', expect_fail), compile, [''])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
137
test('T3423', normal, compile, [''])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
138
test('T2850', normal, compile, [''])
chak@cse.unsw.edu.au.'s avatar
chak@cse.unsw.edu.au. committed
139
test('T3220', if_compiler_lt('ghc', '6.11', expect_fail), compile, [''])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
140
test('T3590', normal, compile, [''])
141
test('CoTest3', if_compiler_lt('ghc', '6.13', expect_fail), compile, [''])
142
test('Roman1', if_compiler_lt('ghc', '6.13', expect_fail), compile, [''])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
143
test('T4160', normal, compile, [''])
144
145
146
147
148
test('IndTypesPerf',
     extra_clean(['IndTypesPerf.o', 'IndTypesPerf.hi',
                  'IndTypesPerfMerge.o', 'IndTypesPerfMerge.hi']),
     run_command,
     ['$MAKE -s --no-print-directory IndTypesPerf'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
149

150
test('T4120', normal, compile_fail, [''])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
151
test('T3787', reqlib('mtl'), compile, [''])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
152
153
154
155
test('T3826', normal, compile, [''])
test('T4200', normal, compile, [''])
test('T3851', normal, compile, [''])
test('T4178', normal, compile, [''])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
156
157
test('T3023', normal, compile, [''])
test('T4358', normal, compile, [''])