summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2021-12-09 21:16:16 -0500
committerMarge Bot <ben+marge-bot@smart-cactus.org>2021-12-17 21:20:57 -0500
commit3c3e5c03c9890ba33bd2ac7239161738584dc473 (patch)
treee64fa03a3057330e943cd742dea642b7bddc180f
parent6cea73113e63650e3eeee9c187ae3de7ffc19af6 (diff)
downloadhaskell-3c3e5c03c9890ba33bd2ac7239161738584dc473.tar.gz
Regression test for renamer/typechecker performance (#20261)
We use the parser generated by stack to ensure reproducibility
-rw-r--r--testsuite/tests/perf/compiler/T20261.hs1693
-rw-r--r--testsuite/tests/perf/compiler/all.T5
2 files changed, 1698 insertions, 0 deletions
diff --git a/testsuite/tests/perf/compiler/T20261.hs b/testsuite/tests/perf/compiler/T20261.hs
new file mode 100644
index 0000000000..23b8c2b5b9
--- /dev/null
+++ b/testsuite/tests/perf/compiler/T20261.hs
@@ -0,0 +1,1693 @@
+{-# OPTIONS_GHC -w #-}
+{-# OPTIONS -XMagicHash -XBangPatterns -XTypeSynonymInstances -XFlexibleInstances -cpp #-}
+#if __GLASGOW_HASKELL__ >= 710
+{-# OPTIONS_GHC -XPartialTypeSignatures #-}
+#endif
+
+module T20261 where
+
+import Control.Monad.State.Strict
+import qualified Data.Array as Happy_Data_Array
+import qualified Data.Bits as Bits
+import qualified GHC.Exts as Happy_GHC_Exts
+import Control.Applicative(Applicative(..))
+import Control.Monad (ap)
+
+-- parser produced by Happy Version 1.20.0
+
+newtype HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 = HappyAbsSyn HappyAny
+#if __GLASGOW_HASKELL__ >= 607
+type HappyAny = Happy_GHC_Exts.Any
+#else
+type HappyAny = forall a . a
+#endif
+newtype HappyWrap4 = HappyWrap4 ([Node])
+happyIn4 :: ([Node]) -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn4 x = Happy_GHC_Exts.unsafeCoerce# (HappyWrap4 x)
+{-# INLINE happyIn4 #-}
+happyOut4 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> HappyWrap4
+happyOut4 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut4 #-}
+newtype HappyWrap5 = HappyWrap5 (Node)
+happyIn5 :: (Node) -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn5 x = Happy_GHC_Exts.unsafeCoerce# (HappyWrap5 x)
+{-# INLINE happyIn5 #-}
+happyOut5 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> HappyWrap5
+happyOut5 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut5 #-}
+newtype HappyWrap6 = HappyWrap6 (Node)
+happyIn6 :: (Node) -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn6 x = Happy_GHC_Exts.unsafeCoerce# (HappyWrap6 x)
+{-# INLINE happyIn6 #-}
+happyOut6 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> HappyWrap6
+happyOut6 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut6 #-}
+newtype HappyWrap7 = HappyWrap7 (Node)
+happyIn7 :: (Node) -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn7 x = Happy_GHC_Exts.unsafeCoerce# (HappyWrap7 x)
+{-# INLINE happyIn7 #-}
+happyOut7 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> HappyWrap7
+happyOut7 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut7 #-}
+newtype HappyWrap8 = HappyWrap8 (Node)
+happyIn8 :: (Node) -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn8 x = Happy_GHC_Exts.unsafeCoerce# (HappyWrap8 x)
+{-# INLINE happyIn8 #-}
+happyOut8 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> HappyWrap8
+happyOut8 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut8 #-}
+newtype HappyWrap9 = HappyWrap9 (Node)
+happyIn9 :: (Node) -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn9 x = Happy_GHC_Exts.unsafeCoerce# (HappyWrap9 x)
+{-# INLINE happyIn9 #-}
+happyOut9 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> HappyWrap9
+happyOut9 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut9 #-}
+newtype HappyWrap10 = HappyWrap10 (Node)
+happyIn10 :: (Node) -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn10 x = Happy_GHC_Exts.unsafeCoerce# (HappyWrap10 x)
+{-# INLINE happyIn10 #-}
+happyOut10 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> HappyWrap10
+happyOut10 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut10 #-}
+happyIn11 :: t11 -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn11 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyIn11 #-}
+happyOut11 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> t11
+happyOut11 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut11 #-}
+happyIn12 :: t12 -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn12 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyIn12 #-}
+happyOut12 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> t12
+happyOut12 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut12 #-}
+happyIn13 :: t13 -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn13 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyIn13 #-}
+happyOut13 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> t13
+happyOut13 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut13 #-}
+happyIn14 :: t14 -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn14 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyIn14 #-}
+happyOut14 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> t14
+happyOut14 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut14 #-}
+happyIn15 :: t15 -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn15 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyIn15 #-}
+happyOut15 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> t15
+happyOut15 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut15 #-}
+happyIn16 :: t16 -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn16 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyIn16 #-}
+happyOut16 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> t16
+happyOut16 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut16 #-}
+happyIn17 :: t17 -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn17 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyIn17 #-}
+happyOut17 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> t17
+happyOut17 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut17 #-}
+happyIn18 :: t18 -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn18 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyIn18 #-}
+happyOut18 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> t18
+happyOut18 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut18 #-}
+happyIn19 :: t19 -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn19 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyIn19 #-}
+happyOut19 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> t19
+happyOut19 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut19 #-}
+happyIn20 :: t20 -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn20 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyIn20 #-}
+happyOut20 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> t20
+happyOut20 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut20 #-}
+happyIn21 :: t21 -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn21 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyIn21 #-}
+happyOut21 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> t21
+happyOut21 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut21 #-}
+happyIn22 :: t22 -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn22 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyIn22 #-}
+happyOut22 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> t22
+happyOut22 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut22 #-}
+happyIn23 :: t23 -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn23 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyIn23 #-}
+happyOut23 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> t23
+happyOut23 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut23 #-}
+newtype HappyWrap24 = HappyWrap24 ([Node])
+happyIn24 :: ([Node]) -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn24 x = Happy_GHC_Exts.unsafeCoerce# (HappyWrap24 x)
+{-# INLINE happyIn24 #-}
+happyOut24 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> HappyWrap24
+happyOut24 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut24 #-}
+newtype HappyWrap25 = HappyWrap25 ([Node])
+happyIn25 :: ([Node]) -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn25 x = Happy_GHC_Exts.unsafeCoerce# (HappyWrap25 x)
+{-# INLINE happyIn25 #-}
+happyOut25 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> HappyWrap25
+happyOut25 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut25 #-}
+newtype HappyWrap26 = HappyWrap26 ([Node])
+happyIn26 :: ([Node]) -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn26 x = Happy_GHC_Exts.unsafeCoerce# (HappyWrap26 x)
+{-# INLINE happyIn26 #-}
+happyOut26 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> HappyWrap26
+happyOut26 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut26 #-}
+newtype HappyWrap27 = HappyWrap27 ([Node])
+happyIn27 :: ([Node]) -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn27 x = Happy_GHC_Exts.unsafeCoerce# (HappyWrap27 x)
+{-# INLINE happyIn27 #-}
+happyOut27 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> HappyWrap27
+happyOut27 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut27 #-}
+newtype HappyWrap28 = HappyWrap28 ([Node])
+happyIn28 :: ([Node]) -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn28 x = Happy_GHC_Exts.unsafeCoerce# (HappyWrap28 x)
+{-# INLINE happyIn28 #-}
+happyOut28 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> HappyWrap28
+happyOut28 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut28 #-}
+newtype HappyWrap29 = HappyWrap29 ([Node])
+happyIn29 :: ([Node]) -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyIn29 x = Happy_GHC_Exts.unsafeCoerce# (HappyWrap29 x)
+{-# INLINE happyIn29 #-}
+happyOut29 :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> HappyWrap29
+happyOut29 x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOut29 #-}
+happyInTok :: (Token) -> (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23)
+happyInTok x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyInTok #-}
+happyOutTok :: (HappyAbsSyn t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23) -> (Token)
+happyOutTok x = Happy_GHC_Exts.unsafeCoerce# x
+{-# INLINE happyOutTok #-}
+
+
+happyExpList :: HappyAddr
+happyExpList = HappyA# "\x00\x00\x00\xe0\x07\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x06\x00\x00\x00\x60\x00\x00\x00\x00\x06\x00\x00\x00\x60\x00\x00\x00\x00\x06\x00\x00\x00\x60\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x02\x00\x00\x00\xa0\x00\x00\x00\x00\x02\x00\x00\x00\xa0\x00\x00\x00\x00\x02\x00\x00\x00\xa0\x00\x00\x00\x00\x02\x00\x00\x00\xa0\x00\x00\x00\x00\x02\x00\x00\x00\xa0\x00\x00\x00\x00\x02\x00\x00\x00\xa0\x00\x00\x00\x00\x02\x00\x00\x00\x20\x01\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x12\x00\x00\x00\x20\x00\x00\x00\x00\x02\x00\x00\x00\x20\x01\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x12\x00\x00\x00\x20\x00\x00\x00\x00\x02\x00\x00\x00\x20\x01\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x12\x00\x00\x00\x20\x00\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x22\x00\x00\x00\x20\x00\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x22\x00\x00\x00\x20\x00\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x22\x00\x00\x00\x20\x00\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x22\x00\x00\x00\x20\x00\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x22\x00\x00\x00\x20\x00\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x22\x00\x00\x00\x20\x00\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x42\x00\x00\x00\x20\x00\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x02\x00\x00\x00\x20\x04\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x42\x00\x00\x00\x20\x00\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x02\x00\x00\x00\x20\x04\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x42\x00\x00\x00\x20\x00\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x02\x00\x00\x00\x20\x04\x00\x00\x00\x02\x00\x00\x00\x20\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00"#
+
+{-# NOINLINE happyExpListPerState #-}
+happyExpListPerState st =
+ token_strs_expected
+ where token_strs = ["error","%dummy","%start_parseMain","R","R0","R1","R2","R3","R4","R5","unused00","unused01","unused02","unused03","unused04","unused05","unused06","unused07","unused08","unused09","unused10","unused11","unused12","gen__R0__","gen__R1__","gen__R2__","gen__R3__","gen__R4__","gen__R5__","T0","T1","T2","T3","T4","T5","%eof"]
+ bit_start = st Prelude.* 36
+ bit_end = (st Prelude.+ 1) Prelude.* 36
+ read_bit = readArrayBit happyExpList
+ bits = Prelude.map read_bit [bit_start..bit_end Prelude.- 1]
+ bits_indexed = Prelude.zip bits [0..35]
+ token_strs_expected = Prelude.concatMap f bits_indexed
+ f (Prelude.False, _) = []
+ f (Prelude.True, nr) = [token_strs Prelude.!! nr]
+
+happyActOffsets :: HappyAddr
+happyActOffsets = HappyA# "\x07\x00\x00\x00\x0a\x00\x4f\x00\x4f\x00\x4f\x00\x4f\x00\x4f\x00\x4f\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x2f\x00\x0f\x00\x2f\x00\x0f\x00\x2f\x00\x0f\x00\x2f\x00\x0f\x00\x2f\x00\x0f\x00\x2f\x00\x0f\x00\x2f\x00\x33\x00\x2f\x00\x2f\x00\x33\x00\x2f\x00\x2f\x00\x33\x00\x2f\x00\x2f\x00\x33\x00\x2f\x00\x2f\x00\x33\x00\x2f\x00\x2f\x00\x33\x00\x2f\x00\x2f\x00\x2f\x00\x24\x00\x2f\x00\x2f\x00\x2f\x00\x24\x00\x2f\x00\x2f\x00\x2f\x00\x24\x00\x2f\x00\x2f\x00\x2f\x00\x24\x00\x2f\x00\x2f\x00\x2f\x00\x24\x00\x2f\x00\x2f\x00\x2f\x00\x24\x00\x2f\x00\x2f\x00\x2f\x00\x0d\x00\x2f\x00\x2f\x00\x2f\x00\x2f\x00\x0d\x00\x2f\x00\x2f\x00\x2f\x00\x2f\x00\x0d\x00\x2f\x00\x2f\x00\x2f\x00\x2f\x00\x0d\x00\x2f\x00\x2f\x00\x2f\x00\x2f\x00\x0d\x00\x2f\x00\x2f\x00\x2f\x00\x2f\x00\x0d\x00\x2f\x00\x2f\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00"#
+
+happyGotoOffsets :: HappyAddr
+happyGotoOffsets = HappyA# "\x01\x00\x00\x00\x00\x00\x51\x00\x53\x00\x55\x00\x57\x00\x59\x00\x5b\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x40\x00\x41\x00\x4d\x00\x44\x00\x5d\x00\x45\x00\x5e\x00\x48\x00\x5f\x00\x49\x00\x60\x00\x4c\x00\x61\x00\x34\x00\x62\x00\x63\x00\x35\x00\x64\x00\x65\x00\x39\x00\x66\x00\x67\x00\x3a\x00\x68\x00\x69\x00\x3b\x00\x6a\x00\x6b\x00\x3f\x00\x6c\x00\x6d\x00\x6e\x00\x25\x00\x6f\x00\x70\x00\x71\x00\x26\x00\x72\x00\x73\x00\x74\x00\x27\x00\x75\x00\x76\x00\x77\x00\x2c\x00\x78\x00\x79\x00\x7a\x00\x2d\x00\x7b\x00\x7c\x00\x7d\x00\x2e\x00\x7e\x00\x7f\x00\x80\x00\x0e\x00\x81\x00\x82\x00\x83\x00\x84\x00\x1a\x00\x85\x00\x86\x00\x87\x00\x88\x00\x1b\x00\x89\x00\x8a\x00\x8b\x00\x8c\x00\x1c\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x1d\x00\x91\x00\x92\x00\x93\x00\x94\x00\x1e\x00\x95\x00\x96\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00"#
+
+happyAdjustOffset :: Happy_GHC_Exts.Int# -> Happy_GHC_Exts.Int#
+happyAdjustOffset off = off
+
+happyDefActions :: HappyAddr
+happyDefActions = HappyA# "\xfe\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xfd\xff\xfc\xff\xfb\xff\xfa\xff\xf9\xff\xf8\xff\xf7\xff\xf6\xff\xf5\xff\xf4\xff\xf3\xff\xf2\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xc6\xff\xc4\xff\xc2\xff\xc1\xff\xc3\xff\xc5\xff\xcc\xff\xca\xff\xc8\xff\xc7\xff\xc9\xff\xcb\xff\xd2\xff\xd0\xff\xce\xff\xcd\xff\xcf\xff\xd1\xff\xd8\xff\xd6\xff\xd4\xff\xd3\xff\xd5\xff\xd7\xff\xde\xff\xdc\xff\xda\xff\xd9\xff\xdb\xff\xdd\xff\xe4\xff\xe2\xff\xe0\xff\xdf\xff\xe1\xff\xe3\xff"#
+
+happyCheck :: HappyAddr
+happyCheck = HappyA# "\xff\xff\x00\x00\x01\x00\x02\x00\x03\x00\x04\x00\x05\x00\x06\x00\x01\x00\x02\x00\x03\x00\x04\x00\x05\x00\x06\x00\x01\x00\x01\x00\x01\x00\x07\x00\x03\x00\x06\x00\x06\x00\x14\x00\x15\x00\x16\x00\x17\x00\x18\x00\x19\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x06\x00\x06\x00\x06\x00\x06\x00\x06\x00\x01\x00\x01\x00\x01\x00\x01\x00\x05\x00\x05\x00\x05\x00\x05\x00\x01\x00\x01\x00\x01\x00\x01\x00\x05\x00\x05\x00\x05\x00\x01\x00\x01\x00\x01\x00\x04\x00\x04\x00\x04\x00\x01\x00\x01\x00\x01\x00\x04\x00\x04\x00\x04\x00\x01\x00\x01\x00\x01\x00\x04\x00\x03\x00\x01\x00\x01\x00\x03\x00\x03\x00\x01\x00\x01\x00\x03\x00\x03\x00\x01\x00\x01\x00\x03\x00\x01\x00\x02\x00\x01\x00\x02\x00\x01\x00\x02\x00\x01\x00\x02\x00\x01\x00\x02\x00\x01\x00\x02\x00\x01\x00\x02\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\x01\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff"#
+
+happyTable :: HappyAddr
+happyTable = HappyA# "\x00\x00\x02\x00\x03\x00\x04\x00\x05\x00\x06\x00\x07\x00\x08\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x10\x00\x89\x00\x10\x00\xff\xff\x12\x00\x15\x00\x8a\x00\x09\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x83\x00\x7d\x00\x77\x00\x71\x00\x6b\x00\x84\x00\x7e\x00\x78\x00\x72\x00\x6c\x00\x10\x00\x65\x00\x60\x00\x5b\x00\x14\x00\x66\x00\x61\x00\x5c\x00\x56\x00\x51\x00\x4c\x00\x10\x00\x57\x00\x52\x00\x4d\x00\x10\x00\x48\x00\x44\x00\x13\x00\x49\x00\x45\x00\x40\x00\x3c\x00\x38\x00\x41\x00\x3d\x00\x39\x00\x34\x00\x32\x00\x30\x00\x35\x00\x31\x00\x2d\x00\x2a\x00\x2e\x00\x2b\x00\x27\x00\x24\x00\x28\x00\x25\x00\x21\x00\x2f\x00\x22\x00\x10\x00\x11\x00\x1f\x00\x20\x00\x1d\x00\x1e\x00\x1b\x00\x1c\x00\x19\x00\x1a\x00\x17\x00\x18\x00\x15\x00\x16\x00\x2c\x00\x29\x00\x26\x00\x23\x00\x4a\x00\x47\x00\x46\x00\x43\x00\x42\x00\x3f\x00\x3e\x00\x3b\x00\x3a\x00\x37\x00\x36\x00\x33\x00\x68\x00\x67\x00\x64\x00\x63\x00\x62\x00\x5f\x00\x5e\x00\x5d\x00\x5a\x00\x59\x00\x58\x00\x55\x00\x54\x00\x53\x00\x50\x00\x4f\x00\x4e\x00\x4b\x00\x8c\x00\x8b\x00\x88\x00\x87\x00\x86\x00\x85\x00\x82\x00\x81\x00\x80\x00\x7f\x00\x7c\x00\x7b\x00\x7a\x00\x79\x00\x76\x00\x75\x00\x74\x00\x73\x00\x70\x00\x6f\x00\x6e\x00\x6d\x00\x6a\x00\x69\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00"#
+
+happyReduceArr = Happy_Data_Array.array (1, 62) [
+ (1 , happyReduce_1),
+ (2 , happyReduce_2),
+ (3 , happyReduce_3),
+ (4 , happyReduce_4),
+ (5 , happyReduce_5),
+ (6 , happyReduce_6),
+ (7 , happyReduce_7),
+ (8 , happyReduce_8),
+ (9 , happyReduce_9),
+ (10 , happyReduce_10),
+ (11 , happyReduce_11),
+ (12 , happyReduce_12),
+ (13 , happyReduce_13),
+ (14 , happyReduce_14),
+ (15 , happyReduce_15),
+ (16 , happyReduce_16),
+ (17 , happyReduce_17),
+ (18 , happyReduce_18),
+ (19 , happyReduce_19),
+ (20 , happyReduce_20),
+ (21 , happyReduce_21),
+ (22 , happyReduce_22),
+ (23 , happyReduce_23),
+ (24 , happyReduce_24),
+ (25 , happyReduce_25),
+ (26 , happyReduce_26),
+ (27 , happyReduce_27),
+ (28 , happyReduce_28),
+ (29 , happyReduce_29),
+ (30 , happyReduce_30),
+ (31 , happyReduce_31),
+ (32 , happyReduce_32),
+ (33 , happyReduce_33),
+ (34 , happyReduce_34),
+ (35 , happyReduce_35),
+ (36 , happyReduce_36),
+ (37 , happyReduce_37),
+ (38 , happyReduce_38),
+ (39 , happyReduce_39),
+ (40 , happyReduce_40),
+ (41 , happyReduce_41),
+ (42 , happyReduce_42),
+ (43 , happyReduce_43),
+ (44 , happyReduce_44),
+ (45 , happyReduce_45),
+ (46 , happyReduce_46),
+ (47 , happyReduce_47),
+ (48 , happyReduce_48),
+ (49 , happyReduce_49),
+ (50 , happyReduce_50),
+ (51 , happyReduce_51),
+ (52 , happyReduce_52),
+ (53 , happyReduce_53),
+ (54 , happyReduce_54),
+ (55 , happyReduce_55),
+ (56 , happyReduce_56),
+ (57 , happyReduce_57),
+ (58 , happyReduce_58),
+ (59 , happyReduce_59),
+ (60 , happyReduce_60),
+ (61 , happyReduce_61),
+ (62 , happyReduce_62)
+ ]
+
+happy_n_terms = 8 :: Prelude.Int
+happy_n_nonterms = 26 :: Prelude.Int
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_1 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_1 = happySpecReduce_0 0# happyReduction_1
+happyReduction_1 = happyIn4
+ ([]
+ )
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_2 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_2 = happySpecReduce_1 0# happyReduction_2
+happyReduction_2 happy_x_1
+ = case happyOut24 happy_x_1 of { (HappyWrap24 happy_var_1) ->
+ happyIn4
+ (happy_var_1
+ )}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_3 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_3 = happySpecReduce_1 0# happyReduction_3
+happyReduction_3 happy_x_1
+ = case happyOut25 happy_x_1 of { (HappyWrap25 happy_var_1) ->
+ happyIn4
+ (happy_var_1
+ )}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_4 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_4 = happySpecReduce_1 0# happyReduction_4
+happyReduction_4 happy_x_1
+ = case happyOut26 happy_x_1 of { (HappyWrap26 happy_var_1) ->
+ happyIn4
+ (happy_var_1
+ )}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_5 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_5 = happySpecReduce_1 0# happyReduction_5
+happyReduction_5 happy_x_1
+ = case happyOut27 happy_x_1 of { (HappyWrap27 happy_var_1) ->
+ happyIn4
+ (happy_var_1
+ )}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_6 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_6 = happySpecReduce_1 0# happyReduction_6
+happyReduction_6 happy_x_1
+ = case happyOut28 happy_x_1 of { (HappyWrap28 happy_var_1) ->
+ happyIn4
+ (happy_var_1
+ )}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_7 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_7 = happySpecReduce_1 0# happyReduction_7
+happyReduction_7 happy_x_1
+ = case happyOut29 happy_x_1 of { (HappyWrap29 happy_var_1) ->
+ happyIn4
+ (happy_var_1
+ )}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_8 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_8 = happySpecReduce_1 1# happyReduction_8
+happyReduction_8 happy_x_1
+ = case happyOutTok happy_x_1 of { happy_var_1 ->
+ happyIn5
+ (show happy_var_1
+ )}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_9 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_9 = happySpecReduce_1 2# happyReduction_9
+happyReduction_9 happy_x_1
+ = case happyOutTok happy_x_1 of { happy_var_1 ->
+ happyIn6
+ (show happy_var_1
+ )}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_10 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_10 = happySpecReduce_1 3# happyReduction_10
+happyReduction_10 happy_x_1
+ = case happyOutTok happy_x_1 of { happy_var_1 ->
+ happyIn7
+ (show happy_var_1
+ )}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_11 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_11 = happySpecReduce_1 4# happyReduction_11
+happyReduction_11 happy_x_1
+ = case happyOutTok happy_x_1 of { happy_var_1 ->
+ happyIn8
+ (show happy_var_1
+ )}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_12 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_12 = happySpecReduce_1 5# happyReduction_12
+happyReduction_12 happy_x_1
+ = case happyOutTok happy_x_1 of { happy_var_1 ->
+ happyIn9
+ (show happy_var_1
+ )}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_13 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_13 = happySpecReduce_1 6# happyReduction_13
+happyReduction_13 happy_x_1
+ = case happyOutTok happy_x_1 of { happy_var_1 ->
+ happyIn10
+ (show happy_var_1
+ )}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_14 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_14 = happySpecReduce_0 7# happyReduction_14
+happyReduction_14 = happyIn11
+ (()
+ )
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_15 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_15 = happySpecReduce_0 8# happyReduction_15
+happyReduction_15 = happyIn12
+ (()
+ )
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_16 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_16 = happySpecReduce_0 9# happyReduction_16
+happyReduction_16 = happyIn13
+ (()
+ )
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_17 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_17 = happySpecReduce_0 10# happyReduction_17
+happyReduction_17 = happyIn14
+ (()
+ )
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_18 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_18 = happySpecReduce_0 11# happyReduction_18
+happyReduction_18 = happyIn15
+ (()
+ )
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_19 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_19 = happySpecReduce_0 12# happyReduction_19
+happyReduction_19 = happyIn16
+ (()
+ )
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_20 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_20 = happySpecReduce_0 13# happyReduction_20
+happyReduction_20 = happyIn17
+ (()
+ )
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_21 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_21 = happySpecReduce_0 14# happyReduction_21
+happyReduction_21 = happyIn18
+ (()
+ )
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_22 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_22 = happySpecReduce_0 15# happyReduction_22
+happyReduction_22 = happyIn19
+ (()
+ )
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_23 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_23 = happySpecReduce_0 16# happyReduction_23
+happyReduction_23 = happyIn20
+ (()
+ )
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_24 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_24 = happySpecReduce_0 17# happyReduction_24
+happyReduction_24 = happyIn21
+ (()
+ )
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_25 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_25 = happySpecReduce_0 18# happyReduction_25
+happyReduction_25 = happyIn22
+ (()
+ )
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_26 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_26 = happySpecReduce_0 19# happyReduction_26
+happyReduction_26 = happyIn23
+ (()
+ )
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_27 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_27 = happyReduce 6# 20# happyReduction_27
+happyReduction_27 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut5 happy_x_1 of { (HappyWrap5 happy_var_1) ->
+ case happyOut5 happy_x_2 of { (HappyWrap5 happy_var_2) ->
+ case happyOut5 happy_x_3 of { (HappyWrap5 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn24
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_28 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_28 = happyReduce 6# 20# happyReduction_28
+happyReduction_28 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut5 happy_x_1 of { (HappyWrap5 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut5 happy_x_3 of { (HappyWrap5 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn24
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_29 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_29 = happyReduce 6# 20# happyReduction_29
+happyReduction_29 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut5 happy_x_1 of { (HappyWrap5 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn24
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_30 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_30 = happyReduce 6# 20# happyReduction_30
+happyReduction_30 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut5 happy_x_1 of { (HappyWrap5 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn24
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_31 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_31 = happyReduce 6# 20# happyReduction_31
+happyReduction_31 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut5 happy_x_1 of { (HappyWrap5 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut9 happy_x_5 of { (HappyWrap9 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn24
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_32 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_32 = happyReduce 6# 20# happyReduction_32
+happyReduction_32 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut5 happy_x_1 of { (HappyWrap5 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut9 happy_x_5 of { (HappyWrap9 happy_var_5) ->
+ case happyOut10 happy_x_6 of { (HappyWrap10 happy_var_6) ->
+ happyIn24
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_33 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_33 = happyReduce 6# 21# happyReduction_33
+happyReduction_33 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut6 happy_x_1 of { (HappyWrap6 happy_var_1) ->
+ case happyOut5 happy_x_2 of { (HappyWrap5 happy_var_2) ->
+ case happyOut5 happy_x_3 of { (HappyWrap5 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn25
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_34 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_34 = happyReduce 6# 21# happyReduction_34
+happyReduction_34 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut6 happy_x_1 of { (HappyWrap6 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut5 happy_x_3 of { (HappyWrap5 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn25
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_35 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_35 = happyReduce 6# 21# happyReduction_35
+happyReduction_35 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut6 happy_x_1 of { (HappyWrap6 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn25
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_36 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_36 = happyReduce 6# 21# happyReduction_36
+happyReduction_36 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut6 happy_x_1 of { (HappyWrap6 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn25
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_37 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_37 = happyReduce 6# 21# happyReduction_37
+happyReduction_37 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut6 happy_x_1 of { (HappyWrap6 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut9 happy_x_5 of { (HappyWrap9 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn25
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_38 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_38 = happyReduce 6# 21# happyReduction_38
+happyReduction_38 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut6 happy_x_1 of { (HappyWrap6 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut9 happy_x_5 of { (HappyWrap9 happy_var_5) ->
+ case happyOut10 happy_x_6 of { (HappyWrap10 happy_var_6) ->
+ happyIn25
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_39 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_39 = happyReduce 6# 22# happyReduction_39
+happyReduction_39 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut7 happy_x_1 of { (HappyWrap7 happy_var_1) ->
+ case happyOut5 happy_x_2 of { (HappyWrap5 happy_var_2) ->
+ case happyOut5 happy_x_3 of { (HappyWrap5 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn26
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_40 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_40 = happyReduce 6# 22# happyReduction_40
+happyReduction_40 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut7 happy_x_1 of { (HappyWrap7 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut5 happy_x_3 of { (HappyWrap5 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn26
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_41 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_41 = happyReduce 6# 22# happyReduction_41
+happyReduction_41 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut7 happy_x_1 of { (HappyWrap7 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn26
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_42 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_42 = happyReduce 6# 22# happyReduction_42
+happyReduction_42 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut7 happy_x_1 of { (HappyWrap7 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn26
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_43 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_43 = happyReduce 6# 22# happyReduction_43
+happyReduction_43 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut7 happy_x_1 of { (HappyWrap7 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut9 happy_x_5 of { (HappyWrap9 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn26
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_44 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_44 = happyReduce 6# 22# happyReduction_44
+happyReduction_44 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut7 happy_x_1 of { (HappyWrap7 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut9 happy_x_5 of { (HappyWrap9 happy_var_5) ->
+ case happyOut10 happy_x_6 of { (HappyWrap10 happy_var_6) ->
+ happyIn26
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_45 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_45 = happyReduce 6# 23# happyReduction_45
+happyReduction_45 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut8 happy_x_1 of { (HappyWrap8 happy_var_1) ->
+ case happyOut5 happy_x_2 of { (HappyWrap5 happy_var_2) ->
+ case happyOut5 happy_x_3 of { (HappyWrap5 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn27
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_46 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_46 = happyReduce 6# 23# happyReduction_46
+happyReduction_46 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut8 happy_x_1 of { (HappyWrap8 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut5 happy_x_3 of { (HappyWrap5 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn27
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_47 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_47 = happyReduce 6# 23# happyReduction_47
+happyReduction_47 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut8 happy_x_1 of { (HappyWrap8 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn27
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_48 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_48 = happyReduce 6# 23# happyReduction_48
+happyReduction_48 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut8 happy_x_1 of { (HappyWrap8 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn27
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_49 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_49 = happyReduce 6# 23# happyReduction_49
+happyReduction_49 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut8 happy_x_1 of { (HappyWrap8 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut9 happy_x_5 of { (HappyWrap9 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn27
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_50 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_50 = happyReduce 6# 23# happyReduction_50
+happyReduction_50 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut8 happy_x_1 of { (HappyWrap8 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut9 happy_x_5 of { (HappyWrap9 happy_var_5) ->
+ case happyOut10 happy_x_6 of { (HappyWrap10 happy_var_6) ->
+ happyIn27
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_51 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_51 = happyReduce 6# 24# happyReduction_51
+happyReduction_51 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut9 happy_x_1 of { (HappyWrap9 happy_var_1) ->
+ case happyOut5 happy_x_2 of { (HappyWrap5 happy_var_2) ->
+ case happyOut5 happy_x_3 of { (HappyWrap5 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn28
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_52 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_52 = happyReduce 6# 24# happyReduction_52
+happyReduction_52 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut9 happy_x_1 of { (HappyWrap9 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut5 happy_x_3 of { (HappyWrap5 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn28
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_53 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_53 = happyReduce 6# 24# happyReduction_53
+happyReduction_53 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut9 happy_x_1 of { (HappyWrap9 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn28
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_54 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_54 = happyReduce 6# 24# happyReduction_54
+happyReduction_54 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut9 happy_x_1 of { (HappyWrap9 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn28
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_55 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_55 = happyReduce 6# 24# happyReduction_55
+happyReduction_55 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut9 happy_x_1 of { (HappyWrap9 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut9 happy_x_5 of { (HappyWrap9 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn28
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_56 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_56 = happyReduce 6# 24# happyReduction_56
+happyReduction_56 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut9 happy_x_1 of { (HappyWrap9 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut9 happy_x_5 of { (HappyWrap9 happy_var_5) ->
+ case happyOut10 happy_x_6 of { (HappyWrap10 happy_var_6) ->
+ happyIn28
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_57 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_57 = happyReduce 6# 25# happyReduction_57
+happyReduction_57 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut10 happy_x_1 of { (HappyWrap10 happy_var_1) ->
+ case happyOut5 happy_x_2 of { (HappyWrap5 happy_var_2) ->
+ case happyOut5 happy_x_3 of { (HappyWrap5 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn29
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_58 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_58 = happyReduce 6# 25# happyReduction_58
+happyReduction_58 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut10 happy_x_1 of { (HappyWrap10 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut5 happy_x_3 of { (HappyWrap5 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn29
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_59 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_59 = happyReduce 6# 25# happyReduction_59
+happyReduction_59 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut10 happy_x_1 of { (HappyWrap10 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut5 happy_x_4 of { (HappyWrap5 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn29
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_60 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_60 = happyReduce 6# 25# happyReduction_60
+happyReduction_60 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut10 happy_x_1 of { (HappyWrap10 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut5 happy_x_5 of { (HappyWrap5 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn29
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_61 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_61 = happyReduce 6# 25# happyReduction_61
+happyReduction_61 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut10 happy_x_1 of { (HappyWrap10 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut9 happy_x_5 of { (HappyWrap9 happy_var_5) ->
+ case happyOut5 happy_x_6 of { (HappyWrap5 happy_var_6) ->
+ happyIn29
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+#if __GLASGOW_HASKELL__ >= 710
+happyReduce_62 :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+#endif
+happyReduce_62 = happyReduce 6# 25# happyReduction_62
+happyReduction_62 (happy_x_6 `HappyStk`
+ happy_x_5 `HappyStk`
+ happy_x_4 `HappyStk`
+ happy_x_3 `HappyStk`
+ happy_x_2 `HappyStk`
+ happy_x_1 `HappyStk`
+ happyRest)
+ = case happyOut10 happy_x_1 of { (HappyWrap10 happy_var_1) ->
+ case happyOut6 happy_x_2 of { (HappyWrap6 happy_var_2) ->
+ case happyOut7 happy_x_3 of { (HappyWrap7 happy_var_3) ->
+ case happyOut8 happy_x_4 of { (HappyWrap8 happy_var_4) ->
+ case happyOut9 happy_x_5 of { (HappyWrap9 happy_var_5) ->
+ case happyOut10 happy_x_6 of { (HappyWrap10 happy_var_6) ->
+ happyIn29
+ ([happy_var_1, happy_var_2, happy_var_3, happy_var_4, happy_var_5, happy_var_6]
+ ) `HappyStk` happyRest}}}}}}
+
+happyNewToken action sts stk
+ = positionKeep(\tk ->
+ let cont i = happyDoAction i tk action sts stk in
+ case tk of {
+ (-1) -> happyDoAction 7# tk action sts stk;
+ 0 -> cont 1#;
+ 1 -> cont 2#;
+ 2 -> cont 3#;
+ 3 -> cont 4#;
+ 4 -> cont 5#;
+ 5 -> cont 6#;
+ _ -> happyError' (tk, [])
+ })
+
+happyError_ explist 7# tk = happyError' (tk, explist)
+happyError_ explist _ tk = happyError' (tk, explist)
+
+happyThen :: () => ParseState a -> (a -> ParseState b) -> ParseState b
+happyThen = (Prelude.>>=)
+happyReturn :: () => a -> ParseState a
+happyReturn = (Prelude.return)
+#if __GLASGOW_HASKELL__ >= 710
+happyParse :: () => Happy_GHC_Exts.Int# -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+
+happyNewToken :: () => Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+
+happyDoAction :: () => Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _)
+
+happyReduceArr :: () => Happy_Data_Array.Array Prelude.Int (Happy_GHC_Exts.Int# -> Token -> Happy_GHC_Exts.Int# -> Happy_IntList -> HappyStk (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _) -> ParseState (HappyAbsSyn _ _ _ _ _ _ _ _ _ _ _ _ _))
+
+#endif
+happyThen1 :: () => ParseState a -> (a -> ParseState b) -> ParseState b
+happyThen1 = happyThen
+happyReturn1 :: () => a -> ParseState a
+happyReturn1 = happyReturn
+happyError' :: () => ((Token), [Prelude.String]) -> ParseState a
+happyError' tk = (\(tokens, _) -> parseErrorTok tokens) tk
+parseMain = happySomeParser where
+ happySomeParser = happyThen (happyParse 0#) (\x -> happyReturn (let {(HappyWrap4 x') = happyOut4 x} in x'))
+
+happySeq = happyDontSeq
+
+
+type Token = Int
+type Node = String
+
+type ParseState = StateT [Token] IO
+
+parse :: [Token] -> IO [Node]
+parse = evalStateT parseMain
+
+positionKeep :: (Token -> ParseState a) -> ParseState a
+positionKeep cont = do
+ tokens <- get
+ case tokens of
+ [] -> cont (-1)
+ tok : toks -> put toks >> cont tok
+
+parseErrorTok :: Token -> ParseState a
+parseErrorTok = error . ("unexpected token " ++) . show
+{-# LINE 1 "templates/GenericTemplate.hs" #-}
+-- $Id: GenericTemplate.hs,v 1.26 2005/01/14 14:47:22 simonmar Exp $
+
+
+
+
+
+
+
+
+
+
+
+
+
+-- Do not remove this comment. Required to fix CPP parsing when using GCC and a clang-compiled alex.
+#if __GLASGOW_HASKELL__ > 706
+#define LT(n,m) ((Happy_GHC_Exts.tagToEnum# (n Happy_GHC_Exts.<# m)) :: Prelude.Bool)
+#define GTE(n,m) ((Happy_GHC_Exts.tagToEnum# (n Happy_GHC_Exts.>=# m)) :: Prelude.Bool)
+#define EQ(n,m) ((Happy_GHC_Exts.tagToEnum# (n Happy_GHC_Exts.==# m)) :: Prelude.Bool)
+#else
+#define LT(n,m) (n Happy_GHC_Exts.<# m)
+#define GTE(n,m) (n Happy_GHC_Exts.>=# m)
+#define EQ(n,m) (n Happy_GHC_Exts.==# m)
+#endif
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+data Happy_IntList = HappyCons Happy_GHC_Exts.Int# Happy_IntList
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+infixr 9 `HappyStk`
+data HappyStk a = HappyStk a (HappyStk a)
+
+-----------------------------------------------------------------------------
+-- starting the parse
+
+happyParse start_state = happyNewToken start_state notHappyAtAll notHappyAtAll
+
+-----------------------------------------------------------------------------
+-- Accepting the parse
+
+-- If the current token is ERROR_TOK, it means we've just accepted a partial
+-- parse (a %partial parser). We must ignore the saved token on the top of
+-- the stack in this case.
+happyAccept 0# tk st sts (_ `HappyStk` ans `HappyStk` _) =
+ happyReturn1 ans
+happyAccept j tk st sts (HappyStk ans _) =
+ (happyTcHack j (happyTcHack st)) (happyReturn1 ans)
+
+-----------------------------------------------------------------------------
+-- Arrays only: do the next action
+
+
+
+happyDoAction i tk st
+ = {- nothing -}
+ case action of
+ 0# -> {- nothing -}
+ happyFail (happyExpListPerState ((Happy_GHC_Exts.I# (st)) :: Prelude.Int)) i tk st
+ -1# -> {- nothing -}
+ happyAccept i tk st
+ n | LT(n,(0# :: Happy_GHC_Exts.Int#)) -> {- nothing -}
+ (happyReduceArr Happy_Data_Array.! rule) i tk st
+ where rule = (Happy_GHC_Exts.I# ((Happy_GHC_Exts.negateInt# ((n Happy_GHC_Exts.+# (1# :: Happy_GHC_Exts.Int#))))))
+ n -> {- nothing -}
+ happyShift new_state i tk st
+ where new_state = (n Happy_GHC_Exts.-# (1# :: Happy_GHC_Exts.Int#))
+ where off = happyAdjustOffset (indexShortOffAddr happyActOffsets st)
+ off_i = (off Happy_GHC_Exts.+# i)
+ check = if GTE(off_i,(0# :: Happy_GHC_Exts.Int#))
+ then EQ(indexShortOffAddr happyCheck off_i, i)
+ else Prelude.False
+ action
+ | check = indexShortOffAddr happyTable off_i
+ | Prelude.otherwise = indexShortOffAddr happyDefActions st
+
+
+
+
+indexShortOffAddr (HappyA# arr) off =
+ Happy_GHC_Exts.narrow16Int# i
+ where
+ i = Happy_GHC_Exts.word2Int# (Happy_GHC_Exts.or# (Happy_GHC_Exts.uncheckedShiftL# high 8#) low)
+ high = Happy_GHC_Exts.int2Word# (Happy_GHC_Exts.ord# (Happy_GHC_Exts.indexCharOffAddr# arr (off' Happy_GHC_Exts.+# 1#)))
+ low = Happy_GHC_Exts.int2Word# (Happy_GHC_Exts.ord# (Happy_GHC_Exts.indexCharOffAddr# arr off'))
+ off' = off Happy_GHC_Exts.*# 2#
+
+
+
+
+{-# INLINE happyLt #-}
+happyLt x y = LT(x,y)
+
+
+readArrayBit arr bit =
+ Bits.testBit (Happy_GHC_Exts.I# (indexShortOffAddr arr ((unbox_int bit) `Happy_GHC_Exts.iShiftRA#` 4#))) (bit `Prelude.mod` 16)
+ where unbox_int (Happy_GHC_Exts.I# x) = x
+
+
+
+
+
+
+data HappyAddr = HappyA# Happy_GHC_Exts.Addr#
+
+
+-----------------------------------------------------------------------------
+-- HappyState data type (not arrays)
+
+
+
+
+
+
+
+
+
+
+
+
+
+-----------------------------------------------------------------------------
+-- Shifting a token
+
+happyShift new_state 0# tk st sts stk@(x `HappyStk` _) =
+ let i = (case Happy_GHC_Exts.unsafeCoerce# x of { (Happy_GHC_Exts.I# (i)) -> i }) in
+-- trace "shifting the error token" $
+ happyDoAction i tk new_state (HappyCons (st) (sts)) (stk)
+
+happyShift new_state i tk st sts stk =
+ happyNewToken new_state (HappyCons (st) (sts)) ((happyInTok (tk))`HappyStk`stk)
+
+-- happyReduce is specialised for the common cases.
+
+happySpecReduce_0 i fn 0# tk st sts stk
+ = happyFail [] 0# tk st sts stk
+happySpecReduce_0 nt fn j tk st@((action)) sts stk
+ = happyGoto nt j tk st (HappyCons (st) (sts)) (fn `HappyStk` stk)
+
+happySpecReduce_1 i fn 0# tk st sts stk
+ = happyFail [] 0# tk st sts stk
+happySpecReduce_1 nt fn j tk _ sts@((HappyCons (st@(action)) (_))) (v1`HappyStk`stk')
+ = let r = fn v1 in
+ happySeq r (happyGoto nt j tk st sts (r `HappyStk` stk'))
+
+happySpecReduce_2 i fn 0# tk st sts stk
+ = happyFail [] 0# tk st sts stk
+happySpecReduce_2 nt fn j tk _ (HappyCons (_) (sts@((HappyCons (st@(action)) (_))))) (v1`HappyStk`v2`HappyStk`stk')
+ = let r = fn v1 v2 in
+ happySeq r (happyGoto nt j tk st sts (r `HappyStk` stk'))
+
+happySpecReduce_3 i fn 0# tk st sts stk
+ = happyFail [] 0# tk st sts stk
+happySpecReduce_3 nt fn j tk _ (HappyCons (_) ((HappyCons (_) (sts@((HappyCons (st@(action)) (_))))))) (v1`HappyStk`v2`HappyStk`v3`HappyStk`stk')
+ = let r = fn v1 v2 v3 in
+ happySeq r (happyGoto nt j tk st sts (r `HappyStk` stk'))
+
+happyReduce k i fn 0# tk st sts stk
+ = happyFail [] 0# tk st sts stk
+happyReduce k nt fn j tk st sts stk
+ = case happyDrop (k Happy_GHC_Exts.-# (1# :: Happy_GHC_Exts.Int#)) sts of
+ sts1@((HappyCons (st1@(action)) (_))) ->
+ let r = fn stk in -- it doesn't hurt to always seq here...
+ happyDoSeq r (happyGoto nt j tk st1 sts1 r)
+
+happyMonadReduce k nt fn 0# tk st sts stk
+ = happyFail [] 0# tk st sts stk
+happyMonadReduce k nt fn j tk st sts stk =
+ case happyDrop k (HappyCons (st) (sts)) of
+ sts1@((HappyCons (st1@(action)) (_))) ->
+ let drop_stk = happyDropStk k stk in
+ happyThen1 (fn stk tk) (\r -> happyGoto nt j tk st1 sts1 (r `HappyStk` drop_stk))
+
+happyMonad2Reduce k nt fn 0# tk st sts stk
+ = happyFail [] 0# tk st sts stk
+happyMonad2Reduce k nt fn j tk st sts stk =
+ case happyDrop k (HappyCons (st) (sts)) of
+ sts1@((HappyCons (st1@(action)) (_))) ->
+ let drop_stk = happyDropStk k stk
+
+ off = happyAdjustOffset (indexShortOffAddr happyGotoOffsets st1)
+ off_i = (off Happy_GHC_Exts.+# nt)
+ new_state = indexShortOffAddr happyTable off_i
+
+
+
+
+ in
+ happyThen1 (fn stk tk) (\r -> happyNewToken new_state sts1 (r `HappyStk` drop_stk))
+
+happyDrop 0# l = l
+happyDrop n (HappyCons (_) (t)) = happyDrop (n Happy_GHC_Exts.-# (1# :: Happy_GHC_Exts.Int#)) t
+
+happyDropStk 0# l = l
+happyDropStk n (x `HappyStk` xs) = happyDropStk (n Happy_GHC_Exts.-# (1#::Happy_GHC_Exts.Int#)) xs
+
+-----------------------------------------------------------------------------
+-- Moving to a new state after a reduction
+
+
+happyGoto nt j tk st =
+ {- nothing -}
+ happyDoAction j tk new_state
+ where off = happyAdjustOffset (indexShortOffAddr happyGotoOffsets st)
+ off_i = (off Happy_GHC_Exts.+# nt)
+ new_state = indexShortOffAddr happyTable off_i
+
+
+
+
+-----------------------------------------------------------------------------
+-- Error recovery (ERROR_TOK is the error token)
+
+-- parse error if we are in recovery and we fail again
+happyFail explist 0# tk old_st _ stk@(x `HappyStk` _) =
+ let i = (case Happy_GHC_Exts.unsafeCoerce# x of { (Happy_GHC_Exts.I# (i)) -> i }) in
+-- trace "failing" $
+ happyError_ explist i tk
+
+{- We don't need state discarding for our restricted implementation of
+ "error". In fact, it can cause some bogus parses, so I've disabled it
+ for now --SDM
+
+-- discard a state
+happyFail ERROR_TOK tk old_st CONS(HAPPYSTATE(action),sts)
+ (saved_tok `HappyStk` _ `HappyStk` stk) =
+-- trace ("discarding state, depth " ++ show (length stk)) $
+ DO_ACTION(action,ERROR_TOK,tk,sts,(saved_tok`HappyStk`stk))
+-}
+
+-- Enter error recovery: generate an error token,
+-- save the old token and carry on.
+happyFail explist i tk (action) sts stk =
+-- trace "entering error recovery" $
+ happyDoAction 0# tk action sts ((Happy_GHC_Exts.unsafeCoerce# (Happy_GHC_Exts.I# (i))) `HappyStk` stk)
+
+-- Internal happy errors:
+
+notHappyAtAll :: a
+notHappyAtAll = Prelude.error "Internal Happy error\n"
+
+-----------------------------------------------------------------------------
+-- Hack to get the typechecker to accept our action functions
+
+
+happyTcHack :: Happy_GHC_Exts.Int# -> a -> a
+happyTcHack x y = y
+{-# INLINE happyTcHack #-}
+
+
+-----------------------------------------------------------------------------
+-- Seq-ing. If the --strict flag is given, then Happy emits
+-- happySeq = happyDoSeq
+-- otherwise it emits
+-- happySeq = happyDontSeq
+
+happyDoSeq, happyDontSeq :: a -> b -> b
+happyDoSeq a b = a `Prelude.seq` b
+happyDontSeq a b = b
+
+-----------------------------------------------------------------------------
+-- Don't inline any functions from the template. GHC has a nasty habit
+-- of deciding to inline happyGoto everywhere, which increases the size of
+-- the generated parser quite a bit.
+
+
+{-# NOINLINE happyDoAction #-}
+{-# NOINLINE happyTable #-}
+{-# NOINLINE happyCheck #-}
+{-# NOINLINE happyActOffsets #-}
+{-# NOINLINE happyGotoOffsets #-}
+{-# NOINLINE happyDefActions #-}
+
+{-# NOINLINE happyShift #-}
+{-# NOINLINE happySpecReduce_0 #-}
+{-# NOINLINE happySpecReduce_1 #-}
+{-# NOINLINE happySpecReduce_2 #-}
+{-# NOINLINE happySpecReduce_3 #-}
+{-# NOINLINE happyReduce #-}
+{-# NOINLINE happyMonadReduce #-}
+{-# NOINLINE happyGoto #-}
+{-# NOINLINE happyFail #-}
+
+-- end of Happy Template.
+
+main :: IO ()
+main = parse toks >>= print
+ where toks = [0, 1, 2, 3, 4, 5]
diff --git a/testsuite/tests/perf/compiler/all.T b/testsuite/tests/perf/compiler/all.T
index 28f899f7ef..dc8528e8a8 100644
--- a/testsuite/tests/perf/compiler/all.T
+++ b/testsuite/tests/perf/compiler/all.T
@@ -520,3 +520,8 @@ test('hard_hole_fits', # Testing multiple hole-fits with lots in scope for #1687
test('T16875', # Testing one hole-fit with a lot in scope for #16875
collect_compiler_stats('bytes allocated', 2),
compile, ['-fdefer-type-errors -fno-max-valid-hole-fits -package ghc'])
+test ('T20261',
+ [collect_compiler_stats('all')],
+ compile,
+ [''])
+