diff options
| author |  Simon Marlow <simonmar@microsoft.com> | 2007-03-05 14:52:58 +0000 |
|---|---|---|
| committer | Simon Marlow <simonmar@microsoft.com> | 2007-03-05 14:52:58 +0000 |
| commit | 6aca925ef28bf0a0a311bc8e33ec9a5aa2ded6ad (patch) | |
| tree | 56d12852ae789bc48d0fb8b15837e20a6ca718b1 /tests/all.T | |
| parent | 7b8f8d32be1a6b14317a6373bc4a40b03285aa4d (diff) | |
add tests from GHC testsuite
Diffstat (limited to 'tests/all.T')
| -rw-r--r-- | tests/all.T | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/tests/all.T b/tests/all.T new file mode 100644 index 0000000..17c7acb --- /dev/null +++ b/tests/all.T @@ -0,0 +1,20 @@ +if config.platform == 'i386-unknown-mingw32': + conf = skip +else: + conf = normal + +test('signals001', conf, compile_and_run, ['-package unix -cpp']) +test('signals002', compose(only_compiler_types(['ghc']), conf), + compile_and_run, ['-package unix']) +test('fileexist01', conf, compile_and_run, ['-package unix']) +test('forkprocess01', compose(only_compiler_types(['ghc']), + compose(expect_fail_for('threaded2'), conf)), + compile_and_run, ['-package unix']) + +if config.platform == 'i386-unknown-freebsd': + conf = expect_fail + +test('queryfdoption01', compose(omit_ways(['ghci']), compose(only_compiler_types(['ghc']), conf)), + compile_and_run, ['-package unix']) +test('getEnvironment01', conf, compile_and_run, ['-package unix']) + |