summaryrefslogtreecommitdiff
path: root/testsuite/tests/typecheck/should_compile/tc170.hs
blob: 9e649b307bdad1827f4f5bd1b69dd9f9c92bf019 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
-- This test killed GHC 6.0.2 when it read the interface file for
-- Tc170_Aux, because there was a 
--	forall a. (# ... #)
-- in the default method for 'position'
--
-- NB: only fails when compiled in batch mode. In --make mode, GHC
--     doesn't read the interface file, so all is well.

module ShouldCompile where

import Tc170_Aux

data Bitmap = Bitmap

instance Dimensions Bitmap where
  frame = error "urk"