@@ -12,6 +12,9 @@
12#if __GLASGOW_HASKELL__ < 800
12#if __GLASGOW_HASKELL__ < 800
13{-# OPTIONS_GHC -fcontext-stack=100 #-}
13{-# OPTIONS_GHC -fcontext-stack=100 #-}
15+#if __GLASGOW_HASKELL__ >= 802
16+{-# LANGUAGE MonoLocalBinds #-}
15module Main where
18module Main where
17import Control.Applicative
20import Control.Applicative