summaryrefslogtreecommitdiff
path: root/testsuite/tests/rebindable/all.T
blob: 1484dd73d977b51b3a0e4569ef415777b1d7023c (plain)
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
# These tests try test the rebindable-syntax feature of GHC,
# which you get when you use -XNoImplicitPrelude
#
# Written by Ashley Yakeley

# No point in doing anything except the normal way
setTestOpts(only_ways(['normal']));

test('rebindable1', normal, compile, [''])
test('rebindable2', normal, compile_and_run, [''])
test('rebindable3', normal, compile_and_run, [''])
test('rebindable4', normal, compile_and_run, [''])
test('rebindable5', normal, compile_and_run, [''])

# rebindable6 has become expected failures
# following Trac #1537
test('rebindable6', normal, compile_fail, [''])

test('rebindable7', normal, compile_and_run, [''])
test('rebindable8', normal, compile, [''])
test('rebindable9', normal, compile, [''])
test('rebindable10', normal, compile_and_run, [''])

# Test rebindable clash warnings
test('rebindable11', normal, compile, [''])
test('rebindable12', normal, compile_fail, [''])

test('T303', normal, compile, [''])

# Tests from Oleg
test('DoRestrictedM', normal, compile, [''])
test('DoParamM', normal, compile_fail, [''])
test('T5038', normal, compile_and_run, [''])
test('T4851', normal, compile, [''])

test('T5908', normal, compile, [''])
test('T10112', normal, compile, [''])
test('T11216', normal, compile, [''])
test('T11216A', normal, compile, [''])
test('T12080', normal, compile, [''])
test('T14670', expect_broken(14670), compile, [''])