hls-haddock-comments-plugin-1.0.0.1: test/testdata/HigherRankFunction.hs
{-# LANGUAGE RankNTypes #-}
module HigherRankFunction where
f :: (forall a. [a] -> Int) -> [b] -> [c] -> (Int, Int)
f l xs ys = (l xs, l ys)
{-# LANGUAGE RankNTypes #-}
module HigherRankFunction where
f :: (forall a. [a] -> Int) -> [b] -> [c] -> (Int, Int)
f l xs ys = (l xs, l ys)