Add -fobject-code to the numeric *2 tests
[ghc.git] / testsuite / tests / numeric / should_run / all.T
1 # Args to compile_and_run are:
2 #       extra compile flags
3 #       extra run flags
4 #       expected process return value, if not zero
5
6 test('arith001', normal, compile_and_run, [''])
7 test('arith002', normal, compile_and_run, [''])
8 test('arith003', normal, compile_and_run, [''])
9 test('arith004', normal, compile_and_run, [''])
10 test('arith005', normal, compile_and_run, [''])
11 test('arith006', normal, compile_and_run, [''])
12 test('arith007', normal, compile_and_run, [''])
13
14 # On i386, we need -msse2 to get reliable floating point results
15 ways = normal
16 opts = ''
17 if config.platform.startswith('i386-'):
18    if config.compiler_type == 'ghc' and \
19       version_ge(config.compiler_version, '6.13'):
20         opts = '-msse2'
21    else:
22         ways = expect_fail_for(['optasm','threaded2','hpc','dyn','profasm'])
23
24 test('arith008', ways, compile_and_run, [opts])
25
26 test('arith009', normal, compile_and_run, [''])
27 test('arith010', normal, compile_and_run, [''])
28 test('arith011', normal, compile_and_run, [''])
29
30 test('arith012', ways, compile_and_run, [opts])
31
32 test('arith013', compose(normal,only_compiler_types(['ghc'])), compile_and_run, [''])
33 test('arith014', normal, compile_and_run, [''])
34 test('arith015', normal, compile_and_run, [''])
35 test('numrun009', normal, compile_and_run, [''])
36 test('numrun010', normal, compile_and_run, [''])
37 test('numrun011', normal, compile_and_run, [''])
38 test('numrun012',
39         if_os('mingw32',expect_fail_for('ghci')),
40         # on Windows, GHCi says that "logBase 2 (2^31)" is "31.0", but
41         # other platforms (and compiled on Windows) reports 31.000000000000004
42         # I have no idea where the discrepancy comes from.  --SDM
43         compile_and_run, [''])
44 test('numrun013', normal, compile_and_run, [''])
45 test('numrun014', normal, compile_and_run, [''])
46 test('arith016', compose(normal,only_compiler_types(['ghc'])), compile_and_run, [''])
47 test('arith017', normal, compile_and_run, [''])
48 test('arith018', normal, compile_and_run, [''])
49 test('arith019', normal, compile_and_run, [''])
50 test('expfloat', normal, compile_and_run, [''])
51
52 test('1603', skip, compile_and_run, [''])
53 test('3676', expect_broken(3676), compile_and_run, [''])
54 test('4381', normal, compile_and_run, [''])
55 test('4383', normal, compile_and_run, [''])
56
57 test('add2', normal, compile_and_run, ['-fobject-code'])
58 test('mul2', normal, compile_and_run, ['-fobject-code'])
59 test('quotRem2', normal, compile_and_run, ['-fobject-code'])
60