{-# OPTIONS_GHC -w #-} {-# OPTIONS -fglasgow-exts -cpp #-} module Database.QUDB.Parser (parse) where import Database.QUDB.Scanner import qualified Control.Monad.Error as E import qualified Database.QUDB.EntityTypes as T import qualified Database.QUDB.Query as Q import qualified Data.Array as Happy_Data_Array import qualified GHC.Exts as Happy_GHC_Exts -- parser produced by Happy Version 1.18.6 newtype HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37 = HappyAbsSyn HappyAny #if __GLASGOW_HASKELL__ >= 607 type HappyAny = Happy_GHC_Exts.Any #else type HappyAny = forall a . a #endif happyIn4 :: t4 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn4 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn4 #-} happyOut4 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t4 happyOut4 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut4 #-} happyIn5 :: t5 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn5 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn5 #-} happyOut5 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t5 happyOut5 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut5 #-} happyIn6 :: t6 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn6 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn6 #-} happyOut6 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t6 happyOut6 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut6 #-} happyIn7 :: t7 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn7 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn7 #-} happyOut7 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t7 happyOut7 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut7 #-} happyIn8 :: t8 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn8 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn8 #-} happyOut8 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t8 happyOut8 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut8 #-} happyIn9 :: t9 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn9 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn9 #-} happyOut9 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t9 happyOut9 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut9 #-} happyIn10 :: t10 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn10 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn10 #-} happyOut10 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t10 happyOut10 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut10 #-} happyIn11 :: t11 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn11 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn11 #-} happyOut11 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t11 happyOut11 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut11 #-} happyIn12 :: t12 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn12 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn12 #-} happyOut12 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t12 happyOut12 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut12 #-} happyIn13 :: t13 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn13 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn13 #-} happyOut13 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t13 happyOut13 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut13 #-} happyIn14 :: t14 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn14 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn14 #-} happyOut14 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t14 happyOut14 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut14 #-} happyIn15 :: t15 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn15 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn15 #-} happyOut15 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t15 happyOut15 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut15 #-} happyIn16 :: t16 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn16 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn16 #-} happyOut16 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t16 happyOut16 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut16 #-} happyIn17 :: t17 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn17 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn17 #-} happyOut17 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t17 happyOut17 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut17 #-} happyIn18 :: t18 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn18 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn18 #-} happyOut18 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t18 happyOut18 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut18 #-} happyIn19 :: t19 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn19 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn19 #-} happyOut19 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t19 happyOut19 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut19 #-} happyIn20 :: t20 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn20 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn20 #-} happyOut20 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t20 happyOut20 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut20 #-} happyIn21 :: t21 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn21 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn21 #-} happyOut21 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t21 happyOut21 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut21 #-} happyIn22 :: t22 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn22 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn22 #-} happyOut22 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t22 happyOut22 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut22 #-} happyIn23 :: t23 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn23 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn23 #-} happyOut23 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t23 happyOut23 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut23 #-} happyIn24 :: t24 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn24 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn24 #-} happyOut24 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t24 happyOut24 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut24 #-} happyIn25 :: t25 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn25 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn25 #-} happyOut25 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t25 happyOut25 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut25 #-} happyIn26 :: t26 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn26 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn26 #-} happyOut26 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t26 happyOut26 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut26 #-} happyIn27 :: t27 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn27 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn27 #-} happyOut27 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t27 happyOut27 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut27 #-} happyIn28 :: t28 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn28 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn28 #-} happyOut28 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t28 happyOut28 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut28 #-} happyIn29 :: t29 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn29 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn29 #-} happyOut29 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t29 happyOut29 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut29 #-} happyIn30 :: t30 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn30 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn30 #-} happyOut30 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t30 happyOut30 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut30 #-} happyIn31 :: t31 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn31 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn31 #-} happyOut31 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t31 happyOut31 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut31 #-} happyIn32 :: t32 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn32 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn32 #-} happyOut32 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t32 happyOut32 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut32 #-} happyIn33 :: t33 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn33 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn33 #-} happyOut33 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t33 happyOut33 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut33 #-} happyIn34 :: t34 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn34 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn34 #-} happyOut34 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t34 happyOut34 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut34 #-} happyIn35 :: t35 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn35 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn35 #-} happyOut35 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t35 happyOut35 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut35 #-} happyIn36 :: t36 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn36 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn36 #-} happyOut36 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t36 happyOut36 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut36 #-} happyIn37 :: t37 -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyIn37 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyIn37 #-} happyOut37 :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> t37 happyOut37 x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOut37 #-} happyInTok :: (Token) -> (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) happyInTok x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyInTok #-} happyOutTok :: (HappyAbsSyn t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 t18 t19 t20 t21 t22 t23 t24 t25 t26 t27 t28 t29 t30 t31 t32 t33 t34 t35 t36 t37) -> (Token) happyOutTok x = Happy_GHC_Exts.unsafeCoerce# x {-# INLINE happyOutTok #-} happyActOffsets :: HappyAddr happyActOffsets = HappyA# "\x14\x00\x14\x00\x97\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x5c\x00\x93\x00\x96\x00\x95\x00\x92\x00\x90\x00\x4e\x00\x94\x00\x94\x00\x8a\x00\x00\x00\x91\x00\x91\x00\x8e\x00\x8f\x00\x00\x00\x89\x00\x00\x00\x8d\x00\x00\x00\x8c\x00\x8b\x00\x85\x00\x7f\x00\x88\x00\x87\x00\x00\x00\x86\x00\x76\x00\x83\x00\x74\x00\x00\x00\x00\x00\x84\x00\x81\x00\xf6\xff\x7e\x00\xf6\xff\x00\x00\xf6\xff\x00\x00\x00\x00\x00\x00\x82\x00\x80\x00\x00\x00\x00\x00\x5b\x00\x2f\x00\x00\x00\x46\x00\x57\x00\x00\x00\x80\x00\x00\x00\x7c\x00\x7a\x00\x7d\x00\x00\x00\x00\x00\x7b\x00\x00\x00\x75\x00\x00\x00\x00\x00\x00\x00\x78\x00\x78\x00\x57\x00\x57\x00\x57\x00\x63\x00\x73\x00\x40\x00\x00\x00\x72\x00\x00\x00\x00\x00\x00\x00\x6b\x00\x00\x00\x00\x00\x00\x00\x53\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x6a\x00\x00\x00\x69\x00\x00\x00\x71\x00\x00\x00\x68\x00\x68\x00\x70\x00\x6f\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00"# happyGotoOffsets :: HappyAddr happyGotoOffsets = HappyA# "\x36\x00\x3d\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x42\x00\x00\x00\x00\x00\x67\x00\x00\x00\x00\x00\x00\x00\x66\x00\x65\x00\x00\x00\x00\x00\x64\x00\x62\x00\x00\x00\x56\x00\x00\x00\x00\x00\x00\x00\x61\x00\x00\x00\x60\x00\x5f\x00\x00\x00\x33\x00\x3a\x00\x00\x00\x00\x00\xfb\xff\x32\x00\x5d\x00\x00\x00\x00\x00\x00\x00\xfa\xff\x00\x00\x18\x00\x55\x00\x15\x00\x00\x00\x0b\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf2\xff\x00\x00\x00\x00\xfd\xff\x00\x00\x00\x00\x00\x00\x5e\x00\x00\x00\x3b\x00\x00\x00\x00\x00\x51\x00\x00\x00\x00\x00\x00\x00\x4d\x00\x00\x00\x5a\x00\x00\x00\x00\x00\x00\x00\xf8\xff\xf5\xff\x59\x00\x58\x00\x54\x00\x00\x00\x49\x00\x00\x00\x00\x00\x1a\x00\x00\x00\x00\x00\x00\x00\x09\x00\x00\x00\x00\x00\x00\x00\x26\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x16\x00\x00\x00\xf3\xff\xf0\xff\x1d\x00\xe9\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00"# happyDefActions :: HappyAddr happyDefActions = HappyA# "\x00\x00\x00\x00\x00\x00\xfd\xff\xfc\xff\xfb\xff\xfa\xff\xf9\xff\xf8\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xe7\xff\x00\x00\x00\x00\x00\x00\xe4\xff\xe3\xff\x00\x00\xfe\xff\x00\x00\xe6\xff\x00\x00\x00\x00\x00\x00\xd1\xff\x00\x00\x00\x00\xf1\xff\x00\x00\xd1\xff\xe8\xff\x00\x00\xf4\xff\xd2\xff\x00\x00\x00\x00\xdd\xff\xe4\xff\xdd\xff\xf7\xff\xdd\xff\xdb\xff\xda\xff\xdc\xff\x00\x00\x00\x00\xe5\xff\xf6\xff\x00\x00\x00\x00\xcf\xff\xcc\xff\x00\x00\xeb\xff\x00\x00\xf3\xff\x00\x00\xe0\xff\x00\x00\xdf\xff\xe2\xff\x00\x00\xf2\xff\xe8\xff\xea\xff\xed\xff\xec\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xee\xff\xd3\xff\xd9\xff\xd6\xff\xd0\xff\xde\xff\xd8\xff\x00\x00\xd5\xff\xd4\xff\xf0\xff\x00\x00\xf5\xff\xc6\xff\xc5\xff\xc7\xff\xcd\xff\xc8\xff\xce\xff\xca\xff\xe9\xff\xe0\xff\xe1\xff\x00\x00\x00\x00\xee\xff\xd6\xff\xd7\xff\xef\xff\xc9\xff\xcb\xff"# happyCheck :: HappyAddr happyCheck = HappyA# "\xff\xff\x11\x00\x19\x00\x11\x00\x11\x00\x08\x00\x11\x00\x0a\x00\x12\x00\x11\x00\x18\x00\x11\x00\x1a\x00\x12\x00\x18\x00\x14\x00\x20\x00\x21\x00\x1f\x00\x1d\x00\x21\x00\x20\x00\x21\x00\x1f\x00\x1e\x00\x21\x00\x11\x00\x21\x00\x08\x00\x09\x00\x0a\x00\x0b\x00\x15\x00\x16\x00\x17\x00\x1a\x00\x10\x00\x11\x00\x09\x00\x1c\x00\x1d\x00\x13\x00\x15\x00\x16\x00\x17\x00\x15\x00\x16\x00\x17\x00\x0a\x00\x1c\x00\x1d\x00\x19\x00\x1c\x00\x1d\x00\x00\x00\x01\x00\x02\x00\x03\x00\x04\x00\x05\x00\x06\x00\x07\x00\x01\x00\x02\x00\x03\x00\x04\x00\x05\x00\x06\x00\x07\x00\x0b\x00\x0c\x00\x0c\x00\x19\x00\x1a\x00\x1b\x00\x11\x00\x11\x00\x1b\x00\x1b\x00\x1d\x00\x1d\x00\x0f\x00\x09\x00\x11\x00\x01\x00\x02\x00\x16\x00\x17\x00\x01\x00\x02\x00\x14\x00\x15\x00\x01\x00\x02\x00\x0a\x00\x03\x00\x04\x00\x14\x00\x0a\x00\x0a\x00\x13\x00\x10\x00\x10\x00\x0d\x00\x0a\x00\x06\x00\x0d\x00\x03\x00\x1e\x00\x0e\x00\x03\x00\x0e\x00\x0e\x00\x11\x00\x0e\x00\x0e\x00\x0e\x00\x0e\x00\x07\x00\x07\x00\x07\x00\x07\x00\x07\x00\x03\x00\x07\x00\x14\x00\x03\x00\x15\x00\x03\x00\x07\x00\x06\x00\x03\x00\x02\x00\x07\x00\x05\x00\x03\x00\x12\x00\x03\x00\x07\x00\x03\x00\x05\x00\x19\x00\x03\x00\x03\x00\x03\x00\x12\x00\xff\xff\x0e\x00\x03\x00\x0c\x00\x07\x00\x03\x00\x03\x00\xff\xff\x0c\x00\xff\xff\xff\xff\x13\x00\xff\xff\x0f\x00\x0d\x00\x0f\x00\x0c\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\x1c\x00\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff"# happyTable :: HappyAddr happyTable = HappyA# "\x00\x00\x39\x00\x6c\x00\x52\x00\x39\x00\x50\x00\x39\x00\x51\x00\x2b\x00\x39\x00\x53\x00\x39\x00\x54\x00\x40\x00\x35\x00\x41\x00\x6e\x00\x62\x00\x6f\x00\x36\x00\x64\x00\x61\x00\x62\x00\x63\x00\x3a\x00\x64\x00\x52\x00\x3b\x00\x0a\x00\x0b\x00\x0c\x00\x0d\x00\x56\x00\x30\x00\x31\x00\x6b\x00\x0e\x00\x0f\x00\x6d\x00\x32\x00\x33\x00\x67\x00\x2f\x00\x30\x00\x31\x00\x37\x00\x30\x00\x31\x00\x6a\x00\x32\x00\x33\x00\x57\x00\x32\x00\x33\x00\x0f\x00\x02\x00\x03\x00\x04\x00\x05\x00\x06\x00\x07\x00\x08\x00\x02\x00\x03\x00\x04\x00\x05\x00\x06\x00\x07\x00\x08\x00\x25\x00\x26\x00\x47\x00\x4e\x00\x4f\x00\x50\x00\x27\x00\x27\x00\x3f\x00\x28\x00\x29\x00\x29\x00\x16\x00\x5b\x00\x17\x00\x4a\x00\x4b\x00\x5a\x00\x5b\x00\x4a\x00\x4b\x00\x4c\x00\x4d\x00\x4a\x00\x4b\x00\x5e\x00\x19\x00\x1a\x00\x66\x00\x5f\x00\x60\x00\x44\x00\x36\x00\x1c\x00\x65\x00\x48\x00\x5e\x00\x3d\x00\x19\x00\xff\xff\x2c\x00\x19\x00\x2e\x00\x1f\x00\x2d\x00\x20\x00\x22\x00\x23\x00\x12\x00\x59\x00\x5d\x00\x46\x00\x59\x00\x5d\x00\x19\x00\x3f\x00\x69\x00\x43\x00\x6a\x00\x44\x00\x46\x00\x47\x00\x19\x00\x56\x00\x1e\x00\x39\x00\x19\x00\x2b\x00\x43\x00\x3f\x00\x19\x00\x25\x00\x3d\x00\x14\x00\x19\x00\x14\x00\x2b\x00\x00\x00\x2c\x00\x14\x00\x1c\x00\x1e\x00\x14\x00\x14\x00\x00\x00\x1f\x00\x00\x00\x00\x00\x22\x00\x00\x00\x11\x00\x16\x00\x12\x00\x15\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x1b\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00"# happyReduceArr = Happy_Data_Array.array (1, 58) [ (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) ] happy_n_terms = 31 :: Int happy_n_nonterms = 34 :: Int happyReduce_1 = happySpecReduce_2 0# happyReduction_1 happyReduction_1 happy_x_2 happy_x_1 = case happyOut5 happy_x_1 of { happy_var_1 -> happyIn4 (happy_var_1 )} happyReduce_2 = happySpecReduce_1 1# happyReduction_2 happyReduction_2 happy_x_1 = case happyOut6 happy_x_1 of { happy_var_1 -> happyIn5 (return happy_var_1 )} happyReduce_3 = happySpecReduce_1 1# happyReduction_3 happyReduction_3 happy_x_1 = case happyOut7 happy_x_1 of { happy_var_1 -> happyIn5 (return happy_var_1 )} happyReduce_4 = happySpecReduce_1 1# happyReduction_4 happyReduction_4 happy_x_1 = case happyOut8 happy_x_1 of { happy_var_1 -> happyIn5 (return happy_var_1 )} happyReduce_5 = happySpecReduce_1 1# happyReduction_5 happyReduction_5 happy_x_1 = case happyOut9 happy_x_1 of { happy_var_1 -> happyIn5 (return happy_var_1 )} happyReduce_6 = happySpecReduce_1 1# happyReduction_6 happyReduction_6 happy_x_1 = case happyOut10 happy_x_1 of { happy_var_1 -> happyIn5 (happy_var_1 )} happyReduce_7 = happySpecReduce_1 1# happyReduction_7 happyReduction_7 happy_x_1 = case happyOut11 happy_x_1 of { happy_var_1 -> happyIn5 (return happy_var_1 )} happyReduce_8 = happyReduce 5# 2# happyReduction_8 happyReduction_8 (happy_x_5 `HappyStk` happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` happyRest) = case happyOut18 happy_x_4 of { happy_var_4 -> case happyOut25 happy_x_5 of { happy_var_5 -> happyIn6 (Q.SelectAll happy_var_4 : happy_var_5 ) `HappyStk` happyRest}} happyReduce_9 = happyReduce 5# 2# happyReduction_9 happyReduction_9 (happy_x_5 `HappyStk` happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` happyRest) = case happyOut19 happy_x_2 of { happy_var_2 -> case happyOut18 happy_x_4 of { happy_var_4 -> case happyOut25 happy_x_5 of { happy_var_5 -> happyIn6 (Q.Select happy_var_4 happy_var_2 : happy_var_5 ) `HappyStk` happyRest}}} happyReduce_10 = happyReduce 7# 3# happyReduction_10 happyReduction_10 (happy_x_7 `HappyStk` 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 happyOut18 happy_x_3 of { happy_var_3 -> case happyOut12 happy_x_6 of { happy_var_6 -> happyIn7 ([Q.Insert happy_var_3 happy_var_6] ) `HappyStk` happyRest}} happyReduce_11 = happyReduce 4# 4# happyReduction_11 happyReduction_11 (happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` happyRest) = case happyOut18 happy_x_3 of { happy_var_3 -> case happyOut31 happy_x_4 of { happy_var_4 -> happyIn8 (Q.Delete happy_var_3 : happy_var_4 ) `HappyStk` happyRest}} happyReduce_12 = happyReduce 5# 5# happyReduction_12 happyReduction_12 (happy_x_5 `HappyStk` happy_x_4 `HappyStk` happy_x_3 `HappyStk` happy_x_2 `HappyStk` happy_x_1 `HappyStk` happyRest) = case happyOut18 happy_x_2 of { happy_var_2 -> case happyOut15 happy_x_4 of { happy_var_4 -> case happyOut31 happy_x_5 of { happy_var_5 -> happyIn9 (Q.Update happy_var_2 happy_var_4 : happy_var_5 ) `HappyStk` happyRest}}} happyReduce_13 = happyReduce 6# 6# happyReduction_13 happyReduction_13 (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 happyOut18 happy_x_3 of { happy_var_3 -> case happyOut22 happy_x_5 of { happy_var_5 -> happyIn10 (happy_var_5 >>= \x -> return [Q.CreateTable happy_var_3 x] ) `HappyStk` happyRest}} happyReduce_14 = happySpecReduce_3 7# happyReduction_14 happyReduction_14 happy_x_3 happy_x_2 happy_x_1 = case happyOut18 happy_x_3 of { happy_var_3 -> happyIn11 ([Q.DropTable happy_var_3] )} happyReduce_15 = happySpecReduce_2 8# happyReduction_15 happyReduction_15 happy_x_2 happy_x_1 = case happyOut14 happy_x_1 of { happy_var_1 -> case happyOut13 happy_x_2 of { happy_var_2 -> happyIn12 (happy_var_1 : happy_var_2 )}} happyReduce_16 = happySpecReduce_3 9# happyReduction_16 happyReduction_16 happy_x_3 happy_x_2 happy_x_1 = case happyOut14 happy_x_2 of { happy_var_2 -> case happyOut13 happy_x_3 of { happy_var_3 -> happyIn13 (happy_var_2 : happy_var_3 )}} happyReduce_17 = happySpecReduce_0 9# happyReduction_17 happyReduction_17 = happyIn13 ([] ) happyReduce_18 = happySpecReduce_1 10# happyReduction_18 happyReduction_18 happy_x_1 = case happyOutTok happy_x_1 of { (Str happy_var_1) -> happyIn14 (T.StringValue happy_var_1 )} happyReduce_19 = happySpecReduce_1 10# happyReduction_19 happyReduction_19 happy_x_1 = case happyOutTok happy_x_1 of { (Int happy_var_1) -> happyIn14 (T.IntValue happy_var_1 )} happyReduce_20 = happySpecReduce_2 11# happyReduction_20 happyReduction_20 happy_x_2 happy_x_1 = case happyOut16 happy_x_1 of { happy_var_1 -> case happyOut17 happy_x_2 of { happy_var_2 -> happyIn15 (happy_var_1 : happy_var_2 )}} happyReduce_21 = happySpecReduce_3 12# happyReduction_21 happyReduction_21 happy_x_3 happy_x_2 happy_x_1 = case happyOut21 happy_x_1 of { happy_var_1 -> case happyOut14 happy_x_3 of { happy_var_3 -> happyIn16 ((happy_var_1, happy_var_3) )}} happyReduce_22 = happySpecReduce_3 13# happyReduction_22 happyReduction_22 happy_x_3 happy_x_2 happy_x_1 = case happyOut16 happy_x_2 of { happy_var_2 -> case happyOut17 happy_x_3 of { happy_var_3 -> happyIn17 (happy_var_2 : happy_var_3 )}} happyReduce_23 = happySpecReduce_0 13# happyReduction_23 happyReduction_23 = happyIn17 ([] ) happyReduce_24 = happySpecReduce_1 14# happyReduction_24 happyReduction_24 happy_x_1 = case happyOutTok happy_x_1 of { (Symb happy_var_1) -> happyIn18 (happy_var_1 )} happyReduce_25 = happySpecReduce_2 15# happyReduction_25 happyReduction_25 happy_x_2 happy_x_1 = case happyOut21 happy_x_1 of { happy_var_1 -> case happyOut20 happy_x_2 of { happy_var_2 -> happyIn19 (happy_var_1 : happy_var_2 )}} happyReduce_26 = happySpecReduce_3 16# happyReduction_26 happyReduction_26 happy_x_3 happy_x_2 happy_x_1 = case happyOut21 happy_x_2 of { happy_var_2 -> case happyOut20 happy_x_3 of { happy_var_3 -> happyIn20 (happy_var_2 : happy_var_3 )}} happyReduce_27 = happySpecReduce_0 16# happyReduction_27 happyReduction_27 = happyIn20 ([] ) happyReduce_28 = happySpecReduce_1 17# happyReduction_28 happyReduction_28 happy_x_1 = case happyOutTok happy_x_1 of { (Symb happy_var_1) -> happyIn21 (happy_var_1 )} happyReduce_29 = happySpecReduce_2 18# happyReduction_29 happyReduction_29 happy_x_2 happy_x_1 = case happyOut24 happy_x_1 of { happy_var_1 -> case happyOut23 happy_x_2 of { happy_var_2 -> happyIn22 (do x <- happy_var_1; y <- happy_var_2; return (x:y) )}} happyReduce_30 = happySpecReduce_3 19# happyReduction_30 happyReduction_30 happy_x_3 happy_x_2 happy_x_1 = case happyOut24 happy_x_2 of { happy_var_2 -> case happyOut23 happy_x_3 of { happy_var_3 -> happyIn23 (do x <- happy_var_2; y <- happy_var_3; return (x:y) )}} happyReduce_31 = happySpecReduce_0 19# happyReduction_31 happyReduction_31 = happyIn23 (return [] ) happyReduce_32 = happySpecReduce_2 20# happyReduction_32 happyReduction_32 happy_x_2 happy_x_1 = case happyOutTok happy_x_1 of { (Symb happy_var_1) -> case happyOutTok happy_x_2 of { (Symb happy_var_2) -> happyIn24 (case happy_var_2 of "int" -> return (happy_var_1, T.Int) "string" -> return (happy_var_1, T.String) otherwise -> E.throwError $ NoSuchType happy_var_2 )}} happyReduce_33 = happySpecReduce_2 21# happyReduction_33 happyReduction_33 happy_x_2 happy_x_1 = case happyOut26 happy_x_1 of { happy_var_1 -> case happyOut25 happy_x_2 of { happy_var_2 -> happyIn25 (happy_var_1 : happy_var_2 )}} happyReduce_34 = happySpecReduce_0 21# happyReduction_34 happyReduction_34 = happyIn25 ([] ) happyReduce_35 = happySpecReduce_1 22# happyReduction_35 happyReduction_35 happy_x_1 = case happyOut33 happy_x_1 of { happy_var_1 -> happyIn26 (happy_var_1 )} happyReduce_36 = happySpecReduce_1 22# happyReduction_36 happyReduction_36 happy_x_1 = case happyOut27 happy_x_1 of { happy_var_1 -> happyIn26 (happy_var_1 )} happyReduce_37 = happySpecReduce_1 22# happyReduction_37 happyReduction_37 happy_x_1 = case happyOut32 happy_x_1 of { happy_var_1 -> happyIn26 (happy_var_1 )} happyReduce_38 = happySpecReduce_2 23# happyReduction_38 happyReduction_38 happy_x_2 happy_x_1 = case happyOut28 happy_x_2 of { happy_var_2 -> happyIn27 (Q.OrderBy happy_var_2 )} happyReduce_39 = happySpecReduce_2 24# happyReduction_39 happyReduction_39 happy_x_2 happy_x_1 = case happyOut30 happy_x_1 of { happy_var_1 -> case happyOut29 happy_x_2 of { happy_var_2 -> happyIn28 (happy_var_1 : happy_var_2 )}} happyReduce_40 = happySpecReduce_3 25# happyReduction_40 happyReduction_40 happy_x_3 happy_x_2 happy_x_1 = case happyOut30 happy_x_2 of { happy_var_2 -> case happyOut29 happy_x_3 of { happy_var_3 -> happyIn29 (happy_var_2 : happy_var_3 )}} happyReduce_41 = happySpecReduce_0 25# happyReduction_41 happyReduction_41 = happyIn29 ([] ) happyReduce_42 = happySpecReduce_2 26# happyReduction_42 happyReduction_42 happy_x_2 happy_x_1 = case happyOut21 happy_x_1 of { happy_var_1 -> happyIn30 ((happy_var_1, Q.Ascending) )} happyReduce_43 = happySpecReduce_2 26# happyReduction_43 happyReduction_43 happy_x_2 happy_x_1 = case happyOut21 happy_x_1 of { happy_var_1 -> happyIn30 ((happy_var_1, Q.Descending) )} happyReduce_44 = happySpecReduce_1 26# happyReduction_44 happyReduction_44 happy_x_1 = case happyOut21 happy_x_1 of { happy_var_1 -> happyIn30 ((happy_var_1, Q.Ascending) )} happyReduce_45 = happySpecReduce_1 27# happyReduction_45 happyReduction_45 happy_x_1 = case happyOut33 happy_x_1 of { happy_var_1 -> happyIn31 ([happy_var_1] )} happyReduce_46 = happySpecReduce_0 27# happyReduction_46 happyReduction_46 = happyIn31 ([] ) happyReduce_47 = happySpecReduce_2 28# happyReduction_47 happyReduction_47 happy_x_2 happy_x_1 = case happyOutTok happy_x_2 of { (Int happy_var_2) -> happyIn32 (Q.Limit happy_var_2 )} happyReduce_48 = happySpecReduce_2 29# happyReduction_48 happyReduction_48 happy_x_2 happy_x_1 = case happyOut34 happy_x_2 of { happy_var_2 -> happyIn33 (Q.Where happy_var_2 )} happyReduce_49 = happySpecReduce_3 30# happyReduction_49 happyReduction_49 happy_x_3 happy_x_2 happy_x_1 = case happyOut37 happy_x_1 of { happy_var_1 -> case happyOut35 happy_x_3 of { happy_var_3 -> happyIn34 (Q.AndConditions (happy_var_1:happy_var_3) )}} happyReduce_50 = happySpecReduce_3 30# happyReduction_50 happyReduction_50 happy_x_3 happy_x_2 happy_x_1 = case happyOut37 happy_x_1 of { happy_var_1 -> case happyOut36 happy_x_3 of { happy_var_3 -> happyIn34 (Q.OrConditions (happy_var_1:happy_var_3) )}} happyReduce_51 = happySpecReduce_1 30# happyReduction_51 happyReduction_51 happy_x_1 = case happyOut37 happy_x_1 of { happy_var_1 -> happyIn34 (happy_var_1 )} happyReduce_52 = happySpecReduce_3 31# happyReduction_52 happyReduction_52 happy_x_3 happy_x_2 happy_x_1 = case happyOut37 happy_x_1 of { happy_var_1 -> case happyOut35 happy_x_3 of { happy_var_3 -> happyIn35 (happy_var_1 : happy_var_3 )}} happyReduce_53 = happySpecReduce_1 31# happyReduction_53 happyReduction_53 happy_x_1 = case happyOut37 happy_x_1 of { happy_var_1 -> happyIn35 ([happy_var_1] )} happyReduce_54 = happySpecReduce_3 32# happyReduction_54 happyReduction_54 happy_x_3 happy_x_2 happy_x_1 = case happyOut37 happy_x_1 of { happy_var_1 -> case happyOut36 happy_x_3 of { happy_var_3 -> happyIn36 (happy_var_1 : happy_var_3 )}} happyReduce_55 = happySpecReduce_1 32# happyReduction_55 happyReduction_55 happy_x_1 = case happyOut37 happy_x_1 of { happy_var_1 -> happyIn36 ([happy_var_1] )} happyReduce_56 = happySpecReduce_3 33# happyReduction_56 happyReduction_56 happy_x_3 happy_x_2 happy_x_1 = case happyOut21 happy_x_1 of { happy_var_1 -> case happyOut14 happy_x_3 of { happy_var_3 -> happyIn37 (Q.Condition happy_var_1 (== happy_var_3) )}} happyReduce_57 = happySpecReduce_3 33# happyReduction_57 happyReduction_57 happy_x_3 happy_x_2 happy_x_1 = case happyOut21 happy_x_1 of { happy_var_1 -> case happyOut14 happy_x_3 of { happy_var_3 -> happyIn37 (Q.Condition happy_var_1 (< happy_var_3) )}} happyReduce_58 = happySpecReduce_3 33# happyReduction_58 happyReduction_58 happy_x_3 happy_x_2 happy_x_1 = case happyOut21 happy_x_1 of { happy_var_1 -> case happyOut14 happy_x_3 of { happy_var_3 -> happyIn37 (Q.Condition happy_var_1 (> happy_var_3) )}} happyNewToken action sts stk [] = happyDoAction 30# notHappyAtAll action sts stk [] happyNewToken action sts stk (tk:tks) = let cont i = happyDoAction i tk action sts stk tks in case tk of { Str happy_dollar_dollar -> cont 1#; Int happy_dollar_dollar -> cont 2#; Symb happy_dollar_dollar -> cont 3#; Asterisk -> cont 4#; LParen -> cont 5#; RParen -> cont 6#; Comma -> cont 7#; Select -> cont 8#; Insert -> cont 9#; Delete -> cont 10#; Update -> cont 11#; From -> cont 12#; Into -> cont 13#; Values -> cont 14#; Table -> cont 15#; Create -> cont 16#; Drop -> cont 17#; Where -> cont 18#; Set -> cont 19#; And -> cont 20#; Or -> cont 21#; Asc -> cont 22#; Desc -> cont 23#; Limit -> cont 24#; Equals -> cont 25#; Greater -> cont 26#; Lesser -> cont 27#; Semicolon -> cont 28#; OrderBy -> cont 29#; _ -> happyError' (tk:tks) } happyError_ tk tks = happyError' (tk:tks) happyThen :: () => ParserMonad a -> (a -> ParserMonad b) -> ParserMonad b happyThen = (>>=) happyReturn :: () => a -> ParserMonad a happyReturn = (return) happyThen1 m k tks = (>>=) m (\a -> k a tks) happyReturn1 :: () => a -> b -> ParserMonad a happyReturn1 = \a tks -> (return) a happyError' :: () => [(Token)] -> ParserMonad a happyError' = parseError parseTokens tks = happySomeParser where happySomeParser = happyThen (happyParse 0# tks) (\x -> happyReturn (happyOut4 x)) happySeq = happyDontSeq type ParserMonad = Either ParsingError data ParsingError = ParsingFailedAtToken Token | NoSuchType String instance E.Error ParsingError instance Show ParsingError where show (ParsingFailedAtToken t) = "Parsing failed at " ++ show t show (NoSuchType t) = "No such type: " ++ t parseError :: [Token] -> ParserMonad a parseError (t:_) = E.throwError $ ParsingFailedAtToken t parse :: String -> Either String [Q.Query] parse input = case parseTokens $ scan input of Left err -> Left $ show err Right (Left err) -> Left $ show err Right (Right queries) -> Right queries {-# LINE 1 "templates/GenericTemplate.hs" #-} {-# LINE 1 "templates/GenericTemplate.hs" #-} {-# LINE 1 "" #-} {-# LINE 1 "" #-} {-# LINE 1 "templates/GenericTemplate.hs" #-} -- Id: GenericTemplate.hs,v 1.26 2005/01/14 14:47:22 simonmar Exp {-# LINE 30 "templates/GenericTemplate.hs" #-} data Happy_IntList = HappyCons Happy_GHC_Exts.Int# Happy_IntList {-# LINE 51 "templates/GenericTemplate.hs" #-} {-# LINE 61 "templates/GenericTemplate.hs" #-} {-# LINE 70 "templates/GenericTemplate.hs" #-} 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 0#, 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 i tk st -1# -> {- nothing -} happyAccept i tk st n | (n Happy_GHC_Exts.<# (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) = indexShortOffAddr happyActOffsets st (off_i) = (off Happy_GHC_Exts.+# i) check = if (off_i Happy_GHC_Exts.>=# (0# :: Happy_GHC_Exts.Int#)) then (indexShortOffAddr happyCheck off_i Happy_GHC_Exts.==# i) else False (action) | check = indexShortOffAddr happyTable off_i | otherwise = indexShortOffAddr happyDefActions st {-# LINE 130 "templates/GenericTemplate.hs" #-} 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# data HappyAddr = HappyA# Happy_GHC_Exts.Addr# ----------------------------------------------------------------------------- -- HappyState data type (not arrays) {-# LINE 163 "templates/GenericTemplate.hs" #-} ----------------------------------------------------------------------------- -- 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 = happyThen1 (fn stk tk) (\r -> happyGoto nt j tk st1 sts1 (r `HappyStk` drop_stk)) where (sts1@((HappyCons (st1@(action)) (_)))) = happyDrop k (HappyCons (st) (sts)) drop_stk = happyDropStk k 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 = happyThen1 (fn stk tk) (\r -> happyNewToken new_state sts1 (r `HappyStk` drop_stk)) where (sts1@((HappyCons (st1@(action)) (_)))) = happyDrop k (HappyCons (st) (sts)) drop_stk = happyDropStk k stk (off) = indexShortOffAddr happyGotoOffsets st1 (off_i) = (off Happy_GHC_Exts.+# nt) (new_state) = indexShortOffAddr happyTable off_i 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) = indexShortOffAddr happyGotoOffsets st (off_i) = (off Happy_GHC_Exts.+# nt) (new_state) = indexShortOffAddr happyTable off_i ----------------------------------------------------------------------------- -- Error recovery (0# is the error token) -- parse error if we are in recovery and we fail again happyFail 0# tk old_st _ stk = -- trace "failing" $ happyError_ 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 0# tk old_st (HappyCons ((action)) (sts)) (saved_tok `HappyStk` _ `HappyStk` stk) = -- trace ("discarding state, depth " ++ show (length stk)) $ happyDoAction 0# tk action sts ((saved_tok`HappyStk`stk)) -} -- Enter error recovery: generate an error token, -- save the old token and carry on. happyFail 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 = 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 `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.