Ticket #483: typescript.2

File typescript.2, 197.6 KB (added by jgoerzen, 8 years ago)
Line 
1Script command is started on Tue Nov 22 09:23:23 CST 2005.sh-2.05a$ make
2make[1]: Entering directory `/home/jgoerzen/programs/ghc-6.4.1/glafp-utils'
3------------------------------------------------------------------------
4===fptools== Recursively making `boot' in mkdependC mkdirhier runstdtest lndir ...
5PWD = /home/jgoerzen/programs/ghc-6.4.1/glafp-utils
6------------------------------------------------------------------------
7------------------------------------------------------------------------
8==fptools== make boot -wr;
9 in /home/jgoerzen/programs/ghc-6.4.1/glafp-utils/mkdependC
10------------------------------------------------------------------------
11------------------------------------------------------------------------
12==fptools== make boot -wr;
13 in /home/jgoerzen/programs/ghc-6.4.1/glafp-utils/mkdirhier
14------------------------------------------------------------------------
15------------------------------------------------------------------------
16==fptools== make boot -wr;
17 in /home/jgoerzen/programs/ghc-6.4.1/glafp-utils/runstdtest
18------------------------------------------------------------------------
19------------------------------------------------------------------------
20==fptools== make boot -wr;
21 in /home/jgoerzen/programs/ghc-6.4.1/glafp-utils/lndir
22------------------------------------------------------------------------
23../../glafp-utils/mkdependC/mkdependC -f .depend     -- -O -- lndir.c
24------------------------------------------------------------------------
25===fptools== Finished making `boot' in mkdependC mkdirhier runstdtest lndir ...
26PWD = /home/jgoerzen/programs/ghc-6.4.1/glafp-utils
27------------------------------------------------------------------------
28make[1]: Leaving directory `/home/jgoerzen/programs/ghc-6.4.1/glafp-utils'
29make[1]: Entering directory `/home/jgoerzen/programs/ghc-6.4.1/glafp-utils'
30------------------------------------------------------------------------
31===fptools== Recursively making `all' in mkdependC mkdirhier runstdtest lndir ...
32PWD = /home/jgoerzen/programs/ghc-6.4.1/glafp-utils
33------------------------------------------------------------------------
34------------------------------------------------------------------------
35==fptools== make all -wr;
36 in /home/jgoerzen/programs/ghc-6.4.1/glafp-utils/mkdependC
37------------------------------------------------------------------------
38make[2]: Nothing to be done for `all'.
39------------------------------------------------------------------------
40==fptools== make all -wr;
41 in /home/jgoerzen/programs/ghc-6.4.1/glafp-utils/mkdirhier
42------------------------------------------------------------------------
43make[2]: Nothing to be done for `all'.
44------------------------------------------------------------------------
45==fptools== make all -wr;
46 in /home/jgoerzen/programs/ghc-6.4.1/glafp-utils/runstdtest
47------------------------------------------------------------------------
48make[2]: Nothing to be done for `all'.
49------------------------------------------------------------------------
50==fptools== make all -wr;
51 in /home/jgoerzen/programs/ghc-6.4.1/glafp-utils/lndir
52------------------------------------------------------------------------
53make[2]: Nothing to be done for `all'.
54------------------------------------------------------------------------
55===fptools== Finished making `all' in mkdependC mkdirhier runstdtest lndir ...
56PWD = /home/jgoerzen/programs/ghc-6.4.1/glafp-utils
57------------------------------------------------------------------------
58make[1]: Leaving directory `/home/jgoerzen/programs/ghc-6.4.1/glafp-utils'
59make[1]: Entering directory `/home/jgoerzen/programs/ghc-6.4.1/ghc'
60------------------------------------------------------------------------
61===fptools== Recursively making `boot' in includes lib utils driver docs compiler rts ...
62PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc
63------------------------------------------------------------------------
64------------------------------------------------------------------------
65==fptools== make boot -wr;
66 in /home/jgoerzen/programs/ghc-6.4.1/ghc/includes
67------------------------------------------------------------------------
68../../glafp-utils/mkdependC/mkdependC -f .depend     -- -O    -- mkDerivedConstants.c
69------------------------------------------------------------------------
70==fptools== make boot -wr;
71 in /home/jgoerzen/programs/ghc-6.4.1/ghc/lib
72------------------------------------------------------------------------
73------------------------------------------------------------------------
74===fptools== Recursively making `boot' in compat ...
75PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/lib
76------------------------------------------------------------------------
77------------------------------------------------------------------------
78==fptools== make boot - --no-print-directory -r;
79 in /home/jgoerzen/programs/ghc-6.4.1/ghc/lib/compat
80------------------------------------------------------------------------
81../../../glafp-utils/mkdependC/mkdependC -f .depend    -I. -Iinclude -I../../includes  -- -O -I. -Iinclude    -- cbits/directory.c cbits/rawSystem.c
82/usr/local/bin/ghc -M -optdep-f -optdep.depend  -osuf o    -H16m -O -I. -Iinclude -Rghc-timing -I../../../libraries -fglasgow-exts -no-recomp Compat/Directory.hs Compat/RawSystem.hs Distribution/Compat/ReadP.hs Distribution/Extension.hs Distribution/GetOpt.hs Distribution/InstalledPackageInfo.hs Distribution/License.hs Distribution/Package.hs Distribution/ParseUtils.hs Distribution/Setup.hs Distribution/Version.hs System/Directory/Internals.hs
83<<ghc: 7879808 bytes, 3 GCs, 49068/49068 avg/max bytes residency (1 samples), 16M in use, 0.00 INIT (0.00 elapsed), 0.12 MUT (0.72 elapsed), 0.00 GC (0.01 elapsed) :ghc>>
84make all
85------------------------------------------------------------------------
86===fptools== Finished making `boot' in compat ...
87PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/lib
88------------------------------------------------------------------------
89------------------------------------------------------------------------
90==fptools== make boot -wr;
91 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils
92------------------------------------------------------------------------
93------------------------------------------------------------------------
94===fptools== Recursively making `boot' in hasktags ghc-pkg hp2ps hsc2hs parallel stat2resid prof unlit genprimopcode genapply runghc ...
95PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/utils
96------------------------------------------------------------------------
97------------------------------------------------------------------------
98==fptools== make boot - --no-print-directory -r;
99 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/hasktags
100------------------------------------------------------------------------
101/usr/local/bin/ghc -M -optdep-f -optdep.depend  -osuf o    -H16m -O HaskTags.hs
102------------------------------------------------------------------------
103==fptools== make boot - --no-print-directory -r;
104 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/ghc-pkg
105------------------------------------------------------------------------
106/usr/local/bin/ghc -M -optdep-f -optdep.depend  -osuf o -optdep--exclude-module=Compat.RawSystem -optdep--exclude-module=Compat.Directory -optdep--exclude-module=Distribution.Compat.ReadP -optdep--exclude-module=Distribution.Extension -optdep--exclude-module=Distribution.GetOpt -optdep--exclude-module=Distribution.InstalledPackageInfo -optdep--exclude-module=Distribution.License -optdep--exclude-module=Distribution.Package -optdep--exclude-module=Distribution.ParseUtils -optdep--exclude-module=Distribution.Compiler -optdep--exclude-module=Distribution.Version -optdep--exclude-module=System.Directory.Internals   -H16m -O -cpp -Wall -fno-warn-name-shadowing -fno-warn-unused-matches -i../../lib/compat -Rghc-timing Main.hs Version.hs
107<<ghc: 4978568 bytes, 3 GCs, 52384/52384 avg/max bytes residency (1 samples), 16M in use, 0.01 INIT (0.00 elapsed), 0.05 MUT (0.22 elapsed), 0.02 GC (0.01 elapsed) :ghc>>
108make all
109make INSTALLING=0 BIN_DIST=0 - --no-print-directory -r all
110make[5]: Nothing to be done for `all'.
111------------------------------------------------------------------------
112==fptools== make boot - --no-print-directory -r;
113 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/hp2ps
114------------------------------------------------------------------------
115../../../glafp-utils/mkdependC/mkdependC -f .depend     -- -O -I../../includes -Wall    -- AreaBelow.c AuxFile.c Axes.c Curves.c Deviation.c Dimensions.c Error.c HpFile.c Key.c Main.c Marks.c PsFile.c Reorder.c Scale.c Shade.c TopTwenty.c TraceElement.c Utilities.c
116------------------------------------------------------------------------
117==fptools== make boot - --no-print-directory -r;
118 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/hsc2hs
119------------------------------------------------------------------------
120/usr/local/bin/ghc -M -optdep-f -optdep.depend  -osuf o -optdep--exclude-module=Compat.RawSystem -optdep--exclude-module=Compat.Directory -optdep--exclude-module=Distribution.Compat.ReadP -optdep--exclude-module=Distribution.Extension -optdep--exclude-module=Distribution.GetOpt -optdep--exclude-module=Distribution.InstalledPackageInfo -optdep--exclude-module=Distribution.License -optdep--exclude-module=Distribution.Package -optdep--exclude-module=Distribution.ParseUtils -optdep--exclude-module=Distribution.Compiler -optdep--exclude-module=Distribution.Version -optdep--exclude-module=System.Directory.Internals   -H16m -O -i../../lib/compat -Rghc-timing -Wall Main.hs
121<<ghc: 4593152 bytes, 2 GCs, 51620/51620 avg/max bytes residency (1 samples), 5M in use, 0.00 INIT (0.00 elapsed), 0.05 MUT (0.16 elapsed), 0.00 GC (0.00 elapsed) :ghc>>
122------------------------------------------------------------------------
123==fptools== make boot - --no-print-directory -r;
124 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/parallel
125------------------------------------------------------------------------
126------------------------------------------------------------------------
127==fptools== make boot - --no-print-directory -r;
128 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/stat2resid
129------------------------------------------------------------------------
130------------------------------------------------------------------------
131==fptools== make boot - --no-print-directory -r;
132 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/prof
133------------------------------------------------------------------------
134------------------------------------------------------------------------
135===fptools== Recursively making `boot' in cgprof icons ...
136PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/prof
137------------------------------------------------------------------------
138------------------------------------------------------------------------
139==fptools== make boot - --no-print-directory -r;
140 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/prof/cgprof
141------------------------------------------------------------------------
142../../../../glafp-utils/mkdependC/mkdependC -f .depend     -- -O -Wall -I../../../includes    -- cgprof.c daVinci.c main.c matrix.c symbol.c
143------------------------------------------------------------------------
144==fptools== make boot - --no-print-directory -r;
145 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/prof/icons
146------------------------------------------------------------------------
147------------------------------------------------------------------------
148===fptools== Finished making `boot' in cgprof icons ...
149PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/prof
150------------------------------------------------------------------------
151------------------------------------------------------------------------
152==fptools== make boot - --no-print-directory -r;
153 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/unlit
154------------------------------------------------------------------------
155../../../glafp-utils/mkdependC/mkdependC -f .depend     -- -O -O    -- unlit.c
156------------------------------------------------------------------------
157==fptools== make boot - --no-print-directory -r;
158 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/genprimopcode
159------------------------------------------------------------------------
160/usr/local/bin/ghc -M -optdep-f -optdep.depend  -osuf o    -H16m -O -package parsec Main.hs
161------------------------------------------------------------------------
162==fptools== make boot - --no-print-directory -r;
163 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/genapply
164------------------------------------------------------------------------
165/usr/local/bin/ghc -M -optdep-f -optdep.depend  -osuf o    -H16m -O GenApply.hs
166In file included from GenApply.hs:7:
167../../includes/Constants.h:199: warning: extra tokens at end of #endif directive
168------------------------------------------------------------------------
169==fptools== make boot - --no-print-directory -r;
170 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/runghc
171------------------------------------------------------------------------
172/usr/local/bin/ghc -M -optdep-f -optdep.depend  -osuf o -optdep--exclude-module=Compat.RawSystem -optdep--exclude-module=Compat.Directory -optdep--exclude-module=Distribution.Compat.ReadP -optdep--exclude-module=Distribution.Extension -optdep--exclude-module=Distribution.GetOpt -optdep--exclude-module=Distribution.InstalledPackageInfo -optdep--exclude-module=Distribution.License -optdep--exclude-module=Distribution.Package -optdep--exclude-module=Distribution.ParseUtils -optdep--exclude-module=Distribution.Compiler -optdep--exclude-module=Distribution.Version -optdep--exclude-module=System.Directory.Internals   -H16m -O -i../../lib/compat -Rghc-timing runghc.hs
173<<ghc: 3555568 bytes, 2 GCs, 51572/51572 avg/max bytes residency (1 samples), 5M in use, 0.00 INIT (0.00 elapsed), 0.04 MUT (0.14 elapsed), 0.01 GC (0.00 elapsed) :ghc>>
174------------------------------------------------------------------------
175===fptools== Finished making `boot' in hasktags ghc-pkg hp2ps hsc2hs parallel stat2resid prof unlit genprimopcode genapply runghc ...
176PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/utils
177------------------------------------------------------------------------
178------------------------------------------------------------------------
179==fptools== make boot -wr;
180 in /home/jgoerzen/programs/ghc-6.4.1/ghc/driver
181------------------------------------------------------------------------
182------------------------------------------------------------------------
183===fptools== Recursively making `boot' in mangler split ghc ghci ...
184PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/driver
185------------------------------------------------------------------------
186------------------------------------------------------------------------
187==fptools== make boot - --no-print-directory -r;
188 in /home/jgoerzen/programs/ghc-6.4.1/ghc/driver/mangler
189------------------------------------------------------------------------
190------------------------------------------------------------------------
191==fptools== make boot - --no-print-directory -r;
192 in /home/jgoerzen/programs/ghc-6.4.1/ghc/driver/split
193------------------------------------------------------------------------
194------------------------------------------------------------------------
195==fptools== make boot - --no-print-directory -r;
196 in /home/jgoerzen/programs/ghc-6.4.1/ghc/driver/ghc
197------------------------------------------------------------------------
198------------------------------------------------------------------------
199==fptools== make boot - --no-print-directory -r;
200 in /home/jgoerzen/programs/ghc-6.4.1/ghc/driver/ghci
201------------------------------------------------------------------------
202------------------------------------------------------------------------
203===fptools== Finished making `boot' in mangler split ghc ghci ...
204PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/driver
205------------------------------------------------------------------------
206------------------------------------------------------------------------
207==fptools== make boot -wr;
208 in /home/jgoerzen/programs/ghc-6.4.1/ghc/docs
209------------------------------------------------------------------------
210------------------------------------------------------------------------
211===fptools== Recursively making `boot' in users_guide ext-core storage-mgt ...
212PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/docs
213------------------------------------------------------------------------
214------------------------------------------------------------------------
215==fptools== make boot - --no-print-directory -r;
216 in /home/jgoerzen/programs/ghc-6.4.1/ghc/docs/users_guide
217------------------------------------------------------------------------
218------------------------------------------------------------------------
219==fptools== make boot - --no-print-directory -r;
220 in /home/jgoerzen/programs/ghc-6.4.1/ghc/docs/ext-core
221------------------------------------------------------------------------
222make[3]: Nothing to be done for `boot'.
223------------------------------------------------------------------------
224==fptools== make boot - --no-print-directory -r;
225 in /home/jgoerzen/programs/ghc-6.4.1/ghc/docs/storage-mgt
226------------------------------------------------------------------------
227make[3]: Nothing to be done for `boot'.
228------------------------------------------------------------------------
229===fptools== Finished making `boot' in users_guide ext-core storage-mgt ...
230PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/docs
231------------------------------------------------------------------------
232------------------------------------------------------------------------
233==fptools== make boot -wr;
234 in /home/jgoerzen/programs/ghc-6.4.1/ghc/compiler
235------------------------------------------------------------------------
236../../glafp-utils/mkdirhier/mkdirhier stage1
237for i in utils basicTypes types hsSyn prelude rename typecheck deSugar coreSyn specialise simplCore stranal stgSyn simplStg codeGen main profiling parser cprAnalysis compMan ndpFlatten iface cmm nativeGen; do \
238    ../../glafp-utils/mkdirhier/mkdirhier stage1/$i; \
239done
240for i in */*hi-boot*; do \
241    ln -s -f ../../$i stage1/$i || true ; \
242done
243Creating stage1/ghc_boot_platform.h...
244Done.
245touch .depend-BASE
246/usr/local/bin/ghc -M -optdep-f -optdep.depend-BASE  -osuf o -I../includes -optdep--exclude-module=Compat.RawSystem -optdep--exclude-module=Compat.Directory -optdep--exclude-module=Distribution.Compat.ReadP -optdep--exclude-module=Distribution.Extension -optdep--exclude-module=Distribution.GetOpt -optdep--exclude-module=Distribution.InstalledPackageInfo -optdep--exclude-module=Distribution.License -optdep--exclude-module=Distribution.Package -optdep--exclude-module=Distribution.ParseUtils -optdep--exclude-module=Distribution.Compiler -optdep--exclude-module=Distribution.Version -optdep--exclude-module=System.Directory.Internals   -H16m -O -iutils -ibasicTypes -itypes -ihsSyn -iprelude -irename -itypecheck -ideSugar -icoreSyn -ispecialise -isimplCore -istranal -istgSyn -isimplStg -icodeGen -imain -iprofiling -iparser -icprAnalysis -icompMan -indpFlatten -iiface -icmm -inativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing -H16M '-#include "hschooks.h"' -i../lib/compat basicTypes/BasicTypes.lhs basicTypes/DataCon.lhs basicTypes/Demand.lhs basicTypes/FieldLabel.lhs basicTypes/Id.lhs basicTypes/IdInfo.lhs basicTypes/Literal.lhs basicTypes/MkId.lhs basicTypes/Module.lhs basicTypes/Name.lhs basicTypes/NameEnv.lhs basicTypes/NameSet.lhs basicTypes/NewDemand.lhs basicTypes/OccName.lhs basicTypes/RdrName.lhs basicTypes/SrcLoc.lhs basicTypes/UniqSupply.lhs basicTypes/Unique.lhs basicTypes/Var.lhs basicTypes/VarEnv.lhs basicTypes/VarSet.lhs cmm/CLabel.hs cmm/Cmm.hs cmm/CmmLex.hs cmm/CmmLint.hs cmm/CmmParse.hs cmm/CmmUtils.hs cmm/MachOp.hs cmm/PprC.hs cmm/PprCmm.hs codeGen/Bitmap.hs codeGen/CgBindery.lhs codeGen/CgCallConv.hs codeGen/CgCase.lhs codeGen/CgClosure.lhs codeGen/CgCon.lhs codeGen/CgExpr.lhs codeGen/CgForeignCall.hs codeGen/CgHeapery.lhs codeGen/CgInfoTbls.hs codeGen/CgLetNoEscape.lhs codeGen/CgMonad.lhs codeGen/CgParallel.hs codeGen/CgPrimOp.hs codeGen/CgProf.hs codeGen/CgStackery.lhs codeGen/CgTailCall.lhs codeGen/CgTicky.hs codeGen/CgUtils.hs codeGen/ClosureInfo.lhs codeGen/CodeGen.lhs codeGen/SMRep.lhs compMan/CompManager.lhs coreSyn/CoreFVs.lhs coreSyn/CoreLint.lhs coreSyn/CorePrep.lhs coreSyn/CoreSubst.lhs coreSyn/CoreSyn.lhs coreSyn/CoreTidy.lhs coreSyn/CoreUnfold.lhs coreSyn/CoreUtils.lhs coreSyn/ExternalCore.lhs coreSyn/MkExternalCore.lhs coreSyn/PprCore.lhs coreSyn/PprExternalCore.lhs cprAnalysis/CprAnalyse.lhs deSugar/Check.lhs deSugar/Desugar.lhs deSugar/DsArrows.lhs deSugar/DsBinds.lhs deSugar/DsCCall.lhs deSugar/DsExpr.lhs deSugar/DsForeign.lhs deSugar/DsGRHSs.lhs deSugar/DsListComp.lhs deSugar/DsMonad.lhs deSugar/DsUtils.lhs deSugar/Match.lhs deSugar/MatchCon.lhs deSugar/MatchLit.lhs hsSyn/HsBinds.lhs hsSyn/HsDecls.lhs hsSyn/HsExpr.lhs hsSyn/HsImpExp.lhs hsSyn/HsLit.lhs hsSyn/HsPat.lhs hsSyn/HsSyn.lhs hsSyn/HsTypes.lhs hsSyn/HsUtils.lhs iface/BinIface.hs iface/BuildTyCl.lhs iface/IfaceEnv.lhs iface/IfaceSyn.lhs iface/IfaceType.lhs iface/LoadIface.lhs iface/MkIface.lhs iface/TcIface.lhs main/CmdLineOpts.lhs main/CodeOutput.lhs main/Config.hs main/Constants.lhs main/DriverFlags.hs main/DriverMkDepend.hs main/DriverPhases.hs main/DriverPipeline.hs main/DriverState.hs main/DriverUtil.hs main/ErrUtils.lhs main/Finder.lhs main/GetImports.hs main/HscMain.lhs main/HscStats.lhs main/HscTypes.lhs main/Main.hs main/PackageConfig.hs main/Packages.lhs main/ParsePkgConf.hs main/SysTools.lhs main/TidyPgm.lhs nativeGen/AsmCodeGen.lhs nativeGen/MachCodeGen.hs nativeGen/MachInstrs.hs nativeGen/MachRegs.lhs nativeGen/NCGMonad.hs nativeGen/PositionIndependentCode.hs nativeGen/PprMach.hs nativeGen/RegAllocInfo.hs nativeGen/RegisterAlloc.hs ndpFlatten/FlattenInfo.hs ndpFlatten/FlattenMonad.hs ndpFlatten/Flattening.hs ndpFlatten/NDPCoreUtils.hs ndpFlatten/PArrAnal.hs parser/Ctype.lhs parser/LexCore.hs parser/Lexer.hs parser/Parser.hs parser/ParserCore.hs parser/ParserCoreUtils.hs parser/RdrHsSyn.lhs prelude/ForeignCall.lhs prelude/PrelInfo.lhs prelude/PrelNames.lhs prelude/PrelRules.lhs prelude/PrimOp.lhs prelude/TysPrim.lhs prelude/TysWiredIn.lhs profiling/CostCentre.lhs profiling/SCCfinal.lhs rename/RnBinds.lhs rename/RnEnv.lhs rename/RnExpr.lhs rename/RnHsSyn.lhs rename/RnNames.lhs rename/RnSource.lhs rename/RnTypes.lhs simplCore/CSE.lhs simplCore/FloatIn.lhs simplCore/FloatOut.lhs simplCore/LiberateCase.lhs simplCore/OccurAnal.lhs simplCore/SAT.lhs simplCore/SATMonad.lhs simplCore/SetLevels.lhs simplCore/SimplCore.lhs simplCore/SimplEnv.lhs simplCore/SimplMonad.lhs simplCore/SimplUtils.lhs simplCore/Simplify.lhs simplStg/SRT.lhs simplStg/SimplStg.lhs simplStg/StgStats.lhs specialise/Rules.lhs specialise/SpecConstr.lhs specialise/Specialise.lhs stgSyn/CoreToStg.lhs stgSyn/StgLint.lhs stgSyn/StgSyn.lhs stranal/DmdAnal.lhs stranal/SaAbsInt.lhs stranal/SaLib.lhs stranal/StrictAnal.lhs stranal/WorkWrap.lhs stranal/WwLib.lhs typecheck/Inst.lhs typecheck/TcArrows.lhs typecheck/TcBinds.lhs typecheck/TcClassDcl.lhs typecheck/TcDefaults.lhs typecheck/TcDeriv.lhs typecheck/TcEnv.lhs typecheck/TcExpr.lhs typecheck/TcForeign.lhs typecheck/TcGenDeriv.lhs typecheck/TcHsSyn.lhs typecheck/TcHsType.lhs typecheck/TcInstDcls.lhs typecheck/TcMType.lhs typecheck/TcMatches.lhs typecheck/TcPat.lhs typecheck/TcRnDriver.lhs typecheck/TcRnMonad.lhs typecheck/TcRnTypes.lhs typecheck/TcRules.lhs typecheck/TcSimplify.lhs typecheck/TcTyClsDecls.lhs typecheck/TcTyDecls.lhs typecheck/TcType.lhs typecheck/TcUnify.lhs types/Class.lhs types/FunDeps.lhs types/Generics.lhs types/InstEnv.lhs types/Kind.lhs types/TyCon.lhs types/Type.lhs types/TypeRep.lhs types/Unify.lhs utils/Bag.lhs utils/Binary.hs utils/BitSet.lhs utils/Digraph.lhs utils/FastMutInt.lhs utils/FastString.lhs utils/FastTypes.lhs utils/FiniteMap.lhs utils/IOEnv.hs utils/ListSetOps.lhs utils/Maybes.lhs utils/OrdList.lhs utils/Outputable.lhs utils/Panic.lhs utils/Pretty.lhs utils/PrimPacked.lhs utils/StringBuffer.lhs utils/UnicodeUtil.lhs utils/UniqFM.lhs utils/UniqSet.lhs utils/Util.lhs
247In file included from codeGen/CgCallConv.hs:81:
248./../includes/StgFun.h:49: warning: extra tokens at end of #endif directive
249In file included from codeGen/CgProf.hs:30:
250./../includes/Constants.h:199: warning: extra tokens at end of #endif directive
251In file included from main/Constants.lhs:17:
252./../includes/Constants.h:199: warning: extra tokens at end of #endif directive
253<<ghc: 248954000 bytes, 64 GCs, 534946/952252 avg/max bytes residency (2 samples), 17M in use, 0.01 INIT (0.00 elapsed), 3.97 MUT (34.04 elapsed), 0.01 GC (0.11 elapsed) :ghc>>
254../../glafp-utils/mkdependC/mkdependC -f .depend-BASE -D__GLASGOW_HASKELL__=604 -I../includes    -- -O -Iparser -I. -O    -- parser/hschooks.c
255/usr/bin/perl -pe 'binmode(stdin); binmode(stdout); s@^(\S*\.o)@stage1/$1@g; s@(\S*\.hi)@stage1/$1@g; s@^.*/lib/compat.*$@@g;' <.depend-BASE >.depend-1
256------------------------------------------------------------------------
257==fptools== make boot -wr;
258 in /home/jgoerzen/programs/ghc-6.4.1/ghc/rts
259------------------------------------------------------------------------
260../../glafp-utils/mkdependC/mkdependC -f .depend -I. -I../includes -DPROFILING -DTHREADED_RTS -DDEBUG -Ihooks -Iparallel -I../includes   -s p -s thr -s thr_p -s debug -- -O -Wall  -W -Wstrict-prototypes  -Wmissing-prototypes  -Wmissing-declarations -Winline -Waggregate-return -Wbad-function-cast -I../includes -I. -Iparallel -DCOMPILING_RTS -fomit-frame-pointer    -- Adjustor.c AdjustorAsm.S Arena.c BlockAlloc.c Capability.c ClosureFlags.c Disassembler.c FrontPanel.c GC.c GCCompact.c Hash.c HsFFI.c Interpreter.c Itimer.c LdvProfile.c Linker.c MBlock.c Main.c OSThreads.c Printer.c ProfHeap.c Profiling.c Proftimer.c RetainerProfile.c RetainerSet.c RtsAPI.c RtsFlags.c RtsMessages.c RtsStartup.c RtsUtils.c STM.c Sanity.c Schedule.c Select.c Signals.c Sparks.c Stable.c Stats.c StgCRun.c StgPrimFloat.c Storage.c StrHash.c Task.c ThreadLabels.c Ticky.c Timer.c Weak.c hooks/FlagDefaults.c hooks/InitEachPE.c hooks/MallocFail.c hooks/OnExit.c hooks/OutOfHeap.c hooks/RtsOpts.c hooks/ShutdownEachPEHook.c hooks/StackOverflow.c parallel/0Hash.c parallel/0Unpack.c parallel/Dist.c parallel/Global.c parallel/GranSim.c parallel/HLComms.c parallel/LLComms.c parallel/Pack.c parallel/ParInit.c parallel/ParTicky.c parallel/Parallel.c parallel/ParallelDebug.c parallel/RBH.c
261------------------------------------------------------------------------
262===fptools== Finished making `boot' in includes lib utils driver docs compiler rts ...
263PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc
264------------------------------------------------------------------------
265make[1]: Leaving directory `/home/jgoerzen/programs/ghc-6.4.1/ghc'
266make[1]: Entering directory `/home/jgoerzen/programs/ghc-6.4.1/ghc'
267------------------------------------------------------------------------
268===fptools== Recursively making `all' in includes lib utils driver docs compiler rts ...
269PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc
270------------------------------------------------------------------------
271------------------------------------------------------------------------
272==fptools== make all -wr;
273 in /home/jgoerzen/programs/ghc-6.4.1/ghc/includes
274------------------------------------------------------------------------
275make[2]: Nothing to be done for `all'.
276------------------------------------------------------------------------
277==fptools== make all -wr;
278 in /home/jgoerzen/programs/ghc-6.4.1/ghc/lib
279------------------------------------------------------------------------
280------------------------------------------------------------------------
281===fptools== Recursively making `all' in compat ...
282PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/lib
283------------------------------------------------------------------------
284------------------------------------------------------------------------
285==fptools== make all - --no-print-directory -r;
286 in /home/jgoerzen/programs/ghc-6.4.1/ghc/lib/compat
287------------------------------------------------------------------------
288------------------------------------------------------------------------
289===fptools== Finished making `all' in compat ...
290PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/lib
291------------------------------------------------------------------------
292------------------------------------------------------------------------
293==fptools== make all -wr;
294 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils
295------------------------------------------------------------------------
296------------------------------------------------------------------------
297===fptools== Recursively making `all' in hasktags ghc-pkg hp2ps hsc2hs parallel stat2resid prof unlit genprimopcode genapply runghc ...
298PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/utils
299------------------------------------------------------------------------
300------------------------------------------------------------------------
301==fptools== make all - --no-print-directory -r;
302 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/hasktags
303------------------------------------------------------------------------
304make[3]: Nothing to be done for `all'.
305------------------------------------------------------------------------
306==fptools== make all - --no-print-directory -r;
307 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/ghc-pkg
308------------------------------------------------------------------------
309make INSTALLING=0 BIN_DIST=0 - --no-print-directory -r all
310make[4]: Nothing to be done for `all'.
311------------------------------------------------------------------------
312==fptools== make all - --no-print-directory -r;
313 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/hp2ps
314------------------------------------------------------------------------
315make[3]: Nothing to be done for `all'.
316------------------------------------------------------------------------
317==fptools== make all - --no-print-directory -r;
318 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/hsc2hs
319------------------------------------------------------------------------
320make INSTALLING=0 BIN_DIST=0 - --no-print-directory -r all
321make[4]: Nothing to be done for `all'.
322------------------------------------------------------------------------
323==fptools== make all - --no-print-directory -r;
324 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/parallel
325------------------------------------------------------------------------
326make[3]: Nothing to be done for `all'.
327------------------------------------------------------------------------
328==fptools== make all - --no-print-directory -r;
329 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/stat2resid
330------------------------------------------------------------------------
331make[3]: Nothing to be done for `all'.
332------------------------------------------------------------------------
333==fptools== make all - --no-print-directory -r;
334 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/prof
335------------------------------------------------------------------------
336make INSTALLING=0 BIN_DIST=0 - --no-print-directory -r all
337make[4]: Nothing to be done for `all'.
338------------------------------------------------------------------------
339===fptools== Recursively making `all' in cgprof icons ...
340PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/prof
341------------------------------------------------------------------------
342------------------------------------------------------------------------
343==fptools== make all - --no-print-directory -r;
344 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/prof/cgprof
345------------------------------------------------------------------------
346make[4]: Nothing to be done for `all'.
347------------------------------------------------------------------------
348==fptools== make all - --no-print-directory -r;
349 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/prof/icons
350------------------------------------------------------------------------
351make[4]: Nothing to be done for `all'.
352------------------------------------------------------------------------
353===fptools== Finished making `all' in cgprof icons ...
354PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/prof
355------------------------------------------------------------------------
356------------------------------------------------------------------------
357==fptools== make all - --no-print-directory -r;
358 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/unlit
359------------------------------------------------------------------------
360make[3]: Nothing to be done for `all'.
361------------------------------------------------------------------------
362==fptools== make all - --no-print-directory -r;
363 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/genprimopcode
364------------------------------------------------------------------------
365make[3]: Nothing to be done for `all'.
366------------------------------------------------------------------------
367==fptools== make all - --no-print-directory -r;
368 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/genapply
369------------------------------------------------------------------------
370make[3]: Nothing to be done for `all'.
371------------------------------------------------------------------------
372==fptools== make all - --no-print-directory -r;
373 in /home/jgoerzen/programs/ghc-6.4.1/ghc/utils/runghc
374------------------------------------------------------------------------
375make[3]: Nothing to be done for `all'.
376------------------------------------------------------------------------
377===fptools== Finished making `all' in hasktags ghc-pkg hp2ps hsc2hs parallel stat2resid prof unlit genprimopcode genapply runghc ...
378PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/utils
379------------------------------------------------------------------------
380------------------------------------------------------------------------
381==fptools== make all -wr;
382 in /home/jgoerzen/programs/ghc-6.4.1/ghc/driver
383------------------------------------------------------------------------
384------------------------------------------------------------------------
385===fptools== Recursively making `all' in mangler split ghc ghci ...
386PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/driver
387------------------------------------------------------------------------
388------------------------------------------------------------------------
389==fptools== make all - --no-print-directory -r;
390 in /home/jgoerzen/programs/ghc-6.4.1/ghc/driver/mangler
391------------------------------------------------------------------------
392make[3]: Nothing to be done for `all'.
393------------------------------------------------------------------------
394==fptools== make all - --no-print-directory -r;
395 in /home/jgoerzen/programs/ghc-6.4.1/ghc/driver/split
396------------------------------------------------------------------------
397make[3]: Nothing to be done for `all'.
398------------------------------------------------------------------------
399==fptools== make all - --no-print-directory -r;
400 in /home/jgoerzen/programs/ghc-6.4.1/ghc/driver/ghc
401------------------------------------------------------------------------
402make[3]: Nothing to be done for `all'.
403------------------------------------------------------------------------
404==fptools== make all - --no-print-directory -r;
405 in /home/jgoerzen/programs/ghc-6.4.1/ghc/driver/ghci
406------------------------------------------------------------------------
407make INSTALLING=0 BIN_DIST=0 - --no-print-directory -r all
408make[4]: Nothing to be done for `all'.
409------------------------------------------------------------------------
410===fptools== Finished making `all' in mangler split ghc ghci ...
411PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/driver
412------------------------------------------------------------------------
413------------------------------------------------------------------------
414==fptools== make all -wr;
415 in /home/jgoerzen/programs/ghc-6.4.1/ghc/docs
416------------------------------------------------------------------------
417------------------------------------------------------------------------
418===fptools== Recursively making `all' in users_guide ext-core storage-mgt ...
419PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/docs
420------------------------------------------------------------------------
421------------------------------------------------------------------------
422==fptools== make all - --no-print-directory -r;
423 in /home/jgoerzen/programs/ghc-6.4.1/ghc/docs/users_guide
424------------------------------------------------------------------------
425make[3]: Nothing to be done for `all'.
426------------------------------------------------------------------------
427==fptools== make all - --no-print-directory -r;
428 in /home/jgoerzen/programs/ghc-6.4.1/ghc/docs/ext-core
429------------------------------------------------------------------------
430make[3]: Nothing to be done for `all'.
431------------------------------------------------------------------------
432==fptools== make all - --no-print-directory -r;
433 in /home/jgoerzen/programs/ghc-6.4.1/ghc/docs/storage-mgt
434------------------------------------------------------------------------
435make[3]: Nothing to be done for `all'.
436------------------------------------------------------------------------
437===fptools== Finished making `all' in users_guide ext-core storage-mgt ...
438PWD = /home/jgoerzen/programs/ghc-6.4.1/ghc/docs
439------------------------------------------------------------------------
440------------------------------------------------------------------------
441==fptools== make all -wr;
442 in /home/jgoerzen/programs/ghc-6.4.1/ghc/compiler
443------------------------------------------------------------------------
444/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c cmm/CmmParse.hs -o stage1/cmm/CmmParse.o  -ohi stage1/cmm/CmmParse.hi
445Bad eta expand
446    (__coerce CmmParse.HappyAbsSyn {- tc rjd -}
447     (zgzg {- v ajrb -}
448        @ ()
449        @ ()
450        (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
451        (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})))
452      eta_slj6
453    ()
454Bad eta expand
455    (__coerce CmmParse.HappyAbsSyn {- tc rjd -}
456     (zgzgze {- v ajqM -}
457        @ Cmm.CmmExpr {- tc r2Fz -}
458        @ [Cmm.CmmStatic {- tc r2FC -}]
459        (__coerce
460           (CmmParse.ExtFCode {- tc rj8 -} Cmm.CmmExpr {- tc r2Fz -})
461         happyzuxzu2 {- v a1GQ -})
462        lvl_skTO))
463      eta_sljw
464    ()
465Bad eta expand
466    (__coerce CmmParse.HappyAbsSyn {- tc rjd -}
467     (zgzgze {- v ajqM -}
468        @ (CLabel.CLabel {- tc r2FZ -},
469           [Cmm.CmmLit {- tc r2FA -}],
470           [Cmm.CmmLit {- tc r2FA -}])
471        @ ()
472        (__coerce
473           (CmmParse.ExtFCode {- tc rj8 -}
474                (CLabel.CLabel {- tc r2FZ -},
475                 [Cmm.CmmLit {- tc r2FA -}],
476                 [Cmm.CmmLit {- tc r2FA -}]))
477         happyzuxzu1 {- v a1JR -})
478        lvl_skTX))
479      eta_sljZ
480    ()
481Bad eta expand
482    (__coerce CmmParse.HappyAbsSyn {- tc rjd -}
483     (zgzg {- v ajrb -}
484        @ ()
485        @ ()
486        (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
487        (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})))
488      eta_slkm
489    ()
490Bad eta expand
491    (__coerce CmmParse.HappyAbsSyn {- tc rjd -}
492     (zgzg {- v ajrb -}
493        @ ()
494        @ ()
495        (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
496        (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})))
497      eta_slko
498    ()
499Bad eta expand
500    lvl_skUx eta_slkv
501    ()
502Bad eta expand
503    lvl_skUy eta_slky
504    ()
505Bad eta expand
506    (__coerce CmmParse.HappyAbsSyn {- tc rjd -}
507     CmmParse.nopEC {- v r1vS -})
508      eta_slkD
509    ()
510Bad eta expand
511    (__coerce CmmParse.HappyAbsSyn {- tc rjd -}
512     (CmmParse.code {- v r1vO -}
513        @ ()
514        (CgMonad.labelC {- v r1Qq -}
515           (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu1 {- v a1Ql -}))))
516      eta_slkF
517    ()
518Bad eta expand
519    (let {
520       stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
521       stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
522                             (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
523     } in
524       __coerce CmmParse.HappyAbsSyn {- tc rjd -}
525       (\ eta_sl0f T :: CmmParse.Env {- tc rjb -}
526          eta_sl0g T :: CmmParse.Decls {- tc rjc -}
527          eta_sl0h T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
528          eta_sl0i T :: CgMonad.CgState {- tc r2D2 -} ->
529          let {
530            a_slfp T :: CgMonad.CgState {- tc r2D2 -}
531            a_slfp = case eta_sl0i
532                     of wild {- v aaN4 -} T { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} T ds1 {- v aaNf -} T ds2 {- v aaNe -} T ds3 {- v aaNd -} T ds4 {- v aaNc -} T ds5 {- v aaNb -} T ->
533                     CgMonad.MkCgState {- v r3Xg -}
534                       (OrdList.Two {- v r6p9 -}
535                          @ CgMonad.CgStmt {- tc r3XG -}
536                          ds {- v aaNh -}
537                          (OrdList.One {- v r6pb -}
538                             @ CgMonad.CgStmt {- tc r3XG -}
539                             (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
540                       ds1 {- v aaNf -}
541                       ds2 {- v aaNe -}
542                       ds3 {- v aaNd -}
543                       ds4 {- v aaNc -}
544                       ds5 {- v aaNb -}
545                     } } in
546          let {
547            ds1 {- v aaLw -} T :: ((), CgMonad.CgState {- tc r2D2 -})
548            ds1 {- v aaLw -} = (GHCziBase.Z0T {- v 71 -}, a_slfp)
549          } in  ((eta_sl0g, GHCziBase.Z0T {- v 71 -}), a_slfp)))
550      eta_sllA
551    ()
552Bad eta expand
553    (__coerce CmmParse.HappyAbsSyn {- tc rjd -}
554     (zgzgze {- v ajqM -}
555        @ Cmm.CmmExpr {- tc r2Fz -}
556        @ ()
557        (__coerce
558           (CmmParse.ExtFCode {- tc rj8 -} Cmm.CmmExpr {- tc r2Fz -})
559         happyzuxzu2 {- v a1UO -})
560        lvl_skUR))
561      eta_sllD
562    ()
563Bad eta expand
564    (__coerce CmmParse.HappyAbsSyn {- tc rjd -}
565     (zgzgze {- v ajqM -}
566        @ Cmm.CmmExpr {- tc r2Fz -}
567        @ CmmParse.BoolExpr {- tc rj2 -}
568        (__coerce
569           (CmmParse.ExtFCode {- tc rj8 -} Cmm.CmmExpr {- tc r2Fz -})
570         happyzuxzu1 {- v a1VE -})
571        lvl_skUW))
572      eta_sllO
573    ()
574Bad eta expand
575    (__coerce CmmParse.HappyAbsSyn {- tc rjd -}
576     (zgzgze {- v ajqM -}
577        @ CmmParse.BoolExpr {- tc rj2 -}
578        @ CmmParse.BoolExpr {- tc rj2 -}
579        (__coerce
580           (CmmParse.ExtFCode {- tc rj8 -} CmmParse.BoolExpr {- tc rj2 -})
581         happyzuxzu1 {- v a1VU -})
582        (\ e1 {- v a1W5 -} T :: CmmParse.BoolExpr {- tc rj2 -}
583           eta_slgd T :: CmmParse.Env {- tc rjb -}
584           eta_slge T :: CmmParse.Decls {- tc rjc -} ->
585           let {
586             k {- v a2mw -} T :: CmmParse.BoolExpr {- tc rj2 -}
587                                 -> CmmParse.ExtFCode {- tc rj8 -} CmmParse.BoolExpr {- tc rj2 -}
588             Arity 5
589             k {- v a2mw -} = \ e2 {- v a1W8 -} T :: CmmParse.BoolExpr {- tc rj2 -}
590                                eta_slgf T :: CmmParse.Env {- tc rjb -}
591                                eta_slgg T :: CmmParse.Decls {- tc rjc -}
592                                eta_slgh T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
593                                eta_slgi T :: CgMonad.CgState {- tc r2D2 -} ->
594                                let {
595                                  a {- v X2BW -} T :: CmmParse.BoolExpr {- tc rj2 -}
596                                  a {- v X2BW -} = CmmParse.BoolAnd {- v rfR8 -}
597                                                     e1 {- v a1W5 -} e2 {- v a1W8 -}
598                                } in  ((eta_slgg, a {- v X2BW -}), eta_slgi) } in
599           let {
600             ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
601                                      (CmmParse.Decls {- tc rjc -}, CmmParse.BoolExpr {- tc rj2 -})
602             ds {- v aaLE -} = (__coerce
603                                  (CmmParse.Decls {- tc rjc -}
604                                   -> CgMonad.FCode {- tc r2D7 -}
605                                          (CmmParse.Decls {- tc rjc -},
606                                           CmmParse.BoolExpr {- tc rj2 -}))
607                                (happyzuxzu3 {- v a1VS -} (__coerce () eta_slgd)))
608                                 eta_slge
609           } in
610             \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
611               state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
612               case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
613               of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
614               case mzuresult {- v aaLz -}
615               of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
616               ((szq {- v a2mE -},
617                 (CmmParse.BoolAnd {- v rfR8 -} e1 {- v a1W5 -} r {- v a2mF -})),
618                newzustate {- v aaLA -})
619               }
620               })))
621      eta_sllS
622    ()
623Bad eta expand
624    (__coerce CmmParse.HappyAbsSyn {- tc rjd -}
625     (zgzgze {- v ajqM -}
626        @ CmmParse.BoolExpr {- tc rj2 -}
627        @ CmmParse.BoolExpr {- tc rj2 -}
628        (__coerce
629           (CmmParse.ExtFCode {- tc rj8 -} CmmParse.BoolExpr {- tc rj2 -})
630         happyzuxzu1 {- v a1Wh -})
631        (\ e1 {- v a1Ws -} T :: CmmParse.BoolExpr {- tc rj2 -}
632           eta_slgq T :: CmmParse.Env {- tc rjb -}
633           eta_slgr T :: CmmParse.Decls {- tc rjc -} ->
634           let {
635             k {- v a2mw -} T :: CmmParse.BoolExpr {- tc rj2 -}
636                                 -> CmmParse.ExtFCode {- tc rj8 -} CmmParse.BoolExpr {- tc rj2 -}
637             Arity 5
638             k {- v a2mw -} = \ e2 {- v a1Wv -} T :: CmmParse.BoolExpr {- tc rj2 -}
639                                eta_slgs T :: CmmParse.Env {- tc rjb -}
640                                eta_slgt T :: CmmParse.Decls {- tc rjc -}
641                                eta_slgu T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
642                                eta_slgv T :: CgMonad.CgState {- tc r2D2 -} ->
643                                let {
644                                  a {- v X2BW -} T :: CmmParse.BoolExpr {- tc rj2 -}
645                                  a {- v X2BW -} = CmmParse.BoolOr {- v rfRb -}
646                                                     e1 {- v a1Ws -} e2 {- v a1Wv -}
647                                } in  ((eta_slgt, a {- v X2BW -}), eta_slgv) } in
648           let {
649             ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
650                                      (CmmParse.Decls {- tc rjc -}, CmmParse.BoolExpr {- tc rj2 -})
651             ds {- v aaLE -} = (__coerce
652                                  (CmmParse.Decls {- tc rjc -}
653                                   -> CgMonad.FCode {- tc r2D7 -}
654                                          (CmmParse.Decls {- tc rjc -},
655                                           CmmParse.BoolExpr {- tc rj2 -}))
656                                (happyzuxzu3 {- v a1Wf -} (__coerce () eta_slgq)))
657                                 eta_slgr
658           } in
659             \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
660               state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
661               case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
662               of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
663               case mzuresult {- v aaLz -}
664               of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
665               ((szq {- v a2mE -},
666                 (CmmParse.BoolOr {- v rfRb -} e1 {- v a1Ws -} r {- v a2mF -})),
667                newzustate {- v aaLA -})
668               }
669               })))
670      eta_sllZ
671    ()
672Bad eta expand
673    (__coerce CmmParse.HappyAbsSyn {- tc rjd -}
674     (zgzgze {- v ajqM -}
675        @ CmmParse.BoolExpr {- tc rj2 -}
676        @ CmmParse.BoolExpr {- tc rj2 -}
677        (__coerce
678           (CmmParse.ExtFCode {- tc rj8 -} CmmParse.BoolExpr {- tc rj2 -})
679         happyzuxzu2 {- v a1WC -})
680        lvl_skUX))
681      eta_slm6
682    ()
683Bad eta expand
684    (__coerce CmmParse.HappyAbsSyn {- tc rjd -}
685     (zgzgze {- v ajqM -}
686        @ Cmm.CmmExpr {- tc r2Fz -}
687        @ (Cmm.CmmExpr {- tc r2Fz -}, MachOp.MachHint {- tc r2Ha -})
688        (__coerce
689           (CmmParse.ExtFCode {- tc rj8 -} Cmm.CmmExpr {- tc r2Fz -})
690         happyzuxzu1 {- v a28Q -})
691        lvl_skVc))
692      eta_sln8
693    ()
694Bad eta expand
695    __coerce ()
696    (zgzg {- v ajrb -}
697       @ ()
698       @ ()
699       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
700       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
701       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
702    ()
703Bad eta expand
704    __coerce ()
705    (zgzg {- v ajrb -}
706       @ ()
707       @ ()
708       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
709       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
710       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
711    ()
712Bad eta expand
713    __coerce ()
714    (zgzg {- v ajrb -}
715       @ ()
716       @ ()
717       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
718       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
719       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
720    ()
721Bad eta expand
722    __coerce ()
723    (CmmParse.code {- v r1vO -}
724       @ ()
725       CgMonad.nopC {- v r2o4 -}
726       (__coerce CmmParse.Env {- tc rjb -} eta_slkD))
727    ()
728Bad eta expand
729    __coerce ()
730    (CmmParse.code {- v r1vO -}
731       @ ()
732       (CgMonad.labelC {- v r1Qq -}
733          (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu1 {- v a1Ql -}))
734       (__coerce CmmParse.Env {- tc rjb -} eta_slkF))
735    ()
736Bad eta expand
737    let {
738      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
739      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
740                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
741    } in
742      __coerce ()
743      (\ eta_sl0g T :: CmmParse.Decls {- tc rjc -}
744         eta_sl0h T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
745         eta_sl0i T :: CgMonad.CgState {- tc r2D2 -} ->
746         let {
747           a_slfp T :: CgMonad.CgState {- tc r2D2 -}
748           a_slfp = case eta_sl0i
749                    of wild {- v aaN4 -} T { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} T ds1 {- v aaNf -} T ds2 {- v aaNe -} T ds3 {- v aaNd -} T ds4 {- v aaNc -} T ds5 {- v aaNb -} T ->
750                    CgMonad.MkCgState {- v r3Xg -}
751                      (OrdList.Two {- v r6p9 -}
752                         @ CgMonad.CgStmt {- tc r3XG -}
753                         ds {- v aaNh -}
754                         (OrdList.One {- v r6pb -}
755                            @ CgMonad.CgStmt {- tc r3XG -}
756                            (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
757                      ds1 {- v aaNf -}
758                      ds2 {- v aaNe -}
759                      ds3 {- v aaNd -}
760                      ds4 {- v aaNc -}
761                      ds5 {- v aaNb -}
762                    } } in
763         let {
764           ds1 {- v aaLw -} T :: ((), CgMonad.CgState {- tc r2D2 -})
765           ds1 {- v aaLw -} = (GHCziBase.Z0T {- v 71 -}, a_slfp)
766         } in  ((eta_sl0g, GHCziBase.Z0T {- v 71 -}), a_slfp))
767    ()
768Bad eta expand
769    let {
770      k {- v a2mw -} T :: CmmParse.BoolExpr {- tc rj2 -}
771                          -> CmmParse.ExtFCode {- tc rj8 -} CmmParse.BoolExpr {- tc rj2 -}
772      Arity 3
773      k {- v a2mw -} = \ e1 {- v a1W5 -} T :: CmmParse.BoolExpr {- tc rj2 -}
774                         eta_slgd T :: CmmParse.Env {- tc rjb -}
775                         eta_slge T :: CmmParse.Decls {- tc rjc -} ->
776                         let {
777                           k {- v a2mw -} T :: CmmParse.BoolExpr {- tc rj2 -}
778                                               -> CmmParse.ExtFCode {- tc rj8 -}
779                                                      CmmParse.BoolExpr {- tc rj2 -}
780                           Arity 5
781                           k {- v a2mw -} = \ e2 {- v a1W8 -} T :: CmmParse.BoolExpr {- tc rj2 -}
782                                              eta_slgf T :: CmmParse.Env {- tc rjb -}
783                                              eta_slgg T :: CmmParse.Decls {- tc rjc -}
784                                              eta_slgh T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
785                                              eta_slgi T :: CgMonad.CgState {- tc r2D2 -} ->
786                                              let {
787                                                a {- v X2BW -} T :: CmmParse.BoolExpr {- tc rj2 -}
788                                                a {- v X2BW -} = CmmParse.BoolAnd {- v rfR8 -}
789                                                                   e1 {- v a1W5 -} e2 {- v a1W8 -}
790                                              } in  ((eta_slgg, a {- v X2BW -}), eta_slgi) } in
791                         let {
792                           ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
793                                                    (CmmParse.Decls {- tc rjc -},
794                                                     CmmParse.BoolExpr {- tc rj2 -})
795                           ds {- v aaLE -} = (__coerce
796                                                (CmmParse.Decls {- tc rjc -}
797                                                 -> CgMonad.FCode {- tc r2D7 -}
798                                                        (CmmParse.Decls {- tc rjc -},
799                                                         CmmParse.BoolExpr {- tc rj2 -}))
800                                              (happyzuxzu3 {- v a1VS -} (__coerce () eta_slgd)))
801                                               eta_slge
802                         } in
803                           \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
804                             state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
805                             case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
806                             of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
807                             case mzuresult {- v aaLz -}
808                             of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
809                             ((szq {- v a2mE -},
810                               (CmmParse.BoolAnd {- v rfR8 -} e1 {- v a1W5 -} r {- v a2mF -})),
811                              newzustate {- v aaLA -})
812                             }
813                             }
814    } in
815      __coerce ()
816      (\ s {- v a2mB -} T :: CmmParse.Decls {- tc rjc -} ->
817         let {
818           ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
819                                    (CmmParse.Decls {- tc rjc -}, CmmParse.BoolExpr {- tc rj2 -})
820           ds {- v aaLE -} = (__coerce
821                                (CmmParse.Decls {- tc rjc -}
822                                 -> CgMonad.FCode {- tc r2D7 -}
823                                        (CmmParse.Decls {- tc rjc -},
824                                         CmmParse.BoolExpr {- tc rj2 -}))
825                              (happyzuxzu1 {- v a1VU -} eta_sllS))
826                               s {- v a2mB -}
827         } in
828           \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
829             state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
830             case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
831             of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
832             case mzuresult {- v aaLz -}
833             of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
834             k {- v a2mw -}
835               r {- v a2mF -}
836               (__coerce CmmParse.Env {- tc rjb -} eta_sllS)
837               szq {- v a2mE -}
838               infozudown {- v aaLx -}
839               newzustate {- v aaLA -}
840             }
841             })
842    ()
843Bad eta expand
844    let {
845      k {- v a2mw -} T :: CmmParse.BoolExpr {- tc rj2 -}
846                          -> CmmParse.ExtFCode {- tc rj8 -} CmmParse.BoolExpr {- tc rj2 -}
847      Arity 3
848      k {- v a2mw -} = \ e1 {- v a1Ws -} T :: CmmParse.BoolExpr {- tc rj2 -}
849                         eta_slgq T :: CmmParse.Env {- tc rjb -}
850                         eta_slgr T :: CmmParse.Decls {- tc rjc -} ->
851                         let {
852                           k {- v a2mw -} T :: CmmParse.BoolExpr {- tc rj2 -}
853                                               -> CmmParse.ExtFCode {- tc rj8 -}
854                                                      CmmParse.BoolExpr {- tc rj2 -}
855                           Arity 5
856                           k {- v a2mw -} = \ e2 {- v a1Wv -} T :: CmmParse.BoolExpr {- tc rj2 -}
857                                              eta_slgs T :: CmmParse.Env {- tc rjb -}
858                                              eta_slgt T :: CmmParse.Decls {- tc rjc -}
859                                              eta_slgu T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
860                                              eta_slgv T :: CgMonad.CgState {- tc r2D2 -} ->
861                                              let {
862                                                a {- v X2BW -} T :: CmmParse.BoolExpr {- tc rj2 -}
863                                                a {- v X2BW -} = CmmParse.BoolOr {- v rfRb -}
864                                                                   e1 {- v a1Ws -} e2 {- v a1Wv -}
865                                              } in  ((eta_slgt, a {- v X2BW -}), eta_slgv) } in
866                         let {
867                           ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
868                                                    (CmmParse.Decls {- tc rjc -},
869                                                     CmmParse.BoolExpr {- tc rj2 -})
870                           ds {- v aaLE -} = (__coerce
871                                                (CmmParse.Decls {- tc rjc -}
872                                                 -> CgMonad.FCode {- tc r2D7 -}
873                                                        (CmmParse.Decls {- tc rjc -},
874                                                         CmmParse.BoolExpr {- tc rj2 -}))
875                                              (happyzuxzu3 {- v a1Wf -} (__coerce () eta_slgq)))
876                                               eta_slgr
877                         } in
878                           \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
879                             state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
880                             case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
881                             of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
882                             case mzuresult {- v aaLz -}
883                             of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
884                             ((szq {- v a2mE -},
885                               (CmmParse.BoolOr {- v rfRb -} e1 {- v a1Ws -} r {- v a2mF -})),
886                              newzustate {- v aaLA -})
887                             }
888                             }
889    } in
890      __coerce ()
891      (\ s {- v a2mB -} T :: CmmParse.Decls {- tc rjc -} ->
892         let {
893           ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
894                                    (CmmParse.Decls {- tc rjc -}, CmmParse.BoolExpr {- tc rj2 -})
895           ds {- v aaLE -} = (__coerce
896                                (CmmParse.Decls {- tc rjc -}
897                                 -> CgMonad.FCode {- tc r2D7 -}
898                                        (CmmParse.Decls {- tc rjc -},
899                                         CmmParse.BoolExpr {- tc rj2 -}))
900                              (happyzuxzu1 {- v a1Wh -} eta_sllZ))
901                               s {- v a2mB -}
902         } in
903           \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
904             state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
905             case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
906             of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
907             case mzuresult {- v aaLz -}
908             of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
909             k {- v a2mw -}
910               r {- v a2mF -}
911               (__coerce CmmParse.Env {- tc rjb -} eta_sllZ)
912               szq {- v a2mE -}
913               infozudown {- v aaLx -}
914               newzustate {- v aaLA -}
915             }
916             })
917    ()
918Bad eta expand
919    __coerce ()
920    (zgzg {- v ajrb -}
921       @ ()
922       @ ()
923       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
924       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
925       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
926    ()
927Bad eta expand
928    __coerce ()
929    (zgzg {- v ajrb -}
930       @ ()
931       @ ()
932       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
933       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
934       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
935    ()
936Bad eta expand
937    __coerce ()
938    (zgzg {- v ajrb -}
939       @ ()
940       @ ()
941       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
942       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
943       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
944    ()
945Bad eta expand
946    __coerce ()
947    (CmmParse.code {- v r1vO -}
948       @ ()
949       CgMonad.nopC {- v r2o4 -}
950       (__coerce CmmParse.Env {- tc rjb -} eta_slkD))
951    ()
952Bad eta expand
953    __coerce ()
954    (CmmParse.code {- v r1vO -}
955       @ ()
956       (CgMonad.labelC {- v r1Qq -}
957          (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu1 {- v a1Ql -}))
958       (__coerce CmmParse.Env {- tc rjb -} eta_slkF))
959    ()
960Bad eta expand
961    let {
962      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
963      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
964                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
965    } in
966      __coerce ()
967      (\ eta_sl0g T :: CmmParse.Decls {- tc rjc -}
968         eta_sl0h T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
969         eta_sl0i T :: CgMonad.CgState {- tc r2D2 -} ->
970         let {
971           a_slfp T :: CgMonad.CgState {- tc r2D2 -}
972           a_slfp = case eta_sl0i
973                    of wild {- v aaN4 -} T { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} T ds1 {- v aaNf -} T ds2 {- v aaNe -} T ds3 {- v aaNd -} T ds4 {- v aaNc -} T ds5 {- v aaNb -} T ->
974                    CgMonad.MkCgState {- v r3Xg -}
975                      (OrdList.Two {- v r6p9 -}
976                         @ CgMonad.CgStmt {- tc r3XG -}
977                         ds {- v aaNh -}
978                         (OrdList.One {- v r6pb -}
979                            @ CgMonad.CgStmt {- tc r3XG -}
980                            (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
981                      ds1 {- v aaNf -}
982                      ds2 {- v aaNe -}
983                      ds3 {- v aaNd -}
984                      ds4 {- v aaNc -}
985                      ds5 {- v aaNb -}
986                    } } in
987         let {
988           ds1 {- v aaLw -} T :: ((), CgMonad.CgState {- tc r2D2 -})
989           ds1 {- v aaLw -} = (GHCziBase.Z0T {- v 71 -}, a_slfp)
990         } in  ((eta_sl0g, GHCziBase.Z0T {- v 71 -}), a_slfp))
991    ()
992Bad eta expand
993    let {
994      k {- v a2mw -} T :: CmmParse.BoolExpr {- tc rj2 -}
995                          -> CmmParse.ExtFCode {- tc rj8 -} CmmParse.BoolExpr {- tc rj2 -}
996      Arity 3
997      k {- v a2mw -} = \ e1 {- v a1W5 -} T :: CmmParse.BoolExpr {- tc rj2 -}
998                         eta_slgd T :: CmmParse.Env {- tc rjb -}
999                         eta_slge T :: CmmParse.Decls {- tc rjc -} ->
1000                         let {
1001                           k {- v X2Cl -} T :: CmmParse.BoolExpr {- tc rj2 -}
1002                                               -> CmmParse.ExtFCode {- tc rj8 -}
1003                                                      CmmParse.BoolExpr {- tc rj2 -}
1004                           Arity 5
1005                           k {- v X2Cl -} = \ e2 {- v a1W8 -} T :: CmmParse.BoolExpr {- tc rj2 -}
1006                                              eta_slgf T :: CmmParse.Env {- tc rjb -}
1007                                              eta_slgg T :: CmmParse.Decls {- tc rjc -}
1008                                              eta_slgh T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1009                                              eta_slgi T :: CgMonad.CgState {- tc r2D2 -} ->
1010                                              let {
1011                                                a {- v X2BW -} T :: CmmParse.BoolExpr {- tc rj2 -}
1012                                                a {- v X2BW -} = CmmParse.BoolAnd {- v rfR8 -}
1013                                                                   e1 {- v a1W5 -} e2 {- v a1W8 -}
1014                                              } in  ((eta_slgg, a {- v X2BW -}), eta_slgi) } in
1015                         let {
1016                           ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
1017                                                    (CmmParse.Decls {- tc rjc -},
1018                                                     CmmParse.BoolExpr {- tc rj2 -})
1019                           ds {- v aaLE -} = (__coerce
1020                                                (CmmParse.Decls {- tc rjc -}
1021                                                 -> CgMonad.FCode {- tc r2D7 -}
1022                                                        (CmmParse.Decls {- tc rjc -},
1023                                                         CmmParse.BoolExpr {- tc rj2 -}))
1024                                              (happyzuxzu3 {- v a1VS -} (__coerce () eta_slgd)))
1025                                               eta_slge
1026                         } in
1027                           \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1028                             state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
1029                             case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
1030                             of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
1031                             case mzuresult {- v aaLz -}
1032                             of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
1033                             ((szq {- v a2mE -},
1034                               (CmmParse.BoolAnd {- v rfR8 -} e1 {- v a1W5 -} r {- v a2mF -})),
1035                              newzustate {- v aaLA -})
1036                             }
1037                             }
1038    } in
1039      __coerce ()
1040      (\ s {- v a2mB -} T :: CmmParse.Decls {- tc rjc -} ->
1041         let {
1042           ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
1043                                    (CmmParse.Decls {- tc rjc -}, CmmParse.BoolExpr {- tc rj2 -})
1044           ds {- v aaLE -} = (__coerce
1045                                (CmmParse.Decls {- tc rjc -}
1046                                 -> CgMonad.FCode {- tc r2D7 -}
1047                                        (CmmParse.Decls {- tc rjc -},
1048                                         CmmParse.BoolExpr {- tc rj2 -}))
1049                              (happyzuxzu1 {- v a1VU -} eta_sllS))
1050                               s {- v a2mB -}
1051         } in
1052           \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1053             state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
1054             case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
1055             of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
1056             case mzuresult {- v aaLz -}
1057             of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
1058             k {- v a2mw -}
1059               r {- v a2mF -}
1060               (__coerce CmmParse.Env {- tc rjb -} eta_sllS)
1061               szq {- v a2mE -}
1062               infozudown {- v aaLx -}
1063               newzustate {- v aaLA -}
1064             }
1065             })
1066    ()
1067Bad eta expand
1068    let {
1069      k {- v a2mw -} T :: CmmParse.BoolExpr {- tc rj2 -}
1070                          -> CmmParse.ExtFCode {- tc rj8 -} CmmParse.BoolExpr {- tc rj2 -}
1071      Arity 3
1072      k {- v a2mw -} = \ e1 {- v a1Ws -} T :: CmmParse.BoolExpr {- tc rj2 -}
1073                         eta_slgq T :: CmmParse.Env {- tc rjb -}
1074                         eta_slgr T :: CmmParse.Decls {- tc rjc -} ->
1075                         let {
1076                           k {- v X2Cl -} T :: CmmParse.BoolExpr {- tc rj2 -}
1077                                               -> CmmParse.ExtFCode {- tc rj8 -}
1078                                                      CmmParse.BoolExpr {- tc rj2 -}
1079                           Arity 5
1080                           k {- v X2Cl -} = \ e2 {- v a1Wv -} T :: CmmParse.BoolExpr {- tc rj2 -}
1081                                              eta_slgs T :: CmmParse.Env {- tc rjb -}
1082                                              eta_slgt T :: CmmParse.Decls {- tc rjc -}
1083                                              eta_slgu T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1084                                              eta_slgv T :: CgMonad.CgState {- tc r2D2 -} ->
1085                                              let {
1086                                                a {- v X2BW -} T :: CmmParse.BoolExpr {- tc rj2 -}
1087                                                a {- v X2BW -} = CmmParse.BoolOr {- v rfRb -}
1088                                                                   e1 {- v a1Ws -} e2 {- v a1Wv -}
1089                                              } in  ((eta_slgt, a {- v X2BW -}), eta_slgv) } in
1090                         let {
1091                           ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
1092                                                    (CmmParse.Decls {- tc rjc -},
1093                                                     CmmParse.BoolExpr {- tc rj2 -})
1094                           ds {- v aaLE -} = (__coerce
1095                                                (CmmParse.Decls {- tc rjc -}
1096                                                 -> CgMonad.FCode {- tc r2D7 -}
1097                                                        (CmmParse.Decls {- tc rjc -},
1098                                                         CmmParse.BoolExpr {- tc rj2 -}))
1099                                              (happyzuxzu3 {- v a1Wf -} (__coerce () eta_slgq)))
1100                                               eta_slgr
1101                         } in
1102                           \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1103                             state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
1104                             case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
1105                             of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
1106                             case mzuresult {- v aaLz -}
1107                             of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
1108                             ((szq {- v a2mE -},
1109                               (CmmParse.BoolOr {- v rfRb -} e1 {- v a1Ws -} r {- v a2mF -})),
1110                              newzustate {- v aaLA -})
1111                             }
1112                             }
1113    } in
1114      __coerce ()
1115      (\ s {- v a2mB -} T :: CmmParse.Decls {- tc rjc -} ->
1116         let {
1117           ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
1118                                    (CmmParse.Decls {- tc rjc -}, CmmParse.BoolExpr {- tc rj2 -})
1119           ds {- v aaLE -} = (__coerce
1120                                (CmmParse.Decls {- tc rjc -}
1121                                 -> CgMonad.FCode {- tc r2D7 -}
1122                                        (CmmParse.Decls {- tc rjc -},
1123                                         CmmParse.BoolExpr {- tc rj2 -}))
1124                              (happyzuxzu1 {- v a1Wh -} eta_sllZ))
1125                               s {- v a2mB -}
1126         } in
1127           \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1128             state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
1129             case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
1130             of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
1131             case mzuresult {- v aaLz -}
1132             of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
1133             k {- v a2mw -}
1134               r {- v a2mF -}
1135               (__coerce CmmParse.Env {- tc rjb -} eta_sllZ)
1136               szq {- v a2mE -}
1137               infozudown {- v aaLx -}
1138               newzustate {- v aaLA -}
1139             }
1140             })
1141    ()
1142Bad eta expand
1143    let {
1144      k {- v a2mw -} T :: CmmParse.BoolExpr {- tc rj2 -}
1145                          -> CmmParse.ExtFCode {- tc rj8 -} CmmParse.BoolExpr {- tc rj2 -}
1146      Arity 3
1147      k {- v a2mw -} = \ e1 {- v a1Ws -} T :: CmmParse.BoolExpr {- tc rj2 -}
1148                         eta_slgq T :: CmmParse.Env {- tc rjb -}
1149                         eta_slgr T :: CmmParse.Decls {- tc rjc -} ->
1150                         let {
1151                           ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
1152                                                    (CmmParse.Decls {- tc rjc -},
1153                                                     CmmParse.BoolExpr {- tc rj2 -})
1154                           ds {- v aaLE -} = (__coerce
1155                                                (CmmParse.Decls {- tc rjc -}
1156                                                 -> CgMonad.FCode {- tc r2D7 -}
1157                                                        (CmmParse.Decls {- tc rjc -},
1158                                                         CmmParse.BoolExpr {- tc rj2 -}))
1159                                              (happyzuxzu3 {- v a1Wf -} (__coerce () eta_slgq)))
1160                                               eta_slgr
1161                         } in
1162                           \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1163                             state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
1164                             case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
1165                             of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
1166                             case mzuresult {- v aaLz -}
1167                             of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
1168                             ((szq {- v a2mE -},
1169                               (CmmParse.BoolOr {- v rfRb -} e1 {- v a1Ws -} r {- v a2mF -})),
1170                              newzustate {- v aaLA -})
1171                             }
1172                             }
1173    } in
1174      __coerce ()
1175      (\ s {- v a2mB -} T :: CmmParse.Decls {- tc rjc -} ->
1176         let {
1177           ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
1178                                    (CmmParse.Decls {- tc rjc -}, CmmParse.BoolExpr {- tc rj2 -})
1179           ds {- v aaLE -} = (__coerce
1180                                (CmmParse.Decls {- tc rjc -}
1181                                 -> CgMonad.FCode {- tc r2D7 -}
1182                                        (CmmParse.Decls {- tc rjc -},
1183                                         CmmParse.BoolExpr {- tc rj2 -}))
1184                              (happyzuxzu1 {- v a1Wh -} eta_sllZ))
1185                               s {- v a2mB -}
1186         } in
1187           \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1188             state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
1189             case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
1190             of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
1191             case mzuresult {- v aaLz -}
1192             of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
1193             let {
1194               ds {- v XaVA -} T :: CgMonad.FCode {- tc r2D7 -}
1195                                        (CmmParse.Decls {- tc rjc -},
1196                                         CmmParse.BoolExpr {- tc rj2 -})
1197               ds {- v XaVA -} = (__coerce
1198                                    (CmmParse.Decls {- tc rjc -}
1199                                     -> CgMonad.FCode {- tc r2D7 -}
1200                                            (CmmParse.Decls {- tc rjc -},
1201                                             CmmParse.BoolExpr {- tc rj2 -}))
1202                                  (happyzuxzu3 {- v a1Wf -} eta_sllZ))
1203                                   szq {- v a2mE -}
1204             } in
1205               case ds {- v XaVA -}
1206                      infozudown {- v aaLx -} newzustate {- v aaLA -}
1207               of wild {- v XaVx -} _Kd T { (mzuresult {- v XaVz -} T, newzustate {- v XaVB -} T) ->
1208               case mzuresult {- v XaVz -}
1209               of wild_Xa4 T { (szq {- v X2wJ -} T, r {- v X2wL -} T) ->
1210               ((szq {- v X2wJ -},
1211                 (CmmParse.BoolOr {- v rfRb -} r {- v a2mF -} r {- v X2wL -})),
1212                newzustate {- v XaVB -})
1213               }
1214               }
1215             }
1216             })
1217    ()
1218Bad eta expand
1219    let {
1220      k {- v a2mw -} T :: CmmParse.BoolExpr {- tc rj2 -}
1221                          -> CmmParse.ExtFCode {- tc rj8 -} CmmParse.BoolExpr {- tc rj2 -}
1222      Arity 3
1223      k {- v a2mw -} = \ e1 {- v a1W5 -} T :: CmmParse.BoolExpr {- tc rj2 -}
1224                         eta_slgd T :: CmmParse.Env {- tc rjb -}
1225                         eta_slge T :: CmmParse.Decls {- tc rjc -} ->
1226                         let {
1227                           ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
1228                                                    (CmmParse.Decls {- tc rjc -},
1229                                                     CmmParse.BoolExpr {- tc rj2 -})
1230                           ds {- v aaLE -} = (__coerce
1231                                                (CmmParse.Decls {- tc rjc -}
1232                                                 -> CgMonad.FCode {- tc r2D7 -}
1233                                                        (CmmParse.Decls {- tc rjc -},
1234                                                         CmmParse.BoolExpr {- tc rj2 -}))
1235                                              (happyzuxzu3 {- v a1VS -} (__coerce () eta_slgd)))
1236                                               eta_slge
1237                         } in
1238                           \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1239                             state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
1240                             case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
1241                             of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
1242                             case mzuresult {- v aaLz -}
1243                             of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
1244                             ((szq {- v a2mE -},
1245                               (CmmParse.BoolAnd {- v rfR8 -} e1 {- v a1W5 -} r {- v a2mF -})),
1246                              newzustate {- v aaLA -})
1247                             }
1248                             }
1249    } in
1250      __coerce ()
1251      (\ s {- v a2mB -} T :: CmmParse.Decls {- tc rjc -} ->
1252         let {
1253           ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
1254                                    (CmmParse.Decls {- tc rjc -}, CmmParse.BoolExpr {- tc rj2 -})
1255           ds {- v aaLE -} = (__coerce
1256                                (CmmParse.Decls {- tc rjc -}
1257                                 -> CgMonad.FCode {- tc r2D7 -}
1258                                        (CmmParse.Decls {- tc rjc -},
1259                                         CmmParse.BoolExpr {- tc rj2 -}))
1260                              (happyzuxzu1 {- v a1VU -} eta_sllS))
1261                               s {- v a2mB -}
1262         } in
1263           \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1264             state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
1265             case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
1266             of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
1267             case mzuresult {- v aaLz -}
1268             of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
1269             let {
1270               ds {- v XaVA -} T :: CgMonad.FCode {- tc r2D7 -}
1271                                        (CmmParse.Decls {- tc rjc -},
1272                                         CmmParse.BoolExpr {- tc rj2 -})
1273               ds {- v XaVA -} = (__coerce
1274                                    (CmmParse.Decls {- tc rjc -}
1275                                     -> CgMonad.FCode {- tc r2D7 -}
1276                                            (CmmParse.Decls {- tc rjc -},
1277                                             CmmParse.BoolExpr {- tc rj2 -}))
1278                                  (happyzuxzu3 {- v a1VS -} eta_sllS))
1279                                   szq {- v a2mE -}
1280             } in
1281               case ds {- v XaVA -}
1282                      infozudown {- v aaLx -} newzustate {- v aaLA -}
1283               of wild {- v XaVx -} _Kd T { (mzuresult {- v XaVz -} T, newzustate {- v XaVB -} T) ->
1284               case mzuresult {- v XaVz -}
1285               of wild_Xa4 T { (szq {- v X2wJ -} T, r {- v X2wL -} T) ->
1286               ((szq {- v X2wJ -},
1287                 (CmmParse.BoolAnd {- v rfR8 -} r {- v a2mF -} r {- v X2wL -})),
1288                newzustate {- v XaVB -})
1289               }
1290               }
1291             }
1292             })
1293    ()
1294Bad eta expand
1295    let {
1296      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
1297      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
1298                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
1299    } in
1300      __coerce ()
1301      (\ eta_sl0g T :: CmmParse.Decls {- tc rjc -}
1302         eta_sl0h _Kd T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1303         eta_sl0i T :: CgMonad.CgState {- tc r2D2 -} ->
1304         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
1305          (case eta_sl0i
1306           of wild {- v aaN4 -} T { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} T ds1 {- v aaNf -} T ds2 {- v aaNe -} T ds3 {- v aaNd -} T ds4 {- v aaNc -} T ds5 {- v aaNb -} T ->
1307           CgMonad.MkCgState {- v r3Xg -}
1308             (OrdList.Two {- v r6p9 -}
1309                @ CgMonad.CgStmt {- tc r3XG -}
1310                ds {- v aaNh -}
1311                (OrdList.One {- v r6pb -}
1312                   @ CgMonad.CgStmt {- tc r3XG -}
1313                   (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
1314             ds1 {- v aaNf -}
1315             ds2 {- v aaNe -}
1316             ds3 {- v aaNd -}
1317             ds4 {- v aaNc -}
1318             ds5 {- v aaNb -}
1319           })))
1320    ()
1321Bad eta expand
1322    let {
1323      fc {- v a2nG -} T :: CgMonad.FCode {- tc r2D7 -} ()
1324      Arity 2
1325      fc {- v a2nG -} = CgMonad.labelC {- v r1Qq -}
1326                          (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu1 {- v a1Ql -})
1327    } in
1328      __coerce ()
1329      (\ s {- v a2nL -} T :: CmmParse.Decls {- tc rjc -}
1330         eta_skX4 T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1331         eta_skX5 T :: CgMonad.CgState {- tc r2D2 -} ->
1332         let {
1333           ds1 {- v aaLw -} T :: ((), CgMonad.CgState {- tc r2D2 -})
1334           ds1 {- v aaLw -} = CgMonad.labelC {- v r1Qq -}
1335                                (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu1 {- v a1Ql -})
1336                                eta_skX4
1337                                eta_skX5
1338         } in
1339           ((s {- v a2nL -},
1340             (case ds1 {- v aaLw -}
1341              of wild {- v aaLy -} T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
1342              mzuresult {- v aaLz -}
1343              })),
1344            (case ds1 {- v aaLw -}
1345             of wild {- v aaLr -} T { (mzuresult {- v aaLv -} T, newzustate {- v aaLu -} T) ->
1346             newzustate {- v aaLu -}
1347             })))
1348    ()
1349Bad eta expand
1350    __coerce ()
1351    (zgzg {- v ajrb -}
1352       @ ()
1353       @ ()
1354       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
1355       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
1356       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
1357    ()
1358Bad eta expand
1359    __coerce ()
1360    (zgzg {- v ajrb -}
1361       @ ()
1362       @ ()
1363       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
1364       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
1365       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
1366    ()
1367Bad eta expand
1368    __coerce ()
1369    (zgzg {- v ajrb -}
1370       @ ()
1371       @ ()
1372       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
1373       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
1374       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
1375    ()
1376Bad eta expand
1377    __coerce ()
1378    (zgzg {- v ajrb -}
1379       @ ()
1380       @ ()
1381       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
1382       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
1383       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
1384    ()
1385Bad eta expand
1386    __coerce ()
1387    (zgzg {- v ajrb -}
1388       @ ()
1389       @ ()
1390       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
1391       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
1392       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
1393    ()
1394Bad eta expand
1395    __coerce ()
1396    (zgzg {- v ajrb -}
1397       @ ()
1398       @ ()
1399       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
1400       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
1401       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
1402    ()
1403Bad eta expand
1404    let {
1405      fc {- v a2nG -} T :: CgMonad.FCode {- tc r2D7 -} ()
1406      Arity 2
1407      fc {- v a2nG -} = CgMonad.labelC {- v r1Qq -}
1408                          (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu1 {- v a1Ql -})
1409    } in
1410      __coerce ()
1411      (\ s {- v a2nL -} T :: CmmParse.Decls {- tc rjc -}
1412         eta_skX4 T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1413         eta_skX5 T :: CgMonad.CgState {- tc r2D2 -} ->
1414         let {
1415           ds1 {- v aaLw -} T :: ((), CgMonad.CgState {- tc r2D2 -})
1416           ds1 {- v aaLw -} = CgMonad.labelC {- v r1Qq -}
1417                                (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu1 {- v a1Ql -})
1418                                eta_skX4
1419                                eta_skX5
1420         } in
1421           ((s {- v a2nL -},
1422             (case ds1 {- v aaLw -}
1423              of wild {- v aaLy -} T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
1424              mzuresult {- v aaLz -}
1425              })),
1426            (case ds1 {- v aaLw -}
1427             of wild {- v aaLr -} T { (mzuresult {- v aaLv -} T, newzustate {- v aaLu -} T) ->
1428             newzustate {- v aaLu -}
1429             })))
1430    ()
1431Bad eta expand
1432    let {
1433      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
1434      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
1435                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
1436    } in
1437      __coerce ()
1438      (\ eta_sl0g T :: CmmParse.Decls {- tc rjc -}
1439         eta_sl0h _Kd T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1440         eta_sl0i T :: CgMonad.CgState {- tc r2D2 -} ->
1441         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
1442          (case eta_sl0i
1443           of wild {- v aaN4 -} T { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} T ds1 {- v aaNf -} T ds2 {- v aaNe -} T ds3 {- v aaNd -} T ds4 {- v aaNc -} T ds5 {- v aaNb -} T ->
1444           CgMonad.MkCgState {- v r3Xg -}
1445             (OrdList.Two {- v r6p9 -}
1446                @ CgMonad.CgStmt {- tc r3XG -}
1447                ds {- v aaNh -}
1448                (OrdList.One {- v r6pb -}
1449                   @ CgMonad.CgStmt {- tc r3XG -}
1450                   (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
1451             ds1 {- v aaNf -}
1452             ds2 {- v aaNe -}
1453             ds3 {- v aaNd -}
1454             ds4 {- v aaNc -}
1455             ds5 {- v aaNb -}
1456           })))
1457    ()
1458Bad eta expand
1459    let {
1460      k {- v a2mw -} T :: CmmParse.BoolExpr {- tc rj2 -}
1461                          -> CmmParse.ExtFCode {- tc rj8 -} CmmParse.BoolExpr {- tc rj2 -}
1462      Arity 3
1463      k {- v a2mw -} = \ e1 {- v a1W5 -} T :: CmmParse.BoolExpr {- tc rj2 -}
1464                         eta_slgd T :: CmmParse.Env {- tc rjb -}
1465                         eta_slge T :: CmmParse.Decls {- tc rjc -} ->
1466                         let {
1467                           ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
1468                                                    (CmmParse.Decls {- tc rjc -},
1469                                                     CmmParse.BoolExpr {- tc rj2 -})
1470                           ds {- v aaLE -} = (__coerce
1471                                                (CmmParse.Decls {- tc rjc -}
1472                                                 -> CgMonad.FCode {- tc r2D7 -}
1473                                                        (CmmParse.Decls {- tc rjc -},
1474                                                         CmmParse.BoolExpr {- tc rj2 -}))
1475                                              (happyzuxzu3 {- v a1VS -} (__coerce () eta_slgd)))
1476                                               eta_slge
1477                         } in
1478                           \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1479                             state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
1480                             case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
1481                             of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
1482                             case mzuresult {- v aaLz -}
1483                             of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
1484                             ((szq {- v a2mE -},
1485                               (CmmParse.BoolAnd {- v rfR8 -} e1 {- v a1W5 -} r {- v a2mF -})),
1486                              newzustate {- v aaLA -})
1487                             }
1488                             }
1489    } in
1490      __coerce ()
1491      (\ s {- v a2mB -} T :: CmmParse.Decls {- tc rjc -} ->
1492         let {
1493           ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
1494                                    (CmmParse.Decls {- tc rjc -}, CmmParse.BoolExpr {- tc rj2 -})
1495           ds {- v aaLE -} = (__coerce
1496                                (CmmParse.Decls {- tc rjc -}
1497                                 -> CgMonad.FCode {- tc r2D7 -}
1498                                        (CmmParse.Decls {- tc rjc -},
1499                                         CmmParse.BoolExpr {- tc rj2 -}))
1500                              (happyzuxzu1 {- v a1VU -} eta_sllS))
1501                               s {- v a2mB -}
1502         } in
1503           \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1504             state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
1505             case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
1506             of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
1507             case mzuresult {- v aaLz -}
1508             of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
1509             let {
1510               ds {- v XaVA -} T :: CgMonad.FCode {- tc r2D7 -}
1511                                        (CmmParse.Decls {- tc rjc -},
1512                                         CmmParse.BoolExpr {- tc rj2 -})
1513               ds {- v XaVA -} = (__coerce
1514                                    (CmmParse.Decls {- tc rjc -}
1515                                     -> CgMonad.FCode {- tc r2D7 -}
1516                                            (CmmParse.Decls {- tc rjc -},
1517                                             CmmParse.BoolExpr {- tc rj2 -}))
1518                                  (happyzuxzu3 {- v a1VS -} eta_sllS))
1519                                   szq {- v a2mE -}
1520             } in
1521               case ds {- v XaVA -}
1522                      infozudown {- v aaLx -} newzustate {- v aaLA -}
1523               of wild {- v XaVx -} _Kd T { (mzuresult {- v XaVz -} T, newzustate {- v XaVB -} T) ->
1524               case mzuresult {- v XaVz -}
1525               of wild_Xa4 T { (szq {- v X2wJ -} T, r {- v X2wL -} T) ->
1526               ((szq {- v X2wJ -},
1527                 (CmmParse.BoolAnd {- v rfR8 -} r {- v a2mF -} r {- v X2wL -})),
1528                newzustate {- v XaVB -})
1529               }
1530               }
1531             }
1532             })
1533    ()
1534Bad eta expand
1535    let {
1536      k {- v a2mw -} T :: CmmParse.BoolExpr {- tc rj2 -}
1537                          -> CmmParse.ExtFCode {- tc rj8 -} CmmParse.BoolExpr {- tc rj2 -}
1538      Arity 3
1539      k {- v a2mw -} = \ e1 {- v a1Ws -} T :: CmmParse.BoolExpr {- tc rj2 -}
1540                         eta_slgq T :: CmmParse.Env {- tc rjb -}
1541                         eta_slgr T :: CmmParse.Decls {- tc rjc -} ->
1542                         let {
1543                           ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
1544                                                    (CmmParse.Decls {- tc rjc -},
1545                                                     CmmParse.BoolExpr {- tc rj2 -})
1546                           ds {- v aaLE -} = (__coerce
1547                                                (CmmParse.Decls {- tc rjc -}
1548                                                 -> CgMonad.FCode {- tc r2D7 -}
1549                                                        (CmmParse.Decls {- tc rjc -},
1550                                                         CmmParse.BoolExpr {- tc rj2 -}))
1551                                              (happyzuxzu3 {- v a1Wf -} (__coerce () eta_slgq)))
1552                                               eta_slgr
1553                         } in
1554                           \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1555                             state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
1556                             case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
1557                             of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
1558                             case mzuresult {- v aaLz -}
1559                             of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
1560                             ((szq {- v a2mE -},
1561                               (CmmParse.BoolOr {- v rfRb -} e1 {- v a1Ws -} r {- v a2mF -})),
1562                              newzustate {- v aaLA -})
1563                             }
1564                             }
1565    } in
1566      __coerce ()
1567      (\ s {- v a2mB -} T :: CmmParse.Decls {- tc rjc -} ->
1568         let {
1569           ds {- v aaLE -} T :: CgMonad.FCode {- tc r2D7 -}
1570                                    (CmmParse.Decls {- tc rjc -}, CmmParse.BoolExpr {- tc rj2 -})
1571           ds {- v aaLE -} = (__coerce
1572                                (CmmParse.Decls {- tc rjc -}
1573                                 -> CgMonad.FCode {- tc r2D7 -}
1574                                        (CmmParse.Decls {- tc rjc -},
1575                                         CmmParse.BoolExpr {- tc rj2 -}))
1576                              (happyzuxzu1 {- v a1Wh -} eta_sllZ))
1577                               s {- v a2mB -}
1578         } in
1579           \ infozudown {- v aaLx -} T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1580             state {- v aaLD -} T :: CgMonad.CgState {- tc r2D2 -} ->
1581             case ds {- v aaLE -} infozudown {- v aaLx -} state {- v aaLD -}
1582             of wild {- v aaLy -} _Kd T { (mzuresult {- v aaLz -} T, newzustate {- v aaLA -} T) ->
1583             case mzuresult {- v aaLz -}
1584             of wild_B1 T { (szq {- v a2mE -} T, r {- v a2mF -} T) ->
1585             let {
1586               ds {- v XaVA -} T :: CgMonad.FCode {- tc r2D7 -}
1587                                        (CmmParse.Decls {- tc rjc -},
1588                                         CmmParse.BoolExpr {- tc rj2 -})
1589               ds {- v XaVA -} = (__coerce
1590                                    (CmmParse.Decls {- tc rjc -}
1591                                     -> CgMonad.FCode {- tc r2D7 -}
1592                                            (CmmParse.Decls {- tc rjc -},
1593                                             CmmParse.BoolExpr {- tc rj2 -}))
1594                                  (happyzuxzu3 {- v a1Wf -} eta_sllZ))
1595                                   szq {- v a2mE -}
1596             } in
1597               case ds {- v XaVA -}
1598                      infozudown {- v aaLx -} newzustate {- v aaLA -}
1599               of wild {- v XaVx -} _Kd T { (mzuresult {- v XaVz -} T, newzustate {- v XaVB -} T) ->
1600               case mzuresult {- v XaVz -}
1601               of wild_Xa4 T { (szq {- v X2wJ -} T, r {- v X2wL -} T) ->
1602               ((szq {- v X2wJ -},
1603                 (CmmParse.BoolOr {- v rfRb -} r {- v a2mF -} r {- v X2wL -})),
1604                newzustate {- v XaVB -})
1605               }
1606               }
1607             }
1608             })
1609    ()
1610Bad eta expand
1611    __coerce ()
1612    (zgzg {- v ajrb -}
1613       @ ()
1614       @ ()
1615       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
1616       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
1617       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
1618    ()
1619Bad eta expand
1620    __coerce ()
1621    (zgzg {- v ajrb -}
1622       @ ()
1623       @ ()
1624       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
1625       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
1626       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
1627    ()
1628Bad eta expand
1629    __coerce ()
1630    (zgzg {- v ajrb -}
1631       @ ()
1632       @ ()
1633       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
1634       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
1635       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
1636    ()
1637Bad eta expand
1638    let {
1639      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
1640      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
1641                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
1642    } in
1643      __coerce ()
1644      (\ eta_sl0g T :: CmmParse.Decls {- tc rjc -}
1645         eta_sl0h _Kd T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1646         eta_sl0i T :: CgMonad.CgState {- tc r2D2 -} ->
1647         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
1648          (case eta_sl0i
1649           of wild {- v aaN4 -} T { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} T ds1 {- v aaNf -} T ds2 {- v aaNe -} T ds3 {- v aaNd -} T ds4 {- v aaNc -} T ds5 {- v aaNb -} T ->
1650           CgMonad.MkCgState {- v r3Xg -}
1651             (OrdList.Two {- v r6p9 -}
1652                @ CgMonad.CgStmt {- tc r3XG -}
1653                ds {- v aaNh -}
1654                (OrdList.One {- v r6pb -}
1655                   @ CgMonad.CgStmt {- tc r3XG -}
1656                   (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
1657             ds1 {- v aaNf -}
1658             ds2 {- v aaNe -}
1659             ds3 {- v aaNd -}
1660             ds4 {- v aaNc -}
1661             ds5 {- v aaNb -}
1662           })))
1663    ()
1664Bad eta expand
1665    __coerce ()
1666    (zgzg {- v ajrb -}
1667       @ ()
1668       @ ()
1669       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
1670       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
1671       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
1672    ()
1673Bad eta expand
1674    __coerce ()
1675    (zgzg {- v ajrb -}
1676       @ ()
1677       @ ()
1678       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
1679       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
1680       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
1681    ()
1682Bad eta expand
1683    __coerce ()
1684    (zgzg {- v ajrb -}
1685       @ ()
1686       @ ()
1687       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
1688       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
1689       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
1690    ()
1691Bad eta expand
1692    let {
1693      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
1694      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
1695                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
1696    } in
1697      __coerce ()
1698      (\ eta_sl0g T :: CmmParse.Decls {- tc rjc -}
1699         eta_sl0h _Kd T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1700         eta_sl0i T :: CgMonad.CgState {- tc r2D2 -} ->
1701         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
1702          (case eta_sl0i
1703           of wild {- v aaN4 -} T { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} T ds1 {- v aaNf -} T ds2 {- v aaNe -} T ds3 {- v aaNd -} T ds4 {- v aaNc -} T ds5 {- v aaNb -} T ->
1704           CgMonad.MkCgState {- v r3Xg -}
1705             (OrdList.Two {- v r6p9 -}
1706                @ CgMonad.CgStmt {- tc r3XG -}
1707                ds {- v aaNh -}
1708                (OrdList.One {- v r6pb -}
1709                   @ CgMonad.CgStmt {- tc r3XG -}
1710                   (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
1711             ds1 {- v aaNf -}
1712             ds2 {- v aaNe -}
1713             ds3 {- v aaNd -}
1714             ds4 {- v aaNc -}
1715             ds5 {- v aaNb -}
1716           })))
1717    ()
1718Bad eta expand
1719    __coerce ()
1720    (zgzg {- v ajrb -}
1721       @ ()
1722       @ ()
1723       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
1724       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
1725       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
1726    ()
1727Bad eta expand
1728    __coerce ()
1729    (zgzg {- v ajrb -}
1730       @ ()
1731       @ ()
1732       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
1733       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
1734       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
1735    ()
1736Bad eta expand
1737    __coerce ()
1738    (zgzg {- v ajrb -}
1739       @ ()
1740       @ ()
1741       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
1742       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
1743       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
1744    ()
1745Bad eta expand
1746    let {
1747      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
1748      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
1749                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
1750    } in
1751      __coerce ()
1752      (\ eta_sl0g T :: CmmParse.Decls {- tc rjc -}
1753         eta_sl0h _Kd T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1754         eta_sl0i T :: CgMonad.CgState {- tc r2D2 -} ->
1755         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
1756          (case eta_sl0i
1757           of wild {- v aaN4 -} T { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} T ds1 {- v aaNf -} T ds2 {- v aaNe -} T ds3 {- v aaNd -} T ds4 {- v aaNc -} T ds5 {- v aaNb -} T ->
1758           CgMonad.MkCgState {- v r3Xg -}
1759             (OrdList.Two {- v r6p9 -}
1760                @ CgMonad.CgStmt {- tc r3XG -}
1761                ds {- v aaNh -}
1762                (OrdList.One {- v r6pb -}
1763                   @ CgMonad.CgStmt {- tc r3XG -}
1764                   (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
1765             ds1 {- v aaNf -}
1766             ds2 {- v aaNe -}
1767             ds3 {- v aaNd -}
1768             ds4 {- v aaNc -}
1769             ds5 {- v aaNb -}
1770           })))
1771    ()
1772Bad eta expand
1773    __coerce ()
1774    (zgzg {- v ajrb -}
1775       @ ()
1776       @ ()
1777       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
1778       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
1779       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
1780    ()
1781Bad eta expand
1782    __coerce ()
1783    (zgzg {- v ajrb -}
1784       @ ()
1785       @ ()
1786       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
1787       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
1788       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
1789    ()
1790Bad eta expand
1791    __coerce ()
1792    (zgzg {- v ajrb -}
1793       @ ()
1794       @ ()
1795       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
1796       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
1797       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
1798    ()
1799Bad eta expand
1800    let {
1801      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
1802      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
1803                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
1804    } in
1805      __coerce ()
1806      (\ eta_sl0g T :: CmmParse.Decls {- tc rjc -}
1807         eta_sl0h _Kd T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1808         eta_sl0i T :: CgMonad.CgState {- tc r2D2 -} ->
1809         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
1810          (case eta_sl0i
1811           of wild {- v aaN4 -} T { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} T ds1 {- v aaNf -} T ds2 {- v aaNe -} T ds3 {- v aaNd -} T ds4 {- v aaNc -} T ds5 {- v aaNb -} T ->
1812           CgMonad.MkCgState {- v r3Xg -}
1813             (OrdList.Two {- v r6p9 -}
1814                @ CgMonad.CgStmt {- tc r3XG -}
1815                ds {- v aaNh -}
1816                (OrdList.One {- v r6pb -}
1817                   @ CgMonad.CgStmt {- tc r3XG -}
1818                   (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
1819             ds1 {- v aaNf -}
1820             ds2 {- v aaNe -}
1821             ds3 {- v aaNd -}
1822             ds4 {- v aaNc -}
1823             ds5 {- v aaNb -}
1824           })))
1825    ()
1826Bad eta expand
1827    __coerce ()
1828    (zgzg {- v ajrb -}
1829       @ ()
1830       @ ()
1831       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
1832       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
1833       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
1834    ()
1835Bad eta expand
1836    __coerce ()
1837    (zgzg {- v ajrb -}
1838       @ ()
1839       @ ()
1840       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
1841       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
1842       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
1843    ()
1844Bad eta expand
1845    __coerce ()
1846    (zgzg {- v ajrb -}
1847       @ ()
1848       @ ()
1849       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
1850       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
1851       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
1852    ()
1853Bad eta expand
1854    let {
1855      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
1856      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
1857                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
1858    } in
1859      __coerce ()
1860      (\ eta_sl0g T :: CmmParse.Decls {- tc rjc -}
1861         eta_sl0h _Kd T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1862         eta_sl0i T :: CgMonad.CgState {- tc r2D2 -} ->
1863         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
1864          (case eta_sl0i
1865           of wild {- v aaN4 -} T { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} T ds1 {- v aaNf -} T ds2 {- v aaNe -} T ds3 {- v aaNd -} T ds4 {- v aaNc -} T ds5 {- v aaNb -} T ->
1866           CgMonad.MkCgState {- v r3Xg -}
1867             (OrdList.Two {- v r6p9 -}
1868                @ CgMonad.CgStmt {- tc r3XG -}
1869                ds {- v aaNh -}
1870                (OrdList.One {- v r6pb -}
1871                   @ CgMonad.CgStmt {- tc r3XG -}
1872                   (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
1873             ds1 {- v aaNf -}
1874             ds2 {- v aaNe -}
1875             ds3 {- v aaNd -}
1876             ds4 {- v aaNc -}
1877             ds5 {- v aaNb -}
1878           })))
1879    ()
1880Bad eta expand
1881    __coerce ()
1882    (zgzg {- v ajrb -}
1883       @ ()
1884       @ ()
1885       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
1886       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
1887       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
1888    ()
1889Bad eta expand
1890    __coerce ()
1891    (zgzg {- v ajrb -}
1892       @ ()
1893       @ ()
1894       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
1895       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
1896       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
1897    ()
1898Bad eta expand
1899    __coerce ()
1900    (zgzg {- v ajrb -}
1901       @ ()
1902       @ ()
1903       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
1904       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
1905       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
1906    ()
1907Bad eta expand
1908    let {
1909      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
1910      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
1911                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
1912    } in
1913      __coerce ()
1914      (\ eta_sl0g T :: CmmParse.Decls {- tc rjc -}
1915         eta_sl0h _Kd T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1916         eta_sl0i T :: CgMonad.CgState {- tc r2D2 -} ->
1917         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
1918          (case eta_sl0i
1919           of wild {- v aaN4 -} T { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} T ds1 {- v aaNf -} T ds2 {- v aaNe -} T ds3 {- v aaNd -} T ds4 {- v aaNc -} T ds5 {- v aaNb -} T ->
1920           CgMonad.MkCgState {- v r3Xg -}
1921             (OrdList.Two {- v r6p9 -}
1922                @ CgMonad.CgStmt {- tc r3XG -}
1923                ds {- v aaNh -}
1924                (OrdList.One {- v r6pb -}
1925                   @ CgMonad.CgStmt {- tc r3XG -}
1926                   (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
1927             ds1 {- v aaNf -}
1928             ds2 {- v aaNe -}
1929             ds3 {- v aaNd -}
1930             ds4 {- v aaNc -}
1931             ds5 {- v aaNb -}
1932           })))
1933    ()
1934Bad eta expand
1935    __coerce ()
1936    (zgzg {- v ajrb -}
1937       @ ()
1938       @ ()
1939       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
1940       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
1941       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
1942    ()
1943Bad eta expand
1944    __coerce ()
1945    (zgzg {- v ajrb -}
1946       @ ()
1947       @ ()
1948       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
1949       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
1950       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
1951    ()
1952Bad eta expand
1953    __coerce ()
1954    (zgzg {- v ajrb -}
1955       @ ()
1956       @ ()
1957       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
1958       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
1959       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
1960    ()
1961Bad eta expand
1962    let {
1963      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
1964      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
1965                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
1966    } in
1967      __coerce ()
1968      (\ eta_sl0g T :: CmmParse.Decls {- tc rjc -}
1969         eta_sl0h _Kd T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
1970         eta_sl0i T :: CgMonad.CgState {- tc r2D2 -} ->
1971         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
1972          (case eta_sl0i
1973           of wild {- v aaN4 -} T { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} T ds1 {- v aaNf -} T ds2 {- v aaNe -} T ds3 {- v aaNd -} T ds4 {- v aaNc -} T ds5 {- v aaNb -} T ->
1974           CgMonad.MkCgState {- v r3Xg -}
1975             (OrdList.Two {- v r6p9 -}
1976                @ CgMonad.CgStmt {- tc r3XG -}
1977                ds {- v aaNh -}
1978                (OrdList.One {- v r6pb -}
1979                   @ CgMonad.CgStmt {- tc r3XG -}
1980                   (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
1981             ds1 {- v aaNf -}
1982             ds2 {- v aaNe -}
1983             ds3 {- v aaNd -}
1984             ds4 {- v aaNc -}
1985             ds5 {- v aaNb -}
1986           })))
1987    ()
1988Bad eta expand
1989    __coerce ()
1990    (zgzg {- v ajrb -}
1991       @ ()
1992       @ ()
1993       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
1994       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
1995       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
1996    ()
1997Bad eta expand
1998    __coerce ()
1999    (zgzg {- v ajrb -}
2000       @ ()
2001       @ ()
2002       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
2003       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
2004       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
2005    ()
2006Bad eta expand
2007    __coerce ()
2008    (zgzg {- v ajrb -}
2009       @ ()
2010       @ ()
2011       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
2012       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
2013       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
2014    ()
2015Bad eta expand
2016    let {
2017      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
2018      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
2019                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
2020    } in
2021      __coerce ()
2022      (\ eta_sl0g T :: CmmParse.Decls {- tc rjc -}
2023         eta_sl0h _Kd T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2024         eta_sl0i T :: CgMonad.CgState {- tc r2D2 -} ->
2025         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
2026          (case eta_sl0i
2027           of wild {- v aaN4 -} T { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} T ds1 {- v aaNf -} T ds2 {- v aaNe -} T ds3 {- v aaNd -} T ds4 {- v aaNc -} T ds5 {- v aaNb -} T ->
2028           CgMonad.MkCgState {- v r3Xg -}
2029             (OrdList.Two {- v r6p9 -}
2030                @ CgMonad.CgStmt {- tc r3XG -}
2031                ds {- v aaNh -}
2032                (OrdList.One {- v r6pb -}
2033                   @ CgMonad.CgStmt {- tc r3XG -}
2034                   (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
2035             ds1 {- v aaNf -}
2036             ds2 {- v aaNe -}
2037             ds3 {- v aaNd -}
2038             ds4 {- v aaNc -}
2039             ds5 {- v aaNb -}
2040           })))
2041    ()
2042Bad eta expand
2043    __coerce ()
2044    (zgzg {- v ajrb -}
2045       @ ()
2046       @ ()
2047       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
2048       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
2049       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
2050    ()
2051Bad eta expand
2052    __coerce ()
2053    (zgzg {- v ajrb -}
2054       @ ()
2055       @ ()
2056       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
2057       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
2058       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
2059    ()
2060Bad eta expand
2061    __coerce ()
2062    (zgzg {- v ajrb -}
2063       @ ()
2064       @ ()
2065       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
2066       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
2067       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
2068    ()
2069Bad eta expand
2070    let {
2071      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
2072      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
2073                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
2074    } in
2075      __coerce ()
2076      (\ eta_sl0g T :: CmmParse.Decls {- tc rjc -}
2077         eta_sl0h _Kd T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2078         eta_sl0i T :: CgMonad.CgState {- tc r2D2 -} ->
2079         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
2080          (case eta_sl0i
2081           of wild {- v aaN4 -} T { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} T ds1 {- v aaNf -} T ds2 {- v aaNe -} T ds3 {- v aaNd -} T ds4 {- v aaNc -} T ds5 {- v aaNb -} T ->
2082           CgMonad.MkCgState {- v r3Xg -}
2083             (OrdList.Two {- v r6p9 -}
2084                @ CgMonad.CgStmt {- tc r3XG -}
2085                ds {- v aaNh -}
2086                (OrdList.One {- v r6pb -}
2087                   @ CgMonad.CgStmt {- tc r3XG -}
2088                   (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
2089             ds1 {- v aaNf -}
2090             ds2 {- v aaNe -}
2091             ds3 {- v aaNd -}
2092             ds4 {- v aaNc -}
2093             ds5 {- v aaNb -}
2094           })))
2095    ()
2096Bad eta expand
2097    __coerce ()
2098    (zgzg {- v ajrb -}
2099       @ ()
2100       @ ()
2101       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
2102       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
2103       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
2104    ()
2105Bad eta expand
2106    __coerce ()
2107    (zgzg {- v ajrb -}
2108       @ ()
2109       @ ()
2110       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
2111       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
2112       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
2113    ()
2114Bad eta expand
2115    __coerce ()
2116    (zgzg {- v ajrb -}
2117       @ ()
2118       @ ()
2119       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
2120       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
2121       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
2122    ()
2123Bad eta expand
2124    let {
2125      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
2126      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
2127                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
2128    } in
2129      __coerce ()
2130      (\ eta_sl0g T :: CmmParse.Decls {- tc rjc -}
2131         eta_sl0h _Kd T :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2132         eta_sl0i T :: CgMonad.CgState {- tc r2D2 -} ->
2133         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
2134          (case eta_sl0i
2135           of wild {- v aaN4 -} T { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} T ds1 {- v aaNf -} T ds2 {- v aaNe -} T ds3 {- v aaNd -} T ds4 {- v aaNc -} T ds5 {- v aaNb -} T ->
2136           CgMonad.MkCgState {- v r3Xg -}
2137             (OrdList.Two {- v r6p9 -}
2138                @ CgMonad.CgStmt {- tc r3XG -}
2139                ds {- v aaNh -}
2140                (OrdList.One {- v r6pb -}
2141                   @ CgMonad.CgStmt {- tc r3XG -}
2142                   (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
2143             ds1 {- v aaNf -}
2144             ds2 {- v aaNe -}
2145             ds3 {- v aaNd -}
2146             ds4 {- v aaNc -}
2147             ds5 {- v aaNb -}
2148           })))
2149    ()
2150Bad eta expand
2151    __coerce ()
2152    (zgzg {- v ajrb -}
2153       @ ()
2154       @ ()
2155       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
2156       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
2157       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
2158    ()
2159Bad eta expand
2160    __coerce ()
2161    (zgzg {- v ajrb -}
2162       @ ()
2163       @ ()
2164       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
2165       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
2166       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
2167    ()
2168Bad eta expand
2169    __coerce ()
2170    (zgzg {- v ajrb -}
2171       @ ()
2172       @ ()
2173       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
2174       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
2175       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
2176    ()
2177Bad eta expand
2178    __coerce ()
2179    (zgzg {- v ajrb -}
2180       @ ()
2181       @ ()
2182       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
2183       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
2184       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
2185    ()
2186Bad eta expand
2187    __coerce ()
2188    (zgzg {- v ajrb -}
2189       @ ()
2190       @ ()
2191       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
2192       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
2193       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
2194    ()
2195Bad eta expand
2196    __coerce ()
2197    (zgzg {- v ajrb -}
2198       @ ()
2199       @ ()
2200       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
2201       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
2202       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
2203    ()
2204Bad eta expand
2205    (case __coerce
2206            (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2207          happyzuxzu1 {- v a25S -}
2208     of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjb _Kd A ds_dk8M S ->
2209     case ds_dk8M of wild_XnX A {
2210       __DEFAULT -> lvl_skV6;
2211       CmmLex.CmmTzuInt {- d r2Av -} happyzuvarzu1 {- v a25W -} L ->
2212         let {
2213           a_slhb T :: Cmm.CmmLit {- tc r2FA -}
2214           Str: DmdType
2215           a_slhb = Cmm.CmmInt {- v r3L0 -}
2216                      happyzuvarzu1 {- v a25W -}
2217                      (__coerce MachOp.MachRep {- tc r2Hc -}
2218                       happyzuxzu2 {- v a25R -}) } in
2219         let {
2220           a {- v X2BZ -} T :: Cmm.CmmExpr {- tc r2Fz -}
2221           Str: DmdType
2222           a {- v X2BZ -} = Cmm.CmmLit {- v r3KG -} a_slhb
2223         } in
2224           __coerce CmmParse.HappyAbsSyn {- tc rjd -}
2225           (\ e {- v X2C6 -} _Kd A :: CmmParse.Env {- tc rjb -}
2226              s {- v X2C8 -} L :: CmmParse.Decls {- tc rjc -}
2227              eta_XlbE _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2228              eta_XlbG L :: CgMonad.CgState {- tc r2D2 -} ->
2229              ((s {- v X2C8 -}, a {- v X2BZ -}), eta_XlbG))
2230     }
2231     })
2232      eta_smNV
2233    ()
2234Bad eta expand
2235    case __coerce
2236           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2237         happyzuxzu1 {- v a25S -}
2238    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjb _Kd A ds_dk8M S ->
2239    case ds_dk8M of wild_XnX A {
2240      __DEFAULT -> __coerce () lvl_skV6;
2241      CmmLex.CmmTzuInt {- d r2Av -} happyzuvarzu1 {- v a25W -} L ->
2242        let {
2243          a_slhb T :: Cmm.CmmLit {- tc r2FA -}
2244          Str: DmdType
2245          a_slhb = Cmm.CmmInt {- v r3L0 -}
2246                     happyzuvarzu1 {- v a25W -}
2247                     (__coerce MachOp.MachRep {- tc r2Hc -}
2248                      happyzuxzu2 {- v a25R -}) } in
2249        let {
2250          a {- v X2BZ -} T :: Cmm.CmmExpr {- tc r2Fz -}
2251          Str: DmdType
2252          a {- v X2BZ -} = Cmm.CmmLit {- v r3KG -} a_slhb
2253        } in
2254          __coerce ()
2255          (\ s {- v X2C8 -} L :: CmmParse.Decls {- tc rjc -}
2256             eta_XlbE _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2257             eta_XlbG L :: CgMonad.CgState {- tc r2D2 -} ->
2258             ((s {- v X2C8 -}, a {- v X2BZ -}), eta_XlbG))
2259    }
2260    }
2261    ()
2262Bad eta expand
2263    (case __coerce
2264            (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2265          happyzuxzu1 {- v a26a -}
2266     of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjd _Kd A ds_dk8E S ->
2267     case ds_dk8E of wild_XnX A {
2268       __DEFAULT -> lvl_skV7;
2269       CmmLex.CmmTzuFloat {- d r2Ax -} happyzuvarzu1 {- v a26e -} L ->
2270         let {
2271           a_slhg T :: Cmm.CmmLit {- tc r2FA -}
2272           Str: DmdType
2273           a_slhg = Cmm.CmmFloat {- v r3L2 -}
2274                      happyzuvarzu1 {- v a26e -}
2275                      (__coerce MachOp.MachRep {- tc r2Hc -}
2276                       happyzuxzu2 {- v a269 -}) } in
2277         let {
2278           a {- v X2BZ -} T :: Cmm.CmmExpr {- tc r2Fz -}
2279           Str: DmdType
2280           a {- v X2BZ -} = Cmm.CmmLit {- v r3KG -} a_slhg
2281         } in
2282           __coerce CmmParse.HappyAbsSyn {- tc rjd -}
2283           (\ e {- v X2C6 -} _Kd A :: CmmParse.Env {- tc rjb -}
2284              s {- v X2C8 -} L :: CmmParse.Decls {- tc rjc -}
2285              eta_XlbE _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2286              eta_XlbG L :: CgMonad.CgState {- tc r2D2 -} ->
2287              ((s {- v X2C8 -}, a {- v X2BZ -}), eta_XlbG))
2288     }
2289     })
2290      eta_smO1
2291    ()
2292Bad eta expand
2293    case __coerce
2294           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2295         happyzuxzu1 {- v a26a -}
2296    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjd _Kd A ds_dk8E S ->
2297    case ds_dk8E of wild_XnX A {
2298      __DEFAULT -> __coerce () lvl_skV7;
2299      CmmLex.CmmTzuFloat {- d r2Ax -} happyzuvarzu1 {- v a26e -} L ->
2300        let {
2301          a_slhg T :: Cmm.CmmLit {- tc r2FA -}
2302          Str: DmdType
2303          a_slhg = Cmm.CmmFloat {- v r3L2 -}
2304                     happyzuvarzu1 {- v a26e -}
2305                     (__coerce MachOp.MachRep {- tc r2Hc -}
2306                      happyzuxzu2 {- v a269 -}) } in
2307        let {
2308          a {- v X2BZ -} T :: Cmm.CmmExpr {- tc r2Fz -}
2309          Str: DmdType
2310          a {- v X2BZ -} = Cmm.CmmLit {- v r3KG -} a_slhg
2311        } in
2312          __coerce ()
2313          (\ s {- v X2C8 -} L :: CmmParse.Decls {- tc rjc -}
2314             eta_XlbE _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2315             eta_XlbG L :: CgMonad.CgState {- tc r2D2 -} ->
2316             ((s {- v X2C8 -}, a {- v X2BZ -}), eta_XlbG))
2317    }
2318    }
2319    ()
2320Bad eta expand
2321    let {
2322      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
2323      Str: DmdType
2324      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
2325                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
2326    } in
2327      __coerce ()
2328      (\ eta_sl0g L :: CmmParse.Decls {- tc rjc -}
2329         eta_sl0h _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2330         eta_sl0i L :: CgMonad.CgState {- tc r2D2 -} ->
2331         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
2332          (case eta_sl0i
2333           of wild {- v aaN4 -} A { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} L ds1 {- v aaNf -} L ds2 {- v aaNe -} L ds3 {- v aaNd -} L ds4 {- v aaNc -} L ds5 {- v aaNb -} L ->
2334           CgMonad.MkCgState {- v r3Xg -}
2335             (OrdList.Two {- v r6p9 -}
2336                @ CgMonad.CgStmt {- tc r3XG -}
2337                ds {- v aaNh -}
2338                (OrdList.One {- v r6pb -}
2339                   @ CgMonad.CgStmt {- tc r3XG -}
2340                   (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
2341             ds1 {- v aaNf -}
2342             ds2 {- v aaNe -}
2343             ds3 {- v aaNd -}
2344             ds4 {- v aaNc -}
2345             ds5 {- v aaNb -}
2346           })))
2347    ()
2348Bad eta expand
2349    (case __coerce
2350            (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2351          happyzuxzu1 {- v a26q -}
2352     of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjf _Kd A ds_dk8w S ->
2353     case ds_dk8w of wild_XnW A {
2354       __DEFAULT -> lvl_skV8;
2355       CmmLex.CmmTzuString {- d r2Au -} happyzuvarzu1 {- v a26u -} L ->
2356         __coerce CmmParse.HappyAbsSyn {- tc rjd -}
2357         (\ e {- v a2mA -} _Kd A :: CmmParse.Env {- tc rjb -}
2358            s {- v a2mB -} L :: CmmParse.Decls {- tc rjc -}
2359            eta_slho A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2360            eta_slhp L :: CgMonad.CgState {- tc r2D2 -} ->
2361            let {
2362              ds1 {- v aaLw -} D(SS) :: (Cmm.CmmLit {- tc r2FA -},
2363                                         CgMonad.CgState {- tc r2D2 -})
2364              Str: DmdType
2365              ds1 {- v aaLw -} = CgUtils.mkStringCLit {- v r26v -}
2366                                   happyzuvarzu1 {- v a26u -} eta_slho eta_slhp
2367            } in
2368              ((s {- v a2mB -},
2369                (Cmm.CmmLit {- v r3KG -}
2370                   (case ds1 {- v aaLw -}
2371                    of wild {- v aaLy -} A { (mzuresult {- v aaLz -} S, newzustate {- v aaLA -} A) ->
2372                    mzuresult {- v aaLz -}
2373                    }))),
2374               (case ds1 {- v aaLw -}
2375                of wild {- v aaLr -} A { (mzuresult {- v aaLv -} A, newzustate {- v aaLu -} S) ->
2376                newzustate {- v aaLu -}
2377                })))
2378     }
2379     })
2380      eta_smPh
2381    ()
2382Bad eta expand
2383    (case __coerce
2384            (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2385          happyzuxzu1 {- v a2ap -}
2386     of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkj9 _Kd A ds_dk8U S ->
2387     case ds_dk8U of wild_XnW A {
2388       __DEFAULT -> lvl_skVg;
2389       CmmLex.CmmTzuGlobalReg {- d r2Aw -} happyzuvarzu1 {- v a2at -} L ->
2390         let {
2391           a_slil T :: Cmm.CmmReg {- tc r2FB -}
2392           Str: DmdType
2393           a_slil = Cmm.CmmGlobal {- v r3KW -} happyzuvarzu1 {- v a2at -} } in
2394         let {
2395           a {- v X2BY -} T :: Cmm.CmmExpr {- tc r2Fz -}
2396           Str: DmdType
2397           a {- v X2BY -} = Cmm.CmmReg {- v r3KK -} a_slil
2398         } in
2399           __coerce CmmParse.HappyAbsSyn {- tc rjd -}
2400           (\ e {- v X2C5 -} _Kd A :: CmmParse.Env {- tc rjb -}
2401              s {- v X2C7 -} L :: CmmParse.Decls {- tc rjc -}
2402              eta_XlbD _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2403              eta_XlbF L :: CgMonad.CgState {- tc r2D2 -} ->
2404              ((s {- v X2C7 -}, a {- v X2BY -}), eta_XlbF))
2405     }
2406     })
2407      eta_smPi
2408    ()
2409Bad eta expand
2410    (case __coerce
2411            (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2412          happyzuxzu1 {- v a2b2 -}
2413     of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkj5 _Kd A ds_dk9a S ->
2414     case ds_dk9a of wild_XnW A {
2415       __DEFAULT -> lvl_skVl;
2416       CmmLex.CmmTzuGlobalReg {- d r2Aw -} happyzuvarzu1 {- v a2b6 -} L ->
2417         let {
2418           a {- v X2BY -} T :: Cmm.CmmReg {- tc r2FB -}
2419           Str: DmdType
2420           a {- v X2BY -} = Cmm.CmmGlobal {- v r3KW -}
2421                              happyzuvarzu1 {- v a2b6 -}
2422         } in
2423           __coerce CmmParse.HappyAbsSyn {- tc rjd -}
2424           (\ e {- v X2C4 -} _Kd A :: CmmParse.Env {- tc rjb -}
2425              s {- v X2C6 -} L :: CmmParse.Decls {- tc rjc -}
2426              eta_XlbC _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2427              eta_XlbE L :: CgMonad.CgState {- tc r2D2 -} ->
2428              ((s {- v X2C6 -}, a {- v X2BY -}), eta_XlbE))
2429     }
2430     })
2431      eta_smPj
2432    ()
2433Bad eta expand
2434    __coerce ()
2435    (zgzg {- v ajrb -}
2436       @ ()
2437       @ ()
2438       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
2439       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
2440       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
2441    ()
2442Bad eta expand
2443    __coerce ()
2444    (zgzg {- v ajrb -}
2445       @ ()
2446       @ ()
2447       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
2448       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
2449       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
2450    ()
2451Bad eta expand
2452    __coerce ()
2453    (zgzg {- v ajrb -}
2454       @ ()
2455       @ ()
2456       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
2457       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
2458       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
2459    ()
2460Bad eta expand
2461    case __coerce
2462           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2463         happyzuxzu1 {- v a25S -}
2464    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjb _Kd A ds_dk8M S ->
2465    case ds_dk8M of wild_XnX A {
2466      __DEFAULT -> __coerce () lvl_skV6;
2467      CmmLex.CmmTzuInt {- d r2Av -} happyzuvarzu1 {- v a25W -} L ->
2468        let {
2469          a_slhb T :: Cmm.CmmLit {- tc r2FA -}
2470          Str: DmdType
2471          a_slhb = Cmm.CmmInt {- v r3L0 -}
2472                     happyzuvarzu1 {- v a25W -}
2473                     (__coerce MachOp.MachRep {- tc r2Hc -}
2474                      happyzuxzu2 {- v a25R -}) } in
2475        let {
2476          a {- v X2BZ -} T :: Cmm.CmmExpr {- tc r2Fz -}
2477          Str: DmdType
2478          a {- v X2BZ -} = Cmm.CmmLit {- v r3KG -} a_slhb
2479        } in
2480          __coerce ()
2481          (\ s {- v X2C8 -} L :: CmmParse.Decls {- tc rjc -}
2482             eta_XlbE _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2483             eta_XlbG L :: CgMonad.CgState {- tc r2D2 -} ->
2484             ((s {- v X2C8 -}, a {- v X2BZ -}), eta_XlbG))
2485    }
2486    }
2487    ()
2488Bad eta expand
2489    case __coerce
2490           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2491         happyzuxzu1 {- v a26a -}
2492    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjd _Kd A ds_dk8E S ->
2493    case ds_dk8E of wild_XnX A {
2494      __DEFAULT -> __coerce () lvl_skV7;
2495      CmmLex.CmmTzuFloat {- d r2Ax -} happyzuvarzu1 {- v a26e -} L ->
2496        let {
2497          a_slhg T :: Cmm.CmmLit {- tc r2FA -}
2498          Str: DmdType
2499          a_slhg = Cmm.CmmFloat {- v r3L2 -}
2500                     happyzuvarzu1 {- v a26e -}
2501                     (__coerce MachOp.MachRep {- tc r2Hc -}
2502                      happyzuxzu2 {- v a269 -}) } in
2503        let {
2504          a {- v X2BZ -} T :: Cmm.CmmExpr {- tc r2Fz -}
2505          Str: DmdType
2506          a {- v X2BZ -} = Cmm.CmmLit {- v r3KG -} a_slhg
2507        } in
2508          __coerce ()
2509          (\ s {- v X2C8 -} L :: CmmParse.Decls {- tc rjc -}
2510             eta_XlbE _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2511             eta_XlbG L :: CgMonad.CgState {- tc r2D2 -} ->
2512             ((s {- v X2C8 -}, a {- v X2BZ -}), eta_XlbG))
2513    }
2514    }
2515    ()
2516Bad eta expand
2517    let {
2518      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
2519      Str: DmdType
2520      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
2521                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
2522    } in
2523      __coerce ()
2524      (\ eta_sl0g L :: CmmParse.Decls {- tc rjc -}
2525         eta_sl0h _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2526         eta_sl0i L :: CgMonad.CgState {- tc r2D2 -} ->
2527         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
2528          (case eta_sl0i
2529           of wild {- v aaN4 -} A { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} L ds1 {- v aaNf -} L ds2 {- v aaNe -} L ds3 {- v aaNd -} L ds4 {- v aaNc -} L ds5 {- v aaNb -} L ->
2530           CgMonad.MkCgState {- v r3Xg -}
2531             (OrdList.Two {- v r6p9 -}
2532                @ CgMonad.CgStmt {- tc r3XG -}
2533                ds {- v aaNh -}
2534                (OrdList.One {- v r6pb -}
2535                   @ CgMonad.CgStmt {- tc r3XG -}
2536                   (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
2537             ds1 {- v aaNf -}
2538             ds2 {- v aaNe -}
2539             ds3 {- v aaNd -}
2540             ds4 {- v aaNc -}
2541             ds5 {- v aaNb -}
2542           })))
2543    ()
2544Bad eta expand
2545    case __coerce
2546           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2547         happyzuxzu1 {- v a26q -}
2548    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjf _Kd A ds_dk8w S ->
2549    case ds_dk8w of wild_XnW A {
2550      __DEFAULT -> __coerce () lvl_skV8;
2551      CmmLex.CmmTzuString {- d r2Au -} happyzuvarzu1 {- v a26u -} L ->
2552        __coerce ()
2553        (\ s {- v a2mB -} L :: CmmParse.Decls {- tc rjc -}
2554           eta_slho A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2555           eta_slhp L :: CgMonad.CgState {- tc r2D2 -} ->
2556           let {
2557             ds1 {- v aaLw -} D(SS) :: (Cmm.CmmLit {- tc r2FA -},
2558                                        CgMonad.CgState {- tc r2D2 -})
2559             Str: DmdType
2560             ds1 {- v aaLw -} = CgUtils.mkStringCLit {- v r26v -}
2561                                  happyzuvarzu1 {- v a26u -} eta_slho eta_slhp
2562           } in
2563             ((s {- v a2mB -},
2564               (Cmm.CmmLit {- v r3KG -}
2565                  (case ds1 {- v aaLw -}
2566                   of wild {- v aaLy -} A { (mzuresult {- v aaLz -} S, newzustate {- v aaLA -} A) ->
2567                   mzuresult {- v aaLz -}
2568                   }))),
2569              (case ds1 {- v aaLw -}
2570               of wild {- v aaLr -} A { (mzuresult {- v aaLv -} A, newzustate {- v aaLu -} S) ->
2571               newzustate {- v aaLu -}
2572               })))
2573    }
2574    }
2575    ()
2576Bad eta expand
2577    case __coerce
2578           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2579         happyzuxzu1 {- v a2ap -}
2580    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkj9 _Kd A ds_dk8U S ->
2581    case ds_dk8U of wild_XnW A {
2582      __DEFAULT -> __coerce () lvl_skVg;
2583      CmmLex.CmmTzuGlobalReg {- d r2Aw -} happyzuvarzu1 {- v a2at -} L ->
2584        let {
2585          a_slil T :: Cmm.CmmReg {- tc r2FB -}
2586          Str: DmdType
2587          a_slil = Cmm.CmmGlobal {- v r3KW -} happyzuvarzu1 {- v a2at -} } in
2588        let {
2589          a {- v X2BY -} T :: Cmm.CmmExpr {- tc r2Fz -}
2590          Str: DmdType
2591          a {- v X2BY -} = Cmm.CmmReg {- v r3KK -} a_slil
2592        } in
2593          __coerce ()
2594          (\ s {- v X2C7 -} L :: CmmParse.Decls {- tc rjc -}
2595             eta_XlbD _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2596             eta_XlbF L :: CgMonad.CgState {- tc r2D2 -} ->
2597             ((s {- v X2C7 -}, a {- v X2BY -}), eta_XlbF))
2598    }
2599    }
2600    ()
2601Bad eta expand
2602    case __coerce
2603           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2604         happyzuxzu1 {- v a2b2 -}
2605    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkj5 _Kd A ds_dk9a S ->
2606    case ds_dk9a of wild_XnW A {
2607      __DEFAULT -> __coerce () lvl_skVl;
2608      CmmLex.CmmTzuGlobalReg {- d r2Aw -} happyzuvarzu1 {- v a2b6 -} L ->
2609        let {
2610          a {- v X2BY -} T :: Cmm.CmmReg {- tc r2FB -}
2611          Str: DmdType
2612          a {- v X2BY -} = Cmm.CmmGlobal {- v r3KW -}
2613                             happyzuvarzu1 {- v a2b6 -}
2614        } in
2615          __coerce ()
2616          (\ s {- v X2C6 -} L :: CmmParse.Decls {- tc rjc -}
2617             eta_XlbC _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2618             eta_XlbE L :: CgMonad.CgState {- tc r2D2 -} ->
2619             ((s {- v X2C6 -}, a {- v X2BY -}), eta_XlbE))
2620    }
2621    }
2622    ()
2623Bad eta expand
2624    __coerce ()
2625    (zgzg {- v ajrb -}
2626       @ ()
2627       @ ()
2628       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
2629       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
2630       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
2631    ()
2632Bad eta expand
2633    __coerce ()
2634    (zgzg {- v ajrb -}
2635       @ ()
2636       @ ()
2637       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
2638       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
2639       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
2640    ()
2641Bad eta expand
2642    __coerce ()
2643    (zgzg {- v ajrb -}
2644       @ ()
2645       @ ()
2646       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
2647       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
2648       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
2649    ()
2650Bad eta expand
2651    case __coerce
2652           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2653         happyzuxzu1 {- v a25S -}
2654    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjb _Kd A ds_dk8M S ->
2655    case ds_dk8M of wild_XnX A {
2656      __DEFAULT -> __coerce () lvl_skV6;
2657      CmmLex.CmmTzuInt {- d r2Av -} happyzuvarzu1 {- v a25W -} L ->
2658        let {
2659          a_slhb T :: Cmm.CmmLit {- tc r2FA -}
2660          Str: DmdType
2661          a_slhb = Cmm.CmmInt {- v r3L0 -}
2662                     happyzuvarzu1 {- v a25W -}
2663                     (__coerce MachOp.MachRep {- tc r2Hc -}
2664                      happyzuxzu2 {- v a25R -}) } in
2665        let {
2666          a {- v X2BZ -} T :: Cmm.CmmExpr {- tc r2Fz -}
2667          Str: DmdType
2668          a {- v X2BZ -} = Cmm.CmmLit {- v r3KG -} a_slhb
2669        } in
2670          __coerce ()
2671          (\ s {- v X2C8 -} L :: CmmParse.Decls {- tc rjc -}
2672             eta_XlbE _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2673             eta_XlbG L :: CgMonad.CgState {- tc r2D2 -} ->
2674             ((s {- v X2C8 -}, a {- v X2BZ -}), eta_XlbG))
2675    }
2676    }
2677    ()
2678Bad eta expand
2679    case __coerce
2680           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2681         happyzuxzu1 {- v a26a -}
2682    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjd _Kd A ds_dk8E S ->
2683    case ds_dk8E of wild_XnX A {
2684      __DEFAULT -> __coerce () lvl_skV7;
2685      CmmLex.CmmTzuFloat {- d r2Ax -} happyzuvarzu1 {- v a26e -} L ->
2686        let {
2687          a_slhg T :: Cmm.CmmLit {- tc r2FA -}
2688          Str: DmdType
2689          a_slhg = Cmm.CmmFloat {- v r3L2 -}
2690                     happyzuvarzu1 {- v a26e -}
2691                     (__coerce MachOp.MachRep {- tc r2Hc -}
2692                      happyzuxzu2 {- v a269 -}) } in
2693        let {
2694          a {- v X2BZ -} T :: Cmm.CmmExpr {- tc r2Fz -}
2695          Str: DmdType
2696          a {- v X2BZ -} = Cmm.CmmLit {- v r3KG -} a_slhg
2697        } in
2698          __coerce ()
2699          (\ s {- v X2C8 -} L :: CmmParse.Decls {- tc rjc -}
2700             eta_XlbE _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2701             eta_XlbG L :: CgMonad.CgState {- tc r2D2 -} ->
2702             ((s {- v X2C8 -}, a {- v X2BZ -}), eta_XlbG))
2703    }
2704    }
2705    ()
2706Bad eta expand
2707    let {
2708      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
2709      Str: DmdType
2710      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
2711                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
2712    } in
2713      __coerce ()
2714      (\ eta_sl0g L :: CmmParse.Decls {- tc rjc -}
2715         eta_sl0h _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2716         eta_sl0i L :: CgMonad.CgState {- tc r2D2 -} ->
2717         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
2718          (case eta_sl0i
2719           of wild {- v aaN4 -} A { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} L ds1 {- v aaNf -} L ds2 {- v aaNe -} L ds3 {- v aaNd -} L ds4 {- v aaNc -} L ds5 {- v aaNb -} L ->
2720           CgMonad.MkCgState {- v r3Xg -}
2721             (OrdList.Two {- v r6p9 -}
2722                @ CgMonad.CgStmt {- tc r3XG -}
2723                ds {- v aaNh -}
2724                (OrdList.One {- v r6pb -}
2725                   @ CgMonad.CgStmt {- tc r3XG -}
2726                   (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
2727             ds1 {- v aaNf -}
2728             ds2 {- v aaNe -}
2729             ds3 {- v aaNd -}
2730             ds4 {- v aaNc -}
2731             ds5 {- v aaNb -}
2732           })))
2733    ()
2734Bad eta expand
2735    case __coerce
2736           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2737         happyzuxzu1 {- v a26q -}
2738    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjf _Kd A ds_dk8w S ->
2739    case ds_dk8w of wild_XnW A {
2740      __DEFAULT -> __coerce () lvl_skV8;
2741      CmmLex.CmmTzuString {- d r2Au -} happyzuvarzu1 {- v a26u -} L ->
2742        __coerce ()
2743        (\ s {- v a2mB -} L :: CmmParse.Decls {- tc rjc -}
2744           eta_slho A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2745           eta_slhp L :: CgMonad.CgState {- tc r2D2 -} ->
2746           let {
2747             ds1 {- v aaLw -} D(SS) :: (Cmm.CmmLit {- tc r2FA -},
2748                                        CgMonad.CgState {- tc r2D2 -})
2749             Str: DmdType
2750             ds1 {- v aaLw -} = CgUtils.mkStringCLit {- v r26v -}
2751                                  happyzuvarzu1 {- v a26u -} eta_slho eta_slhp
2752           } in
2753             ((s {- v a2mB -},
2754               (Cmm.CmmLit {- v r3KG -}
2755                  (case ds1 {- v aaLw -}
2756                   of wild {- v aaLy -} A { (mzuresult {- v aaLz -} S, newzustate {- v aaLA -} A) ->
2757                   mzuresult {- v aaLz -}
2758                   }))),
2759              (case ds1 {- v aaLw -}
2760               of wild {- v aaLr -} A { (mzuresult {- v aaLv -} A, newzustate {- v aaLu -} S) ->
2761               newzustate {- v aaLu -}
2762               })))
2763    }
2764    }
2765    ()
2766Bad eta expand
2767    case __coerce
2768           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2769         happyzuxzu1 {- v a2ap -}
2770    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkj9 _Kd A ds_dk8U S ->
2771    case ds_dk8U of wild_XnW A {
2772      __DEFAULT -> __coerce () lvl_skVg;
2773      CmmLex.CmmTzuGlobalReg {- d r2Aw -} happyzuvarzu1 {- v a2at -} L ->
2774        let {
2775          a_slil T :: Cmm.CmmReg {- tc r2FB -}
2776          Str: DmdType
2777          a_slil = Cmm.CmmGlobal {- v r3KW -} happyzuvarzu1 {- v a2at -} } in
2778        let {
2779          a {- v X2BY -} T :: Cmm.CmmExpr {- tc r2Fz -}
2780          Str: DmdType
2781          a {- v X2BY -} = Cmm.CmmReg {- v r3KK -} a_slil
2782        } in
2783          __coerce ()
2784          (\ s {- v X2C7 -} L :: CmmParse.Decls {- tc rjc -}
2785             eta_XlbD _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2786             eta_XlbF L :: CgMonad.CgState {- tc r2D2 -} ->
2787             ((s {- v X2C7 -}, a {- v X2BY -}), eta_XlbF))
2788    }
2789    }
2790    ()
2791Bad eta expand
2792    case __coerce
2793           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2794         happyzuxzu1 {- v a2b2 -}
2795    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkj5 _Kd A ds_dk9a S ->
2796    case ds_dk9a of wild_XnW A {
2797      __DEFAULT -> __coerce () lvl_skVl;
2798      CmmLex.CmmTzuGlobalReg {- d r2Aw -} happyzuvarzu1 {- v a2b6 -} L ->
2799        let {
2800          a {- v X2BY -} T :: Cmm.CmmReg {- tc r2FB -}
2801          Str: DmdType
2802          a {- v X2BY -} = Cmm.CmmGlobal {- v r3KW -}
2803                             happyzuvarzu1 {- v a2b6 -}
2804        } in
2805          __coerce ()
2806          (\ s {- v X2C6 -} L :: CmmParse.Decls {- tc rjc -}
2807             eta_XlbC _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2808             eta_XlbE L :: CgMonad.CgState {- tc r2D2 -} ->
2809             ((s {- v X2C6 -}, a {- v X2BY -}), eta_XlbE))
2810    }
2811    }
2812    ()
2813Bad eta expand
2814    __coerce ()
2815    (zgzg {- v ajrb -}
2816       @ ()
2817       @ ()
2818       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
2819       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
2820       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
2821    ()
2822Bad eta expand
2823    __coerce ()
2824    (zgzg {- v ajrb -}
2825       @ ()
2826       @ ()
2827       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
2828       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
2829       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
2830    ()
2831Bad eta expand
2832    __coerce ()
2833    (zgzg {- v ajrb -}
2834       @ ()
2835       @ ()
2836       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
2837       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
2838       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
2839    ()
2840Bad eta expand
2841    case __coerce
2842           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2843         happyzuxzu1 {- v a25S -}
2844    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjb _Kd A ds_dk8M S ->
2845    case ds_dk8M of wild_XnX A {
2846      __DEFAULT -> __coerce () lvl_skV6;
2847      CmmLex.CmmTzuInt {- d r2Av -} happyzuvarzu1 {- v a25W -} L ->
2848        let {
2849          a_slhb T :: Cmm.CmmLit {- tc r2FA -}
2850          Str: DmdType
2851          a_slhb = Cmm.CmmInt {- v r3L0 -}
2852                     happyzuvarzu1 {- v a25W -}
2853                     (__coerce MachOp.MachRep {- tc r2Hc -}
2854                      happyzuxzu2 {- v a25R -}) } in
2855        let {
2856          a {- v X2BZ -} T :: Cmm.CmmExpr {- tc r2Fz -}
2857          Str: DmdType
2858          a {- v X2BZ -} = Cmm.CmmLit {- v r3KG -} a_slhb
2859        } in
2860          __coerce ()
2861          (\ s {- v X2C8 -} L :: CmmParse.Decls {- tc rjc -}
2862             eta_XlbE _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2863             eta_XlbG L :: CgMonad.CgState {- tc r2D2 -} ->
2864             ((s {- v X2C8 -}, a {- v X2BZ -}), eta_XlbG))
2865    }
2866    }
2867    ()
2868Bad eta expand
2869    case __coerce
2870           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2871         happyzuxzu1 {- v a26a -}
2872    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjd _Kd A ds_dk8E S ->
2873    case ds_dk8E of wild_XnX A {
2874      __DEFAULT -> __coerce () lvl_skV7;
2875      CmmLex.CmmTzuFloat {- d r2Ax -} happyzuvarzu1 {- v a26e -} L ->
2876        let {
2877          a_slhg T :: Cmm.CmmLit {- tc r2FA -}
2878          Str: DmdType
2879          a_slhg = Cmm.CmmFloat {- v r3L2 -}
2880                     happyzuvarzu1 {- v a26e -}
2881                     (__coerce MachOp.MachRep {- tc r2Hc -}
2882                      happyzuxzu2 {- v a269 -}) } in
2883        let {
2884          a {- v X2BZ -} T :: Cmm.CmmExpr {- tc r2Fz -}
2885          Str: DmdType
2886          a {- v X2BZ -} = Cmm.CmmLit {- v r3KG -} a_slhg
2887        } in
2888          __coerce ()
2889          (\ s {- v X2C8 -} L :: CmmParse.Decls {- tc rjc -}
2890             eta_XlbE _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2891             eta_XlbG L :: CgMonad.CgState {- tc r2D2 -} ->
2892             ((s {- v X2C8 -}, a {- v X2BZ -}), eta_XlbG))
2893    }
2894    }
2895    ()
2896Bad eta expand
2897    let {
2898      stmt {- v a2ob -} T :: Cmm.CmmStmt {- tc r2FD -}
2899      Str: DmdType
2900      stmt {- v a2ob -} = Cmm.CmmBranch {- v r3Kr -}
2901                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
2902    } in
2903      __coerce ()
2904      (\ eta_sl0g L :: CmmParse.Decls {- tc rjc -}
2905         eta_sl0h _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2906         eta_sl0i L :: CgMonad.CgState {- tc r2D2 -} ->
2907         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
2908          (case eta_sl0i
2909           of wild {- v aaN4 -} A { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} L ds1 {- v aaNf -} L ds2 {- v aaNe -} L ds3 {- v aaNd -} L ds4 {- v aaNc -} L ds5 {- v aaNb -} L ->
2910           CgMonad.MkCgState {- v r3Xg -}
2911             (OrdList.Two {- v r6p9 -}
2912                @ CgMonad.CgStmt {- tc r3XG -}
2913                ds {- v aaNh -}
2914                (OrdList.One {- v r6pb -}
2915                   @ CgMonad.CgStmt {- tc r3XG -}
2916                   (CgMonad.CgStmt {- v r3XB -} stmt {- v a2ob -})))
2917             ds1 {- v aaNf -}
2918             ds2 {- v aaNe -}
2919             ds3 {- v aaNd -}
2920             ds4 {- v aaNc -}
2921             ds5 {- v aaNb -}
2922           })))
2923    ()
2924Bad eta expand
2925    case __coerce
2926           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2927         happyzuxzu1 {- v a26q -}
2928    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjf _Kd A ds_dk8w S ->
2929    case ds_dk8w of wild_XnW A {
2930      __DEFAULT -> __coerce () lvl_skV8;
2931      CmmLex.CmmTzuString {- d r2Au -} happyzuvarzu1 {- v a26u -} L ->
2932        __coerce ()
2933        (\ s {- v a2mB -} L :: CmmParse.Decls {- tc rjc -}
2934           eta_slho A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2935           eta_slhp L :: CgMonad.CgState {- tc r2D2 -} ->
2936           let {
2937             ds1 {- v aaLw -} D(SS) :: (Cmm.CmmLit {- tc r2FA -},
2938                                        CgMonad.CgState {- tc r2D2 -})
2939             Str: DmdType
2940             ds1 {- v aaLw -} = CgUtils.mkStringCLit {- v r26v -}
2941                                  happyzuvarzu1 {- v a26u -} eta_slho eta_slhp
2942           } in
2943             ((s {- v a2mB -},
2944               (Cmm.CmmLit {- v r3KG -}
2945                  (case ds1 {- v aaLw -}
2946                   of wild {- v aaLy -} A { (mzuresult {- v aaLz -} S, newzustate {- v aaLA -} A) ->
2947                   mzuresult {- v aaLz -}
2948                   }))),
2949              (case ds1 {- v aaLw -}
2950               of wild {- v aaLr -} A { (mzuresult {- v aaLv -} A, newzustate {- v aaLu -} S) ->
2951               newzustate {- v aaLu -}
2952               })))
2953    }
2954    }
2955    ()
2956Bad eta expand
2957    case __coerce
2958           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2959         happyzuxzu1 {- v a2ap -}
2960    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkj9 _Kd A ds_dk8U S ->
2961    case ds_dk8U of wild_XnW A {
2962      __DEFAULT -> __coerce () lvl_skVg;
2963      CmmLex.CmmTzuGlobalReg {- d r2Aw -} happyzuvarzu1 {- v a2at -} L ->
2964        let {
2965          a_slil T :: Cmm.CmmReg {- tc r2FB -}
2966          Str: DmdType
2967          a_slil = Cmm.CmmGlobal {- v r3KW -} happyzuvarzu1 {- v a2at -} } in
2968        let {
2969          a {- v X2BY -} T :: Cmm.CmmExpr {- tc r2Fz -}
2970          Str: DmdType
2971          a {- v X2BY -} = Cmm.CmmReg {- v r3KK -} a_slil
2972        } in
2973          __coerce ()
2974          (\ s {- v X2C7 -} L :: CmmParse.Decls {- tc rjc -}
2975             eta_XlbD _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2976             eta_XlbF L :: CgMonad.CgState {- tc r2D2 -} ->
2977             ((s {- v X2C7 -}, a {- v X2BY -}), eta_XlbF))
2978    }
2979    }
2980    ()
2981Bad eta expand
2982    case __coerce
2983           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
2984         happyzuxzu1 {- v a2b2 -}
2985    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkj5 _Kd A ds_dk9a S ->
2986    case ds_dk9a of wild_XnW A {
2987      __DEFAULT -> __coerce () lvl_skVl;
2988      CmmLex.CmmTzuGlobalReg {- d r2Aw -} happyzuvarzu1 {- v a2b6 -} L ->
2989        let {
2990          a {- v X2BY -} T :: Cmm.CmmReg {- tc r2FB -}
2991          Str: DmdType
2992          a {- v X2BY -} = Cmm.CmmGlobal {- v r3KW -}
2993                             happyzuvarzu1 {- v a2b6 -}
2994        } in
2995          __coerce ()
2996          (\ s {- v X2C6 -} L :: CmmParse.Decls {- tc rjc -}
2997             eta_XlbC _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
2998             eta_XlbE L :: CgMonad.CgState {- tc r2D2 -} ->
2999             ((s {- v X2C6 -}, a {- v X2BY -}), eta_XlbE))
3000    }
3001    }
3002    ()
3003Bad eta expand
3004    case __coerce
3005           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
3006         happyzuxzu1 {- v a2b2 -}
3007    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkj5 _Kd A ds_dk9a S ->
3008    case ds_dk9a of wild_XnW A {
3009      __DEFAULT -> __coerce () lvl_skVl;
3010      CmmLex.CmmTzuGlobalReg {- d r2Aw -} happyzuvarzu1 {- v a2b6 -} L ->
3011        let {
3012          a {- v snqE -} T :: Cmm.CmmReg {- tc r2FB -}
3013          Str: DmdType
3014          a {- v snqE -} = Cmm.CmmGlobal {- v r3KW -}
3015                             happyzuvarzu1 {- v a2b6 -}
3016        } in
3017          __coerce ()
3018          (\ s {- v X2C6 -} L :: CmmParse.Decls {- tc rjc -}
3019             eta_XlbC _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
3020             eta_XlbE L :: CgMonad.CgState {- tc r2D2 -} ->
3021             ((s {- v X2C6 -}, a {- v snqE -}), eta_XlbE))
3022    }
3023    }
3024    ()
3025Bad eta expand
3026    case __coerce
3027           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
3028         happyzuxzu1 {- v a2ap -}
3029    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkj9 _Kd A ds_dk8U S ->
3030    case ds_dk8U of wild_XnW A {
3031      __DEFAULT -> __coerce () lvl_skVg;
3032      CmmLex.CmmTzuGlobalReg {- d r2Aw -} happyzuvarzu1 {- v a2at -} L ->
3033        let {
3034          a_snqf T :: Cmm.CmmReg {- tc r2FB -}
3035          Str: DmdType
3036          a_snqf = Cmm.CmmGlobal {- v r3KW -} happyzuvarzu1 {- v a2at -} } in
3037        let {
3038          a {- v snqh -} T :: Cmm.CmmExpr {- tc r2Fz -}
3039          Str: DmdType
3040          a {- v snqh -} = Cmm.CmmReg {- v r3KK -} a_snqf
3041        } in
3042          __coerce ()
3043          (\ s {- v X2C7 -} L :: CmmParse.Decls {- tc rjc -}
3044             eta_XlbD _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
3045             eta_XlbF L :: CgMonad.CgState {- tc r2D2 -} ->
3046             ((s {- v X2C7 -}, a {- v snqh -}), eta_XlbF))
3047    }
3048    }
3049    ()
3050Bad eta expand
3051    case __coerce
3052           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
3053         happyzuxzu1 {- v a26q -}
3054    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjf _Kd A ds_dk8w S ->
3055    case ds_dk8w of wild_XnW A {
3056      __DEFAULT -> __coerce () lvl_skV8;
3057      CmmLex.CmmTzuString {- d r2Au -} happyzuvarzu1 {- v a26u -} L ->
3058        __coerce ()
3059        (\ s {- v a2mB -} L :: CmmParse.Decls {- tc rjc -}
3060           eta_slho A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
3061           eta_slhp L :: CgMonad.CgState {- tc r2D2 -} ->
3062           let {
3063             ds1 {- v snoJ -} D(SS) :: (Cmm.CmmLit {- tc r2FA -},
3064                                        CgMonad.CgState {- tc r2D2 -})
3065             Str: DmdType
3066             ds1 {- v snoJ -} = CgUtils.mkStringCLit {- v r26v -}
3067                                  happyzuvarzu1 {- v a26u -} eta_slho eta_slhp
3068           } in
3069             ((s {- v a2mB -},
3070               (Cmm.CmmLit {- v r3KG -}
3071                  (case ds1 {- v snoJ -}
3072                   of wild {- v aaLy -} A { (mzuresult {- v aaLz -} S, newzustate {- v aaLA -} A) ->
3073                   mzuresult {- v aaLz -}
3074                   }))),
3075              (case ds1 {- v snoJ -}
3076               of wild {- v aaLr -} A { (mzuresult {- v aaLv -} A, newzustate {- v aaLu -} S) ->
3077               newzustate {- v aaLu -}
3078               })))
3079    }
3080    }
3081    ()
3082Bad eta expand
3083    let {
3084      stmt {- v snlb -} T :: Cmm.CmmStmt {- tc r2FD -}
3085      Str: DmdType
3086      stmt {- v snlb -} = Cmm.CmmBranch {- v r3Kr -}
3087                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
3088    } in
3089      __coerce ()
3090      (\ eta_sl0g L :: CmmParse.Decls {- tc rjc -}
3091         eta_sl0h _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
3092         eta_sl0i L :: CgMonad.CgState {- tc r2D2 -} ->
3093         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
3094          (case eta_sl0i
3095           of wild {- v aaN4 -} A { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} L ds1 {- v aaNf -} L ds2 {- v aaNe -} L ds3 {- v aaNd -} L ds4 {- v aaNc -} L ds5 {- v aaNb -} L ->
3096           CgMonad.MkCgState {- v r3Xg -}
3097             (OrdList.Two {- v r6p9 -}
3098                @ CgMonad.CgStmt {- tc r3XG -}
3099                ds {- v aaNh -}
3100                (OrdList.One {- v r6pb -}
3101                   @ CgMonad.CgStmt {- tc r3XG -}
3102                   (CgMonad.CgStmt {- v r3XB -} stmt {- v snlb -})))
3103             ds1 {- v aaNf -}
3104             ds2 {- v aaNe -}
3105             ds3 {- v aaNd -}
3106             ds4 {- v aaNc -}
3107             ds5 {- v aaNb -}
3108           })))
3109    ()
3110Bad eta expand
3111    lvl_snC1
3112    ()
3113Bad eta expand
3114    lvl_snBL
3115    ()
3116Bad eta expand
3117    lvl_snBF
3118    ()
3119Bad eta expand
3120    case __coerce
3121           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
3122         happyzuxzu1 {- v a26a -}
3123    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjd _Kd A ds_dk8E S ->
3124    case ds_dk8E of wild_XnX A {
3125      __DEFAULT -> __coerce () lvl_skV7;
3126      CmmLex.CmmTzuFloat {- d r2Ax -} happyzuvarzu1 {- v a26e -} L ->
3127        let {
3128          a_snoA T :: Cmm.CmmLit {- tc r2FA -}
3129          Str: DmdType
3130          a_snoA = Cmm.CmmFloat {- v r3L2 -}
3131                     happyzuvarzu1 {- v a26e -}
3132                     (__coerce MachOp.MachRep {- tc r2Hc -}
3133                      happyzuxzu2 {- v a269 -}) } in
3134        let {
3135          a {- v snoC -} T :: Cmm.CmmExpr {- tc r2Fz -}
3136          Str: DmdType
3137          a {- v snoC -} = Cmm.CmmLit {- v r3KG -} a_snoA
3138        } in
3139          __coerce ()
3140          (\ s {- v X2C8 -} L :: CmmParse.Decls {- tc rjc -}
3141             eta_XlbE _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
3142             eta_XlbG L :: CgMonad.CgState {- tc r2D2 -} ->
3143             ((s {- v X2C8 -}, a {- v snoC -}), eta_XlbG))
3144    }
3145    }
3146    ()
3147Bad eta expand
3148    case __coerce
3149           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
3150         happyzuxzu1 {- v a25S -}
3151    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjb _Kd A ds_dk8M S ->
3152    case ds_dk8M of wild_XnX A {
3153      __DEFAULT -> __coerce () lvl_skV6;
3154      CmmLex.CmmTzuInt {- d r2Av -} happyzuvarzu1 {- v a25W -} L ->
3155        let {
3156          a_snor T :: Cmm.CmmLit {- tc r2FA -}
3157          Str: DmdType
3158          a_snor = Cmm.CmmInt {- v r3L0 -}
3159                     happyzuvarzu1 {- v a25W -}
3160                     (__coerce MachOp.MachRep {- tc r2Hc -}
3161                      happyzuxzu2 {- v a25R -}) } in
3162        let {
3163          a {- v snot -} T :: Cmm.CmmExpr {- tc r2Fz -}
3164          Str: DmdType
3165          a {- v snot -} = Cmm.CmmLit {- v r3KG -} a_snor
3166        } in
3167          __coerce ()
3168          (\ s {- v X2C8 -} L :: CmmParse.Decls {- tc rjc -}
3169             eta_XlbE _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
3170             eta_XlbG L :: CgMonad.CgState {- tc r2D2 -} ->
3171             ((s {- v X2C8 -}, a {- v snot -}), eta_XlbG))
3172    }
3173    }
3174    ()
3175Bad eta expand
3176    __coerce ()
3177    (zgzg {- v ajrb -}
3178       @ ()
3179       @ ()
3180       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
3181       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
3182       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
3183    ()
3184Bad eta expand
3185    __coerce ()
3186    (zgzg {- v ajrb -}
3187       @ ()
3188       @ ()
3189       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
3190       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
3191       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
3192    ()
3193Bad eta expand
3194    __coerce ()
3195    (zgzg {- v ajrb -}
3196       @ ()
3197       @ ()
3198       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
3199       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
3200       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
3201    ()
3202Bad eta expand
3203    case __coerce
3204           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
3205         happyzuxzu1 {- v a2b2 -}
3206    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkj5 _Kd A ds_dk9a S ->
3207    case ds_dk9a of wild_XnW A {
3208      __DEFAULT -> __coerce () lvl_skVl;
3209      CmmLex.CmmTzuGlobalReg {- d r2Aw -} happyzuvarzu1 {- v a2b6 -} L ->
3210        let {
3211          a {- v snqE -} T :: Cmm.CmmReg {- tc r2FB -}
3212          Str: DmdType
3213          a {- v snqE -} = Cmm.CmmGlobal {- v r3KW -}
3214                             happyzuvarzu1 {- v a2b6 -}
3215        } in
3216          __coerce ()
3217          (\ s {- v X2C6 -} L :: CmmParse.Decls {- tc rjc -}
3218             eta_XlbC _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
3219             eta_XlbE L :: CgMonad.CgState {- tc r2D2 -} ->
3220             ((s {- v X2C6 -}, a {- v snqE -}), eta_XlbE))
3221    }
3222    }
3223    ()
3224Bad eta expand
3225    case __coerce
3226           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
3227         happyzuxzu1 {- v a2ap -}
3228    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkj9 _Kd A ds_dk8U S ->
3229    case ds_dk8U of wild_XnW A {
3230      __DEFAULT -> __coerce () lvl_skVg;
3231      CmmLex.CmmTzuGlobalReg {- d r2Aw -} happyzuvarzu1 {- v a2at -} L ->
3232        let {
3233          a_snqf T :: Cmm.CmmReg {- tc r2FB -}
3234          Str: DmdType
3235          a_snqf = Cmm.CmmGlobal {- v r3KW -} happyzuvarzu1 {- v a2at -} } in
3236        let {
3237          a {- v snqh -} T :: Cmm.CmmExpr {- tc r2Fz -}
3238          Str: DmdType
3239          a {- v snqh -} = Cmm.CmmReg {- v r3KK -} a_snqf
3240        } in
3241          __coerce ()
3242          (\ s {- v X2C7 -} L :: CmmParse.Decls {- tc rjc -}
3243             eta_XlbD _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
3244             eta_XlbF L :: CgMonad.CgState {- tc r2D2 -} ->
3245             ((s {- v X2C7 -}, a {- v snqh -}), eta_XlbF))
3246    }
3247    }
3248    ()
3249Bad eta expand
3250    case __coerce
3251           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
3252         happyzuxzu1 {- v a26q -}
3253    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjf _Kd A ds_dk8w S ->
3254    case ds_dk8w of wild_XnW A {
3255      __DEFAULT -> __coerce () lvl_skV8;
3256      CmmLex.CmmTzuString {- d r2Au -} happyzuvarzu1 {- v a26u -} L ->
3257        __coerce ()
3258        (\ s {- v a2mB -} L :: CmmParse.Decls {- tc rjc -}
3259           eta_slho A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
3260           eta_slhp L :: CgMonad.CgState {- tc r2D2 -} ->
3261           let {
3262             ds1 {- v snoJ -} D(SS) :: (Cmm.CmmLit {- tc r2FA -},
3263                                        CgMonad.CgState {- tc r2D2 -})
3264             Str: DmdType
3265             ds1 {- v snoJ -} = CgUtils.mkStringCLit {- v r26v -}
3266                                  happyzuvarzu1 {- v a26u -} eta_slho eta_slhp
3267           } in
3268             ((s {- v a2mB -},
3269               (Cmm.CmmLit {- v r3KG -}
3270                  (case ds1 {- v snoJ -}
3271                   of wild {- v aaLy -} A { (mzuresult {- v aaLz -} S, newzustate {- v aaLA -} A) ->
3272                   mzuresult {- v aaLz -}
3273                   }))),
3274              (case ds1 {- v snoJ -}
3275               of wild {- v aaLr -} A { (mzuresult {- v aaLv -} A, newzustate {- v aaLu -} S) ->
3276               newzustate {- v aaLu -}
3277               })))
3278    }
3279    }
3280    ()
3281Bad eta expand
3282    let {
3283      stmt {- v snlb -} T :: Cmm.CmmStmt {- tc r2FD -}
3284      Str: DmdType
3285      stmt {- v snlb -} = Cmm.CmmBranch {- v r3Kr -}
3286                            (__coerce Cmm.BlockId {- tc r2Be -} happyzuxzu2 {- v a1UA -})
3287    } in
3288      __coerce ()
3289      (\ eta_sl0g L :: CmmParse.Decls {- tc rjc -}
3290         eta_sl0h _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
3291         eta_sl0i L :: CgMonad.CgState {- tc r2D2 -} ->
3292         ((eta_sl0g, GHCziBase.Z0T {- v 71 -}),
3293          (case eta_sl0i
3294           of wild {- v aaN4 -} A { CgMonad.MkCgState {- d r3Xh -} ds {- v aaNh -} L ds1 {- v aaNf -} L ds2 {- v aaNe -} L ds3 {- v aaNd -} L ds4 {- v aaNc -} L ds5 {- v aaNb -} L ->
3295           CgMonad.MkCgState {- v r3Xg -}
3296             (OrdList.Two {- v r6p9 -}
3297                @ CgMonad.CgStmt {- tc r3XG -}
3298                ds {- v aaNh -}
3299                (OrdList.One {- v r6pb -}
3300                   @ CgMonad.CgStmt {- tc r3XG -}
3301                   (CgMonad.CgStmt {- v r3XB -} stmt {- v snlb -})))
3302             ds1 {- v aaNf -}
3303             ds2 {- v aaNe -}
3304             ds3 {- v aaNd -}
3305             ds4 {- v aaNc -}
3306             ds5 {- v aaNb -}
3307           })))
3308    ()
3309Bad eta expand
3310    lvl_snC1
3311    ()
3312Bad eta expand
3313    lvl_snBL
3314    ()
3315Bad eta expand
3316    lvl_snBF
3317    ()
3318Bad eta expand
3319    case __coerce
3320           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
3321         happyzuxzu1 {- v a26a -}
3322    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjd _Kd A ds_dk8E S ->
3323    case ds_dk8E of wild_XnX A {
3324      __DEFAULT -> __coerce () lvl_skV7;
3325      CmmLex.CmmTzuFloat {- d r2Ax -} happyzuvarzu1 {- v a26e -} L ->
3326        let {
3327          a_snoA T :: Cmm.CmmLit {- tc r2FA -}
3328          Str: DmdType
3329          a_snoA = Cmm.CmmFloat {- v r3L2 -}
3330                     happyzuvarzu1 {- v a26e -}
3331                     (__coerce MachOp.MachRep {- tc r2Hc -}
3332                      happyzuxzu2 {- v a269 -}) } in
3333        let {
3334          a {- v snoC -} T :: Cmm.CmmExpr {- tc r2Fz -}
3335          Str: DmdType
3336          a {- v snoC -} = Cmm.CmmLit {- v r3KG -} a_snoA
3337        } in
3338          __coerce ()
3339          (\ s {- v X2C8 -} L :: CmmParse.Decls {- tc rjc -}
3340             eta_XlbE _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
3341             eta_XlbG L :: CgMonad.CgState {- tc r2D2 -} ->
3342             ((s {- v X2C8 -}, a {- v snoC -}), eta_XlbG))
3343    }
3344    }
3345    ()
3346Bad eta expand
3347    case __coerce
3348           (SrcLoc.Located {- tc r2Ji -} CmmLex.CmmToken {- tc r2FY -})
3349         happyzuxzu1 {- v a25S -}
3350    of wild_B1 _Kd A { SrcLoc.L {- d r2As -} ds_dkjb _Kd A ds_dk8M S ->
3351    case ds_dk8M of wild_XnX A {
3352      __DEFAULT -> __coerce () lvl_skV6;
3353      CmmLex.CmmTzuInt {- d r2Av -} happyzuvarzu1 {- v a25W -} L ->
3354        let {
3355          a_snor T :: Cmm.CmmLit {- tc r2FA -}
3356          Str: DmdType
3357          a_snor = Cmm.CmmInt {- v r3L0 -}
3358                     happyzuvarzu1 {- v a25W -}
3359                     (__coerce MachOp.MachRep {- tc r2Hc -}
3360                      happyzuxzu2 {- v a25R -}) } in
3361        let {
3362          a {- v snot -} T :: Cmm.CmmExpr {- tc r2Fz -}
3363          Str: DmdType
3364          a {- v snot -} = Cmm.CmmLit {- v r3KG -} a_snor
3365        } in
3366          __coerce ()
3367          (\ s {- v X2C8 -} L :: CmmParse.Decls {- tc rjc -}
3368             eta_XlbE _Kd A :: CgMonad.CgInfoDownwards {- tc r2D1 -}
3369             eta_XlbG L :: CgMonad.CgState {- tc r2D2 -} ->
3370             ((s {- v X2C8 -}, a {- v snot -}), eta_XlbG))
3371    }
3372    }
3373    ()
3374Bad eta expand
3375    __coerce ()
3376    (zgzg {- v ajrb -}
3377       @ ()
3378       @ ()
3379       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
3380       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
3381       (__coerce CmmParse.Env {- tc rjb -} eta_slko))
3382    ()
3383Bad eta expand
3384    __coerce ()
3385    (zgzg {- v ajrb -}
3386       @ ()
3387       @ ()
3388       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
3389       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
3390       (__coerce CmmParse.Env {- tc rjb -} eta_slkm))
3391    ()
3392Bad eta expand
3393    __coerce ()
3394    (zgzg {- v ajrb -}
3395       @ ()
3396       @ ()
3397       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
3398       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
3399       (__coerce CmmParse.Env {- tc rjb -} eta_slj6))
3400    ()
3401Bad eta expand
3402    lvl574 {- v roel -}
3403    ()
3404Bad eta expand
3405    lvl581 {- v roez -}
3406    ()
3407Bad eta expand
3408    lvl584 {- v roeF -}
3409    ()
3410Bad eta expand
3411    __coerce ()
3412    (CmmParse.zgzg {- v rnYq -}
3413       @ ()
3414       @ ()
3415       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OW -})
3416       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OV -})
3417       (__coerce CmmParse.Env {- tc rjb -} eta {- v slko -}))
3418    ()
3419Bad eta expand
3420    __coerce ()
3421    (CmmParse.zgzg {- v rnYq -}
3422       @ ()
3423       @ ()
3424       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1OG -})
3425       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1OF -})
3426       (__coerce CmmParse.Env {- tc rjb -} eta {- v slkm -}))
3427    ()
3428Bad eta expand
3429    __coerce ()
3430    (CmmParse.zgzg {- v rnYq -}
3431       @ ()
3432       @ ()
3433       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu1 {- v a1Ev -})
3434       (__coerce CmmParse.ExtCode {- tc rj7 -} happyzuxzu2 {- v a1Eu -})
3435       (__coerce CmmParse.Env {- tc rjb -} eta {- v slj6 -}))
3436    ()
3437<<ghc: 1220852780 bytes, 3839 GCs, 14066534/22373188 avg/max bytes residency (11 samples), 60M in use, 0.00 INIT (0.01 elapsed), 22.29 MUT (71.38 elapsed), 4.95 GC (5.26 elapsed) :ghc>>
3438/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c cmm/PprC.hs -o stage1/cmm/PprC.o  -ohi stage1/cmm/PprC.hi
3439
3440cmm/PprC.hs:738:
3441    Warning: Pattern match(es) are overlapped
3442             In the definition of `is_cish': is_cish _ = ...
3443<<ghc: 544659668 bytes, 1142 GCs, 9318860/15722424 avg/max bytes residency (9 samples), 43M in use, 0.00 INIT (0.00 elapsed), 9.46 MUT (22.02 elapsed), 2.48 GC (2.55 elapsed) :ghc>>
3444/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c codeGen/CgPrimOp.hs -o stage1/codeGen/CgPrimOp.o  -ohi stage1/codeGen/CgPrimOp.hi
3445<<ghc: 315579148 bytes, 316 GCs, 7118830/14532236 avg/max bytes residency (6 samples), 40M in use, 0.00 INIT (0.00 elapsed), 5.77 MUT (11.63 elapsed), 1.20 GC (1.35 elapsed) :ghc>>
3446/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c types/FunDeps.lhs -o stage1/types/FunDeps.o  -ohi stage1/types/FunDeps.hi
3447<<ghc: 185658556 bytes, 41 GCs, 4662160/10829420 avg/max bytes residency (5 samples), 22M in use, 0.00 INIT (0.00 elapsed), 3.48 MUT (6.10 elapsed), 0.61 GC (0.61 elapsed) :ghc>>
3448/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c types/InstEnv.lhs -o stage1/types/InstEnv.o  -ohi stage1/types/InstEnv.hi
3449<<ghc: 119852676 bytes, 27 GCs, 3037661/7078468 avg/max bytes residency (4 samples), 21M in use, 0.00 INIT (0.00 elapsed), 2.15 MUT (3.82 elapsed), 0.26 GC (0.33 elapsed) :ghc>>
3450/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c iface/IfaceType.lhs -o stage1/iface/IfaceType.o  -ohi stage1/iface/IfaceType.hi
3451<<ghc: 191243804 bytes, 43 GCs, 2990347/7721396 avg/max bytes residency (5 samples), 21M in use, 0.00 INIT (0.01 elapsed), 3.56 MUT (6.81 elapsed), 0.56 GC (0.52 elapsed) :ghc>>
3452/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c iface/IfaceSyn.lhs -o stage1/iface/IfaceSyn.o  -ohi stage1/iface/IfaceSyn.hi
3453<<ghc: 514690920 bytes, 953 GCs, 8951667/16107556 avg/max bytes residency (8 samples), 43M in use, 0.00 INIT (0.01 elapsed), 8.53 MUT (22.35 elapsed), 2.25 GC (2.48 elapsed) :ghc>>
3454/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c main/HscTypes.lhs -o stage1/main/HscTypes.o  -ohi stage1/main/HscTypes.hi
3455<<ghc: 358232500 bytes, 515 GCs, 8014073/15793516 avg/max bytes residency (7 samples), 42M in use, 0.00 INIT (0.00 elapsed), 6.53 MUT (13.17 elapsed), 1.48 GC (1.70 elapsed) :ghc>>
3456/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c prelude/PrelInfo.lhs -o stage1/prelude/PrelInfo.o  -ohi stage1/prelude/PrelInfo.hi
3457<<ghc: 172802420 bytes, 47 GCs, 5606211/13387056 avg/max bytes residency (5 samples), 28M in use, 0.01 INIT (0.01 elapsed), 3.64 MUT (4.61 elapsed), 0.67 GC (0.79 elapsed) :ghc>>
3458/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c codeGen/CgCon.lhs -o stage1/codeGen/CgCon.o  -ohi stage1/codeGen/CgCon.hi
3459<<ghc: 278551716 bytes, 358 GCs, 6766762/16101344 avg/max bytes residency (6 samples), 36M in use, 0.00 INIT (0.00 elapsed), 5.28 MUT (8.85 elapsed), 1.19 GC (1.37 elapsed) :ghc>>
3460/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c codeGen/CgCase.lhs -o stage1/codeGen/CgCase.o  -ohi stage1/codeGen/CgCase.hi
3461<<ghc: 296602836 bytes, 273 GCs, 6126708/15153952 avg/max bytes residency (5 samples), 31M in use, 0.00 INIT (0.00 elapsed), 5.49 MUT (9.89 elapsed), 0.96 GC (1.11 elapsed) :ghc>>
3462/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c codeGen/CgLetNoEscape.lhs -o stage1/codeGen/CgLetNoEscape.o  -ohi stage1/codeGen/CgLetNoEscape.hi
3463<<ghc: 111789796 bytes, 30 GCs, 2962692/6603360 avg/max bytes residency (4 samples), 21M in use, 0.00 INIT (0.00 elapsed), 2.11 MUT (3.08 elapsed), 0.31 GC (0.36 elapsed) :ghc>>
3464/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c codeGen/CgExpr.lhs -o stage1/codeGen/CgExpr.o  -ohi stage1/codeGen/CgExpr.hi
3465<<ghc: 280103012 bytes, 255 GCs, 6377268/15223828 avg/max bytes residency (6 samples), 33M in use, 0.00 INIT (0.00 elapsed), 5.28 MUT (9.25 elapsed), 1.06 GC (1.19 elapsed) :ghc>>
3466/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c codeGen/CodeGen.lhs -o stage1/codeGen/CodeGen.o  -ohi stage1/codeGen/CodeGen.hi
3467<<ghc: 301503812 bytes, 369 GCs, 6380114/16229260 avg/max bytes residency (6 samples), 34M in use, 0.00 INIT (0.00 elapsed), 5.66 MUT (9.48 elapsed), 1.19 GC (1.16 elapsed) :ghc>>
3468/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c hsSyn/HsTypes.lhs -o stage1/hsSyn/HsTypes.o  -ohi stage1/hsSyn/HsTypes.hi
3469<<ghc: 179709444 bytes, 38 GCs, 3778590/8326520 avg/max bytes residency (4 samples), 21M in use, 0.00 INIT (0.00 elapsed), 3.38 MUT (6.06 elapsed), 0.45 GC (0.55 elapsed) :ghc>>
3470/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c hsSyn/HsLit.lhs -o stage1/hsSyn/HsLit.o  -ohi stage1/hsSyn/HsLit.hi
3471<<ghc: 124603492 bytes, 28 GCs, 3657308/8408312 avg/max bytes residency (4 samples), 21M in use, 0.00 INIT (0.00 elapsed), 2.42 MUT (3.84 elapsed), 0.42 GC (0.41 elapsed) :ghc>>
3472/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c hsSyn/HsBinds.lhs -o stage1/hsSyn/HsBinds.o  -ohi stage1/hsSyn/HsBinds.hi
3473<<ghc: 168655600 bytes, 35 GCs, 3578347/8128864 avg/max bytes residency (4 samples), 21M in use, 0.00 INIT (0.00 elapsed), 3.13 MUT (6.11 elapsed), 0.43 GC (0.48 elapsed) :ghc>>
3474/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c hsSyn/HsPat.lhs -o stage1/hsSyn/HsPat.o  -ohi stage1/hsSyn/HsPat.hi
3475<<ghc: 188621708 bytes, 42 GCs, 4811407/11668492 avg/max bytes residency (5 samples), 24M in use, 0.00 INIT (0.00 elapsed), 3.61 MUT (7.70 elapsed), 0.60 GC (0.67 elapsed) :ghc>>
3476/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c hsSyn/HsImpExp.lhs -o stage1/hsSyn/HsImpExp.o  -ohi stage1/hsSyn/HsImpExp.hi
3477<<ghc: 104400076 bytes, 25 GCs, 3893909/8857260 avg/max bytes residency (4 samples), 20M in use, 0.00 INIT (0.00 elapsed), 2.05 MUT (3.36 elapsed), 0.35 GC (0.37 elapsed) :ghc>>
3478/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c hsSyn/HsDecls.lhs -o stage1/hsSyn/HsDecls.o  -ohi stage1/hsSyn/HsDecls.hi
3479<<ghc: 267812236 bytes, 144 GCs, 5395179/12572780 avg/max bytes residency (5 samples), 26M in use, 0.01 INIT (0.00 elapsed), 4.66 MUT (14.25 elapsed), 0.84 GC (0.89 elapsed) :ghc>>
3480/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c hsSyn/HsExpr.lhs -o stage1/hsSyn/HsExpr.o  -ohi stage1/hsSyn/HsExpr.hi
3481<<ghc: 495767920 bytes, 709 GCs, 8410109/14229456 avg/max bytes residency (8 samples), 39M in use, 0.00 INIT (0.00 elapsed), 8.31 MUT (36.43 elapsed), 1.99 GC (2.06 elapsed) :ghc>>
3482/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c hsSyn/HsUtils.lhs -o stage1/hsSyn/HsUtils.o  -ohi stage1/hsSyn/HsUtils.hi
3483<<ghc: 266540748 bytes, 249 GCs, 5774047/14604888 avg/max bytes residency (5 samples), 29M in use, 0.00 INIT (0.00 elapsed), 5.08 MUT (9.41 elapsed), 0.90 GC (1.02 elapsed) :ghc>>
3484/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c hsSyn/HsSyn.lhs -o stage1/hsSyn/HsSyn.o  -ohi stage1/hsSyn/HsSyn.hi
3485<<ghc: 174088012 bytes, 84 GCs, 4990093/12729316 avg/max bytes residency (5 samples), 26M in use, 0.00 INIT (0.00 elapsed), 3.75 MUT (4.65 elapsed), 0.66 GC (0.71 elapsed) :ghc>>
3486/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c parser/RdrHsSyn.lhs -o stage1/parser/RdrHsSyn.o  -ohi stage1/parser/RdrHsSyn.hi
3487<<ghc: 456075272 bytes, 987 GCs, 8679347/18099864 avg/max bytes residency (7 samples), 44M in use, 0.00 INIT (0.01 elapsed), 7.86 MUT (16.67 elapsed), 2.09 GC (2.29 elapsed) :ghc>>
3488/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat  -fno-warn-incomplete-patterns -fvia-C -Onot -fno-ignore-interface-pragmas  -c parser/Parser.hs -o stage1/parser/Parser.o  -ohi stage1/parser/Parser.hi
3489<<ghc: 1093252216 bytes, 2791 GCs, 14277422/28280260 avg/max bytes residency (11 samples), 74M in use, 0.00 INIT (0.00 elapsed), 21.33 MUT (112.39 elapsed), 4.72 GC (5.42 elapsed) :ghc>>
3490/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c main/GetImports.hs -o stage1/main/GetImports.o  -ohi stage1/main/GetImports.hi
3491<<ghc: 161917672 bytes, 44 GCs, 5515246/13359744 avg/max bytes residency (5 samples), 26M in use, 0.00 INIT (0.00 elapsed), 3.40 MUT (5.09 elapsed), 0.70 GC (0.77 elapsed) :ghc>>
3492/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat  -fno-cse  -c main/Finder.lhs -o stage1/main/Finder.o  -ohi stage1/main/Finder.hi
3493<<ghc: 224003916 bytes, 58 GCs, 5495168/12974600 avg/max bytes residency (5 samples), 27M in use, 0.00 INIT (0.00 elapsed), 4.20 MUT (7.51 elapsed), 0.74 GC (0.83 elapsed) :ghc>>
3494/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c parser/ParserCoreUtils.hs -o stage1/parser/ParserCoreUtils.o  -ohi stage1/parser/ParserCoreUtils.hi
3495<<ghc: 52766600 bytes, 13 GCs, 2779357/6189044 avg/max bytes residency (3 samples), 18M in use, 0.00 INIT (0.00 elapsed), 1.00 MUT (1.92 elapsed), 0.17 GC (0.18 elapsed) :ghc>>
3496/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c parser/LexCore.hs -o stage1/parser/LexCore.o  -ohi stage1/parser/LexCore.hi
3497<<ghc: 109051396 bytes, 18 GCs, 2061305/4015136 avg/max bytes residency (3 samples), 20M in use, 0.01 INIT (0.00 elapsed), 1.90 MUT (4.25 elapsed), 0.20 GC (0.19 elapsed) :ghc>>
3498/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c parser/ParserCore.hs -o stage1/parser/ParserCore.o  -ohi stage1/parser/ParserCore.hi
3499
3500parser/ParserCore.hs:1092:
3501    Warning: Pattern match(es) are overlapped
3502             In a case alternative: _ -> ...
3503<<ghc: 423714064 bytes, 774 GCs, 8471596/16430552 avg/max bytes residency (7 samples), 44M in use, 0.00 INIT (0.00 elapsed), 8.05 MUT (14.14 elapsed), 1.73 GC (1.93 elapsed) :ghc>>
3504/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c coreSyn/ExternalCore.lhs -o stage1/coreSyn/ExternalCore.o  -ohi stage1/coreSyn/ExternalCore.hi
3505<<ghc: 38955520 bytes, 8 GCs, 1485590/2916080 avg/max bytes residency (2 samples), 17M in use, 0.00 INIT (0.00 elapsed), 0.75 MUT (1.93 elapsed), 0.05 GC (0.09 elapsed) :ghc>>
3506/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c coreSyn/PprExternalCore.lhs -o stage1/coreSyn/PprExternalCore.o  -ohi stage1/coreSyn/PprExternalCore.hi
3507<<ghc: 133270964 bytes, 19 GCs, 1484928/2272516 avg/max bytes residency (3 samples), 18M in use, 0.00 INIT (0.01 elapsed), 2.32 MUT (5.89 elapsed), 0.24 GC (0.26 elapsed) :ghc>>
3508/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c coreSyn/MkExternalCore.lhs -o stage1/coreSyn/MkExternalCore.o  -ohi stage1/coreSyn/MkExternalCore.hi
3509<<ghc: 255501576 bytes, 330 GCs, 6488250/16680392 avg/max bytes residency (5 samples), 33M in use, 0.00 INIT (0.00 elapsed), 4.98 MUT (8.58 elapsed), 0.98 GC (1.25 elapsed) :ghc>>
3510/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c main/HscStats.lhs -o stage1/main/HscStats.o  -ohi stage1/main/HscStats.hi
3511<<ghc: 211260824 bytes, 55 GCs, 5632238/12703884 avg/max bytes residency (5 samples), 26M in use, 0.00 INIT (0.00 elapsed), 4.26 MUT (7.37 elapsed), 0.68 GC (0.80 elapsed) :ghc>>
3512/usr/local/bin/ghc -H16m -O  -istage1/utils  -istage1/basicTypes  -istage1/types  -istage1/hsSyn  -istage1/prelude  -istage1/rename  -istage1/typecheck  -istage1/deSugar  -istage1/coreSyn  -istage1/specialise  -istage1/simplCore  -istage1/stranal  -istage1/stgSyn  -istage1/simplStg  -istage1/codeGen  -istage1/main  -istage1/profiling  -istage1/parser  -istage1/cprAnalysis  -istage1/compMan  -istage1/ndpFlatten  -istage1/iface  -istage1/cmm  -istage1/nativeGen -Istage1 -cpp -fglasgow-exts -fno-generics -Rghc-timing -I. -IcodeGen -InativeGen -Iparser -package unix -recomp -Rghc-timing  -H16M '-#include "hschooks.h"' -i../lib/compat    -c nativeGen/MachRegs.lhs -o stage1/nativeGen/MachRegs.o  -ohi stage1/nativeGen/MachRegs.hi
3513nativeGen/MachRegs.lhs:1016: parse error (possibly incorrect indentation)
3514<<ghc: 7960776 bytes, 3 GCs, 54904/54904 avg/max bytes residency (1 samples), 16M in use, 0.00 INIT (0.01 elapsed), 0.09 MUT (0.28 elapsed), 0.00 GC (0.02 elapsed) :ghc>>
3515make[2]: *** [stage1/nativeGen/MachRegs.o] Error 1
3516make[1]: *** [all] Error 1
3517make[1]: Leaving directory `/home/jgoerzen/programs/ghc-6.4.1/ghc'
3518make: *** [build] Error 1
3519sh-2.05a$ exit
3520
3521Script command is complete on Tue Nov 22 10:15:27 CST 2005.