Hello!
GHC nicely asked me to report the bug, so here it goes :)
Compiling this code in GHC 5.04.1 and 5.04.2
{-# OPTIONS -fglasgow-exts #-}
module Bug where
type T a = Int - (# Int, Int #)
f :: T a - T a
f t = \x - case t x of r - r
brings the following error message:
Bugs item #668705, was opened at 2003-01-15 20:12
You can respond by visiting:
https://sourceforge.net/tracker/?func=detailatid=108032aid=668705group_id=8032
Category: None
Group: 5.04.2
Status: Open
Resolution: None
Priority: 5
Submitted By: Antony Courtney (antonyc)
Assigned to: