Commit 9fcf729a authored by Ian Lynagh's avatar Ian Lynagh

Add another layout test

parent 9e120801
......@@ -2,7 +2,7 @@ TOP=../../..
include $(TOP)/mk/
include $(TOP)/mk/
layout001 layout002 layout003: %:
layout001 layout002 layout003 layout004: %:
$(RM) $*.hi $*.o
echo Running with -XNoAlternativeLayoutRule
-"$(TEST_HC)" -XNoAlternativeLayoutRule -c $*.hs 2>&1
......@@ -17,3 +17,9 @@ test('layout003',
['$MAKE -s --no-print-directory layout003'])
[extra_clean(['layout004.hi', 'layout004.o']),
['$MAKE -s --no-print-directory layout004'])
{-# LANGUAGE PatternGuards #-}
module M where
f | Just x <- undefined,
let y = x,
undefined x y
= ()
Running with -XNoAlternativeLayoutRule
Running with -XAlternativeLayoutRule
layout004.hs:7:14: parse error on input `,'
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