89972e7d1d96a8d6cab8798038df14c1649cc54d
[ghc.git] / testsuite / tests / safeHaskell / safeLanguage / all.T
1 # Just do the normal way, SafeHaskell is all in the frontend
2 def f( opts ):
3   opts.only_ways = ['normal']
4
5 setTestOpts(f)
6
7 test('SafeLang01', normal, compile, ['-trust base'])
8 test('SafeLang02', normal, compile, ['-trust base'])
9 test('SafeLang03', normal, compile, ['-trust base'])
10 test('SafeLang04', normal, compile_and_run, [''])
11 test('SafeLang05', normal, compile_and_run, ['-trust base'])
12 test('SafeLang06',
13      extra_clean(['SafeLang06_A.o', 'SafeLang06_A.hi']),
14      compile_and_run,
15      [''])
16 test('SafeLang07', normal, compile_fail, [''])
17 test('SafeLang08', normal, compile_fail, [''])
18 test('SafeLang09',
19      [exit_code(1),
20       extra_clean(['SafeLang09_A.o', 'SafeLang09_A.hi',
21                    'SafeLang09_B.o', 'SafeLang09_B.hi'])],
22      compile_and_run,
23      [''])
24 test('SafeLang10',
25      extra_clean(['SafeLang10_A.o', 'SafeLang10_A.hi',
26                   'SafeLang10_B.o', 'SafeLang10_B.hi']),
27      multimod_compile_fail,
28      ['SafeLang10', '-trust base'])
29 test('SafeLang11',
30      [req_interp,
31       extra_clean(['SafeLang11_A.o', 'SafeLang11_A.hi',
32                    'SafeLang11_B.o', 'SafeLang11_B.hi'])],
33      multimod_compile_and_run,
34      ['SafeLang11', '-trust base'])
35 test('SafeLang12', normal, multimod_compile_fail, ['SafeLang12', '-trust base'])
36 test('SafeLang13',
37      extra_clean(['SafeLang13_A.o', 'SafeLang13_A.hi']),
38      multimod_compile_and_run,
39      ['SafeLang13', '-trust base'])
40 test('SafeLang14',
41      extra_clean(['SafeLang14_A.o', 'SafeLang14_A.hi']),
42      multimod_compile_fail,
43      ['SafeLang14', '-trust base -XSafe'])
44 test('SafeLang15',
45      [exit_code(1),
46       extra_clean(['SafeLang15_A.o', 'SafeLang15_A.hi'])],
47      multimod_compile_and_run,
48      ['SafeLang15', '-trust base -XSafe'])
49 test('SafeLang16', normal, compile, [''])