testsuite/tests/driver/dynamic_flags_001/C.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17


{-# OPTIONS_GHC -fwarn-missing-signatures #-}

module Main (main, c_type_default, c_unused_bind) where

import A (a)
import B (b)

main :: IO ()
main = print (a + b)

c_type_default :: Int
c_type_default = 2 ^ 2

c_unused_bind :: Int -> Int
c_unused_bind x = 2