{-# LANGUAGE OverloadedStrings #-} {-# OPTIONS_GHC -Wall #-} {-# LANGUAGE TupleSections #-} module Test ( SomeData(..) ) where import Data.Monoid class Semigroup a => SomeData a instance SomeData All #! nix-shell --pure -i runghc -p "haskellPackages.ghcWithPackages (hp: with hp; [ turtle ])" {-# OPTIONS_GHC -Wno-unrecognised-pragmas #-} addOne :: Int -> Int addOne x = x + 1