From bf7ab3e68298fc4748264e321330c6c023338ffa Mon Sep 17 00:00:00 2001 From: David Waern Date: Sun, 24 Jan 2010 16:05:08 +0000 Subject: Improve FunArg test and update Test.html.ref --- tests/tests/FunArgs.hs | 7 +++++++ tests/tests/FunArgs.html.ref | 48 ++++++++++++++++++++++++++++++++++++++++++++ tests/tests/Test.html.ref | 4 ++-- 3 files changed, 57 insertions(+), 2 deletions(-) (limited to 'tests') diff --git a/tests/tests/FunArgs.hs b/tests/tests/FunArgs.hs index aadbf236..b34d84b7 100644 --- a/tests/tests/FunArgs.hs +++ b/tests/tests/FunArgs.hs @@ -7,3 +7,10 @@ f :: forall a. Ord a -> (a -> a) -- ^ Fourth argument -> () -- ^ Result f = undefined + + +g :: a -- ^ First argument + -> b -- ^ Second argument + -> c -- ^ Third argument + -> d -- ^ Result +g = undefined diff --git a/tests/tests/FunArgs.html.ref b/tests/tests/FunArgs.html.ref index 12371e63..0e0a765f 100644 --- a/tests/tests/FunArgs.html.ref +++ b/tests/tests/FunArgs.html.ref @@ -131,6 +131,54 @@ >g
:: aFirst argument +
-> bSecond argument +
-> cThird argument +
-> dResult +
Produced by Haddock version 2.6.0-> T3-> (T3 Bool Bool -> T4 Float Float)This argument has type T3 Bool Bool -> T4 Float Float