testsuite/tests/ghc-regress/driver/dynamic_flags_001/B.hs


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


{-# OPTIONS_GHC -fwarn-type-defaults #-}

module B (b, b_unused_bind, b_missing_sig) where

b :: Int
b = 5

b_unused_bind :: Int -> Int
b_unused_bind x = 2

b_missing_sig = ()