Commit d88b0b67 authored by simonpj's avatar simonpj
Browse files

Accept changes

parent a897ab8f
T2693.hs:10:15:
Couldn't match expected type `(a1, b)'
against inferred type `TFn a'
In the first argument of `fst', namely `x'
In the first argument of `(+)', namely `fst x'
In the expression: fst x + fst x
T2693.hs:10:15:
Could not deduce (TFn a ~ (a1, b)) from the context ()
In the first argument of `fst', namely `x'
In the first argument of `(+)', namely `fst x'
In the expression: fst x + fst x
......@@ -4,7 +4,7 @@ module Main where
import Ix
-- Deriving Enum with phantom type parameter
data T a = R | S | T deriving( Enum, Show, Ix )
data T a = R | S | T deriving( Enum, Show )
-- Tests that deriving works for data families
data family Foo a
......
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