module A where {-# NOINLINE a #-} a :: Int a = 23