PageRenderTime 61ms CodeModel.GetById 15ms RepoModel.GetById 0ms app.codeStats 0ms

/ghc-7.0.4/compiler/cmm/CmmParse.hs

http://picorec.googlecode.com/
Haskell | 1210 lines | 1025 code | 64 blank | 121 comment | 0 complexity | e5c7c9c148503f36e35d83c109da2669 MD5 | raw file
Possible License(s): BSD-3-Clause, BSD-2-Clause 
    

  1. {-# OPTIONS_GHC -fno-warn-overlapping-patterns #-}
    2. 

  2. {-# OPTIONS -fglasgow-exts -cpp #-}
    3. 

  3. {-# OPTIONS -Wwarn -w -XNoMonomorphismRestriction #-}
    4. 

  4. -- The NoMonomorphismRestriction deals with a Happy infelicity
    5. 

  5. --    With OutsideIn's more conservativ monomorphism restriction
    6. 

  6. --    we aren't generalising
    7. 

  7. --        notHappyAtAll = error "urk"
    8. 

  8. --    which is terrible.  Switching off the restriction allows
    9. 

  9. --    the generalisation.  Better would be to make Happy generate
    10. 

  10. --    an appropriate signature.
    11. 

  11. --
    12. 

  12. -- The above warning supression flag is a temporary kludge.
    13. 

  13. -- While working on this module you are encouraged to remove it and fix
    14. 

  14. -- any warnings in the module. See
    15. 

  15. --     http://hackage.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#Warnings
    16. 

  16. -- for details
    17. 

  17. 

  18. module CmmParse ( parseCmmFile ) where
    19. 

  19. 

  20. import CgMonad		hiding (getDynFlags)
    21. 

  21. import CgExtCode
    22. 

  22. import CgHeapery
    23. 

  23. import CgUtils
    24. 

  24. import CgProf
    25. 

  25. import CgTicky
    26. 

  26. import CgInfoTbls
    27. 

  27. import CgForeignCall
    28. 

  28. import CgTailCall
    29. 

  29. import CgStackery
    30. 

  30. import ClosureInfo
    31. 

  31. import CgCallConv
    32. 

  32. import CgClosure
    33. 

  33. import CostCentre
    34. 

  34. 

  35. import BlockId
    36. 

  36. import Cmm
    37. 

  37. import PprCmm
    38. 

  38. import CmmUtils
    39. 

  39. import CmmLex
    40. 

  40. import CLabel
    41. 

  41. import SMRep
    42. 

  42. import Lexer
    43. 

  43. 

  44. import ForeignCall
    45. 

  45. import Module
    46. 

  46. import Literal
    47. 

  47. import Unique
    48. 

  48. import UniqFM
    49. 

  49. import SrcLoc
    50. 

  50. import DynFlags
    51. 

  51. import StaticFlags
    52. 

  52. import ErrUtils
    53. 

  53. import StringBuffer
    54. 

  54. import FastString
    55. 

  55. import Panic
    56. 

  56. import Constants
    57. 

  57. import Outputable
    58. 

  58. import BasicTypes
    59. 

  59. import Bag              ( emptyBag, unitBag )
    60. 

  60. import Var
    61. 

  61. 

  62. import Control.Monad
    63. 

  63. import Data.Array
    64. 

  64. import Data.Char	( ord )
    65. 

  65. import System.Exit
    66. 

  66. 

  67. #include "HsVersions.h"
    68. 

  68. #if __GLASGOW_HASKELL__ >= 503
    69. 

  69. import qualified Data.Array as Happy_Data_Array
    70. 

  70. #else
    71. 

  71. import qualified Array as Happy_Data_Array
    72. 

  72. #endif
    73. 

  73. #if __GLASGOW_HASKELL__ >= 503
    74. 

  74. import qualified GHC.Exts as Happy_GHC_Exts
    75. 

  75. #else
    76. 

  76. import qualified GlaExts as Happy_GHC_Exts
    77. 

  77. #endif
    78. 

  78. 

  79. -- parser produced by Happy Version 1.18.4
    80. 

  80. 

  81. newtype HappyAbsSyn  = HappyAbsSyn HappyAny
    82. 

  82. #if __GLASGOW_HASKELL__ >= 607
    83. 

  83. type HappyAny = Happy_GHC_Exts.Any
    84. 

  84. #else
    85. 

  85. type HappyAny = forall a . a
    86. 

  86. #endif
    87. 

  87. happyIn4 :: (ExtCode) -> (HappyAbsSyn )
    88. 

  88. happyIn4 x = Happy_GHC_Exts.unsafeCoerce# x
    89. 

  89. {-# INLINE happyIn4 #-}
    90. 

  90. happyOut4 :: (HappyAbsSyn ) -> (ExtCode)
    91. 

  91. happyOut4 x = Happy_GHC_Exts.unsafeCoerce# x
    92. 

  92. {-# INLINE happyOut4 #-}
    93. 

  93. happyIn5 :: (ExtCode) -> (HappyAbsSyn )
    94. 

  94. happyIn5 x = Happy_GHC_Exts.unsafeCoerce# x
    95. 

  95. {-# INLINE happyIn5 #-}
    96. 

  96. happyOut5 :: (HappyAbsSyn ) -> (ExtCode)
    97. 

  97. happyOut5 x = Happy_GHC_Exts.unsafeCoerce# x
    98. 

  98. {-# INLINE happyOut5 #-}
    99. 

  99. happyIn6 :: (ExtCode) -> (HappyAbsSyn )
    100. 

  100. happyIn6 x = Happy_GHC_Exts.unsafeCoerce# x
    101. 

  101. {-# INLINE happyIn6 #-}
    102. 

  102. happyOut6 :: (HappyAbsSyn ) -> (ExtCode)
    103. 

  103. happyOut6 x = Happy_GHC_Exts.unsafeCoerce# x
    104. 

  104. {-# INLINE happyOut6 #-}
    105. 

  105. happyIn7 :: ([ExtFCode [CmmStatic]]) -> (HappyAbsSyn )
    106. 

  106. happyIn7 x = Happy_GHC_Exts.unsafeCoerce# x
    107. 

  107. {-# INLINE happyIn7 #-}
    108. 

  108. happyOut7 :: (HappyAbsSyn ) -> ([ExtFCode [CmmStatic]])
    109. 

  109. happyOut7 x = Happy_GHC_Exts.unsafeCoerce# x
    110. 

  110. {-# INLINE happyOut7 #-}
    111. 

  111. happyIn8 :: (ExtFCode [CmmStatic]) -> (HappyAbsSyn )
    112. 

  112. happyIn8 x = Happy_GHC_Exts.unsafeCoerce# x
    113. 

  113. {-# INLINE happyIn8 #-}
    114. 

  114. happyOut8 :: (HappyAbsSyn ) -> (ExtFCode [CmmStatic])
    115. 

  115. happyOut8 x = Happy_GHC_Exts.unsafeCoerce# x
    116. 

  116. {-# INLINE happyOut8 #-}
    117. 

  117. happyIn9 :: ([ExtFCode CmmExpr]) -> (HappyAbsSyn )
    118. 

  118. happyIn9 x = Happy_GHC_Exts.unsafeCoerce# x
    119. 

  119. {-# INLINE happyIn9 #-}
    120. 

  120. happyOut9 :: (HappyAbsSyn ) -> ([ExtFCode CmmExpr])
    121. 

  121. happyOut9 x = Happy_GHC_Exts.unsafeCoerce# x
    122. 

  122. {-# INLINE happyOut9 #-}
    123. 

  123. happyIn10 :: (ExtCode) -> (HappyAbsSyn )
    124. 

  124. happyIn10 x = Happy_GHC_Exts.unsafeCoerce# x
    125. 

  125. {-# INLINE happyIn10 #-}
    126. 

  126. happyOut10 :: (HappyAbsSyn ) -> (ExtCode)
    127. 

  127. happyOut10 x = Happy_GHC_Exts.unsafeCoerce# x
    128. 

  128. {-# INLINE happyOut10 #-}
    129. 

  129. happyIn11 :: (ExtFCode (CLabel, CmmInfoTable, [Maybe LocalReg])) -> (HappyAbsSyn )
    130. 

  130. happyIn11 x = Happy_GHC_Exts.unsafeCoerce# x
    131. 

  131. {-# INLINE happyIn11 #-}
    132. 

  132. happyOut11 :: (HappyAbsSyn ) -> (ExtFCode (CLabel, CmmInfoTable, [Maybe LocalReg]))
    133. 

  133. happyOut11 x = Happy_GHC_Exts.unsafeCoerce# x
    134. 

  134. {-# INLINE happyOut11 #-}
    135. 

  135. happyIn12 :: (ExtCode) -> (HappyAbsSyn )
    136. 

  136. happyIn12 x = Happy_GHC_Exts.unsafeCoerce# x
    137. 

  137. {-# INLINE happyIn12 #-}
    138. 

  138. happyOut12 :: (HappyAbsSyn ) -> (ExtCode)
    139. 

  139. happyOut12 x = Happy_GHC_Exts.unsafeCoerce# x
    140. 

  140. {-# INLINE happyOut12 #-}
    141. 

  141. happyIn13 :: (ExtCode) -> (HappyAbsSyn )
    142. 

  142. happyIn13 x = Happy_GHC_Exts.unsafeCoerce# x
    143. 

  143. {-# INLINE happyIn13 #-}
    144. 

  144. happyOut13 :: (HappyAbsSyn ) -> (ExtCode)
    145. 

  145. happyOut13 x = Happy_GHC_Exts.unsafeCoerce# x
    146. 

  146. {-# INLINE happyOut13 #-}
    147. 

  147. happyIn14 :: ([(FastString, CLabel)]) -> (HappyAbsSyn )
    148. 

  148. happyIn14 x = Happy_GHC_Exts.unsafeCoerce# x
    149. 

  149. {-# INLINE happyIn14 #-}
    150. 

  150. happyOut14 :: (HappyAbsSyn ) -> ([(FastString, CLabel)])
    151. 

  151. happyOut14 x = Happy_GHC_Exts.unsafeCoerce# x
    152. 

  152. {-# INLINE happyOut14 #-}
    153. 

  153. happyIn15 :: ((FastString,  CLabel)) -> (HappyAbsSyn )
    154. 

  154. happyIn15 x = Happy_GHC_Exts.unsafeCoerce# x
    155. 

  155. {-# INLINE happyIn15 #-}
    156. 

  156. happyOut15 :: (HappyAbsSyn ) -> ((FastString,  CLabel))
    157. 

  157. happyOut15 x = Happy_GHC_Exts.unsafeCoerce# x
    158. 

  158. {-# INLINE happyOut15 #-}
    159. 

  159. happyIn16 :: ([FastString]) -> (HappyAbsSyn )
    160. 

  160. happyIn16 x = Happy_GHC_Exts.unsafeCoerce# x
    161. 

  161. {-# INLINE happyIn16 #-}
    162. 

  162. happyOut16 :: (HappyAbsSyn ) -> ([FastString])
    163. 

  163. happyOut16 x = Happy_GHC_Exts.unsafeCoerce# x
    164. 

  164. {-# INLINE happyOut16 #-}
    165. 

  165. happyIn17 :: (ExtCode) -> (HappyAbsSyn )
    166. 

  166. happyIn17 x = Happy_GHC_Exts.unsafeCoerce# x
    167. 

  167. {-# INLINE happyIn17 #-}
    168. 

  168. happyOut17 :: (HappyAbsSyn ) -> (ExtCode)
    169. 

  169. happyOut17 x = Happy_GHC_Exts.unsafeCoerce# x
    170. 

  170. {-# INLINE happyOut17 #-}
    171. 

  171. happyIn18 :: (CmmReturnInfo) -> (HappyAbsSyn )
    172. 

  172. happyIn18 x = Happy_GHC_Exts.unsafeCoerce# x
    173. 

  173. {-# INLINE happyIn18 #-}
    174. 

  174. happyOut18 :: (HappyAbsSyn ) -> (CmmReturnInfo)
    175. 

  175. happyOut18 x = Happy_GHC_Exts.unsafeCoerce# x
    176. 

  176. {-# INLINE happyOut18 #-}
    177. 

  177. happyIn19 :: (ExtFCode BoolExpr) -> (HappyAbsSyn )
    178. 

  178. happyIn19 x = Happy_GHC_Exts.unsafeCoerce# x
    179. 

  179. {-# INLINE happyIn19 #-}
    180. 

  180. happyOut19 :: (HappyAbsSyn ) -> (ExtFCode BoolExpr)
    181. 

  181. happyOut19 x = Happy_GHC_Exts.unsafeCoerce# x
    182. 

  182. {-# INLINE happyOut19 #-}
    183. 

  183. happyIn20 :: (ExtFCode BoolExpr) -> (HappyAbsSyn )
    184. 

  184. happyIn20 x = Happy_GHC_Exts.unsafeCoerce# x
    185. 

  185. {-# INLINE happyIn20 #-}
    186. 

  186. happyOut20 :: (HappyAbsSyn ) -> (ExtFCode BoolExpr)
    187. 

  187. happyOut20 x = Happy_GHC_Exts.unsafeCoerce# x
    188. 

  188. {-# INLINE happyOut20 #-}
    189. 

  189. happyIn21 :: (CmmSafety) -> (HappyAbsSyn )
    190. 

  190. happyIn21 x = Happy_GHC_Exts.unsafeCoerce# x
    191. 

  191. {-# INLINE happyIn21 #-}
    192. 

  192. happyOut21 :: (HappyAbsSyn ) -> (CmmSafety)
    193. 

  193. happyOut21 x = Happy_GHC_Exts.unsafeCoerce# x
    194. 

  194. {-# INLINE happyOut21 #-}
    195. 

  195. happyIn22 :: (Maybe [GlobalReg]) -> (HappyAbsSyn )
    196. 

  196. happyIn22 x = Happy_GHC_Exts.unsafeCoerce# x
    197. 

  197. {-# INLINE happyIn22 #-}
    198. 

  198. happyOut22 :: (HappyAbsSyn ) -> (Maybe [GlobalReg])
    199. 

  199. happyOut22 x = Happy_GHC_Exts.unsafeCoerce# x
    200. 

  200. {-# INLINE happyOut22 #-}
    201. 

  201. happyIn23 :: ([GlobalReg]) -> (HappyAbsSyn )
    202. 

  202. happyIn23 x = Happy_GHC_Exts.unsafeCoerce# x
    203. 

  203. {-# INLINE happyIn23 #-}
    204. 

  204. happyOut23 :: (HappyAbsSyn ) -> ([GlobalReg])
    205. 

  205. happyOut23 x = Happy_GHC_Exts.unsafeCoerce# x
    206. 

  206. {-# INLINE happyOut23 #-}
    207. 

  207. happyIn24 :: (Maybe (Int,Int)) -> (HappyAbsSyn )
    208. 

  208. happyIn24 x = Happy_GHC_Exts.unsafeCoerce# x
    209. 

  209. {-# INLINE happyIn24 #-}
    210. 

  210. happyOut24 :: (HappyAbsSyn ) -> (Maybe (Int,Int))
    211. 

  211. happyOut24 x = Happy_GHC_Exts.unsafeCoerce# x
    212. 

  212. {-# INLINE happyOut24 #-}
    213. 

  213. happyIn25 :: ([([Int],ExtCode)]) -> (HappyAbsSyn )
    214. 

  214. happyIn25 x = Happy_GHC_Exts.unsafeCoerce# x
    215. 

  215. {-# INLINE happyIn25 #-}
    216. 

  216. happyOut25 :: (HappyAbsSyn ) -> ([([Int],ExtCode)])
    217. 

  217. happyOut25 x = Happy_GHC_Exts.unsafeCoerce# x
    218. 

  218. {-# INLINE happyOut25 #-}
    219. 

  219. happyIn26 :: (([Int],ExtCode)) -> (HappyAbsSyn )
    220. 

  220. happyIn26 x = Happy_GHC_Exts.unsafeCoerce# x
    221. 

  221. {-# INLINE happyIn26 #-}
    222. 

  222. happyOut26 :: (HappyAbsSyn ) -> (([Int],ExtCode))
    223. 

  223. happyOut26 x = Happy_GHC_Exts.unsafeCoerce# x
    224. 

  224. {-# INLINE happyOut26 #-}
    225. 

  225. happyIn27 :: ([Int]) -> (HappyAbsSyn )
    226. 

  226. happyIn27 x = Happy_GHC_Exts.unsafeCoerce# x
    227. 

  227. {-# INLINE happyIn27 #-}
    228. 

  228. happyOut27 :: (HappyAbsSyn ) -> ([Int])
    229. 

  229. happyOut27 x = Happy_GHC_Exts.unsafeCoerce# x
    230. 

  230. {-# INLINE happyOut27 #-}
    231. 

  231. happyIn28 :: (Maybe ExtCode) -> (HappyAbsSyn )
    232. 

  232. happyIn28 x = Happy_GHC_Exts.unsafeCoerce# x
    233. 

  233. {-# INLINE happyIn28 #-}
    234. 

  234. happyOut28 :: (HappyAbsSyn ) -> (Maybe ExtCode)
    235. 

  235. happyOut28 x = Happy_GHC_Exts.unsafeCoerce# x
    236. 

  236. {-# INLINE happyOut28 #-}
    237. 

  237. happyIn29 :: (ExtCode) -> (HappyAbsSyn )
    238. 

  238. happyIn29 x = Happy_GHC_Exts.unsafeCoerce# x
    239. 

  239. {-# INLINE happyIn29 #-}
    240. 

  240. happyOut29 :: (HappyAbsSyn ) -> (ExtCode)
    241. 

  241. happyOut29 x = Happy_GHC_Exts.unsafeCoerce# x
    242. 

  242. {-# INLINE happyOut29 #-}
    243. 

  243. happyIn30 :: (ExtFCode CmmExpr) -> (HappyAbsSyn )
    244. 

  244. happyIn30 x = Happy_GHC_Exts.unsafeCoerce# x
    245. 

  245. {-# INLINE happyIn30 #-}
    246. 

  246. happyOut30 :: (HappyAbsSyn ) -> (ExtFCode CmmExpr)
    247. 

  247. happyOut30 x = Happy_GHC_Exts.unsafeCoerce# x
    248. 

  248. {-# INLINE happyOut30 #-}
    249. 

  249. happyIn31 :: (ExtFCode CmmExpr) -> (HappyAbsSyn )
    250. 

  250. happyIn31 x = Happy_GHC_Exts.unsafeCoerce# x
    251. 

  251. {-# INLINE happyIn31 #-}
    252. 

  252. happyOut31 :: (HappyAbsSyn ) -> (ExtFCode CmmExpr)
    253. 

  253. happyOut31 x = Happy_GHC_Exts.unsafeCoerce# x
    254. 

  254. {-# INLINE happyOut31 #-}
    255. 

  255. happyIn32 :: (CmmType) -> (HappyAbsSyn )
    256. 

  256. happyIn32 x = Happy_GHC_Exts.unsafeCoerce# x
    257. 

  257. {-# INLINE happyIn32 #-}
    258. 

  258. happyOut32 :: (HappyAbsSyn ) -> (CmmType)
    259. 

  259. happyOut32 x = Happy_GHC_Exts.unsafeCoerce# x
    260. 

  260. {-# INLINE happyOut32 #-}
    261. 

  261. happyIn33 :: ([ExtFCode HintedCmmActual]) -> (HappyAbsSyn )
    262. 

  262. happyIn33 x = Happy_GHC_Exts.unsafeCoerce# x
    263. 

  263. {-# INLINE happyIn33 #-}
    264. 

  264. happyOut33 :: (HappyAbsSyn ) -> ([ExtFCode HintedCmmActual])
    265. 

  265. happyOut33 x = Happy_GHC_Exts.unsafeCoerce# x
    266. 

  266. {-# INLINE happyOut33 #-}
    267. 

  267. happyIn34 :: ([ExtFCode HintedCmmActual]) -> (HappyAbsSyn )
    268. 

  268. happyIn34 x = Happy_GHC_Exts.unsafeCoerce# x
    269. 

  269. {-# INLINE happyIn34 #-}
    270. 

  270. happyOut34 :: (HappyAbsSyn ) -> ([ExtFCode HintedCmmActual])
    271. 

  271. happyOut34 x = Happy_GHC_Exts.unsafeCoerce# x
    272. 

  272. {-# INLINE happyOut34 #-}
    273. 

  273. happyIn35 :: ([ExtFCode HintedCmmActual]) -> (HappyAbsSyn )
    274. 

  274. happyIn35 x = Happy_GHC_Exts.unsafeCoerce# x
    275. 

  275. {-# INLINE happyIn35 #-}
    276. 

  276. happyOut35 :: (HappyAbsSyn ) -> ([ExtFCode HintedCmmActual])
    277. 

  277. happyOut35 x = Happy_GHC_Exts.unsafeCoerce# x
    278. 

  278. {-# INLINE happyOut35 #-}
    279. 

  279. happyIn36 :: (ExtFCode HintedCmmActual) -> (HappyAbsSyn )
    280. 

  280. happyIn36 x = Happy_GHC_Exts.unsafeCoerce# x
    281. 

  281. {-# INLINE happyIn36 #-}
    282. 

  282. happyOut36 :: (HappyAbsSyn ) -> (ExtFCode HintedCmmActual)
    283. 

  283. happyOut36 x = Happy_GHC_Exts.unsafeCoerce# x
    284. 

  284. {-# INLINE happyOut36 #-}
    285. 

  285. happyIn37 :: ([ExtFCode CmmExpr]) -> (HappyAbsSyn )
    286. 

  286. happyIn37 x = Happy_GHC_Exts.unsafeCoerce# x
    287. 

  287. {-# INLINE happyIn37 #-}
    288. 

  288. happyOut37 :: (HappyAbsSyn ) -> ([ExtFCode CmmExpr])
    289. 

  289. happyOut37 x = Happy_GHC_Exts.unsafeCoerce# x
    290. 

  290. {-# INLINE happyOut37 #-}
    291. 

  291. happyIn38 :: ([ExtFCode CmmExpr]) -> (HappyAbsSyn )
    292. 

  292. happyIn38 x = Happy_GHC_Exts.unsafeCoerce# x
    293. 

  293. {-# INLINE happyIn38 #-}
    294. 

  294. happyOut38 :: (HappyAbsSyn ) -> ([ExtFCode CmmExpr])
    295. 

  295. happyOut38 x = Happy_GHC_Exts.unsafeCoerce# x
    296. 

  296. {-# INLINE happyOut38 #-}
    297. 

  297. happyIn39 :: (ExtFCode CmmExpr) -> (HappyAbsSyn )
    298. 

  298. happyIn39 x = Happy_GHC_Exts.unsafeCoerce# x
    299. 

  299. {-# INLINE happyIn39 #-}
    300. 

  300. happyOut39 :: (HappyAbsSyn ) -> (ExtFCode CmmExpr)
    301. 

  301. happyOut39 x = Happy_GHC_Exts.unsafeCoerce# x
    302. 

  302. {-# INLINE happyOut39 #-}
    303. 

  303. happyIn40 :: ([ExtFCode HintedCmmFormal]) -> (HappyAbsSyn )
    304. 

  304. happyIn40 x = Happy_GHC_Exts.unsafeCoerce# x
    305. 

  305. {-# INLINE happyIn40 #-}
    306. 

  306. happyOut40 :: (HappyAbsSyn ) -> ([ExtFCode HintedCmmFormal])
    307. 

  307. happyOut40 x = Happy_GHC_Exts.unsafeCoerce# x
    308. 

  308. {-# INLINE happyOut40 #-}
    309. 

  309. happyIn41 :: ([ExtFCode HintedCmmFormal]) -> (HappyAbsSyn )
    310. 

  310. happyIn41 x = Happy_GHC_Exts.unsafeCoerce# x
    311. 

  311. {-# INLINE happyIn41 #-}
    312. 

  312. happyOut41 :: (HappyAbsSyn ) -> ([ExtFCode HintedCmmFormal])
    313. 

  313. happyOut41 x = Happy_GHC_Exts.unsafeCoerce# x
    314. 

  314. {-# INLINE happyOut41 #-}
    315. 

  315. happyIn42 :: (ExtFCode HintedCmmFormal) -> (HappyAbsSyn )
    316. 

  316. happyIn42 x = Happy_GHC_Exts.unsafeCoerce# x
    317. 

  317. {-# INLINE happyIn42 #-}
    318. 

  318. happyOut42 :: (HappyAbsSyn ) -> (ExtFCode HintedCmmFormal)
    319. 

  319. happyOut42 x = Happy_GHC_Exts.unsafeCoerce# x
    320. 

  320. {-# INLINE happyOut42 #-}
    321. 

  321. happyIn43 :: (ExtFCode LocalReg) -> (HappyAbsSyn )
    322. 

  322. happyIn43 x = Happy_GHC_Exts.unsafeCoerce# x
    323. 

  323. {-# INLINE happyIn43 #-}
    324. 

  324. happyOut43 :: (HappyAbsSyn ) -> (ExtFCode LocalReg)
    325. 

  325. happyOut43 x = Happy_GHC_Exts.unsafeCoerce# x
    326. 

  326. {-# INLINE happyOut43 #-}
    327. 

  327. happyIn44 :: (ExtFCode CmmReg) -> (HappyAbsSyn )
    328. 

  328. happyIn44 x = Happy_GHC_Exts.unsafeCoerce# x
    329. 

  329. {-# INLINE happyIn44 #-}
    330. 

  330. happyOut44 :: (HappyAbsSyn ) -> (ExtFCode CmmReg)
    331. 

  331. happyOut44 x = Happy_GHC_Exts.unsafeCoerce# x
    332. 

  332. {-# INLINE happyOut44 #-}
    333. 

  333. happyIn45 :: ([ExtFCode LocalReg]) -> (HappyAbsSyn )
    334. 

  334. happyIn45 x = Happy_GHC_Exts.unsafeCoerce# x
    335. 

  335. {-# INLINE happyIn45 #-}
    336. 

  336. happyOut45 :: (HappyAbsSyn ) -> ([ExtFCode LocalReg])
    337. 

  337. happyOut45 x = Happy_GHC_Exts.unsafeCoerce# x
    338. 

  338. {-# INLINE happyOut45 #-}
    339. 

  339. happyIn46 :: ([ExtFCode LocalReg]) -> (HappyAbsSyn )
    340. 

  340. happyIn46 x = Happy_GHC_Exts.unsafeCoerce# x
    341. 

  341. {-# INLINE happyIn46 #-}
    342. 

  342. happyOut46 :: (HappyAbsSyn ) -> ([ExtFCode LocalReg])
    343. 

  343. happyOut46 x = Happy_GHC_Exts.unsafeCoerce# x
    344. 

  344. {-# INLINE happyOut46 #-}
    345. 

  345. happyIn47 :: ([ExtFCode LocalReg]) -> (HappyAbsSyn )
    346. 

  346. happyIn47 x = Happy_GHC_Exts.unsafeCoerce# x
    347. 

  347. {-# INLINE happyIn47 #-}
    348. 

  348. happyOut47 :: (HappyAbsSyn ) -> ([ExtFCode LocalReg])
    349. 

  349. happyOut47 x = Happy_GHC_Exts.unsafeCoerce# x
    350. 

  350. {-# INLINE happyOut47 #-}
    351. 

  351. happyIn48 :: (ExtFCode LocalReg) -> (HappyAbsSyn )
    352. 

  352. happyIn48 x = Happy_GHC_Exts.unsafeCoerce# x
    353. 

  353. {-# INLINE happyIn48 #-}
    354. 

  354. happyOut48 :: (HappyAbsSyn ) -> (ExtFCode LocalReg)
    355. 

  355. happyOut48 x = Happy_GHC_Exts.unsafeCoerce# x
    356. 

  356. {-# INLINE happyOut48 #-}
    357. 

  357. happyIn49 :: (ExtFCode (Maybe UpdateFrame)) -> (HappyAbsSyn )
    358. 

  358. happyIn49 x = Happy_GHC_Exts.unsafeCoerce# x
    359. 

  359. {-# INLINE happyIn49 #-}
    360. 

  360. happyOut49 :: (HappyAbsSyn ) -> (ExtFCode (Maybe UpdateFrame))
    361. 

  361. happyOut49 x = Happy_GHC_Exts.unsafeCoerce# x
    362. 

  362. {-# INLINE happyOut49 #-}
    363. 

  363. happyIn50 :: (ExtFCode (Maybe BlockId)) -> (HappyAbsSyn )
    364. 

  364. happyIn50 x = Happy_GHC_Exts.unsafeCoerce# x
    365. 

  365. {-# INLINE happyIn50 #-}
    366. 

  366. happyOut50 :: (HappyAbsSyn ) -> (ExtFCode (Maybe BlockId))
    367. 

  367. happyOut50 x = Happy_GHC_Exts.unsafeCoerce# x
    368. 

  368. {-# INLINE happyOut50 #-}
    369. 

  369. happyIn51 :: (CmmType) -> (HappyAbsSyn )
    370. 

  370. happyIn51 x = Happy_GHC_Exts.unsafeCoerce# x
    371. 

  371. {-# INLINE happyIn51 #-}
    372. 

  372. happyOut51 :: (HappyAbsSyn ) -> (CmmType)
    373. 

  373. happyOut51 x = Happy_GHC_Exts.unsafeCoerce# x
    374. 

  374. {-# INLINE happyOut51 #-}
    375. 

  375. happyIn52 :: (CmmType) -> (HappyAbsSyn )
    376. 

  376. happyIn52 x = Happy_GHC_Exts.unsafeCoerce# x
    377. 

  377. {-# INLINE happyIn52 #-}
    378. 

  378. happyOut52 :: (HappyAbsSyn ) -> (CmmType)
    379. 

  379. happyOut52 x = Happy_GHC_Exts.unsafeCoerce# x
    380. 

  380. {-# INLINE happyOut52 #-}
    381. 

  381. happyInTok :: (Located CmmToken) -> (HappyAbsSyn )
    382. 

  382. happyInTok x = Happy_GHC_Exts.unsafeCoerce# x
    383. 

  383. {-# INLINE happyInTok #-}
    384. 

  384. happyOutTok :: (HappyAbsSyn ) -> (Located CmmToken)
    385. 

  385. happyOutTok x = Happy_GHC_Exts.unsafeCoerce# x
    386. 

  386. {-# INLINE happyOutTok #-}
    387. 

  387. 

  388. 

  389. happyActOffsets :: HappyAddr
    390. 

  390. happyActOffsets = HappyA# "\x33\x01\x00\x00\x57\x03\x33\x01\x00\x00\x00\x00\x92\x03\x00\x00\x47\x03\x00\x00\x71\x03\x70\x03\x6f\x03\x6c\x03\x66\x03\x65\x03\x29\x03\x31\x03\x05\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x60\x03\x2b\x03\x3c\x01\x4a\x03\x32\x03\x00\x00\x26\x03\x46\x03\x38\x03\x30\x03\x23\x03\x21\x03\x1d\x03\x1c\x03\x1b\x03\x0b\x03\x28\x03\x09\x00\x00\x00\xf8\x02\x00\x00\x0a\x03\x00\x00\x2c\x03\x2a\x03\x25\x03\x1a\x03\x17\x03\x16\x03\xeb\x02\x00\x00\x47\x01\x00\x00\x05\x01\x00\x00\x10\x03\x00\x00\x0c\x03\xe8\x02\xed\x02\x08\x03\x61\x00\x00\x00\x3c\x01\x00\x00\x00\x00\x0d\x03\x47\x01\xff\xff\x07\x03\x09\x03\xd0\x02\x05\x03\xfa\x02\x00\x00\xc6\x02\xc4\x02\xb8\x02\xb5\x02\xb3\x02\xa9\x02\x00\x00\xe2\x02\x1a\x00\xde\x02\xdb\x02\x12\x00\xd9\x02\xd5\x02\xd4\x02\x00\x00\x02\x00\xd8\x02\x99\x02\x95\x02\xa4\x01\xce\x02\x00\x00\xcf\x02\x00\x00\x61\x00\x61\x00\x96\x02\x61\x00\x00\x00\x00\x00\x00\x00\xb7\x02\xb7\x02\x00\x00\x00\x00\x00\x00\x37\x02\x1a\x00\xca\x02\x1a\x00\x1a\x00\xa7\x00\xc0\x02\x0d\x00\x00\x00\xf8\x00\x88\x02\x54\x00\x61\x00\xb9\x02\xb6\x02\x00\x00\x1c\x00\x61\x00\x61\x00\x61\x00\x61\x00\x61\x00\x61\x00\x61\x00\x61\x00\x61\x00\x61\x00\x61\x00\x61\x00\x61\x00\x61\x00\x61\x00\x61\x00\x61\x00\x00\x00\x3c\x01\x00\x00\x02\x01\xa1\x02\x00\x00\x4f\x02\x61\x00\x78\x02\x00\x00\xb4\x02\xa3\x02\x00\x00\x59\x02\xa5\x02\x74\x02\x5b\x02\x53\x02\x00\x00\x3c\x01\x4d\x02\x86\x02\x61\x00\x7f\x02\x00\x00\x82\x03\x8b\x02\x6a\x02\x75\x02\x69\x02\x68\x02\x66\x02\x79\x02\x77\x02\x60\x02\x65\x02\x5c\x02\xec\x01\x00\x00\x61\x00\x00\x00\xaa\x03\xaa\x03\xaa\x03\xaa\x03\x7b\x00\x7b\x00\xaa\x03\xaa\x03\xbe\x03\xc5\x03\xf9\x00\x02\x01\x02\x01\x00\x00\x00\x00\x00\x00\x6e\x03\x5d\x02\x00\x00\x00\x00\x61\x00\x61\x00\x17\x02\x58\x02\x61\x00\x1e\x02\x4d\x00\x00\x00\x96\x03\x54\x00\x54\x00\x56\x02\x45\x02\x3a\x02\x00\x00\x00\x00\x0f\x02\x61\x00\x61\x00\x0d\x02\x34\x02\x00\x00\x00\x00\x00\x00\x01\x02\x61\x00\x90\x01\xd2\x01\x00\x00\xf8\x00\x36\x02\x00\x00\x00\x00\x00\x01\x38\x02\x4f\x02\x1a\x00\x54\x00\x54\x00\x35\x02\x99\x00\x2e\x02\x00\x00\x10\x02\x00\x00\xf7\x01\xb8\x01\x2d\x02\x00\x00\x61\x00\x2c\x02\x00\x00\x43\x00\x00\x00\x00\x00\x00\x00\x00\x00\xe8\x01\xe6\x01\xe5\x01\x00\x00\xd9\x01\x00\x00\x00\x00\x08\x02\x07\x02\x06\x02\xfa\x01\x00\x00\x00\x00\x00\x00\x0c\x02\xd7\x01\xc3\x01\x61\x00\x00\x00\x00\x00\x00\x00\x00\x01\xe4\x01\xff\x01\x00\x00\x00\x00\x00\x00\xf9\x01\x00\x00\x05\x02\xf0\x01\x61\x00\x61\x00\x61\x00\xce\x01\x00\x00\xef\x01\xbd\x01\xb3\x01\xb1\x01\x00\x00\xaa\x01\xa8\x01\xa7\x01\x9c\x01\xc6\x01\xc5\x01\xc4\x01\xd1\x01\xcf\x01\xbb\x01\x00\x00\xcb\x01\xcd\x01\x00\x00\x00\x00\xba\x01\x7c\x01\xb4\x01\x9f\x01\x68\x01\x68\x01\x00\x00\x1a\x00\xa5\x01\x00\x00\x78\x01\x92\x01\x00\x00\x53\x01\x52\x01\x45\x01\x74\x01\x67\x01\x65\x01\x1a\x00\x00\x00\x1a\x00\x66\x01\x63\x01\x00\x00\x63\x01\x64\x01\x06\x00\x35\x01\x00\x00\x60\x01\x5e\x01\x22\x01\x19\x01\x00\x00\x11\x00\x4b\x01\x00\x00\x00\x00\x4d\x01\x15\x01\x41\x01\x00\x00\x38\x01\x00\x00\xfe\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x0b\x01\x32\x01\x00\x00\x00\x00\x00\x00"#
    391. 

  391. 

  392. happyGotoOffsets :: HappyAddr
    393. 

  393. happyGotoOffsets = HappyA# "\xb9\x00\x00\x00\x00\x00\x2d\x00\x00\x00\x00\x00\x0e\x01\x00\x00\x29\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x1d\x01\x00\x00\x0d\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x09\x01\x01\x01\xb2\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xee\x00\x00\x00\xed\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x06\x01\x00\x00\xac\x00\x00\x00\xdc\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xd6\x00\x00\x00\x56\x03\x00\x00\xa0\x00\x00\x00\x00\x00\x00\x00\x01\x00\x45\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x04\x01\xf3\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x3f\x03\x3b\x03\x00\x00\x35\x03\x00\x00\x00\x00\x00\x00\xe5\x00\xd5\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf7\x00\x00\x00\xf5\x00\xcc\x00\x00\x00\x00\x00\xe3\x00\x00\x00\xd0\x00\x00\x00\x31\x01\x24\x03\xc7\x00\xdf\x00\x00\x00\x00\x00\x81\x02\x22\x03\x1e\x03\x14\x03\x06\x03\x04\x03\x02\x03\xf4\x02\xea\x02\xe6\x02\xe4\x02\xd3\x02\xcd\x02\xc9\x02\xc3\x02\xb2\x02\xb0\x02\x00\x00\x9e\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xac\x02\x00\x00\x00\x00\x00\x00\xdd\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x48\x00\x00\x00\x00\x00\xa2\x02\x00\x00\x00\x00\xdb\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x71\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x67\x02\x94\x02\x00\x00\x00\x00\x55\x02\xaa\x00\x00\x00\x00\x00\x00\x00\x2f\x01\x21\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x9a\x00\x92\x02\x8f\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x84\x02\x00\x00\x00\x00\x00\x00\x97\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xca\x00\x13\x01\xfb\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x76\x02\x00\x00\x00\x00\xae\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x9c\x00\x00\x00\x57\x02\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x46\x00\xf5\xff\xfc\xff\x58\x00\x00\x00\x00\x00\x80\x00\x64\x00\x47\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x59\x00\x56\x00\x00\x00\xbd\x00\x00\x00\x00\x00\x1b\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xbb\x00\x00\x00\xfa\xff\x00\x00\x14\x00\x00\x00\x0e\x00\x00\x00\x08\x00\x03\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf6\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00"#
    394. 

  394. 

  395. happyDefActions :: HappyAddr
    396. 

  396. happyDefActions = HappyA# "\xfe\xff\x00\x00\x00\x00\xfe\xff\xfb\xff\xfc\xff\x7a\xff\xfa\xff\x00\x00\x6d\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x6e\xff\x6c\xff\x6b\xff\x6a\xff\x69\xff\x68\xff\x67\xff\x7a\xff\x70\xff\x78\xff\x00\x00\xdb\xff\xd9\xff\x00\x00\x00\x00\x00\x00\xd7\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x70\xff\xfd\xff\x72\xff\xea\xff\x00\x00\xde\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xdc\xff\xf7\xff\xd8\xff\x00\x00\xdd\xff\x00\x00\x77\xff\x75\xff\x00\x00\x72\xff\x00\x00\x00\x00\x73\xff\x76\xff\x79\xff\xda\xff\x00\x00\xf7\xff\x00\x00\x6d\xff\x00\x00\x00\x00\x6e\xff\x00\x00\xd6\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x6f\xff\x00\x00\xe1\xff\xed\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xf5\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x9c\xff\x98\xff\x00\x00\xf3\xff\x00\x00\x00\x00\x00\x00\x00\x00\x85\xff\x86\xff\x99\xff\x94\xff\x94\xff\xf6\xff\xf8\xff\x74\xff\x00\x00\xe1\xff\x00\x00\xe1\xff\xe1\xff\x00\x00\x00\x00\x00\x00\xd5\xff\x00\x00\x00\x00\x00\x00\x00\x00\x92\xff\xb9\xff\x7b\xff\x7c\xff\x8a\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\x9a\xff\x00\x00\x9b\xff\x9e\xff\x00\x00\x9f\xff\x00\x00\x00\x00\x00\x00\xf4\xff\x00\x00\xed\xff\xef\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xe3\xff\x78\xff\x00\x00\x00\x00\x00\x00\x00\x00\xeb\xff\xed\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\x95\xff\x8a\xff\x93\xff\xa1\xff\xa0\xff\xa3\xff\xa5\xff\xa9\xff\xaa\xff\xa2\xff\xa4\xff\xa6\xff\xa7\xff\xa8\xff\xab\xff\xac\xff\xad\xff\xae\xff\xaf\xff\x88\xff\x00\x00\x89\xff\xd4\xff\x8a\xff\x00\x00\x00\x00\x00\x00\x90\xff\x92\xff\x00\x00\xc7\xff\xc6\xff\x00\x00\x00\x00\x00\x00\x00\x00\x82\xff\x7f\xff\x7d\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xdf\xff\xe0\xff\xe9\xff\x00\x00\x00\x00\x00\x00\x00\x00\x7e\xff\x81\xff\x00\x00\xcd\xff\xc3\xff\x00\x00\xc7\xff\xc6\xff\xe1\xff\x00\x00\x00\x00\x00\x00\x8c\xff\x00\x00\x8f\xff\x8e\xff\xcb\xff\x00\x00\x00\x00\x00\x00\x71\xff\x00\x00\x00\x00\x97\xff\x00\x00\xf0\xff\xee\xff\xf2\xff\xf1\xff\x00\x00\x00\x00\x00\x00\xe2\xff\x00\x00\xf9\xff\xec\xff\x00\x00\x00\x00\x00\x00\x00\x00\x9d\xff\x96\xff\x87\xff\x00\x00\xb8\xff\x00\x00\x00\x00\x91\xff\x8b\xff\xcc\xff\xc4\xff\xc5\xff\x00\x00\xc2\xff\x83\xff\x80\xff\x00\x00\xd3\xff\x00\x00\x00\x00\x90\xff\x90\xff\x00\x00\xb1\xff\x8d\xff\x00\x00\xb2\xff\xb8\xff\x00\x00\xcf\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xb5\xff\xb7\xff\x00\x00\x00\x00\xba\xff\xca\xff\x00\x00\x00\x00\x00\x00\x00\x00\xc1\xff\xc1\xff\xd2\xff\xe1\xff\x00\x00\xce\xff\x00\x00\x00\x00\xe4\xff\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\xe1\xff\xb4\xff\xe1\xff\x00\x00\xbf\xff\xc0\xff\xbf\xff\x00\x00\x00\x00\xc9\xff\xb0\xff\x00\x00\x00\x00\x00\x00\x00\x00\xe8\xff\x00\x00\x00\x00\xb6\xff\xb3\xff\x00\x00\x00\x00\x00\x00\xbe\xff\xbc\xff\xd0\xff\x00\x00\xbd\xff\xc8\xff\xd1\xff\xe5\xff\xe7\xff\x00\x00\x00\x00\xbb\xff\xe6\xff"#
    397. 

  397. 

  398. happyCheck :: HappyAddr
    399. 

  399. happyCheck = HappyA# "\xff\xff\x02\x00\x08\x00\x09\x00\x03\x00\x04\x00\x07\x00\x0d\x00\x06\x00\x13\x00\x0b\x00\x02\x00\x06\x00\x0e\x00\x0f\x00\x1a\x00\x1b\x00\x0e\x00\x05\x00\x1e\x00\x1f\x00\x20\x00\x1a\x00\x1b\x00\x23\x00\x08\x00\x08\x00\x13\x00\x02\x00\x01\x00\x24\x00\x23\x00\x12\x00\x07\x00\x28\x00\x07\x00\x2f\x00\x30\x00\x12\x00\x16\x00\x16\x00\x2f\x00\x30\x00\x2f\x00\x30\x00\x00\x00\x01\x00\x02\x00\x2f\x00\x30\x00\x17\x00\x06\x00\x07\x00\x2c\x00\x09\x00\x38\x00\x39\x00\x3a\x00\x3b\x00\x3c\x00\x3d\x00\x3e\x00\x3f\x00\x40\x00\x41\x00\x42\x00\x43\x00\x29\x00\x42\x00\x3f\x00\x2c\x00\x2d\x00\x2e\x00\x2f\x00\x07\x00\x31\x00\x32\x00\x40\x00\x34\x00\x35\x00\x03\x00\x0e\x00\x38\x00\x39\x00\x3a\x00\x3b\x00\x3c\x00\x3d\x00\x3e\x00\x3f\x00\x40\x00\x07\x00\x2f\x00\x30\x00\x17\x00\x0b\x00\x1a\x00\x1b\x00\x0e\x00\x0f\x00\x1e\x00\x1f\x00\x20\x00\x11\x00\x07\x00\x23\x00\x11\x00\x17\x00\x0b\x00\x20\x00\x21\x00\x0e\x00\x0f\x00\x19\x00\x2a\x00\x2b\x00\x2c\x00\x2f\x00\x30\x00\x2f\x00\x30\x00\x15\x00\x16\x00\x38\x00\x39\x00\x3a\x00\x3b\x00\x3c\x00\x3d\x00\x3e\x00\x3f\x00\x40\x00\x41\x00\x42\x00\x43\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x38\x00\x39\x00\x3a\x00\x3b\x00\x3c\x00\x3d\x00\x3e\x00\x3f\x00\x40\x00\x41\x00\x42\x00\x43\x00\x18\x00\x38\x00\x39\x00\x3a\x00\x3b\x00\x3c\x00\x3d\x00\x3e\x00\x3f\x00\x40\x00\x41\x00\x42\x00\x43\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x03\x00\x04\x00\x15\x00\x16\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x00\x00\x01\x00\x02\x00\x25\x00\x26\x00\x27\x00\x06\x00\x07\x00\x27\x00\x09\x00\x08\x00\x09\x00\x08\x00\x09\x00\x1d\x00\x0d\x00\x1b\x00\x0d\x00\x2b\x00\x2c\x00\x2f\x00\x30\x00\x2f\x00\x30\x00\x23\x00\x08\x00\x09\x00\x08\x00\x09\x00\x2f\x00\x0d\x00\x31\x00\x0d\x00\x41\x00\x2f\x00\x30\x00\x2f\x00\x30\x00\x24\x00\x05\x00\x24\x00\x05\x00\x28\x00\x1d\x00\x28\x00\x0a\x00\x0b\x00\x2f\x00\x30\x00\x2f\x00\x30\x00\x2f\x00\x30\x00\x24\x00\x0c\x00\x24\x00\x1c\x00\x28\x00\x14\x00\x28\x00\x25\x00\x26\x00\x27\x00\x05\x00\x2f\x00\x30\x00\x2f\x00\x30\x00\x08\x00\x09\x00\x08\x00\x09\x00\x1c\x00\x0d\x00\x2d\x00\x0d\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x0f\x00\x10\x00\x08\x00\x09\x00\x0c\x00\x0d\x00\x0e\x00\x0d\x00\x0c\x00\x1a\x00\x1b\x00\x1a\x00\x1b\x00\x0a\x00\x0b\x00\x24\x00\x2d\x00\x24\x00\x2e\x00\x28\x00\x23\x00\x28\x00\x20\x00\x21\x00\x0f\x00\x10\x00\x2f\x00\x30\x00\x2f\x00\x30\x00\x24\x00\x0c\x00\x2f\x00\x30\x00\x28\x00\x1a\x00\x1b\x00\x2e\x00\x0f\x00\x10\x00\x29\x00\x2f\x00\x30\x00\x0c\x00\x23\x00\x29\x00\x40\x00\x41\x00\x08\x00\x1a\x00\x1b\x00\x3f\x00\x0f\x00\x10\x00\x0f\x00\x10\x00\x2f\x00\x30\x00\x23\x00\x40\x00\x41\x00\x06\x00\x33\x00\x1a\x00\x1b\x00\x1a\x00\x1b\x00\x42\x00\x16\x00\x02\x00\x2f\x00\x30\x00\x23\x00\x08\x00\x23\x00\x22\x00\x23\x00\x24\x00\x25\x00\x26\x00\x27\x00\x42\x00\x29\x00\x2a\x00\x2f\x00\x30\x00\x2f\x00\x30\x00\x04\x00\x41\x00\x04\x00\x30\x00\x02\x00\x34\x00\x05\x00\x22\x00\x04\x00\x38\x00\x39\x00\x3a\x00\x3b\x00\x3c\x00\x3d\x00\x3e\x00\x2b\x00\x40\x00\x38\x00\x39\x00\x3a\x00\x3b\x00\x3c\x00\x3d\x00\x3e\x00\x16\x00\x08\x00\x16\x00\x02\x00\x38\x00\x39\x00\x3a\x00\x3b\x00\x3c\x00\x3d\x00\x3e\x00\x41\x00\x40\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x02\x00\x41\x00\x41\x00\x03\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x02\x00\x08\x00\x03\x00\x41\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x42\x00\x03\x00\x08\x00\x03\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x01\x00\x04\x00\x01\x00\x16\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x06\x00\x08\x00\x16\x00\x16\x00\x16\x00\x41\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x41\x00\x36\x00\x42\x00\x41\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x06\x00\x42\x00\x37\x00\x06\x00\x28\x00\x07\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x09\x00\x04\x00\x20\x00\x42\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x07\x00\x36\x00\x02\x00\x18\x00\x16\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x42\x00\x16\x00\x16\x00\x16\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x07\x00\x16\x00\x42\x00\x42\x00\x41\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x08\x00\x08\x00\x08\x00\x02\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x07\x00\x09\x00\x08\x00\x40\x00\x0e\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x08\x00\x41\x00\x40\x00\x16\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x08\x00\x02\x00\x42\x00\x02\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x08\x00\x0a\x00\x02\x00\x08\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x1a\x00\x1b\x00\x1a\x00\x1b\x00\x1e\x00\x1f\x00\x20\x00\x1f\x00\x20\x00\x23\x00\x02\x00\x23\x00\x02\x00\x16\x00\x08\x00\x16\x00\x16\x00\x16\x00\x1a\x00\x1b\x00\x04\x00\x2f\x00\x30\x00\x2f\x00\x30\x00\x21\x00\x22\x00\x23\x00\x1a\x00\x1b\x00\x02\x00\x08\x00\x42\x00\x1a\x00\x1b\x00\x21\x00\x22\x00\x23\x00\x42\x00\x2f\x00\x30\x00\x22\x00\x23\x00\x41\x00\x1a\x00\x1b\x00\x42\x00\x1a\x00\x1b\x00\x2f\x00\x30\x00\x21\x00\x22\x00\x23\x00\x2f\x00\x30\x00\x23\x00\x07\x00\x1a\x00\x1b\x00\x06\x00\x1a\x00\x1b\x00\x1a\x00\x1b\x00\x2f\x00\x30\x00\x23\x00\x2f\x00\x30\x00\x23\x00\x42\x00\x23\x00\x40\x00\x16\x00\x06\x00\x05\x00\x1a\x00\x1b\x00\x2f\x00\x30\x00\x07\x00\x2f\x00\x30\x00\x2f\x00\x30\x00\x23\x00\x1a\x00\x1b\x00\x40\x00\x09\x00\x1a\x00\x1b\x00\x1a\x00\x1b\x00\x04\x00\x23\x00\x19\x00\x2f\x00\x30\x00\x23\x00\x05\x00\x23\x00\x40\x00\x42\x00\x0a\x00\x40\x00\x02\x00\x2f\x00\x30\x00\x1a\x00\x1b\x00\x2f\x00\x30\x00\x2f\x00\x30\x00\x1a\x00\x1b\x00\x03\x00\x23\x00\x1a\x00\x1b\x00\x40\x00\x16\x00\x16\x00\x23\x00\x1a\x00\x1b\x00\x16\x00\x23\x00\x16\x00\x2f\x00\x30\x00\x16\x00\x42\x00\x23\x00\x42\x00\x2f\x00\x30\x00\x42\x00\x01\x00\x2f\x00\x30\x00\x1a\x00\x1b\x00\x1a\x00\x1b\x00\x2f\x00\x30\x00\x1a\x00\x1b\x00\x42\x00\x23\x00\x42\x00\x23\x00\x05\x00\x03\x00\x05\x00\x23\x00\x1a\x00\x1b\x00\x07\x00\x04\x00\x42\x00\x2f\x00\x30\x00\x2f\x00\x30\x00\x23\x00\x08\x00\x2f\x00\x30\x00\x2e\x00\x1a\x00\x1b\x00\x1a\x00\x1b\x00\x1a\x00\x1b\x00\x16\x00\x2f\x00\x30\x00\x23\x00\x2e\x00\x23\x00\x40\x00\x23\x00\x02\x00\x40\x00\x16\x00\x16\x00\x1a\x00\x1b\x00\x16\x00\x2f\x00\x30\x00\x2f\x00\x30\x00\x2f\x00\x30\x00\x23\x00\x1a\x00\x1b\x00\x02\x00\x16\x00\x1a\x00\x1b\x00\x1a\x00\x1b\x00\x16\x00\x23\x00\x16\x00\x2f\x00\x30\x00\x23\x00\x16\x00\x23\x00\x16\x00\x03\x00\x40\x00\x40\x00\x02\x00\x2f\x00\x30\x00\x1a\x00\x1b\x00\x2f\x00\x30\x00\x2f\x00\x30\x00\x1a\x00\x1b\x00\x2c\x00\x23\x00\x1a\x00\x1b\x00\x40\x00\x40\x00\x40\x00\x23\x00\x1a\x00\x1b\x00\x40\x00\x23\x00\x40\x00\x2f\x00\x30\x00\x40\x00\x07\x00\x23\x00\x40\x00\x2f\x00\x30\x00\x07\x00\x07\x00\x2f\x00\x30\x00\x1a\x00\x1b\x00\x41\x00\x07\x00\x2f\x00\x30\x00\x07\x00\x07\x00\x07\x00\x23\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x16\x00\x2f\x00\x30\x00\x40\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\x16\x00\x07\x00\xff\xff\x44\x00\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\xff\xff\xff\xff\xff\xff\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x13\x00\x14\x00\x15\x00\xff\xff\xff\xff\xff\xff\xff\xff\x1a\x00\x1b\x00\x1c\x00\x1d\x00\x1e\x00\x1f\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\x12\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x11\x00\xff\xff\x1a\x00\x1b\x00\xff\xff\xff\xff\x2a\x00\x2b\x00\x2c\x00\x1a\x00\x1b\x00\x2f\x00\x30\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\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"#
    400. 

  400. 

  401. happyTable :: HappyAddr
    402. 

  402. happyTable = HappyA# "\x00\x00\x6a\x00\x64\x01\x79\x00\x73\x00\x49\x00\x6b\x00\x7a\x00\xa6\x00\x7b\x01\x6c\x00\x2f\x00\x71\x01\x6d\x00\x6e\x00\xfd\x00\x66\x00\x6d\x01\xe7\x00\x48\x01\xff\x00\x00\x01\x47\x01\x66\x00\x67\x00\x79\x01\xab\x00\x6f\x01\x7f\x00\xd5\x00\x7b\x00\x67\x00\x60\x01\x80\x00\x7c\x00\xd6\x00\x68\x00\x09\x00\x62\x01\x7a\x01\xac\x00\x7d\x00\x09\x00\x68\x00\x09\x00\x2c\x00\x03\x00\x04\x00\x4a\x00\x4b\x00\x5a\x01\x05\x00\x06\x00\x30\x00\x07\x00\x14\x00\x15\x00\x16\x00\x17\x00\x18\x00\x19\x00\x1a\x00\x6f\x00\x70\x00\x71\x00\x72\x00\x73\x00\x11\x00\xa7\x00\x72\x01\x81\x00\x82\x00\x83\x00\x84\xff\x6b\x00\x84\xff\x84\x00\x24\x00\x13\x00\x85\x00\xfa\x00\x6d\x00\x14\x00\x15\x00\x16\x00\x17\x00\x18\x00\x19\x00\x1a\x00\x86\x00\x87\x00\xdf\x00\x08\x00\x09\x00\x3f\x01\x6c\x00\xfd\x00\x66\x00\x6d\x00\x6e\x00\x49\x01\xff\x00\x00\x01\x5d\x01\x6b\x00\x67\x00\x5f\x01\xe0\x00\x6c\x00\xfb\x00\xfc\x00\x6d\x00\x6e\x00\x45\x01\xb4\x00\x3e\x00\x3f\x00\x68\x00\x09\x00\x40\x00\x09\x00\x41\x01\x34\x01\x14\x00\x15\x00\x16\x00\x17\x00\x18\x00\x19\x00\x1a\x00\x6f\x00\x70\x00\x71\x00\x72\x00\x73\x00\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x14\x00\x15\x00\x16\x00\x17\x00\x18\x00\x19\x00\x1a\x00\x6f\x00\x70\x00\x71\x00\x72\x00\x73\x00\x42\x01\x14\x00\x15\x00\x16\x00\x17\x00\x18\x00\x19\x00\x1a\x00\x6f\x00\x70\x00\x71\x00\x72\x00\x73\x00\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x91\x00\x92\x00\x48\x00\x49\x00\x33\x01\x34\x01\x93\x00\x94\x00\x95\x00\x96\x00\x97\x00\x98\x00\x02\x00\x03\x00\x04\x00\x28\x01\xe2\x00\xe3\x00\x05\x00\x06\x00\xf1\x00\x07\x00\x65\x01\x79\x00\x5c\x01\x79\x00\xfc\x00\x7a\x00\x19\x01\x7a\x00\x75\x00\x3f\x00\xc0\x00\x09\x00\x40\x00\x09\x00\x67\x00\x25\x01\x79\x00\xea\x00\x79\x00\xe9\x00\x7a\x00\xea\x00\x7a\x00\x22\x01\x4a\x00\x4b\x00\x68\x00\x09\x00\x7b\x00\x14\x01\x7b\x00\xba\x00\x7c\x00\xd8\x00\x7c\x00\x47\x00\x1e\x00\x08\x00\x09\x00\x7d\x00\x09\x00\x7d\x00\x09\x00\x7b\x00\x2a\x00\x7b\x00\x98\x00\x7c\x00\xd6\x00\x7c\x00\xe1\x00\xe2\x00\xe3\x00\xad\x00\x7d\x00\x09\x00\x7d\x00\x09\x00\xeb\x00\x79\x00\x78\x00\x79\x00\x9a\x00\x7a\x00\x42\x00\x7a\x00\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x23\x01\xdc\x00\xaf\x00\x79\x00\x89\x00\x8a\x00\x8b\x00\x7a\x00\x50\x00\x93\x00\x94\x00\xdd\x00\x66\x00\x1d\x00\x1e\x00\x7b\x00\x58\x00\x7b\x00\x2d\x00\x7c\x00\x67\x00\x7c\x00\xfb\x00\xfc\x00\x24\x01\xdc\x00\x7d\x00\x09\x00\x7d\x00\x09\x00\x7b\x00\x22\x00\x68\x00\x09\x00\x7c\x00\xdd\x00\x66\x00\x41\x00\xf5\x00\xdc\x00\x1b\x00\x7d\x00\x09\x00\x2a\x00\x67\x00\x2b\x00\xe5\x00\xe6\x00\x7d\x01\xdd\x00\x66\x00\x72\x01\xf6\x00\xf7\x00\xdb\x00\xdc\x00\x68\x00\x09\x00\x67\x00\x20\x00\x21\x00\x75\x01\x76\x01\xf8\x00\x66\x00\xdd\x00\x66\x00\x7b\x01\x74\x01\x77\x01\x68\x00\x09\x00\x67\x00\x78\x01\x67\x00\x0b\x00\x0c\x00\x0d\x00\x0e\x00\x0f\x00\x10\x00\x6a\x01\x11\x00\x12\x00\x68\x00\x09\x00\x68\x00\x09\x00\x6c\x01\x6b\x01\x6d\x01\x6f\x01\x73\x01\x13\x00\x62\x01\x4d\x00\x64\x01\x14\x00\x15\x00\x16\x00\x17\x00\x18\x00\x19\x00\x1a\x00\x4e\x00\x1b\x00\x14\x00\x15\x00\x16\x00\x17\x00\x18\x00\x19\x00\x1a\x00\x67\x01\x69\x01\x68\x01\x4d\x01\x4f\x00\x15\x00\x16\x00\x17\x00\x18\x00\x19\x00\x1a\x00\x57\x01\x50\x00\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x91\x00\x92\x00\x2b\x01\x58\x01\x59\x01\x5a\x01\x93\x00\x94\x00\x95\x00\x96\x00\x97\x00\x98\x00\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x91\x00\x92\x00\xa2\x00\x4b\x01\x5c\x01\x5f\x01\x93\x00\x94\x00\x95\x00\x96\x00\x97\x00\x98\x00\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x91\x00\x92\x00\x41\x01\x1e\x01\x4c\x01\x4e\x01\x93\x00\x94\x00\x95\x00\x96\x00\x97\x00\x98\x00\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x91\x00\x92\x00\x4f\x01\x50\x01\x52\x01\x51\x01\x93\x00\x94\x00\x95\x00\x96\x00\x97\x00\x98\x00\x2a\x01\x53\x01\x54\x01\x55\x01\x56\x01\x3c\x01\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x91\x00\x92\x00\x3d\x01\x36\x01\x3e\x01\x3f\x01\x93\x00\x94\x00\x95\x00\x96\x00\x97\x00\x98\x00\x09\x01\x41\x01\x44\x01\x45\x01\x47\x01\x2e\x01\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x91\x00\x92\x00\x30\x01\x31\x01\xfb\x00\x33\x01\x93\x00\x94\x00\x95\x00\x96\x00\x97\x00\x98\x00\x2f\x01\x36\x01\x37\x01\x1f\x01\x38\x01\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x91\x00\x92\x00\x16\x01\x39\x01\x3a\x01\x3b\x01\x93\x00\x94\x00\x95\x00\x96\x00\x97\x00\x98\x00\xda\x00\x20\x01\x17\x01\x18\x01\x19\x01\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x91\x00\x92\x00\x1b\x01\x1d\x01\x21\x01\x23\x01\x93\x00\x94\x00\x95\x00\x96\x00\x97\x00\x98\x00\x88\x00\x28\x01\x27\x01\x2d\x01\xee\x00\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x91\x00\x92\x00\xf4\x00\xef\x00\xe5\x00\xf3\x00\x93\x00\x94\x00\x95\x00\x96\x00\x97\x00\x98\x00\xbf\x00\xf5\x00\x03\x01\x02\x01\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x91\x00\x92\x00\x06\x01\x0a\x01\x0b\x01\x0c\x01\x93\x00\x94\x00\x95\x00\x96\x00\x97\x00\x98\x00\xfd\x00\x66\x00\xfd\x00\x66\x00\xfe\x00\xff\x00\x00\x01\x31\x01\x00\x01\x67\x00\x0d\x01\x67\x00\x0e\x01\x0f\x01\x12\x01\x10\x01\x11\x01\x13\x01\xd1\x00\x66\x00\xb1\x00\x68\x00\x09\x00\x68\x00\x09\x00\x04\x01\xd3\x00\x67\x00\xd1\x00\x66\x00\x14\x01\xb3\x00\xb4\x00\xd1\x00\x66\x00\x07\x01\xd3\x00\x67\x00\xb6\x00\x68\x00\x09\x00\x1b\x01\x67\x00\xba\x00\xd1\x00\x66\x00\xb7\x00\x2b\x01\x66\x00\x68\x00\x09\x00\xd2\x00\xd3\x00\x67\x00\x68\x00\x09\x00\x67\x00\xc0\x00\xef\x00\x66\x00\xb9\x00\xf0\x00\x66\x00\x03\x01\x66\x00\x68\x00\x09\x00\x67\x00\x68\x00\x09\x00\x67\x00\xb8\x00\x67\x00\xbd\x00\xaf\x00\xbc\x00\xd8\x00\xb1\x00\x66\x00\x68\x00\x09\x00\xda\x00\x68\x00\x09\x00\x68\x00\x09\x00\x67\x00\xbd\x00\x66\x00\xe1\x00\xe8\x00\xc1\x00\x66\x00\xc2\x00\x66\x00\xed\x00\x67\x00\x9a\x00\x68\x00\x09\x00\x67\x00\xa0\x00\x67\x00\x9d\x00\xa3\x00\xa1\x00\xa4\x00\xa5\x00\x68\x00\x09\x00\xc3\x00\x66\x00\x68\x00\x09\x00\x68\x00\x09\x00\xc4\x00\x66\x00\x5a\x00\x67\x00\xc5\x00\x66\x00\x5b\x00\xa8\x00\xa9\x00\x67\x00\xc6\x00\x66\x00\xaa\x00\x67\x00\xad\x00\x68\x00\x09\x00\xaf\x00\x5c\x00\x67\x00\x5d\x00\x68\x00\x09\x00\x5e\x00\x61\x00\x68\x00\x09\x00\xc7\x00\x66\x00\xc8\x00\x66\x00\x68\x00\x09\x00\xc9\x00\x66\x00\x5f\x00\x67\x00\x60\x00\x67\x00\x62\x00\x78\x00\x65\x00\x67\x00\xca\x00\x66\x00\x64\x00\x75\x00\x63\x00\x68\x00\x09\x00\x68\x00\x09\x00\x67\x00\x47\x00\x68\x00\x09\x00\x44\x00\xcb\x00\x66\x00\xcc\x00\x66\x00\xcd\x00\x66\x00\x46\x00\x68\x00\x09\x00\x67\x00\x44\x00\x67\x00\x45\x00\x67\x00\x31\x00\x24\x00\x52\x00\x53\x00\xce\x00\x66\x00\x54\x00\x68\x00\x09\x00\x68\x00\x09\x00\x68\x00\x09\x00\x67\x00\xcf\x00\x66\x00\x39\x00\x55\x00\xd0\x00\x66\x00\xda\x00\x66\x00\x56\x00\x67\x00\x57\x00\x68\x00\x09\x00\x67\x00\x38\x00\x67\x00\x3c\x00\x3a\x00\x58\x00\x32\x00\x3d\x00\x68\x00\x09\x00\x9b\x00\x66\x00\x68\x00\x09\x00\x68\x00\x09\x00\x9d\x00\x66\x00\x30\x00\x67\x00\x9e\x00\x66\x00\x33\x00\x34\x00\x35\x00\x67\x00\x65\x00\x66\x00\x36\x00\x67\x00\x37\x00\x68\x00\x09\x00\x3b\x00\x1d\x00\x67\x00\x24\x00\x68\x00\x09\x00\x25\x00\x26\x00\x68\x00\x09\x00\x76\x00\x66\x00\x22\x00\x27\x00\x68\x00\x09\x00\x28\x00\x29\x00\x2a\x00\x67\x00\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x91\x00\x92\x00\x07\x01\x68\x00\x09\x00\x24\x00\x93\x00\x94\x00\x95\x00\x96\x00\x97\x00\x98\x00\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x91\x00\x92\x00\xaf\x00\x1d\x00\x00\x00\xff\xff\x93\x00\x94\x00\x95\x00\x96\x00\x97\x00\x98\x00\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x91\x00\x92\x00\x00\x00\x00\x00\x00\x00\x00\x00\x93\x00\x94\x00\x95\x00\x96\x00\x97\x00\x98\x00\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x8f\x00\x90\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x93\x00\x94\x00\x00\x00\x00\x00\x00\x00\x00\x00\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x8f\x00\x89\x00\x8a\x00\x8b\x00\x8c\x00\x8d\x00\x8e\x00\x00\x00\x93\x00\x94\x00\x00\x00\x00\x00\x3d\x00\x3e\x00\x3f\x00\x93\x00\x94\x00\x40\x00\x09\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00"#
    403. 

  403. 

  404. happyReduceArr = Happy_Data_Array.array (1, 152) [
    405. 

  405. 	(1 , happyReduce_1),
    406. 

  406. 	(2 , happyReduce_2),
    407. 

  407. 	(3 , happyReduce_3),
    408. 

  408. 	(4 , happyReduce_4),
    409. 

  409. 	(5 , happyReduce_5),
    410. 

  410. 	(6 , happyReduce_6),
    411. 

  411. 	(7 , happyReduce_7),
    412. 

  412. 	(8 , happyReduce_8),
    413. 

  413. 	(9 , happyReduce_9),
    414. 

  414. 	(10 , happyReduce_10),
    415. 

  415. 	(11 , happyReduce_11),
    416. 

  416. 	(12 , happyReduce_12),
    417. 

  417. 	(13 , happyReduce_13),
    418. 

  418. 	(14 , happyReduce_14),
    419. 

  419. 	(15 , happyReduce_15),
    420. 

  420. 	(16 , happyReduce_16),
    421. 

  421. 	(17 , happyReduce_17),
    422. 

  422. 	(18 , happyReduce_18),
    423. 

  423. 	(19 , happyReduce_19),
    424. 

  424. 	(20 , happyReduce_20),
    425. 

  425. 	(21 , happyReduce_21),
    426. 

  426. 	(22 , happyReduce_22),
    427. 

  427. 	(23 , happyReduce_23),
    428. 

  428. 	(24 , happyReduce_24),
    429. 

  429. 	(25 , happyReduce_25),
    430. 

  430. 	(26 , happyReduce_26),
    431. 

  431. 	(27 , happyReduce_27),
    432. 

  432. 	(28 , happyReduce_28),
    433. 

  433. 	(29 , happyReduce_29),
    434. 

  434. 	(30 , happyReduce_30),
    435. 

  435. 	(31 , happyReduce_31),
    436. 

  436. 	(32 , happyReduce_32),
    437. 

  437. 	(33 , happyReduce_33),
    438. 

  438. 	(34 , happyReduce_34),
    439. 

  439. 	(35 , happyReduce_35),
    440. 

  440. 	(36 , happyReduce_36),
    441. 

  441. 	(37 , happyReduce_37),
    442. 

  442. 	(38 , happyReduce_38),
    443. 

  443. 	(39 , happyReduce_39),
    444. 

  444. 	(40 , happyReduce_40),
    445. 

  445. 	(41 , happyReduce_41),
    446. 

  446. 	(42 , happyReduce_42),
    447. 

  447. 	(43 , happyReduce_43),
    448. 

  448. 	(44 , happyReduce_44),
    449. 

  449. 	(45 , happyReduce_45),
    450. 

  450. 	(46 , happyReduce_46),
    451. 

  451. 	(47 , happyReduce_47),
    452. 

  452. 	(48 , happyReduce_48),
    453. 

  453. 	(49 , happyReduce_49),
    454. 

  454. 	(50 , happyReduce_50),
    455. 

  455. 	(51 , happyReduce_51),
    456. 

  456. 	(52 , happyReduce_52),
    457. 

  457. 	(53 , happyReduce_53),
    458. 

  458. 	(54 , happyReduce_54),
    459. 

  459. 	(55 , happyReduce_55),
    460. 

  460. 	(56 , happyReduce_56),
    461. 

  461. 	(57 , happyReduce_57),
    462. 

  462. 	(58 , happyReduce_58),
    463. 

  463. 	(59 , happyReduce_59),
    464. 

  464. 	(60 , happyReduce_60),
    465. 

  465. 	(61 , happyReduce_61),
    466. 

  466. 	(62 , happyReduce_62),
    467. 

  467. 	(63 , happyReduce_63),
    468. 

  468. 	(64 , happyReduce_64),
    469. 

  469. 	(65 , happyReduce_65),
    470. 

  470. 	(66 , happyReduce_66),
    471. 

  471. 	(67 , happyReduce_67),
    472. 

  472. 	(68 , happyReduce_68),
    473. 

  473. 	(69 , happyReduce_69),
    474. 

  474. 	(70 , happyReduce_70),
    475. 

  475. 	(71 , happyReduce_71),
    476. 

  476. 	(72 , happyReduce_72),
    477. 

  477. 	(73 , happyReduce_73),
    478. 

  478. 	(74 , happyReduce_74),
    479. 

  479. 	(75 , happyReduce_75),
    480. 

  480. 	(76 , happyReduce_76),
    481. 

  481. 	(77 , happyReduce_77),
    482. 

  482. 	(78 , happyReduce_78),
    483. 

  483. 	(79 , happyReduce_79),
    484. 

  484. 	(80 , happyReduce_80),
    485. 

  485. 	(81 , happyReduce_81),
    486. 

  486. 	(82 , happyReduce_82),
    487. 

  487. 	(83 , happyReduce_83),
    488. 

  488. 	(84 , happyReduce_84),
    489. 

  489. 	(85 , happyReduce_85),
    490. 

  490. 	(86 , happyReduce_86),
    491. 

  491. 	(87 , happyReduce_87),
    492. 

  492. 	(88 , happyReduce_88),
    493. 

  493. 	(89 , happyReduce_89),
    494. 

  494. 	(90 , happyReduce_90),
    495. 

  495. 	(91 , happyReduce_91),
    496. 

  496. 	(92 , happyReduce_92),
    497. 

  497. 	(93 , happyReduce_93),
    498. 

  498. 	(94 , happyReduce_94),
    499. 

  499. 	(95 , happyReduce_95),
    500. 

  500. 	(96 , happyReduce_96),
    501. 

  501. 	(97 , happyReduce_97),
    502. 

  502. 	(98 , happyReduce_98),
    503. 

  503. 	(99 , happyReduce_99),
    504. 

  504. 	(100 , happyReduce_100),
    505. 

  505. 	(101 , happyReduce_101),
    506. 

  506. 	(102 , happyReduce_102),
    507. 

  507. 	(103 , happyReduce_103),
    508. 

  508. 	(104 , happyReduce_104),
    509. 

  509. 	(105 , happyReduce_105),
    510. 

  510. 	(106 , happyReduce_106),
    511. 

  511. 	(107 , happyReduce_107),
    512. 

  512. 	(108 , happyReduce_108),
    513. 

  513. 	(109 , happyReduce_109),
    514. 

  514. 	(110 , happyReduce_110),
    515. 

  515. 	(111 , happyReduce_111),
    516. 

  516. 	(112 , happyReduce_112),
    517. 

  517. 	(113 , happyReduce_113),
    518. 

  518. 	(114 , happyReduce_114),
    519. 

  519. 	(115 , happyReduce_115),
    520. 

  520. 	(116 , happyReduce_116),
    521. 

  521. 	(117 , happyReduce_117),
    522. 

  522. 	(118 , happyReduce_118),
    523. 

  523. 	(119 , happyReduce_119),
    524. 

  524. 	(120 , happyReduce_120),
    525. 

  525. 	(121 , happyReduce_121),
    526. 

  526. 	(122 , happyReduce_122),
    527. 

  527. 	(123 , happyReduce_123),
    528. 

  528. 	(124 , happyReduce_124),
    529. 

  529. 	(125 , happyReduce_125),
    530. 

  530. 	(126 , happyReduce_126),
    531. 

  531. 	(127 , happyReduce_127),
    532. 

  532. 	(128 , happyReduce_128),
    533. 

  533. 	(129 , happyReduce_129),
    534. 

  534. 	(130 , happyReduce_130),
    535. 

  535. 	(131 , happyReduce_131),
    536. 

  536. 	(132 , happyReduce_132),
    537. 

  537. 	(133 , happyReduce_133),
    538. 

  538. 	(134 , happyReduce_134),
    539. 

  539. 	(135 , happyReduce_135),
    540. 

  540. 	(136 , happyReduce_136),
    541. 

  541. 	(137 , happyReduce_137),
    542. 

  542. 	(138 , happyReduce_138),
    543. 

  543. 	(139 , happyReduce_139),
    544. 

  544. 	(140 , happyReduce_140),
    545. 

  545. 	(141 , happyReduce_141),
    546. 

  546. 	(142 , happyReduce_142),
    547. 

  547. 	(143 , happyReduce_143),
    548. 

  548. 	(144 , happyReduce_144),
    549. 

  549. 	(145 , happyReduce_145),
    550. 

  550. 	(146 , happyReduce_146),
    551. 

  551. 	(147 , happyReduce_147),
    552. 

  552. 	(148 , happyReduce_148),
    553. 

  553. 	(149 , happyReduce_149),
    554. 

  554. 	(150 , happyReduce_150),
    555. 

  555. 	(151 , happyReduce_151),
    556. 

  556. 	(152 , happyReduce_152)
    557. 

  557. 	]
    558. 

  558. 

  559. happy_n_terms = 69 :: Int
    560. 

  560. happy_n_nonterms = 49 :: Int
    561. 

  561. 

  562. happyReduce_1 = happySpecReduce_0  0# happyReduction_1
    563. 

  563. happyReduction_1  =  happyIn4
    564. 

  564. 		 (return ()
    565. 

  565. 	)
    566. 

  566. 

  567. happyReduce_2 = happySpecReduce_2  0# happyReduction_2
    568. 

  568. happyReduction_2 happy_x_2
    569. 

  569. 	happy_x_1
    570. 

  570. 	 =  case happyOut5 happy_x_1 of { happy_var_1 -> 
    571. 

  571. 	case happyOut4 happy_x_2 of { happy_var_2 -> 
    572. 

  572. 	happyIn4
    573. 

  573. 		 (do happy_var_1; happy_var_2
    574. 

  574. 	)}}
    575. 

  575. 

  576. happyReduce_3 = happySpecReduce_1  1# happyReduction_3
    577. 

  577. happyReduction_3 happy_x_1
    578. 

  578. 	 =  case happyOut10 happy_x_1 of { happy_var_1 -> 
    579. 

  579. 	happyIn5
    580. 

  580. 		 (happy_var_1
    581. 

  581. 	)}
    582. 

  582. 

  583. happyReduce_4 = happySpecReduce_1  1# happyReduction_4
    584. 

  584. happyReduction_4 happy_x_1
    585. 

  585. 	 =  case happyOut6 happy_x_1 of { happy_var_1 -> 
    586. 

  586. 	happyIn5
    587. 

  587. 		 (happy_var_1
    588. 

  588. 	)}
    589. 

  589. 

  590. happyReduce_5 = happySpecReduce_1  1# happyReduction_5
    591. 

  591. happyReduction_5 happy_x_1
    592. 

  592. 	 =  case happyOut13 happy_x_1 of { happy_var_1 -> 
    593. 

  593. 	happyIn5
    594. 

  594. 		 (happy_var_1
    595. 

  595. 	)}
    596. 

  596. 

  597. happyReduce_6 = happyMonadReduce 8# 1# happyReduction_6
    598. 

  598. happyReduction_6 (happy_x_8 `HappyStk`
    599. 

  599. 	happy_x_7 `HappyStk`
    600. 

  600. 	happy_x_6 `HappyStk`
    601. 

  601. 	happy_x_5 `HappyStk`
    602. 

  602. 	happy_x_4 `HappyStk`
    603. 

  603. 	happy_x_3 `HappyStk`
    604. 

  604. 	happy_x_2 `HappyStk`
    605. 

  605. 	happy_x_1 `HappyStk`
    606. 

  606. 	happyRest) tk
    607. 

  607. 	 = happyThen (case happyOutTok happy_x_3 of { (L _ (CmmT_Name	happy_var_3)) -> 
    608. 

  608. 	case happyOutTok happy_x_5 of { (L _ (CmmT_Name	happy_var_5)) -> 
    609. 

  609. 	case happyOut9 happy_x_6 of { happy_var_6 -> 
    610. 

  610. 	( withThisPackage $ \pkg -> 
    611. 

  611. 		   do lits <- sequence happy_var_6;
    612. 

  612. 		      staticClosure pkg happy_var_3 happy_var_5 (map getLit lits))}}}
    613. 

  613. 	) (\r -> happyReturn (happyIn5 r))
    614. 

  614. 

  615. happyReduce_7 = happyReduce 5# 2# happyReduction_7
    616. 

  616. happyReduction_7 (happy_x_5 `HappyStk`
    617. 

  617. 	happy_x_4 `HappyStk`
    618. 

  618. 	happy_x_3 `HappyStk`
    619. 

  619. 	happy_x_2 `HappyStk`
    620. 

  620. 	happy_x_1 `HappyStk`
    621. 

  621. 	happyRest)
    622. 

  622. 	 = case happyOutTok happy_x_2 of { (L _ (CmmT_String	happy_var_2)) -> 
    623. 

  623. 	case happyOut7 happy_x_4 of { happy_var_4 -> 
    624. 

  624. 	happyIn6
    625. 

  625. 		 (do ss <- sequence happy_var_4;
    626. 

  626. 		     code (emitData (section happy_var_2) (concat ss))
    627. 

  627. 	) `HappyStk` happyRest}}
    628. 

  628. 

  629. happyReduce_8 = happySpecReduce_0  3# happyReduction_8
    630. 

  630. happyReduction_8  =  happyIn7
    631. 

  631. 		 ([]
    632. 

  632. 	)
    633. 

  633. 

  634. happyReduce_9 = happySpecReduce_2  3# happyReduction_9
    635. 

  635. happyReduction_9 happy_x_2
    636. 

  636. 	happy_x_1
    637. 

  637. 	 =  case happyOut8 happy_x_1 of { happy_var_1 -> 
    638. 

  638. 	case happyOut7 happy_x_2 of { happy_var_2 -> 
    639. 

  639. 	happyIn7
    640. 

  640. 		 (happy_var_1 : happy_var_2
    641. 

  641. 	)}}
    642. 

  642. 

  643. happyReduce_10 = happyMonadReduce 2# 4# happyReduction_10
    644. 

  644. happyReduction_10 (happy_x_2 `HappyStk`
    645. 

  645. 	happy_x_1 `HappyStk`
    646. 

  646. 	happyRest) tk
    647. 

  647. 	 = happyThen (case happyOutTok happy_x_1 of { (L _ (CmmT_Name	happy_var_1)) -> 
    648. 

  648. 	( withThisPackage $ \pkg -> 
    649. 

  649. 		   return [CmmDataLabel (mkCmmDataLabel pkg happy_var_1)])}
    650. 

  650. 	) (\r -> happyReturn (happyIn8 r))
    651. 

  651. 

  652. happyReduce_11 = happySpecReduce_3  4# happyReduction_11
    653. 

  653. happyReduction_11 happy_x_3
    654. 

  654. 	happy_x_2
    655. 

  655. 	happy_x_1
    656. 

  656. 	 =  case happyOut30 happy_x_2 of { happy_var_2 -> 
    657. 

  657. 	happyIn8
    658. 

  658. 		 (do e <- happy_var_2;
    659. 

  659. 			     return [CmmStaticLit (getLit e)]
    660. 

  660. 	)}
    661. 

  661. 

  662. happyReduce_12 = happySpecReduce_2  4# happyReduction_12
    663. 

  663. happyReduction_12 happy_x_2
    664. 

  664. 	happy_x_1
    665. 

  665. 	 =  case happyOut51 happy_x_1 of { happy_var_1 -> 
    666. 

  666. 	happyIn8
    667. 

  667. 		 (return [CmmUninitialised
    668. 

  668. 							(widthInBytes (typeWidth happy_var_1))]
    669. 

  669. 	)}
    670. 

  670. 

  671. happyReduce_13 = happyReduce 5# 4# happyReduction_13
    672. 

  672. happyReduction_13 (happy_x_5 `HappyStk`
    673. 

  673. 	happy_x_4 `HappyStk`
    674. 

  674. 	happy_x_3 `HappyStk`
    675. 

  675. 	happy_x_2 `HappyStk`
    676. 

  676. 	happy_x_1 `HappyStk`
    677. 

  677. 	happyRest)
    678. 

  678. 	 = case happyOutTok happy_x_4 of { (L _ (CmmT_String	happy_var_4)) -> 
    679. 

  679. 	happyIn8
    680. 

  680. 		 (return [mkString happy_var_4]
    681. 

  681. 	) `HappyStk` happyRest}
    682. 

  682. 

  683. happyReduce_14 = happyReduce 5# 4# happyReduction_14
    684. 

  684. happyReduction_14 (happy_x_5 `HappyStk`
    685. 

  685. 	happy_x_4 `HappyStk`
    686. 

  686. 	happy_x_3 `HappyStk`
    687. 

  687. 	happy_x_2 `HappyStk`
    688. 

  688. 	happy_x_1 `HappyStk`
    689. 

  689. 	happyRest)
    690. 

  690. 	 = case happyOutTok happy_x_3 of { (L _ (CmmT_Int		happy_var_3)) -> 
    691. 

  691. 	happyIn8
    692. 

  692. 		 (return [CmmUninitialised 
    693. 

  693. 							(fromIntegral happy_var_3)]
    694. 

  694. 	) `HappyStk` happyRest}
    695. 

  695. 

  696. happyReduce_15 = happyReduce 5# 4# happyReduction_15
    697. 

  697. happyReduction_15 (happy_x_5 `HappyStk`
    698. 

  698. 	happy_x_4 `HappyStk`
    699. 

  699. 	happy_x_3 `HappyStk`
    700. 

  700. 	happy_x_2 `HappyStk`
    701. 

  701. 	happy_x_1 `HappyStk`
    702. 

  702. 	happyRest)
    703. 

  703. 	 = case happyOut52 happy_x_1 of { happy_var_1 -> 
    704. 

  704. 	case happyOutTok happy_x_3 of { (L _ (CmmT_Int		happy_var_3)) -> 
    705. 

  705. 	happyIn8
    706. 

  706. 		 (return [CmmUninitialised 
    707. 

  707. 						(widthInBytes (typeWidth happy_var_1) * 
    708. 

  708. 							fromIntegral happy_var_3)]
    709. 

  709. 	) `HappyStk` happyRest}}
    710. 

  710. 

  711. happyReduce_16 = happySpecReduce_3  4# happyReduction_16
    712. 

  712. happyReduction_16 happy_x_3
    713. 

  713. 	happy_x_2
    714. 

  714. 	happy_x_1
    715. 

  715. 	 =  case happyOutTok happy_x_2 of { (L _ (CmmT_Int		happy_var_2)) -> 
    716. 

  716. 	happyIn8
    717. 

  717. 		 (return [CmmAlign (fromIntegral happy_var_2)]
    718. 

  718. 	)}
    719. 

  719. 

  720. happyReduce_17 = happyReduce 5# 4# happyReduction_17
    721. 

  721. happyReduction_17 (happy_x_5 `HappyStk`
    722. 

  722. 	happy_x_4 `HappyStk`
    723. 

  723. 	happy_x_3 `HappyStk`
    724. 

  724. 	happy_x_2 `HappyStk`
    725. 

  725. 	happy_x_1 `HappyStk`
    726. 

  726. 	happyRest)
    727. 

  727. 	 = case happyOutTok happy_x_3 of { (L _ (CmmT_Name	happy_var_3)) -> 
    728. 

  728. 	case happyOut9 happy_x_4 of { happy_var_4 -> 
    729. 

  729. 	happyIn8
    730. 

  730. 		 (do lits <- sequence happy_var_4;
    731. 

  731. 		     return $ map CmmStaticLit $
    732. 

  732.                        mkStaticClosure (mkForeignLabel happy_var_3 Nothing ForeignLabelInExternalPackage IsData)
    733. 

  733.                          -- mkForeignLabel because these are only used
    734. 

  734.                          -- for CHARLIKE and INTLIKE closures in the RTS.
    735. 

  735. 			 dontCareCCS (map getLit lits) [] [] []
    736. 

  736. 	) `HappyStk` happyRest}}
    737. 

  737. 

  738. happyReduce_18 = happySpecReduce_0  5# happyReduction_18
    739. 

  739. happyReduction_18  =  happyIn9
    740. 

  740. 		 ([]
    741. 

  741. 	)
    742. 

  742. 

  743. happyReduce_19 = happySpecReduce_3  5# happyReduction_19
    744. 

  744. happyReduction_19 happy_x_3
    745. 

  745. 	happy_x_2
    746. 

  746. 	happy_x_1
    747. 

  747. 	 =  case happyOut30 happy_x_2 of { happy_var_2 -> 
    748. 

  748. 	case happyOut9 happy_x_3 of { happy_var_3 -> 
    749. 

  749. 	happyIn9
    750. 

  750. 		 (happy_var_2 : happy_var_3
    751. 

  751. 	)}}
    752. 

  752. 

  753. happyReduce_20 = happyReduce 7# 6# happyReduction_20
    754. 

  754. happyReduction_20 (happy_x_7 `HappyStk`
    755. 

  755. 	happy_x_6 `HappyStk`
    756. 

  756. 	happy_x_5 `HappyStk`
    757. 

  757. 	happy_x_4 `HappyStk`
    758. 

  758. 	happy_x_3 `HappyStk`
    759. 

  759. 	happy_x_2 `HappyStk`
    760. 

  760. 	happy_x_1 `HappyStk`
    761. 

  761. 	happyRest)
    762. 

  762. 	 = case happyOut11 happy_x_1 of { happy_var_1 -> 
    763. 

  763. 	case happyOut45 happy_x_2 of { happy_var_2 -> 
    764. 

  764. 	case happyOut50 happy_x_3 of { happy_var_3 -> 
    765. 

  765. 	case happyOut49 happy_x_4 of { happy_var_4 -> 
    766. 

  766. 	case happyOut12 happy_x_6 of { happy_var_6 -> 
    767. 

  767. 	happyIn10
    768. 

  768. 		 (do ((entry_ret_label, info, live, formals, gc_block, frame), stmts) <-
    769. 

  769. 		       getCgStmtsEC' $ loopDecls $ do {
    770. 

  770. 		         (entry_ret_label, info, live) <- happy_var_1;
    771. 

  771. 		         formals <- sequence happy_var_2;
    772. 

  772. 		         gc_block <- happy_var_3;
    773. 

  773. 		         frame <- happy_var_4;
    774. 

  774. 		         happy_var_6;
    775. 

  775. 		         return (entry_ret_label, info, live, formals, gc_block, frame) }
    776. 

  776. 		     blks <- code (cgStmtsToBlocks stmts)
    777. 

  777. 		     code (emitInfoTableAndCode entry_ret_label (CmmInfo gc_block frame info) formals blks)
    778. 

  778. 	) `HappyStk` happyRest}}}}}
    779. 

  779. 

  780. happyReduce_21 = happySpecReduce_3  6# happyReduction_21
    781. 

  781. happyReduction_21 happy_x_3
    782. 

  782. 	happy_x_2
    783. 

  783. 	happy_x_1
    784. 

  784. 	 =  case happyOut11 happy_x_1 of { happy_var_1 -> 
    785. 

  785. 	case happyOut45 happy_x_2 of { happy_var_2 -> 
    786. 

  786. 	happyIn10
    787. 

  787. 		 (do (entry_ret_label, info, live) <- happy_var_1;
    788. 

  788. 		     formals <- sequence happy_var_2;
    789. 

  789. 		     code (emitInfoTableAndCode entry_ret_label (CmmInfo Nothing Nothing info) formals [])
    790. 

  790. 	)}}
    791. 

  791. 

  792. happyReduce_22 = happyMonadReduce 7# 6# happyReduction_22
    793. 

  793. happyReduction_22 (happy_x_7 `HappyStk`
    794. 

  794. 	happy_x_6 `HappyStk`
    795. 

  795. 	happy_x_5 `HappyStk`
    796. 

  796. 	happy_x_4 `HappyStk`
    797. 

  797. 	happy_x_3 `HappyStk`
    798. 

  798. 	happy_x_2 `HappyStk`
    799. 

  799. 	happy_x_1 `HappyStk`
    800. 

  800. 	happyRest) tk
    801. 

  801. 	 = happyThen (case happyOutTok happy_x_1 of { (L _ (CmmT_Name	happy_var_1)) -> 
    802. 

  802. 	case happyOut45 happy_x_2 of { happy_var_2 -> 
    803. 

  803. 	case happyOut50 happy_x_3 of { happy_var_3 -> 
    804. 

  804. 	case happyOut49 happy_x_4 of { happy_var_4 -> 
    805. 

  805. 	case happyOut12 happy_x_6 of { happy_var_6 -> 
    806. 

  806. 	( withThisPackage $ \pkg ->
    807. 

  807. 		   do	newFunctionName happy_var_1 pkg
    808. 

  808. 		   	((formals, gc_block, frame), stmts) <-
    809. 

  809. 			 	getCgStmtsEC' $ loopDecls $ do {
    810. 

  810. 		          		formals <- sequence happy_var_2;
    811. 

  811. 		          		gc_block <- happy_var_3;
    812. 

  812. 			  		frame <- happy_var_4;
    813. 

  813. 		          		happy_var_6;
    814. 

  814. 		          		return (formals, gc_block, frame) }
    815. 

  815. 			blks <- code (cgStmtsToBlocks stmts)
    816. 

  816. 			code (emitProc (CmmInfo gc_block frame CmmNonInfoTable) (mkCmmCodeLabel pkg happy_var_1) formals blks))}}}}}
    817. 

  817. 	) (\r -> happyReturn (happyIn10 r))
    818. 

  818. 

  819. happyReduce_23 = happyMonadReduce 14# 7# happyReduction_23
    820. 

  820. happyReduction_23 (happy_x_14 `HappyStk`
    821. 

  821. 	happy_x_13 `HappyStk`
    822. 

  822. 	happy_x_12 `HappyStk`
    823. 

  823. 	happy_x_11 `HappyStk`
    824. 

  824. 	happy_x_10 `HappyStk`
    825. 

  825. 	happy_x_9 `HappyStk`
    826. 

  826. 	happy_x_8 `HappyStk`
    827. 

  827. 	happy_x_7 `HappyStk`
    828. 

  828. 	happy_x_6 `HappyStk`
    829. 

  829. 	happy_x_5 `HappyStk`
    830. 

  830. 	happy_x_4 `HappyStk`
    831. 

  831. 	happy_x_3 `HappyStk`
    832. 

  832. 	happy_x_2 `HappyStk`
    833. 

  833. 	happy_x_1 `HappyStk`
    834. 

  834. 	happyRest) tk
    835. 

  835. 	 = happyThen (case happyOutTok happy_x_3 of { (L _ (CmmT_Name	happy_var_3)) -> 
    836. 

  836. 	case happyOutTok happy_x_5 of { (L _ (CmmT_Int		happy_var_5)) -> 
    837. 

  837. 	case happyOutTok happy_x_7 of { (L _ (CmmT_Int		happy_var_7)) -> 
    838. 

  838. 	case happyOutTok happy_x_9 of { (L _ (CmmT_Int		happy_var_9)) -> 
    839. 

  839. 	case happyOutTok happy_x_11 of { (L _ (CmmT_String	happy_var_11)) -> 
    840. 

  840. 	case happyOutTok happy_x_13 of { (L _ (CmmT_String	happy_var_13)) -> 
    841. 

  841. 	( withThisPackage $ \pkg ->
    842. 

  842. 		   do prof <- profilingInfo happy_var_11 happy_var_13
    843. 

  843. 		      return (mkCmmEntryLabel pkg happy_var_3,
    844. 

  844. 			CmmInfoTable False prof (fromIntegral happy_var_9)
    845. 

  845. 				     (ThunkInfo (fromIntegral happy_var_5, fromIntegral happy_var_7) NoC_SRT),
    846. 

  846. 			[]))}}}}}}
    847. 

  847. 	) (\r -> happyReturn (happyIn11 r))
    848. 

  848. 

  849. happyReduce_24 = happyMonadReduce 16# 7# happyReduction_24
    850. 

  850. happyReduction_24 (happy_x_16 `HappyStk`
    851. 

  851. 	happy_x_15 `HappyStk`
    852. 

  852. 	happy_x_14 `HappyStk`
    853. 

  853. 	happy_x_13 `HappyStk`
    854. 

  854. 	happy_x_12 `HappyStk`
    855. 

  855. 	happy_x_11 `HappyStk`
    856. 

  856. 	happy_x_10 `HappyStk`
    857. 

  857. 	happy_x_9 `HappyStk`
    858. 

  858. 	happy_x_8 `HappyStk`
    859. 

  859. 	happy_x_7 `HappyStk`
    860. 

  860. 	happy_x_6 `HappyStk`
    861. 

  861. 	happy_x_5 `HappyStk`
    862. 

  862. 	happy_x_4 `HappyStk`
    863. 

  863. 	happy_x_3 `HappyStk`
    864. 

  864. 	happy_x_2 `HappyStk`
    865. 

  865. 	happy_x_1 `HappyStk`
    866. 

  866. 	happyRest) tk
    867. 

  867. 	 = happyThen (case happyOutTok happy_x_3 of { (L _ (CmmT_Name	happy_var_3)) -> 
    868. 

  868. 	case happyOutTok happy_x_5 of { (L _ (CmmT_Int		happy_var_5)) -> 
    869. 

  869. 	case happyOutTok happy_x_7 of { (L _ (CmmT_Int		happy_var_7)) -> 
    870. 

  870. 	case happyOutTok happy_x_9 of { (L _ (CmmT_Int		happy_var_9)) -> 
    871. 

  871. 	case happyOutTok happy_x_11 of { (L _ (CmmT_String	happy_var_11)) -> 
    872. 

  872. 	case happyOutTok happy_x_13 of { (L _ (CmmT_String	happy_var_13)) -> 
    873. 

  873. 	case happyOutTok happy_x_15 of { (L _ (CmmT_Int		happy_var_15)) -> 
    874. 

  874. 	( withThisPackage $ \pkg -> 
    875. 

  875. 		   do prof <- profilingInfo happy_var_11 happy_var_13
    876. 

  876. 		      return (mkCmmEntryLabel pkg happy_var_3,
    877. 

  877. 			CmmInfoTable False prof (fromIntegral happy_var_9)
    878. 

  878. 				     (FunInfo (fromIntegral happy_var_5, fromIntegral happy_var_7) NoC_SRT
    879. 

  879. 				      0  -- Arity zero
    880. 

  880. 				      (ArgSpec (fromIntegral happy_var_15))
    881. 

  881. 				      zeroCLit),
    882. 

  882. 			[]))}}}}}}}
    883. 

  883. 	) (\r -> happyReturn (happyIn11 r))
    884. 

  884. 

  885. happyReduce_25 = happyMonadReduce 18# 7# happyReduction_25
    886. 

  886. happyReduction_25 (happy_x_18 `HappyStk`
    887. 

  887. 	happy_x_17 `HappyStk`
    888. 

  888. 	happy_x_16 `HappyStk`
    889. 

  889. 	happy_x_15 `HappyStk`
    890. 

  890. 	happy_x_14 `HappyStk`
    891. 

  891. 	happy_x_13 `HappyStk`
    892. 

  892. 	happy_x_12 `HappyStk`
    893. 

  893. 	happy_x_11 `HappyStk`
    894. 

  894. 	happy_x_10 `HappyStk`
    895. 

  895. 	happy_x_9 `HappyStk`
    896. 

  896. 	happy_x_8 `HappyStk`
    897. 

  897. 	happy_x_7 `HappyStk`
    898. 

  898. 	happy_x_6 `HappyStk`
    899. 

  899. 	happy_x_5 `HappyStk`
    900. 

  900. 	happy_x_4 `HappyStk`
    901. 

  901. 	happy_x_3 `HappyStk`
    902. 

  902. 	happy_x_2 `HappyStk`
    903. 

  903. 	happy_x_1 `HappyStk`
    904. 

  904. 	happyRest) tk
    905. 

  905. 	 = happyThen (case happyOutTok happy_x_3 of { (L _ (CmmT_Name	happy_var_3)) -> 
    906. 

  906. 	case happyOutTok happy_x_5 of { (L _ (CmmT_Int		happy_var_5)) -> 
    907. 

  907. 	case happyOutTok happy_x_7 of { (L _ (CmmT_Int		happy_var_7)) -> 
    908. 

  908. 	case happyOutTok happy_x_9 of { (L _ (CmmT_Int		happy_var_9)) -> 
    909. 

  909. 	case happyOutTok happy_x_11 of { (L _ (CmmT_String	happy_var_11)) -> 
    910. 

  910. 	case happyOutTok happy_x_13 of { (L _ (CmmT_String	happy_var_13)) -> 
    911. 

  911. 	case happyOutTok happy_x_15 of { (L _ (CmmT_Int		happy_var_15)) -> 
    912. 

  912. 	case happyOutTok happy_x_17 of { (L _ (CmmT_Int		happy_var_17)) -> 
    913. 

  913. 	( withThisPackage $ \pkg ->
    914. 

  914. 		   do prof <- profilingInfo happy_var_11 happy_var_13
    915. 

  915. 		      return (mkCmmEntryLabel pkg happy_var_3,
    916. 

  916. 			CmmInfoTable False prof (fromIntegral happy_var_9)
    917. 

  917. 				     (FunInfo (fromIntegral happy_var_5, fromIntegral happy_var_7) NoC_SRT (fromIntegral happy_var_17)
    918. 

  918. 				      (ArgSpec (fromIntegral happy_var_15))
    919. 

  919. 				      zeroCLit),
    920. 

  920. 			[]))}}}}}}}}
    921. 

  921. 	) (\r -> happyReturn (happyIn11 r))
    922. 

  922. 

  923. happyReduce_26 = happyMonadReduce 16# 7# happyReduction_26
    924. 

  924. happyReduction_26 (happy_x_16 `HappyStk`
    925. 

  925. 	happy_x_15 `HappyStk`
    926. 

  926. 	happy_x_14 `HappyStk`
    927. 

  927. 	happy_x_13 `HappyStk`
    928. 

  928. 	happy_x_12 `HappyStk`
    929. 

  929. 	happy_x_11 `HappyStk`
    930. 

  930. 	happy_x_10 `HappyStk`
    931. 

  931. 	happy_x_9 `HappyStk`
    932. 

  932. 	happy_x_8 `HappyStk`
    933. 

  933. 	happy_x_7 `HappyStk`
    934. 

  934. 	happy_x_6 `HappyStk`
    935. 

  935. 	happy_x_5 `HappyStk`
    936. 

  936. 	happy_x_4 `HappyStk`
    937. 

  937. 	happy_x_3 `HappyStk`
    938. 

  938. 	happy_x_2 `HappyStk`
    939. 

  939. 	happy_x_1 `HappyStk`
    940. 

  940. 	happyRest) tk
    941. 

  941. 	 = happyThen (case happyOutTok happy_x_3 of { (L _ (CmmT_Name	happy_var_3)) -> 
    942. 

  942. 	case happyOutTok happy_x_5 of { (L _ (CmmT_Int		happy_var_5)) -> 
    943. 

  943. 	case happyOutTok happy_x_7 of { (L _ (CmmT_Int		happy_var_7)) -> 
    944. 

  944. 	case happyOutTok happy_x_9 of { (L _ (CmmT_Int		happy_var_9)) -> 
    945. 

  945. 	case happyOutTok happy_x_11 of { (L _ (CmmT_Int		happy_var_11)) -> 
    946. 

  946. 	case happyOutTok happy_x_13 of { (L _ (CmmT_String	happy_var_13)) -> 
    947. 

  947. 	case happyOutTok happy_x_15 of { (L _ (CmmT_String	happy_var_15)) -> 
    948. 

  948. 	( withThisPackage $ \pkg ->
    949. 

  949. 		   do prof <- profilingInfo happy_var_13 happy_var_15
    950. 

  950. 		     -- If profiling is on, this string gets duplicated,
    951. 

  951. 		     -- but that's the way the old code did it we can fix it some other time.
    952. 

  952. 		      desc_lit <- code $ mkStringCLit happy_var_13
    953. 

  953. 		      return (mkCmmEntryLabel pkg happy_var_3,
    954. 

  954. 			CmmInfoTable False prof (fromIntegral happy_var_11)
    955. 

  955. 				     (ConstrInfo (fromIntegral happy_var_5, fromIntegral happy_var_7) (fromIntegral happy_var_9) desc_lit),
    956. 

  956. 			[]))}}}}}}}
    957. 

  957. 	) (\r -> happyReturn (happyIn11 r))
    958. 

  958. 

  959. happyReduce_27 = happyMonadReduce 12# 7# happyReduction_27
    960. 

  960. happyReduction_27 (happy_x_12 `HappyStk`
    961. 

  961. 	happy_x_11 `HappyStk`
    962. 

  962. 	happy_x_10 `HappyStk`
    963. 

  963. 	happy_x_9 `HappyStk`
    964. 

  964. 	happy_x_8 `HappyStk`
    965. 

  965. 	happy_x_7 `HappyStk`
    966. 

  966. 	happy_x_6 `HappyStk`
    967. 

  967. 	happy_x_5 `HappyStk`
    968. 

  968. 	happy_x_4 `HappyStk`
    969. 

  969. 	happy_x_3 `HappyStk`
    970. 

  970. 	happy_x_2 `HappyStk`
    971. 

  971. 	happy_x_1 `HappyStk`
    972. 

  972. 	happyRest) tk
    973. 

  973. 	 = happyThen (case happyOutTok happy_x_3 of { (L _ (CmmT_Name	happy_var_3)) -> 
    974. 

  974. 	case happyOutTok happy_x_5 of { (L _ (CmmT_Int		happy_var_5)) -> 
    975. 

  975. 	case happyOutTok happy_x_7 of { (L _ (CmmT_Int		happy_var_7)) -> 
    976. 

  976. 	case happyOutTok happy_x_9 of { (L _ (CmmT_String	happy_var_9)) -> 
    977. 

  977. 	case happyOutTok happy_x_11 of { (L _ (CmmT_String	happy_var_11)) -> 
    978. 

  978. 	( withThisPackage $ \pkg ->
    979. 

  979. 		   do prof <- profilingInfo happy_var_9 happy_var_11
    980. 

  980. 		      return (mkCmmEntryLabel pkg happy_var_3,
    981. 

  981. 			CmmInfoTable False prof (fromIntegral happy_var_7)
    982. 

  982. 				     (ThunkSelectorInfo (fromIntegral happy_var_5) NoC_SRT),
    983. 

  983. 			[]))}}}}}
    984. 

  984. 	) (\r -> happyReturn (happyIn11 r))
    985. 

  985. 

  986. happyReduce_28 = happyMonadReduce 6# 7# happyReduction_28
    987. 

  987. happyReduction_28 (happy_x_6 `HappyStk`
    988. 

  988. 	happy_x_5 `HappyStk`
    989. 

  989. 	happy_x_4 `HappyStk`
    990. 

  990. 	happy_x_3 `HappyStk`
    991. 

  991. 	happy_x_2 `HappyStk`
    992. 

  992. 	happy_x_1 `HappyStk`
    993. 

  993. 	happyRest) tk
    994. 

  994. 	 = happyThen (case happyOutTok happy_x_3 of { (L _ (CmmT_Name	happy_var_3)) -> 
    995. 

  995. 	case happyOutTok happy_x_5 of { (L _ (CmmT_Int		happy_var_5)) -> 
    996. 

  996. 	( withThisPackage $ \pkg ->
    997. 

  997. 		   do let infoLabel = mkCmmInfoLabel pkg happy_var_3
    998. 

  998. 		      return (mkCmmRetLabel pkg happy_var_3,
    999. 

  999. 			CmmInfoTable False (ProfilingInfo zeroCLit zeroCLit) (fromIntegral happy_var_5)
    1000. 

  1000. 				     (ContInfo [] NoC_SRT),
    1001. 

  1001. 			[]))}}
    1002. 

  1002. 	) (\r -> happyReturn (happyIn11 r))
    1003. 

  1003. 

  1004. happyReduce_29 = happyMonadReduce 8# 7# happyReduction_29
    1005. 

  1005. happyReduction_29 (happy_x_8 `HappyStk`
    1006. 

  1006. 	happy_x_7 `HappyStk`
    1007. 

  1007. 	happy_x_6 `HappyStk`
    1008. 

  1008. 	happy_x_5 `HappyStk`
    1009. 

  1009. 	happy_x_4 `HappyStk`
    1010. 

  1010. 	happy_x_3 `HappyStk`
    1011. 

  1011. 	happy_x_2 `HappyStk`
    1012. 

  1012. 	happy_x_1 `HappyStk`
    1013. 

  1013. 	happyRest) tk
    1014. 

  1014. 	 = happyThen (case happyOutTok happy_x_3 of { (L _ (CmmT_Name	happy_var_3)) -> 
    1015. 

  1015. 	case happyOutTok happy_x_5 of { (L _ (CmmT_Int		happy_var_5)) -> 
    1016. 

  1016. 	case happyOut46 happy_x_7 of { happy_var_7 -> 
    1017. 

  1017. 	( withThisPackage $ \pkg ->
    1018. 

  1018. 		   do live <- sequence (map (liftM Just) happy_var_7)
    1019. 

  1019. 		      return (mkCmmRetLabel pkg happy_var_3,
    1020. 

  1020. 			CmmInfoTable False (ProfilingInfo zeroCLit zeroCLit) (fromIntegral happy_var_5)
    1021. 

  1021. 			             (ContInfo live NoC_SRT),
    1022. 

  1022. 			live))}}}
    1023. 

  1023. 	) (\r -> happyReturn (happyIn11 r))
    1024. 

  1024. 

  1025. happyReduce_30 = happySpecReduce_0  8# happyReduction_30
    1026. 

  1026. happyReduction_30  =  happyIn12
    1027. 

  1027. 		 (return ()
    1028. 

  1028. 	)
    1029. 

  1029. 

  1030. happyReduce_31 = happySpecReduce_2  8# happyReduction_31
    1031. 

  1031. happyReduction_31 happy_x_2
    1032. 

  1032. 	happy_x_1
    1033. 

  1033. 	 =  case happyOut13 happy_x_1 of { happy_var_1 -> 
    1034. 

  1034. 	case happyOut12 happy_x_2 of { happy_var_2 -> 
    1035. 

  1035. 	happyIn12
    1036. 

  1036. 		 (do happy_var_1; happy_var_2
    1037. 

  1037. 	)}}
    1038. 

  1038. 

  1039. happyReduce_32 = happySpecReduce_2  8# happyReduction_32
    1040. 

  1040. happyReduction_32 happy_x_2
    1041. 

  1041. 	happy_x_1
    1042. 

  1042. 	 =  case happyOut17 happy_x_1 of { happy_var_1 -> 
    1043. 

  1043. 	case happyOut12 happy_x_2 of { happy_var_2 -> 
    1044. 

  1044. 	happyIn12
    1045. 

  1045. 		 (do happy_var_1; happy_var_2
    1046. 

  1046. 	)}}
    1047. 

  1047. 

  1048. happyReduce_33 = happySpecReduce_3  9# happyReduction_33
    1049. 

  1049. happyReduction_33 happy_x_3
    1050. 

  1050. 	happy_x_2
    1051. 

  1051. 	happy_x_1
    1052. 

  1052. 	 =  case happyOut51 happy_x_1 of { happy_var_1 -> 
    1053. 

  1053. 	case happyOut16 happy_x_2 of { happy_var_2 -> 
    1054. 

  1054. 	happyIn13
    1055. 

  1055. 		 (mapM_ (newLocal happy_var_1) happy_var_2
    1056. 

  1056. 	)}}
    1057. 

  1057. 

  1058. happyReduce_34 = happySpecReduce_3  9# happyReduction_34
    1059. 

  1059. happyReduction_34 happy_x_3
    1060. 

  1060. 	happy_x_2
    1061. 

  1061. 	happy_x_1
    1062. 

  1062. 	 =  case happyOut14 happy_x_2 of { happy_var_2 -> 
    1063. 

  1063. 	happyIn13
    1064. 

  1064. 		 (mapM_ newImport happy_var_2
    1065. 

  1065. 	)}
    1066. 

  1066. 

  1067. happyReduce_35 = happySpecReduce_3  9# happyReduction_35
    1068. 

  1068. happyReduction_35 happy_x_3
    1069. 

  1069. 	happy_x_2
    1070. 

  1070. 	happy_x_1
    1071. 

  1071. 	 =  happyIn13
    1072. 

  1072. 		 (return ()
    1073. 

  1073. 	)
    1074. 

  1074. 

  1075. happyReduce_36 = happySpecReduce_1  10# happyReduction_36
    1076. 

  1076. happyReduction_36 happy_x_1
    1077. 

  1077. 	 =  case happyOut15 happy_x_1 of { happy_var_1 -> 
    1078. 

  1078. 	happyIn14
    1079. 

  1079. 		 ([happy_var_1]
    1080. 

  1080. 	)}
    1081. 

  1081. 

  1082. happyReduce_37 = happySpecReduce_3  10# happyReduction_37
    1083. 

  1083. happyReduction_37 happy_x_3
    1084. 

  1084. 	happy_x_2
    1085. 

  1085. 	happy_x_1
    1086. 

  1086. 	 =  case happyOut15 happy_x_1 of { happy_var_1 -> 
    1087. 

  1087. 	case happyOut14 happy_x_3 of { happy_var_3 -> 
    1088. 

  1088. 	happyIn14
    1089. 

  1089. 		 (happy_var_1 : happy_var_3
    1090. 

  1090. 	)}}
    1091. 

  1091. 

  1092. happyReduce_38 = happySpecReduce_1  11# happyReduction_38
    1093. 

  1093. happyReduction_38 happy_x_1
    1094. 

  1094. 	 =  case happyOutTok happy_x_1 of { (L _ (CmmT_Name	happy_var_1)) -> 
    1095. 

  1095. 	happyIn15
    1096. 

  1096. 		 ((happy_var_1, mkForeignLabel happy_var_1 Nothing ForeignLabelInExternalPackage IsFunction)
    1097. 

  1097. 	)}
    1098. 

  1098. 

  1099. happyReduce_39 = happySpecReduce_2  11# happyReduction_39
    1100. 

  1100. happyReduction_39 happy_x_2
    1101. 

  1101. 	happy_x_1
    1102. 

  1102. 	 =  case happyOutTok happy_x_1 of { (L _ (CmmT_String	happy_var_1)) -> 
    1103. 

  1103. 	case happyOutTok happy_x_2 of { (L _ (CmmT_Name	happy_var_2)) -> 
    1104. 

  1104. 	happyIn15
    1105. 

  1105. 		 ((happy_var_2, mkCmmCodeLabel (fsToPackageId (mkFastString happy_var_1)) happy_var_2)
    1106. 

  1106. 	)}}
    1107. 

  1107. 

  1108. happyReduce_40 = happySpecReduce_1  12# happyReduction_40
    1109. 

  1109. happyReduction_40 happy_x_1
    1110. 

  1110. 	 =  case happyOutTok happy_x_1 of { (L _ (CmmT_Name	happy_var_1)) -> 
    1111. 

  1111. 	happyIn16
    1112. 

  1112. 		 ([happy_var_1]
    1113. 

  1113. 	)}
    1114. 

  1114. 

  1115. happyReduce_41 = happySpecReduce_3  12# happyReduction_41
    1116. 

  1116. happyReduction_41 happy_x_3
    1117. 

  1117. 	happy_x_2
    1118. 

  1118. 	happy_x_1
    1119. 

  1119. 	 =  case happyOutTok happy_x_1 of { (L _ (CmmT_Name	happy_var_1)) -> 
    1120. 

  1120. 	case happyOut16 happy_x_3 of { happy_var_3 -> 
    1121. 

  1121. 	happyIn16
    1122. 

  1122. 		 (happy_var_1 : happy_var_3
    1123. 

  1123. 	)}}
    1124. 

  1124. 

  1125. happyReduce_42 = happySpecReduce_1  13# happyReduction_42
    1126. 

  1126. happyReduction_42 happy_x_1
    1127. 

  1127. 	 =  happyIn17
    1128. 

  1128. 		 (nopEC
    1129. 

  1129. 	)
    1130. 

  1130. 

  1131. happyReduce_43 = happySpecReduce_2  13# happyReduction_43
    1132. 

  1132. happyReduction_43 happy_x_2
    1133. 

  1133. 	happy_x_1
    1134. 

  1134. 	 =  case happyOutTok happy_x_1 of { (L _ (CmmT_Name	happy_var_1)) -> 
    1135. 

  1135. 	happyIn17
    1136. 

  1136. 		 (do l <- newLabel happy_var_1; code (labelC l)
    1137. 

  1137. 	)}
    1138. 

  1138. 

  1139. happyReduce_44 = happyReduce 4# 13# happyReduction_44
    1140. 

  1140. happyReduction_44 (happy_x_4 `HappyStk`
    1141. 

  1141. 	happy_x_3 `HappyStk`
    1142. 

  1142. 	happy_x_2 `HappyStk`
    1143. 

  1143. 	happy_x_1 `HappyStk`
    1144. 

  1144. 	happyRest)
    1145. 

  1145. 	 = case happyOut44 happy_x_1 of { happy_var_1 -> 
    1146. 

  1146. 	case happyOut30 happy_x_3 of { happy_var_3 -> 
    1147. 

  1147. 	happyIn17
    1148. 

  1148. 		 (do reg <- happy_var_1; e <- happy_var_3; stmtEC (CmmAssign reg e)
    1149. 

  1149. 	) `HappyStk` happyRest}}
    1150. 

  1150. 

  1151. happyReduce_45 = happyReduce 7# 13# happyReduction_45
    1152. 

  1152. happyReduction_45 (happy_x_7 `HappyStk`
    1153. 

  1153. 	happy_x_6 `HappyStk`
    1154. 

  1154. 	happy_x_5 `HappyStk`
    1155. 

  1155. 	happy_x_4 `HappyStk`
    1156. 

  1156. 	happy_x_3 `HappyStk`
    1157. 

  1157. 	happy_x_2 `HappyStk`
    1158. 

  1158. 	happy_x_1 `HappyStk`
    1159. 

  1159. 	happyRest)
    1160. 

  1160. 	 = case happyOut51 happy_x_1 of { happy_var_1 -> 
    1161. 

  1161. 	case happyOut30 happy_x_3 of { happy_var_3 -> 
    1162. 

  1162. 	case happyOut30 happy_x_6 of { happy_var_6 -> 
    1163. 

  1163. 	happyIn17
    1164. 

  1164. 		 (doStore happy_var_1 happy_var_3 happy_var_6
    1165. 

  1165. 	) `HappyStk` happyRest}}}
    1166. 

  1166. 

  1167. happyReduce_46 = happyMonadReduce 11# 13# happyReduction_46
    1168. 

  1168. happyReduction_46 (happy_x_11 `HappyStk`
    1169. 

  1169. 	happy_x_10 `HappyStk`
    1170. 

  1170. 	happy_x_9 `HappyStk`
    1171. 

  1171. 	happy_x_8 `HappyStk`
    1172. 

  1172. 	happy_x_7 `HappyStk`
    1173. 

  1173. 	happy_x_6 `HappyStk`
    1174. 

  1174. 	happy_x_5 `HappyStk`
    1175. 

  1175. 	happy_x_4 `HappyStk`
    1176. 

  1176. 	happy_x_3 `HappyStk`
    1177. 

  1177. 	happy_x_2 `HappyStk`
    1178. 

  1178. 	happy_x_1 `HappyStk`
    1179. 

  1179. 	happyRest) tk
    1180. 

  1180. 	 = happyThen (case happyOut40 happy_x_1 of { happy_var_1 -> 
    1181. 

  1181. 	case happyOutTok happy_x_3 of { (L _ (CmmT_String	happy_var_3)) -> 
    1182. 

  1182. 	case happyOut30 happy_x_4 of { happy_var_4 -> 
    1183. 

  1183. 	case happyOut34 happy_x_6 of { happy_var_6 -> 
    1184. 

  1184. 	case happyOut21 happy_x_8 of { happy_var_8 -> 
    1185. 

  1185. 	case happyOut22 happy_x_9 of { happy_var_9 -> 
    1186. 

  1186. 	case happyOut18 happy_x_10 of { happy_var_10 -> 
    1187. 

  1187. 	( foreignCall happy_var_3 happy_var_1 happy_var_4 happy_var_6 happy_var_9 happy_var_8 happy_var_10)}}}}}}}
    1188. 

  1188. 	) (\r -> happyReturn (happyIn17 r))
    1189. 

  1189. 

  1190. happyReduce_47 = happyMonadReduce 10# 13# happyReduction_47
    1191. 

  1191. happyReduction_47 (happy_x_10 `HappyStk`
    1192. 

  1192. 	happy_x_9 `HappyStk`
    1193. 

  1193. 	happy_x_8 `HappyStk`
    1194. 

  1194. 	happy_x_7 `HappyStk`
    1195. 

  1195. 	happy_x_6 `HappyStk`
    1196. 

  1196. 	happy_x_5 `HappyStk`
    1197. 

  1197. 	happy_x_4 `HappyStk`
    1198. 

  1198. 	happy_x_3 `HappyStk`
    1199. 

  1199. 	happy_x_2 `HappyStk`
    1200. 

  1200. 	happy_x_1 `HappyStk`
    1201. 

  1201. 	happyRest) tk
    1202. 

  1202. 	 = happyThen (case happyOut40 happy_x_1 of { happy_var_1 -> 
    1203. 

  1203. 	case happyOutTok happy_x_4 of { (L _ (CmmT_Name	happy_var_4)) -> 
    1204. 

  1204. 	case happyOut34 happy_x_6 of { happy_var_6 -> 
    1205. 

  1205. 	case happyOut21 happy_x_8 of { happy_var_8 -> 
    1206. 

  1206. 	case happyOut22 happy_x_9 of { happy_var_9 -> 
    1207. 

  1207. 	( primCall happy_var_1 happy_var_4 happy_var_6 happy_var_9 happy_var_8)}}}}}
    1208. 

  1208. 	) (\r -> happyReturn (happyIn17 r))
    1209. 

  1209. 

  1210. happyReduce_48 = happyMon
    1211.