From 71dee7308e7ca73d759438ad82a89d65b40c27fe Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Niklas=20Hamb=C3=BCchen?= Date: Thu, 11 Jul 2013 13:30:08 +0800 Subject: [PATCH] Add type annotation --- test/TestHopfield.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/test/TestHopfield.hs b/test/TestHopfield.hs index ec23d16..148346a 100644 --- a/test/TestHopfield.hs +++ b/test/TestHopfield.hs @@ -30,7 +30,7 @@ configs = [ Config Hebbian 100 , Config Storkey 30 ] --- forAllMethods :: (Config -> Spec) -> Core.Type.SpecM () +forAllMethods :: (Config -> Spec) -> Spec forAllMethods testFun = forM_ configs $ \conf@Config {method, maxPatSize} -> describe (show method ++ " " ++ show maxPatSize) $ do testFun conf