no good reason these tests should be expect_fail, as far as I can tell
[packages/unix.git] / tests / all.T
1 if config.platform == 'i386-unknown-mingw32':
2    conf = skip
3 else:
4    conf = normal
5
6 test('signals001',  conf, compile_and_run, ['-package unix -cpp'])
7 test('signals002',  compose(only_compiler_types(['ghc']), conf),
8         compile_and_run, ['-package unix'])
9 test('fileexist01', conf, compile_and_run, ['-package unix'])
10 test('forkprocess01', compose(only_compiler_types(['ghc']), 
11                       compose(expect_fail_for(['threaded2']), conf)),
12         compile_and_run, ['-package unix'])
13
14 #
15 # user001 may fail due to this bug in glibc:
16 #   http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=466647
17 #
18 test('user001', conf, compile_and_run, ['-package unix'])
19 test('resourceLimit', conf, compile_and_run, ['-package unix'])
20
21 if config.platform == 'i386-unknown-freebsd':
22         conf = expect_fail
23
24 test('queryfdoption01', compose(omit_ways(['ghci']), compose(only_compiler_types(['ghc']), conf)),
25         compile_and_run, ['-package unix'])
26 test('getEnvironment01', conf, compile_and_run, ['-package unix'])
27 test('getGroupEntryForName', compose(conf, exit_code(1)), compile_and_run,
28      ['-package unix'])
29 test('getUserEntryForName', compose(conf, exit_code(1)), compile_and_run,
30      ['-package unix'])
31
32
33 test('signals004', normal, compile_and_run, ['-package unix'])
34
35 if ('threaded1' in config.run_ways):
36    only_threaded_ways = only_ways(['ghci','threaded1','threaded2'])
37 else:
38    only_threaded_ways = skip
39
40 test('fdReadBuf001', only_threaded_ways, compile_and_run, ['-package unix'])
41
42 test('fileStatus',
43      extra_clean(['dir', 'regular', 'link-dir', 'link-regular']),
44      compile_and_run,
45      ['-package unix'])
46
47
48 test('1185', [ expect_fail_for(['threaded2']) ], 
49              compile_and_run, ['-package unix'])