56dea8ce0faabeaa169d4bc692aeb8fe48ea7e63
[packages/unix.git] / tests / all.T
1
2 test('signals001',  normal, compile_and_run, ['-package unix -cpp'])
3 test('signals002',  only_compiler_types(['ghc']),
4         compile_and_run, ['-package unix'])
5 test('fileexist01', normal, compile_and_run, ['-package unix'])
6 test('forkprocess01', [ only_compiler_types(['ghc']),
7                         extra_ways(['threaded1_ls']) ], # test #4512
8         compile_and_run, ['-package unix'])
9
10 #
11 # user001 may fail due to this bug in glibc:
12 #   http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=466647
13 #
14 test('user001', normal, compile_and_run, ['-package unix'])
15 test('resourceLimit', normal, compile_and_run, ['-package unix'])
16
17 if config.platform == 'i386-unknown-freebsd':
18         conf = expect_fail
19 else:
20         conf = normal
21
22 test('queryfdoption01', compose(omit_ways(['ghci']), compose(only_compiler_types(['ghc']), conf)),
23         compile_and_run, ['-package unix'])
24 test('getEnvironment01', conf, compile_and_run, ['-package unix'])
25 test('getEnvironment02', conf, compile_and_run, ['-package unix'])
26 test('getGroupEntryForName', compose(conf, exit_code(1)), compile_and_run,
27      ['-package unix'])
28 test('getUserEntryForName', compose(conf, exit_code(1)), compile_and_run,
29      ['-package unix'])
30
31
32 test('signals004', normal, compile_and_run, ['-package unix'])
33
34 if ('threaded1' in config.run_ways):
35    only_threaded_ways = only_ways(['ghci','threaded1','threaded2'])
36 else:
37    only_threaded_ways = skip
38
39 test('fdReadBuf001', only_threaded_ways, compile_and_run, ['-package unix'])
40
41 test('fileStatus',
42      extra_clean(['dir', 'regular', 'link-dir', 'link-regular']),
43      compile_and_run,
44      ['-package unix'])
45
46 test('fileStatusByteString',
47      extra_clean(['dir', 'regular', 'link-dir', 'link-regular']),
48      compile_and_run,
49      ['-package unix'])
50
51
52 test('T1185', normal, compile_and_run, ['-package unix'])
53
54 # This test fails for me on x86/Linux with a "does not exist" error.
55 # Running with strace shows it is trying to talk to winbindd (part of
56 # Samba), so I think the failure has nothing to do with GHC.  Also it
57 # works on a different machine that doesn't have Samba installed.
58 #  --SDM 18/05/2010
59 test('T3816', normal, compile_and_run, ['-package unix'])
60
61 test('processGroup001', normal, compile_and_run, ['-package unix'])
62 test('processGroup002', normal, compile_and_run, ['-package unix'])
63 test('executeFile001', omit_ways(prof_ways), compile_and_run, ['-package unix'])