testsuite/tests/ghc-regress/annotations/should_fail/annfail09.hs


1
2
3
4
5
6
7
8
9
10
11
12

module Annfail09 where
-- Testing that we detect references to ids defined in module being compiled in annotations

g = 10

{-# ANN module g #-}

{-# ANN type Foo g #-}
data Foo = Bar

{-# ANN f g #-}
f x = x