diff options
| author | David Terei <davidterei@gmail.com> | 2011-06-14 18:42:45 -0700 |
|---|---|---|
| committer | David Terei <davidterei@gmail.com> | 2011-06-14 18:42:45 -0700 |
| commit | b23ecc8f0d419d1a261ac2d760528e804dacb470 (patch) | |
| tree | 5e003a6b6e85d555bbb44873b485db3257398509 /testsuite | |
| parent | 03e402f14f0548ab203a9e15356c53408de23386 (diff) | |
| download | haskell-b23ecc8f0d419d1a261ac2d760528e804dacb470.tar.gz | |
Fix bug in mutlisrc compile not picking up compilation errors.
Diffstat (limited to 'testsuite')
| -rw-r--r-- | testsuite/driver/testlib.py | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/testsuite/driver/testlib.py b/testsuite/driver/testlib.py index 7909a6158e..e87f9bc503 100644 --- a/testsuite/driver/testlib.py +++ b/testsuite/driver/testlib.py @@ -770,8 +770,10 @@ def compile_and_run__( name, way, extra_hc_opts, top_mod, extra_mods ): pretest_cleanup(name) for mod in extra_mods: - simple_build( mod, way, extra_hc_opts, 0, '', 0, 0 ) + result = simple_build( mod, way, extra_hc_opts, 0, '', 0, 0 ) extra_hc_opts += " " + replace_suffix(mod, 'o') + if result == 'fail': + return result if way == 'ghci': # interpreted... return interpreter_run( name, way, extra_hc_opts, 0, top_mod ) |