Commit 33ade927 authored by ross's avatar ross
Browse files

[project @ 2005-05-06 12:13:54 by ross]

Rearrange arrows tests, and move tc120fail to arrowfail003.
parent 0dd8b5d9
{-# OPTIONS -farrows #-}
-- Arrow commands where an expression is expected
module ShouldFail where
The arrow command
returnA -< []
was found where an expression was expected
In the definition of `foo': foo = returnA -< []
The arrow command
(|zeroArrow |)
was found where an expression was expected
include $(TOP)/mk/
include $(TOP)/mk/
test('arrowrun001', normal, compile_and_run, [''])
test('arrowrun002', normal, compile_and_run, [''])
test('arrowrun003', normal, compile_and_run, [''])
test('arrowrun004', normal, compile_and_run, [''])
......@@ -105,7 +105,6 @@ test('tcfail116', normal, compile_fail, [''])
test('tcfail117', normal, compile_fail, [''])
test('tcfail118', normal, compile_fail, [''])
test('tcfail119', normal, compile_fail, [''])
test('tcfail120', only_compiler_types(['ghc']), compile_fail, ['-farrows'])
test('tcfail121', normal, compile_fail, [''])
test('tcfail122', only_compiler_types(['ghc']), compile_fail, [''])
test('tcfail123', only_compiler_types(['ghc']), compile_fail, [''])
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment