From 6aca925ef28bf0a0a311bc8e33ec9a5aa2ded6ad Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Mon, 5 Mar 2007 14:52:58 +0000 Subject: add tests from GHC testsuite --- tests/all.T | 20 ++++++++++++++++++++ 1 file changed, 20 insertions(+) create mode 100644 tests/all.T (limited to 'tests/all.T') 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']) + -- cgit v1.2.3