hls-pragmas-plugin-1.0.1.0: test/testdata/AddLanguagePragma.hs

{-# LANGUAGE OverloadedStrings #-}

module NeedsLanguagePragma where

tupleSection = (1,) <$> Just 2

{-# INLINE addOne #-}
addOne :: Int -> Int
addOne x = x + 1