1ParseOk 2 ( Module 3 SrcSpanInfo 4 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 7 1 915 1 5 , srcInfoPoints = 6 [ SrcSpan "tests/examples/RealGHC.lhs" 7 1 7 1 7 , SrcSpan "tests/examples/RealGHC.lhs" 8 1 8 1 8 , SrcSpan "tests/examples/RealGHC.lhs" 17 1 17 1 9 , SrcSpan "tests/examples/RealGHC.lhs" 17 1 17 1 10 , SrcSpan "tests/examples/RealGHC.lhs" 40 1 40 1 11 , SrcSpan "tests/examples/RealGHC.lhs" 41 1 41 1 12 , SrcSpan "tests/examples/RealGHC.lhs" 42 1 42 1 13 , SrcSpan "tests/examples/RealGHC.lhs" 43 1 43 1 14 , SrcSpan "tests/examples/RealGHC.lhs" 44 1 44 1 15 , SrcSpan "tests/examples/RealGHC.lhs" 45 1 45 1 16 , SrcSpan "tests/examples/RealGHC.lhs" 46 1 46 1 17 , SrcSpan "tests/examples/RealGHC.lhs" 47 1 47 1 18 , SrcSpan "tests/examples/RealGHC.lhs" 48 1 48 1 19 , SrcSpan "tests/examples/RealGHC.lhs" 49 1 49 1 20 , SrcSpan "tests/examples/RealGHC.lhs" 50 1 50 1 21 , SrcSpan "tests/examples/RealGHC.lhs" 51 1 51 1 22 , SrcSpan "tests/examples/RealGHC.lhs" 52 1 52 1 23 , SrcSpan "tests/examples/RealGHC.lhs" 53 1 53 1 24 , SrcSpan "tests/examples/RealGHC.lhs" 54 1 54 1 25 , SrcSpan "tests/examples/RealGHC.lhs" 55 1 55 1 26 , SrcSpan "tests/examples/RealGHC.lhs" 56 1 56 1 27 , SrcSpan "tests/examples/RealGHC.lhs" 57 1 57 1 28 , SrcSpan "tests/examples/RealGHC.lhs" 58 1 58 1 29 , SrcSpan "tests/examples/RealGHC.lhs" 59 1 59 1 30 , SrcSpan "tests/examples/RealGHC.lhs" 60 1 60 1 31 , SrcSpan "tests/examples/RealGHC.lhs" 61 1 61 1 32 , SrcSpan "tests/examples/RealGHC.lhs" 62 1 62 1 33 , SrcSpan "tests/examples/RealGHC.lhs" 63 1 63 1 34 , SrcSpan "tests/examples/RealGHC.lhs" 64 1 64 1 35 , SrcSpan "tests/examples/RealGHC.lhs" 65 1 65 1 36 , SrcSpan "tests/examples/RealGHC.lhs" 104 1 104 1 37 , SrcSpan "tests/examples/RealGHC.lhs" 108 1 108 1 38 , SrcSpan "tests/examples/RealGHC.lhs" 115 1 115 1 39 , SrcSpan "tests/examples/RealGHC.lhs" 126 1 126 1 40 , SrcSpan "tests/examples/RealGHC.lhs" 128 1 128 1 41 , SrcSpan "tests/examples/RealGHC.lhs" 129 1 129 1 42 , SrcSpan "tests/examples/RealGHC.lhs" 132 1 132 1 43 , SrcSpan "tests/examples/RealGHC.lhs" 133 1 133 1 44 , SrcSpan "tests/examples/RealGHC.lhs" 135 1 135 1 45 , SrcSpan "tests/examples/RealGHC.lhs" 137 1 137 1 46 , SrcSpan "tests/examples/RealGHC.lhs" 150 1 150 1 47 , SrcSpan "tests/examples/RealGHC.lhs" 151 1 151 1 48 , SrcSpan "tests/examples/RealGHC.lhs" 152 1 152 1 49 , SrcSpan "tests/examples/RealGHC.lhs" 156 1 156 1 50 , SrcSpan "tests/examples/RealGHC.lhs" 162 1 162 1 51 , SrcSpan "tests/examples/RealGHC.lhs" 181 1 181 1 52 , SrcSpan "tests/examples/RealGHC.lhs" 182 1 182 1 53 , SrcSpan "tests/examples/RealGHC.lhs" 184 1 184 1 54 , SrcSpan "tests/examples/RealGHC.lhs" 185 1 185 1 55 , SrcSpan "tests/examples/RealGHC.lhs" 188 1 188 1 56 , SrcSpan "tests/examples/RealGHC.lhs" 189 1 189 1 57 , SrcSpan "tests/examples/RealGHC.lhs" 192 1 192 1 58 , SrcSpan "tests/examples/RealGHC.lhs" 193 1 193 1 59 , SrcSpan "tests/examples/RealGHC.lhs" 195 1 195 1 60 , SrcSpan "tests/examples/RealGHC.lhs" 200 1 200 1 61 , SrcSpan "tests/examples/RealGHC.lhs" 201 1 201 1 62 , SrcSpan "tests/examples/RealGHC.lhs" 203 1 203 1 63 , SrcSpan "tests/examples/RealGHC.lhs" 208 1 208 1 64 , SrcSpan "tests/examples/RealGHC.lhs" 225 1 225 1 65 , SrcSpan "tests/examples/RealGHC.lhs" 229 1 229 1 66 , SrcSpan "tests/examples/RealGHC.lhs" 231 1 231 1 67 , SrcSpan "tests/examples/RealGHC.lhs" 232 1 232 1 68 , SrcSpan "tests/examples/RealGHC.lhs" 234 1 234 1 69 , SrcSpan "tests/examples/RealGHC.lhs" 235 1 235 1 70 , SrcSpan "tests/examples/RealGHC.lhs" 238 1 238 1 71 , SrcSpan "tests/examples/RealGHC.lhs" 239 1 239 1 72 , SrcSpan "tests/examples/RealGHC.lhs" 241 1 241 1 73 , SrcSpan "tests/examples/RealGHC.lhs" 242 1 242 1 74 , SrcSpan "tests/examples/RealGHC.lhs" 245 1 245 1 75 , SrcSpan "tests/examples/RealGHC.lhs" 246 1 246 1 76 , SrcSpan "tests/examples/RealGHC.lhs" 278 1 278 1 77 , SrcSpan "tests/examples/RealGHC.lhs" 284 1 284 1 78 , SrcSpan "tests/examples/RealGHC.lhs" 300 1 300 1 79 , SrcSpan "tests/examples/RealGHC.lhs" 306 1 306 1 80 , SrcSpan "tests/examples/RealGHC.lhs" 307 1 307 1 81 , SrcSpan "tests/examples/RealGHC.lhs" 324 1 324 1 82 , SrcSpan "tests/examples/RealGHC.lhs" 325 1 325 1 83 , SrcSpan "tests/examples/RealGHC.lhs" 326 1 326 1 84 , SrcSpan "tests/examples/RealGHC.lhs" 327 1 327 1 85 , SrcSpan "tests/examples/RealGHC.lhs" 335 1 335 1 86 , SrcSpan "tests/examples/RealGHC.lhs" 336 1 336 1 87 , SrcSpan "tests/examples/RealGHC.lhs" 338 1 338 1 88 , SrcSpan "tests/examples/RealGHC.lhs" 364 1 364 1 89 , SrcSpan "tests/examples/RealGHC.lhs" 370 1 370 1 90 , SrcSpan "tests/examples/RealGHC.lhs" 390 1 390 1 91 , SrcSpan "tests/examples/RealGHC.lhs" 397 1 397 1 92 , SrcSpan "tests/examples/RealGHC.lhs" 457 1 457 1 93 , SrcSpan "tests/examples/RealGHC.lhs" 458 1 458 1 94 , SrcSpan "tests/examples/RealGHC.lhs" 460 1 460 1 95 , SrcSpan "tests/examples/RealGHC.lhs" 461 1 461 1 96 , SrcSpan "tests/examples/RealGHC.lhs" 473 1 473 1 97 , SrcSpan "tests/examples/RealGHC.lhs" 495 1 495 1 98 , SrcSpan "tests/examples/RealGHC.lhs" 499 1 499 1 99 , SrcSpan "tests/examples/RealGHC.lhs" 513 1 513 1 100 , SrcSpan "tests/examples/RealGHC.lhs" 571 1 571 1 101 , SrcSpan "tests/examples/RealGHC.lhs" 597 1 597 1 102 , SrcSpan "tests/examples/RealGHC.lhs" 601 1 601 1 103 , SrcSpan "tests/examples/RealGHC.lhs" 605 1 605 1 104 , SrcSpan "tests/examples/RealGHC.lhs" 615 1 615 1 105 , SrcSpan "tests/examples/RealGHC.lhs" 623 1 623 1 106 , SrcSpan "tests/examples/RealGHC.lhs" 629 1 629 1 107 , SrcSpan "tests/examples/RealGHC.lhs" 636 1 636 1 108 , SrcSpan "tests/examples/RealGHC.lhs" 639 1 639 1 109 , SrcSpan "tests/examples/RealGHC.lhs" 670 1 670 1 110 , SrcSpan "tests/examples/RealGHC.lhs" 674 1 674 1 111 , SrcSpan "tests/examples/RealGHC.lhs" 679 1 679 1 112 , SrcSpan "tests/examples/RealGHC.lhs" 723 1 723 1 113 , SrcSpan "tests/examples/RealGHC.lhs" 728 1 728 1 114 , SrcSpan "tests/examples/RealGHC.lhs" 730 1 730 1 115 , SrcSpan "tests/examples/RealGHC.lhs" 738 1 738 1 116 , SrcSpan "tests/examples/RealGHC.lhs" 750 1 750 1 117 , SrcSpan "tests/examples/RealGHC.lhs" 755 1 755 1 118 , SrcSpan "tests/examples/RealGHC.lhs" 813 1 813 1 119 , SrcSpan "tests/examples/RealGHC.lhs" 818 1 818 1 120 , SrcSpan "tests/examples/RealGHC.lhs" 830 1 830 1 121 , SrcSpan "tests/examples/RealGHC.lhs" 836 1 836 1 122 , SrcSpan "tests/examples/RealGHC.lhs" 838 1 838 1 123 , SrcSpan "tests/examples/RealGHC.lhs" 839 1 839 1 124 , SrcSpan "tests/examples/RealGHC.lhs" 841 1 841 1 125 , SrcSpan "tests/examples/RealGHC.lhs" 842 1 842 1 126 , SrcSpan "tests/examples/RealGHC.lhs" 843 1 843 1 127 , SrcSpan "tests/examples/RealGHC.lhs" 844 1 844 1 128 , SrcSpan "tests/examples/RealGHC.lhs" 845 1 845 1 129 , SrcSpan "tests/examples/RealGHC.lhs" 846 1 846 1 130 , SrcSpan "tests/examples/RealGHC.lhs" 847 1 847 1 131 , SrcSpan "tests/examples/RealGHC.lhs" 848 1 848 1 132 , SrcSpan "tests/examples/RealGHC.lhs" 849 1 849 1 133 , SrcSpan "tests/examples/RealGHC.lhs" 850 1 850 1 134 , SrcSpan "tests/examples/RealGHC.lhs" 853 1 853 1 135 , SrcSpan "tests/examples/RealGHC.lhs" 854 1 854 1 136 , SrcSpan "tests/examples/RealGHC.lhs" 855 1 855 1 137 , SrcSpan "tests/examples/RealGHC.lhs" 859 1 859 1 138 , SrcSpan "tests/examples/RealGHC.lhs" 863 1 863 1 139 , SrcSpan "tests/examples/RealGHC.lhs" 870 1 870 1 140 , SrcSpan "tests/examples/RealGHC.lhs" 871 1 871 1 141 , SrcSpan "tests/examples/RealGHC.lhs" 915 1 915 1 142 , SrcSpan "tests/examples/RealGHC.lhs" 915 1 915 1 143 ] 144 } 145 (Just 146 (ModuleHead 147 SrcSpanInfo 148 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 17 1 36 12 149 , srcInfoPoints = 150 [ SrcSpan "tests/examples/RealGHC.lhs" 17 1 17 7 151 , SrcSpan "tests/examples/RealGHC.lhs" 36 7 36 12 152 ] 153 } 154 (ModuleName 155 SrcSpanInfo 156 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 17 8 17 13 157 , srcInfoPoints = [] 158 } 159 "Rules") 160 Nothing 161 (Just 162 (ExportSpecList 163 SrcSpanInfo 164 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 17 14 36 6 165 , srcInfoPoints = 166 [ SrcSpan "tests/examples/RealGHC.lhs" 17 14 17 15 167 , SrcSpan "tests/examples/RealGHC.lhs" 19 13 19 14 168 , SrcSpan "tests/examples/RealGHC.lhs" 22 18 22 19 169 , SrcSpan "tests/examples/RealGHC.lhs" 22 30 22 31 170 , SrcSpan "tests/examples/RealGHC.lhs" 22 50 22 51 171 , SrcSpan "tests/examples/RealGHC.lhs" 23 18 23 19 172 , SrcSpan "tests/examples/RealGHC.lhs" 23 31 23 32 173 , SrcSpan "tests/examples/RealGHC.lhs" 26 21 26 22 174 , SrcSpan "tests/examples/RealGHC.lhs" 29 15 29 16 175 , SrcSpan "tests/examples/RealGHC.lhs" 29 31 29 32 176 , SrcSpan "tests/examples/RealGHC.lhs" 29 44 29 45 177 , SrcSpan "tests/examples/RealGHC.lhs" 30 25 30 26 178 , SrcSpan "tests/examples/RealGHC.lhs" 33 21 33 22 179 , SrcSpan "tests/examples/RealGHC.lhs" 33 31 33 32 180 , SrcSpan "tests/examples/RealGHC.lhs" 33 48 33 49 181 , SrcSpan "tests/examples/RealGHC.lhs" 35 19 35 20 182 , SrcSpan "tests/examples/RealGHC.lhs" 35 32 35 33 183 , SrcSpan "tests/examples/RealGHC.lhs" 36 5 36 6 184 ] 185 } 186 [ EAbs 187 SrcSpanInfo 188 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 19 5 19 13 189 , srcInfoPoints = [] 190 } 191 (NoNamespace 192 SrcSpanInfo 193 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 19 5 19 13 194 , srcInfoPoints = [] 195 }) 196 (UnQual 197 SrcSpanInfo 198 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 19 5 19 13 199 , srcInfoPoints = [] 200 } 201 (Ident 202 SrcSpanInfo 203 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 19 5 19 13 204 , srcInfoPoints = [] 205 } 206 "RuleBase")) 207 , EVar 208 SrcSpanInfo 209 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 5 22 18 210 , srcInfoPoints = [] 211 } 212 (UnQual 213 SrcSpanInfo 214 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 5 22 18 215 , srcInfoPoints = [] 216 } 217 (Ident 218 SrcSpanInfo 219 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 5 22 18 220 , srcInfoPoints = [] 221 } 222 "emptyRuleBase")) 223 , EVar 224 SrcSpanInfo 225 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 20 22 30 226 , srcInfoPoints = [] 227 } 228 (UnQual 229 SrcSpanInfo 230 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 20 22 30 231 , srcInfoPoints = [] 232 } 233 (Ident 234 SrcSpanInfo 235 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 20 22 30 236 , srcInfoPoints = [] 237 } 238 "mkRuleBase")) 239 , EVar 240 SrcSpanInfo 241 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 32 22 50 242 , srcInfoPoints = [] 243 } 244 (UnQual 245 SrcSpanInfo 246 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 32 22 50 247 , srcInfoPoints = [] 248 } 249 (Ident 250 SrcSpanInfo 251 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 22 32 22 50 252 , srcInfoPoints = [] 253 } 254 "extendRuleBaseList")) 255 , EVar 256 SrcSpanInfo 257 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 23 5 23 18 258 , srcInfoPoints = [] 259 } 260 (UnQual 261 SrcSpanInfo 262 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 23 5 23 18 263 , srcInfoPoints = [] 264 } 265 (Ident 266 SrcSpanInfo 267 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 23 5 23 18 268 , srcInfoPoints = [] 269 } 270 "unionRuleBase")) 271 , EVar 272 SrcSpanInfo 273 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 23 20 23 31 274 , srcInfoPoints = [] 275 } 276 (UnQual 277 SrcSpanInfo 278 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 23 20 23 31 279 , srcInfoPoints = [] 280 } 281 (Ident 282 SrcSpanInfo 283 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 23 20 23 31 284 , srcInfoPoints = [] 285 } 286 "pprRuleBase")) 287 , EVar 288 SrcSpanInfo 289 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 26 5 26 21 290 , srcInfoPoints = [] 291 } 292 (UnQual 293 SrcSpanInfo 294 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 26 5 26 21 295 , srcInfoPoints = [] 296 } 297 (Ident 298 SrcSpanInfo 299 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 26 5 26 21 300 , srcInfoPoints = [] 301 } 302 "ruleCheckProgram")) 303 , EVar 304 SrcSpanInfo 305 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 5 29 15 306 , srcInfoPoints = [] 307 } 308 (UnQual 309 SrcSpanInfo 310 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 5 29 15 311 , srcInfoPoints = [] 312 } 313 (Ident 314 SrcSpanInfo 315 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 5 29 15 316 , srcInfoPoints = [] 317 } 318 "mkSpecInfo")) 319 , EVar 320 SrcSpanInfo 321 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 17 29 31 322 , srcInfoPoints = [] 323 } 324 (UnQual 325 SrcSpanInfo 326 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 17 29 31 327 , srcInfoPoints = [] 328 } 329 (Ident 330 SrcSpanInfo 331 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 17 29 31 332 , srcInfoPoints = [] 333 } 334 "extendSpecInfo")) 335 , EVar 336 SrcSpanInfo 337 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 33 29 44 338 , srcInfoPoints = [] 339 } 340 (UnQual 341 SrcSpanInfo 342 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 33 29 44 343 , srcInfoPoints = [] 344 } 345 (Ident 346 SrcSpanInfo 347 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 29 33 29 44 348 , srcInfoPoints = [] 349 } 350 "addSpecInfo")) 351 , EVar 352 SrcSpanInfo 353 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 30 5 30 25 354 , srcInfoPoints = [] 355 } 356 (UnQual 357 SrcSpanInfo 358 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 30 5 30 25 359 , srcInfoPoints = [] 360 } 361 (Ident 362 SrcSpanInfo 363 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 30 5 30 25 364 , srcInfoPoints = [] 365 } 366 "addIdSpecialisations")) 367 , EVar 368 SrcSpanInfo 369 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 9 33 21 370 , srcInfoPoints = [] 371 } 372 (UnQual 373 SrcSpanInfo 374 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 9 33 21 375 , srcInfoPoints = [] 376 } 377 (Ident 378 SrcSpanInfo 379 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 9 33 21 380 , srcInfoPoints = [] 381 } 382 "rulesOfBinds")) 383 , EVar 384 SrcSpanInfo 385 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 23 33 31 386 , srcInfoPoints = [] 387 } 388 (UnQual 389 SrcSpanInfo 390 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 23 33 31 391 , srcInfoPoints = [] 392 } 393 (Ident 394 SrcSpanInfo 395 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 23 33 31 396 , srcInfoPoints = [] 397 } 398 "getRules")) 399 , EVar 400 SrcSpanInfo 401 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 33 33 48 402 , srcInfoPoints = [] 403 } 404 (UnQual 405 SrcSpanInfo 406 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 33 33 48 407 , srcInfoPoints = [] 408 } 409 (Ident 410 SrcSpanInfo 411 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 33 33 33 48 412 , srcInfoPoints = [] 413 } 414 "pprRulesForUser")) 415 , EVar 416 SrcSpanInfo 417 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 9 35 19 418 , srcInfoPoints = [] 419 } 420 (UnQual 421 SrcSpanInfo 422 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 9 35 19 423 , srcInfoPoints = [] 424 } 425 (Ident 426 SrcSpanInfo 427 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 9 35 19 428 , srcInfoPoints = [] 429 } 430 "lookupRule")) 431 , EVar 432 SrcSpanInfo 433 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 21 35 32 434 , srcInfoPoints = [] 435 } 436 (UnQual 437 SrcSpanInfo 438 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 21 35 32 439 , srcInfoPoints = [] 440 } 441 (Ident 442 SrcSpanInfo 443 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 21 35 32 444 , srcInfoPoints = [] 445 } 446 "mkLocalRule")) 447 , EVar 448 SrcSpanInfo 449 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 34 35 47 450 , srcInfoPoints = [] 451 } 452 (UnQual 453 SrcSpanInfo 454 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 34 35 47 455 , srcInfoPoints = [] 456 } 457 (Ident 458 SrcSpanInfo 459 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 35 34 35 47 460 , srcInfoPoints = [] 461 } 462 "roughTopNames")) 463 ])))) 464 [ OptionsPragma 465 SrcSpanInfo 466 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 7 1 7 19 467 , srcInfoPoints = 468 [ SrcSpan "tests/examples/RealGHC.lhs" 7 1 7 16 469 , SrcSpan "tests/examples/RealGHC.lhs" 7 16 7 19 470 ] 471 } 472 Nothing 473 "-w " 474 , LanguagePragma 475 SrcSpanInfo 476 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 8 1 8 31 477 , srcInfoPoints = 478 [ SrcSpan "tests/examples/RealGHC.lhs" 8 1 8 13 479 , SrcSpan "tests/examples/RealGHC.lhs" 8 28 8 31 480 ] 481 } 482 [ Ident 483 SrcSpanInfo 484 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 8 14 8 27 485 , srcInfoPoints = [] 486 } 487 "PatternGuards" 488 ] 489 ] 490 [ ImportDecl 491 { importAnn = 492 SrcSpanInfo 493 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 40 1 40 15 494 , srcInfoPoints = 495 [ SrcSpan "tests/examples/RealGHC.lhs" 40 1 40 7 ] 496 } 497 , importModule = 498 ModuleName 499 SrcSpanInfo 500 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 40 8 40 15 501 , srcInfoPoints = [] 502 } 503 "CoreSyn" 504 , importQualified = False 505 , importSrc = False 506 , importSafe = False 507 , importPkg = Nothing 508 , importAs = Nothing 509 , importSpecs = Nothing 510 } 511 , ImportDecl 512 { importAnn = 513 SrcSpanInfo 514 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 41 1 41 41 515 , srcInfoPoints = 516 [ SrcSpan "tests/examples/RealGHC.lhs" 41 1 41 7 ] 517 } 518 , importModule = 519 ModuleName 520 SrcSpanInfo 521 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 41 8 41 17 522 , srcInfoPoints = [] 523 } 524 "OccurAnal" 525 , importQualified = False 526 , importSrc = False 527 , importSafe = False 528 , importPkg = Nothing 529 , importAs = Nothing 530 , importSpecs = 531 Just 532 (ImportSpecList 533 SrcSpanInfo 534 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 41 21 41 41 535 , srcInfoPoints = 536 [ SrcSpan "tests/examples/RealGHC.lhs" 41 21 41 22 537 , SrcSpan "tests/examples/RealGHC.lhs" 41 40 41 41 538 ] 539 } 540 False 541 [ IVar 542 SrcSpanInfo 543 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 41 23 41 39 544 , srcInfoPoints = [] 545 } 546 (Ident 547 SrcSpanInfo 548 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 41 23 41 39 549 , srcInfoPoints = [] 550 } 551 "occurAnalyseExpr") 552 ]) 553 } 554 , ImportDecl 555 { importAnn = 556 SrcSpanInfo 557 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 1 42 81 558 , srcInfoPoints = 559 [ SrcSpan "tests/examples/RealGHC.lhs" 42 1 42 7 ] 560 } 561 , importModule = 562 ModuleName 563 SrcSpanInfo 564 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 8 42 15 565 , srcInfoPoints = [] 566 } 567 "CoreFVs" 568 , importQualified = False 569 , importSrc = False 570 , importSafe = False 571 , importPkg = Nothing 572 , importAs = Nothing 573 , importSpecs = 574 Just 575 (ImportSpecList 576 SrcSpanInfo 577 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 21 42 81 578 , srcInfoPoints = 579 [ SrcSpan "tests/examples/RealGHC.lhs" 42 21 42 22 580 , SrcSpan "tests/examples/RealGHC.lhs" 42 35 42 36 581 , SrcSpan "tests/examples/RealGHC.lhs" 42 50 42 51 582 , SrcSpan "tests/examples/RealGHC.lhs" 42 64 42 65 583 , SrcSpan "tests/examples/RealGHC.lhs" 42 80 42 81 584 ] 585 } 586 False 587 [ IVar 588 SrcSpanInfo 589 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 23 42 35 590 , srcInfoPoints = [] 591 } 592 (Ident 593 SrcSpanInfo 594 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 23 42 35 595 , srcInfoPoints = [] 596 } 597 "exprFreeVars") 598 , IVar 599 SrcSpanInfo 600 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 37 42 50 601 , srcInfoPoints = [] 602 } 603 (Ident 604 SrcSpanInfo 605 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 37 42 50 606 , srcInfoPoints = [] 607 } 608 "exprsFreeVars") 609 , IVar 610 SrcSpanInfo 611 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 52 42 64 612 , srcInfoPoints = [] 613 } 614 (Ident 615 SrcSpanInfo 616 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 52 42 64 617 , srcInfoPoints = [] 618 } 619 "bindFreeVars") 620 , IVar 621 SrcSpanInfo 622 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 66 42 79 623 , srcInfoPoints = [] 624 } 625 (Ident 626 SrcSpanInfo 627 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 42 66 42 79 628 , srcInfoPoints = [] 629 } 630 "rulesFreeVars") 631 ]) 632 } 633 , ImportDecl 634 { importAnn = 635 SrcSpanInfo 636 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 43 1 43 44 637 , srcInfoPoints = 638 [ SrcSpan "tests/examples/RealGHC.lhs" 43 1 43 7 ] 639 } 640 , importModule = 641 ModuleName 642 SrcSpanInfo 643 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 43 8 43 17 644 , srcInfoPoints = [] 645 } 646 "CoreUtils" 647 , importQualified = False 648 , importSrc = False 649 , importSafe = False 650 , importPkg = Nothing 651 , importAs = Nothing 652 , importSpecs = 653 Just 654 (ImportSpecList 655 SrcSpanInfo 656 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 43 21 43 44 657 , srcInfoPoints = 658 [ SrcSpan "tests/examples/RealGHC.lhs" 43 21 43 22 659 , SrcSpan "tests/examples/RealGHC.lhs" 43 32 43 33 660 , SrcSpan "tests/examples/RealGHC.lhs" 43 43 43 44 661 ] 662 } 663 False 664 [ IVar 665 SrcSpanInfo 666 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 43 23 43 32 667 , srcInfoPoints = [] 668 } 669 (Ident 670 SrcSpanInfo 671 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 43 23 43 32 672 , srcInfoPoints = [] 673 } 674 "tcEqExprX") 675 , IVar 676 SrcSpanInfo 677 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 43 34 43 42 678 , srcInfoPoints = [] 679 } 680 (Ident 681 SrcSpanInfo 682 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 43 34 43 42 683 , srcInfoPoints = [] 684 } 685 "exprType") 686 ]) 687 } 688 , ImportDecl 689 { importAnn = 690 SrcSpanInfo 691 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 44 1 44 33 692 , srcInfoPoints = 693 [ SrcSpan "tests/examples/RealGHC.lhs" 44 1 44 7 ] 694 } 695 , importModule = 696 ModuleName 697 SrcSpanInfo 698 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 44 8 44 15 699 , srcInfoPoints = [] 700 } 701 "PprCore" 702 , importQualified = False 703 , importSrc = False 704 , importSafe = False 705 , importPkg = Nothing 706 , importAs = Nothing 707 , importSpecs = 708 Just 709 (ImportSpecList 710 SrcSpanInfo 711 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 44 21 44 33 712 , srcInfoPoints = 713 [ SrcSpan "tests/examples/RealGHC.lhs" 44 21 44 22 714 , SrcSpan "tests/examples/RealGHC.lhs" 44 32 44 33 715 ] 716 } 717 False 718 [ IVar 719 SrcSpanInfo 720 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 44 23 44 31 721 , srcInfoPoints = [] 722 } 723 (Ident 724 SrcSpanInfo 725 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 44 23 44 31 726 , srcInfoPoints = [] 727 } 728 "pprRules") 729 ]) 730 } 731 , ImportDecl 732 { importAnn = 733 SrcSpanInfo 734 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 1 45 37 735 , srcInfoPoints = 736 [ SrcSpan "tests/examples/RealGHC.lhs" 45 1 45 7 ] 737 } 738 , importModule = 739 ModuleName 740 SrcSpanInfo 741 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 8 45 12 742 , srcInfoPoints = [] 743 } 744 "Type" 745 , importQualified = False 746 , importSrc = False 747 , importSafe = False 748 , importPkg = Nothing 749 , importAs = Nothing 750 , importSpecs = 751 Just 752 (ImportSpecList 753 SrcSpanInfo 754 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 17 45 37 755 , srcInfoPoints = 756 [ SrcSpan "tests/examples/RealGHC.lhs" 45 17 45 18 757 , SrcSpan "tests/examples/RealGHC.lhs" 45 23 45 24 758 , SrcSpan "tests/examples/RealGHC.lhs" 45 36 45 37 759 ] 760 } 761 False 762 [ IAbs 763 SrcSpanInfo 764 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 19 45 23 765 , srcInfoPoints = [] 766 } 767 (NoNamespace 768 SrcSpanInfo 769 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 19 45 23 770 , srcInfoPoints = [] 771 }) 772 (Ident 773 SrcSpanInfo 774 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 19 45 23 775 , srcInfoPoints = [] 776 } 777 "Type") 778 , IAbs 779 SrcSpanInfo 780 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 25 45 35 781 , srcInfoPoints = [] 782 } 783 (NoNamespace 784 SrcSpanInfo 785 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 25 45 35 786 , srcInfoPoints = [] 787 }) 788 (Ident 789 SrcSpanInfo 790 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 45 25 45 35 791 , srcInfoPoints = [] 792 } 793 "TvSubstEnv") 794 ]) 795 } 796 , ImportDecl 797 { importAnn = 798 SrcSpanInfo 799 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 46 1 46 41 800 , srcInfoPoints = 801 [ SrcSpan "tests/examples/RealGHC.lhs" 46 1 46 7 ] 802 } 803 , importModule = 804 ModuleName 805 SrcSpanInfo 806 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 46 8 46 16 807 , srcInfoPoints = [] 808 } 809 "Coercion" 810 , importQualified = False 811 , importSrc = False 812 , importSafe = False 813 , importPkg = Nothing 814 , importAs = Nothing 815 , importSpecs = 816 Just 817 (ImportSpecList 818 SrcSpanInfo 819 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 46 25 46 41 820 , srcInfoPoints = 821 [ SrcSpan "tests/examples/RealGHC.lhs" 46 25 46 26 822 , SrcSpan "tests/examples/RealGHC.lhs" 46 40 46 41 823 ] 824 } 825 False 826 [ IVar 827 SrcSpanInfo 828 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 46 27 46 39 829 , srcInfoPoints = [] 830 } 831 (Ident 832 SrcSpanInfo 833 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 46 27 46 39 834 , srcInfoPoints = [] 835 } 836 "coercionKind") 837 ]) 838 } 839 , ImportDecl 840 { importAnn = 841 SrcSpanInfo 842 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 47 1 47 46 843 , srcInfoPoints = 844 [ SrcSpan "tests/examples/RealGHC.lhs" 47 1 47 7 ] 845 } 846 , importModule = 847 ModuleName 848 SrcSpanInfo 849 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 47 8 47 14 850 , srcInfoPoints = [] 851 } 852 "TcType" 853 , importQualified = False 854 , importSrc = False 855 , importSafe = False 856 , importPkg = Nothing 857 , importAs = Nothing 858 , importSpecs = 859 Just 860 (ImportSpecList 861 SrcSpanInfo 862 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 47 21 47 46 863 , srcInfoPoints = 864 [ SrcSpan "tests/examples/RealGHC.lhs" 47 21 47 22 865 , SrcSpan "tests/examples/RealGHC.lhs" 47 45 47 46 866 ] 867 } 868 False 869 [ IVar 870 SrcSpanInfo 871 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 47 23 47 44 872 , srcInfoPoints = [] 873 } 874 (Ident 875 SrcSpanInfo 876 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 47 23 47 44 877 , srcInfoPoints = [] 878 } 879 "tcSplitTyConApp_maybe") 880 ]) 881 } 882 , ImportDecl 883 { importAnn = 884 SrcSpanInfo 885 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 48 1 48 34 886 , srcInfoPoints = 887 [ SrcSpan "tests/examples/RealGHC.lhs" 48 1 48 7 ] 888 } 889 , importModule = 890 ModuleName 891 SrcSpanInfo 892 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 48 8 48 16 893 , srcInfoPoints = [] 894 } 895 "CoreTidy" 896 , importQualified = False 897 , importSrc = False 898 , importSafe = False 899 , importPkg = Nothing 900 , importAs = Nothing 901 , importSpecs = 902 Just 903 (ImportSpecList 904 SrcSpanInfo 905 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 48 21 48 34 906 , srcInfoPoints = 907 [ SrcSpan "tests/examples/RealGHC.lhs" 48 21 48 22 908 , SrcSpan "tests/examples/RealGHC.lhs" 48 33 48 34 909 ] 910 } 911 False 912 [ IVar 913 SrcSpanInfo 914 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 48 23 48 32 915 , srcInfoPoints = [] 916 } 917 (Ident 918 SrcSpanInfo 919 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 48 23 48 32 920 , srcInfoPoints = [] 921 } 922 "tidyRules") 923 ]) 924 } 925 , ImportDecl 926 { importAnn = 927 SrcSpanInfo 928 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 49 1 49 10 929 , srcInfoPoints = 930 [ SrcSpan "tests/examples/RealGHC.lhs" 49 1 49 7 ] 931 } 932 , importModule = 933 ModuleName 934 SrcSpanInfo 935 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 49 8 49 10 936 , srcInfoPoints = [] 937 } 938 "Id" 939 , importQualified = False 940 , importSrc = False 941 , importSafe = False 942 , importPkg = Nothing 943 , importAs = Nothing 944 , importSpecs = Nothing 945 } 946 , ImportDecl 947 { importAnn = 948 SrcSpanInfo 949 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 50 1 50 45 950 , srcInfoPoints = 951 [ SrcSpan "tests/examples/RealGHC.lhs" 50 1 50 7 ] 952 } 953 , importModule = 954 ModuleName 955 SrcSpanInfo 956 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 50 8 50 14 957 , srcInfoPoints = [] 958 } 959 "IdInfo" 960 , importQualified = False 961 , importSrc = False 962 , importSafe = False 963 , importPkg = Nothing 964 , importAs = Nothing 965 , importSpecs = 966 Just 967 (ImportSpecList 968 SrcSpanInfo 969 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 50 21 50 45 970 , srcInfoPoints = 971 [ SrcSpan "tests/examples/RealGHC.lhs" 50 21 50 22 972 , SrcSpan "tests/examples/RealGHC.lhs" 50 44 50 45 973 ] 974 } 975 False 976 [ IThingWith 977 SrcSpanInfo 978 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 50 23 50 43 979 , srcInfoPoints = 980 [ SrcSpan "tests/examples/RealGHC.lhs" 50 31 50 32 981 , SrcSpan "tests/examples/RealGHC.lhs" 50 42 50 43 982 ] 983 } 984 (Ident 985 SrcSpanInfo 986 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 50 23 50 31 987 , srcInfoPoints = [] 988 } 989 "SpecInfo") 990 [ ConName 991 SrcSpanInfo 992 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 50 33 50 41 993 , srcInfoPoints = [] 994 } 995 (Ident 996 SrcSpanInfo 997 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 50 33 50 41 998 , srcInfoPoints = [] 999 } 1000 "SpecInfo") 1001 ] 1002 ]) 1003 } 1004 , ImportDecl 1005 { importAnn = 1006 SrcSpanInfo 1007 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 51 1 51 24 1008 , srcInfoPoints = 1009 [ SrcSpan "tests/examples/RealGHC.lhs" 51 1 51 7 ] 1010 } 1011 , importModule = 1012 ModuleName 1013 SrcSpanInfo 1014 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 51 8 51 11 1015 , srcInfoPoints = [] 1016 } 1017 "Var" 1018 , importQualified = False 1019 , importSrc = False 1020 , importSafe = False 1021 , importPkg = Nothing 1022 , importAs = Nothing 1023 , importSpecs = 1024 Just 1025 (ImportSpecList 1026 SrcSpanInfo 1027 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 51 17 51 24 1028 , srcInfoPoints = 1029 [ SrcSpan "tests/examples/RealGHC.lhs" 51 17 51 18 1030 , SrcSpan "tests/examples/RealGHC.lhs" 51 23 51 24 1031 ] 1032 } 1033 False 1034 [ IAbs 1035 SrcSpanInfo 1036 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 51 19 51 22 1037 , srcInfoPoints = [] 1038 } 1039 (NoNamespace 1040 SrcSpanInfo 1041 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 51 19 51 22 1042 , srcInfoPoints = [] 1043 }) 1044 (Ident 1045 SrcSpanInfo 1046 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 51 19 51 22 1047 , srcInfoPoints = [] 1048 } 1049 "Var") 1050 ]) 1051 } 1052 , ImportDecl 1053 { importAnn = 1054 SrcSpanInfo 1055 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 52 1 52 14 1056 , srcInfoPoints = 1057 [ SrcSpan "tests/examples/RealGHC.lhs" 52 1 52 7 ] 1058 } 1059 , importModule = 1060 ModuleName 1061 SrcSpanInfo 1062 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 52 8 52 14 1063 , srcInfoPoints = [] 1064 } 1065 "VarEnv" 1066 , importQualified = False 1067 , importSrc = False 1068 , importSafe = False 1069 , importPkg = Nothing 1070 , importAs = Nothing 1071 , importSpecs = Nothing 1072 } 1073 , ImportDecl 1074 { importAnn = 1075 SrcSpanInfo 1076 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 53 1 53 14 1077 , srcInfoPoints = 1078 [ SrcSpan "tests/examples/RealGHC.lhs" 53 1 53 7 ] 1079 } 1080 , importModule = 1081 ModuleName 1082 SrcSpanInfo 1083 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 53 8 53 14 1084 , srcInfoPoints = [] 1085 } 1086 "VarSet" 1087 , importQualified = False 1088 , importSrc = False 1089 , importSafe = False 1090 , importPkg = Nothing 1091 , importAs = Nothing 1092 , importSpecs = Nothing 1093 } 1094 , ImportDecl 1095 { importAnn = 1096 SrcSpanInfo 1097 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 54 1 54 41 1098 , srcInfoPoints = 1099 [ SrcSpan "tests/examples/RealGHC.lhs" 54 1 54 7 ] 1100 } 1101 , importModule = 1102 ModuleName 1103 SrcSpanInfo 1104 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 54 8 54 12 1105 , srcInfoPoints = [] 1106 } 1107 "Name" 1108 , importQualified = False 1109 , importSrc = False 1110 , importSafe = False 1111 , importPkg = Nothing 1112 , importAs = Nothing 1113 , importSpecs = 1114 Just 1115 (ImportSpecList 1116 SrcSpanInfo 1117 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 54 17 54 41 1118 , srcInfoPoints = 1119 [ SrcSpan "tests/examples/RealGHC.lhs" 54 17 54 18 1120 , SrcSpan "tests/examples/RealGHC.lhs" 54 23 54 24 1121 , SrcSpan "tests/examples/RealGHC.lhs" 54 40 54 41 1122 ] 1123 } 1124 False 1125 [ IAbs 1126 SrcSpanInfo 1127 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 54 19 54 23 1128 , srcInfoPoints = [] 1129 } 1130 (NoNamespace 1131 SrcSpanInfo 1132 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 54 19 54 23 1133 , srcInfoPoints = [] 1134 }) 1135 (Ident 1136 SrcSpanInfo 1137 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 54 19 54 23 1138 , srcInfoPoints = [] 1139 } 1140 "Name") 1141 , IThingAll 1142 SrcSpanInfo 1143 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 54 25 54 39 1144 , srcInfoPoints = 1145 [ SrcSpan "tests/examples/RealGHC.lhs" 54 35 54 36 1146 , SrcSpan "tests/examples/RealGHC.lhs" 54 36 54 38 1147 , SrcSpan "tests/examples/RealGHC.lhs" 54 38 54 39 1148 ] 1149 } 1150 (Ident 1151 SrcSpanInfo 1152 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 54 25 54 35 1153 , srcInfoPoints = [] 1154 } 1155 "NamedThing") 1156 ]) 1157 } 1158 , ImportDecl 1159 { importAnn = 1160 SrcSpanInfo 1161 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 55 1 55 15 1162 , srcInfoPoints = 1163 [ SrcSpan "tests/examples/RealGHC.lhs" 55 1 55 7 ] 1164 } 1165 , importModule = 1166 ModuleName 1167 SrcSpanInfo 1168 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 55 8 55 15 1169 , srcInfoPoints = [] 1170 } 1171 "NameEnv" 1172 , importQualified = False 1173 , importSrc = False 1174 , importSafe = False 1175 , importPkg = Nothing 1176 , importAs = Nothing 1177 , importSpecs = Nothing 1178 } 1179 , ImportDecl 1180 { importAnn = 1181 SrcSpanInfo 1182 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 56 1 56 51 1183 , srcInfoPoints = 1184 [ SrcSpan "tests/examples/RealGHC.lhs" 56 1 56 7 ] 1185 } 1186 , importModule = 1187 ModuleName 1188 SrcSpanInfo 1189 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 56 8 56 13 1190 , srcInfoPoints = [] 1191 } 1192 "Unify" 1193 , importQualified = False 1194 , importSrc = False 1195 , importSafe = False 1196 , importPkg = Nothing 1197 , importAs = Nothing 1198 , importSpecs = 1199 Just 1200 (ImportSpecList 1201 SrcSpanInfo 1202 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 56 21 56 51 1203 , srcInfoPoints = 1204 [ SrcSpan "tests/examples/RealGHC.lhs" 56 21 56 22 1205 , SrcSpan "tests/examples/RealGHC.lhs" 56 35 56 36 1206 , SrcSpan "tests/examples/RealGHC.lhs" 56 50 56 51 1207 ] 1208 } 1209 False 1210 [ IVar 1211 SrcSpanInfo 1212 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 56 23 56 35 1213 , srcInfoPoints = [] 1214 } 1215 (Ident 1216 SrcSpanInfo 1217 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 56 23 56 35 1218 , srcInfoPoints = [] 1219 } 1220 "ruleMatchTyX") 1221 , IThingAll 1222 SrcSpanInfo 1223 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 56 37 56 49 1224 , srcInfoPoints = 1225 [ SrcSpan "tests/examples/RealGHC.lhs" 56 45 56 46 1226 , SrcSpan "tests/examples/RealGHC.lhs" 56 46 56 48 1227 , SrcSpan "tests/examples/RealGHC.lhs" 56 48 56 49 1228 ] 1229 } 1230 (Ident 1231 SrcSpanInfo 1232 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 56 37 56 45 1233 , srcInfoPoints = [] 1234 } 1235 "MatchEnv") 1236 ]) 1237 } 1238 , ImportDecl 1239 { importAnn = 1240 SrcSpanInfo 1241 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 57 1 57 35 1242 , srcInfoPoints = 1243 [ SrcSpan "tests/examples/RealGHC.lhs" 57 1 57 7 ] 1244 } 1245 , importModule = 1246 ModuleName 1247 SrcSpanInfo 1248 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 57 8 57 18 1249 , srcInfoPoints = [] 1250 } 1251 "BasicTypes" 1252 , importQualified = False 1253 , importSrc = False 1254 , importSafe = False 1255 , importPkg = Nothing 1256 , importAs = Nothing 1257 , importSpecs = 1258 Just 1259 (ImportSpecList 1260 SrcSpanInfo 1261 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 57 21 57 35 1262 , srcInfoPoints = 1263 [ SrcSpan "tests/examples/RealGHC.lhs" 57 21 57 22 1264 , SrcSpan "tests/examples/RealGHC.lhs" 57 34 57 35 1265 ] 1266 } 1267 False 1268 [ IAbs 1269 SrcSpanInfo 1270 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 57 23 57 33 1271 , srcInfoPoints = [] 1272 } 1273 (NoNamespace 1274 SrcSpanInfo 1275 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 57 23 57 33 1276 , srcInfoPoints = [] 1277 }) 1278 (Ident 1279 SrcSpanInfo 1280 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 57 23 57 33 1281 , srcInfoPoints = [] 1282 } 1283 "Activation") 1284 ]) 1285 } 1286 , ImportDecl 1287 { importAnn = 1288 SrcSpanInfo 1289 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 58 1 58 43 1290 , srcInfoPoints = 1291 [ SrcSpan "tests/examples/RealGHC.lhs" 58 1 58 7 ] 1292 } 1293 , importModule = 1294 ModuleName 1295 SrcSpanInfo 1296 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 58 8 58 19 1297 , srcInfoPoints = [] 1298 } 1299 "StaticFlags" 1300 , importQualified = False 1301 , importSrc = False 1302 , importSafe = False 1303 , importPkg = Nothing 1304 , importAs = Nothing 1305 , importSpecs = 1306 Just 1307 (ImportSpecList 1308 SrcSpanInfo 1309 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 58 21 58 43 1310 , srcInfoPoints = 1311 [ SrcSpan "tests/examples/RealGHC.lhs" 58 21 58 22 1312 , SrcSpan "tests/examples/RealGHC.lhs" 58 42 58 43 1313 ] 1314 } 1315 False 1316 [ IVar 1317 SrcSpanInfo 1318 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 58 23 58 41 1319 , srcInfoPoints = [] 1320 } 1321 (Ident 1322 SrcSpanInfo 1323 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 58 23 58 41 1324 , srcInfoPoints = [] 1325 } 1326 "opt_PprStyle_Debug") 1327 ]) 1328 } 1329 , ImportDecl 1330 { importAnn = 1331 SrcSpanInfo 1332 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 59 1 59 18 1333 , srcInfoPoints = 1334 [ SrcSpan "tests/examples/RealGHC.lhs" 59 1 59 7 ] 1335 } 1336 , importModule = 1337 ModuleName 1338 SrcSpanInfo 1339 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 59 8 59 18 1340 , srcInfoPoints = [] 1341 } 1342 "Outputable" 1343 , importQualified = False 1344 , importSrc = False 1345 , importSafe = False 1346 , importPkg = Nothing 1347 , importAs = Nothing 1348 , importSpecs = Nothing 1349 } 1350 , ImportDecl 1351 { importAnn = 1352 SrcSpanInfo 1353 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 60 1 60 18 1354 , srcInfoPoints = 1355 [ SrcSpan "tests/examples/RealGHC.lhs" 60 1 60 7 ] 1356 } 1357 , importModule = 1358 ModuleName 1359 SrcSpanInfo 1360 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 60 8 60 18 1361 , srcInfoPoints = [] 1362 } 1363 "FastString" 1364 , importQualified = False 1365 , importSrc = False 1366 , importSafe = False 1367 , importPkg = Nothing 1368 , importAs = Nothing 1369 , importSpecs = Nothing 1370 } 1371 , ImportDecl 1372 { importAnn = 1373 SrcSpanInfo 1374 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 61 1 61 14 1375 , srcInfoPoints = 1376 [ SrcSpan "tests/examples/RealGHC.lhs" 61 1 61 7 ] 1377 } 1378 , importModule = 1379 ModuleName 1380 SrcSpanInfo 1381 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 61 8 61 14 1382 , srcInfoPoints = [] 1383 } 1384 "Maybes" 1385 , importQualified = False 1386 , importSrc = False 1387 , importSafe = False 1388 , importPkg = Nothing 1389 , importAs = Nothing 1390 , importSpecs = Nothing 1391 } 1392 , ImportDecl 1393 { importAnn = 1394 SrcSpanInfo 1395 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 62 1 62 15 1396 , srcInfoPoints = 1397 [ SrcSpan "tests/examples/RealGHC.lhs" 62 1 62 7 ] 1398 } 1399 , importModule = 1400 ModuleName 1401 SrcSpanInfo 1402 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 62 8 62 15 1403 , srcInfoPoints = [] 1404 } 1405 "OrdList" 1406 , importQualified = False 1407 , importSrc = False 1408 , importSafe = False 1409 , importPkg = Nothing 1410 , importAs = Nothing 1411 , importSpecs = Nothing 1412 } 1413 , ImportDecl 1414 { importAnn = 1415 SrcSpanInfo 1416 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 63 1 63 11 1417 , srcInfoPoints = 1418 [ SrcSpan "tests/examples/RealGHC.lhs" 63 1 63 7 ] 1419 } 1420 , importModule = 1421 ModuleName 1422 SrcSpanInfo 1423 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 63 8 63 11 1424 , srcInfoPoints = [] 1425 } 1426 "Bag" 1427 , importQualified = False 1428 , importSrc = False 1429 , importSafe = False 1430 , importPkg = Nothing 1431 , importAs = Nothing 1432 , importSpecs = Nothing 1433 } 1434 , ImportDecl 1435 { importAnn = 1436 SrcSpanInfo 1437 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 64 1 64 12 1438 , srcInfoPoints = 1439 [ SrcSpan "tests/examples/RealGHC.lhs" 64 1 64 7 ] 1440 } 1441 , importModule = 1442 ModuleName 1443 SrcSpanInfo 1444 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 64 8 64 12 1445 , srcInfoPoints = [] 1446 } 1447 "Util" 1448 , importQualified = False 1449 , importSrc = False 1450 , importSafe = False 1451 , importPkg = Nothing 1452 , importAs = Nothing 1453 , importSpecs = Nothing 1454 } 1455 , ImportDecl 1456 { importAnn = 1457 SrcSpanInfo 1458 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 65 1 65 17 1459 , srcInfoPoints = 1460 [ SrcSpan "tests/examples/RealGHC.lhs" 65 1 65 7 ] 1461 } 1462 , importModule = 1463 ModuleName 1464 SrcSpanInfo 1465 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 65 8 65 17 1466 , srcInfoPoints = [] 1467 } 1468 "Data.List" 1469 , importQualified = False 1470 , importSrc = False 1471 , importSafe = False 1472 , importPkg = Nothing 1473 , importAs = Nothing 1474 , importSpecs = Nothing 1475 } 1476 ] 1477 [ TypeSig 1478 SrcSpanInfo 1479 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 1 105 68 1480 , srcInfoPoints = 1481 [ SrcSpan "tests/examples/RealGHC.lhs" 104 13 104 15 ] 1482 } 1483 [ Ident 1484 SrcSpanInfo 1485 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 1 104 12 1486 , srcInfoPoints = [] 1487 } 1488 "mkLocalRule" 1489 ] 1490 (TyFun 1491 SrcSpanInfo 1492 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 16 105 68 1493 , srcInfoPoints = 1494 [ SrcSpan "tests/examples/RealGHC.lhs" 104 25 104 27 ] 1495 } 1496 (TyCon 1497 SrcSpanInfo 1498 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 16 104 24 1499 , srcInfoPoints = [] 1500 } 1501 (UnQual 1502 SrcSpanInfo 1503 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 16 104 24 1504 , srcInfoPoints = [] 1505 } 1506 (Ident 1507 SrcSpanInfo 1508 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 16 104 24 1509 , srcInfoPoints = [] 1510 } 1511 "RuleName"))) 1512 (TyFun 1513 SrcSpanInfo 1514 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 28 105 68 1515 , srcInfoPoints = 1516 [ SrcSpan "tests/examples/RealGHC.lhs" 105 9 105 11 ] 1517 } 1518 (TyCon 1519 SrcSpanInfo 1520 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 28 104 38 1521 , srcInfoPoints = [] 1522 } 1523 (UnQual 1524 SrcSpanInfo 1525 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 28 104 38 1526 , srcInfoPoints = [] 1527 } 1528 (Ident 1529 SrcSpanInfo 1530 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 104 28 104 38 1531 , srcInfoPoints = [] 1532 } 1533 "Activation"))) 1534 (TyFun 1535 SrcSpanInfo 1536 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 12 105 68 1537 , srcInfoPoints = 1538 [ SrcSpan "tests/examples/RealGHC.lhs" 105 17 105 19 ] 1539 } 1540 (TyCon 1541 SrcSpanInfo 1542 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 12 105 16 1543 , srcInfoPoints = [] 1544 } 1545 (UnQual 1546 SrcSpanInfo 1547 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 12 105 16 1548 , srcInfoPoints = [] 1549 } 1550 (Ident 1551 SrcSpanInfo 1552 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 12 105 16 1553 , srcInfoPoints = [] 1554 } 1555 "Name"))) 1556 (TyFun 1557 SrcSpanInfo 1558 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 20 105 68 1559 , srcInfoPoints = 1560 [ SrcSpan "tests/examples/RealGHC.lhs" 105 31 105 33 ] 1561 } 1562 (TyList 1563 SrcSpanInfo 1564 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 20 105 30 1565 , srcInfoPoints = 1566 [ SrcSpan "tests/examples/RealGHC.lhs" 105 20 105 21 1567 , SrcSpan "tests/examples/RealGHC.lhs" 105 29 105 30 1568 ] 1569 } 1570 (TyCon 1571 SrcSpanInfo 1572 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 21 105 29 1573 , srcInfoPoints = [] 1574 } 1575 (UnQual 1576 SrcSpanInfo 1577 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 21 105 29 1578 , srcInfoPoints = [] 1579 } 1580 (Ident 1581 SrcSpanInfo 1582 { srcInfoSpan = 1583 SrcSpan "tests/examples/RealGHC.lhs" 105 21 105 29 1584 , srcInfoPoints = [] 1585 } 1586 "CoreBndr")))) 1587 (TyFun 1588 SrcSpanInfo 1589 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 34 105 68 1590 , srcInfoPoints = 1591 [ SrcSpan "tests/examples/RealGHC.lhs" 105 45 105 47 ] 1592 } 1593 (TyList 1594 SrcSpanInfo 1595 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 34 105 44 1596 , srcInfoPoints = 1597 [ SrcSpan "tests/examples/RealGHC.lhs" 105 34 105 35 1598 , SrcSpan "tests/examples/RealGHC.lhs" 105 43 105 44 1599 ] 1600 } 1601 (TyCon 1602 SrcSpanInfo 1603 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 35 105 43 1604 , srcInfoPoints = [] 1605 } 1606 (UnQual 1607 SrcSpanInfo 1608 { srcInfoSpan = 1609 SrcSpan "tests/examples/RealGHC.lhs" 105 35 105 43 1610 , srcInfoPoints = [] 1611 } 1612 (Ident 1613 SrcSpanInfo 1614 { srcInfoSpan = 1615 SrcSpan "tests/examples/RealGHC.lhs" 105 35 105 43 1616 , srcInfoPoints = [] 1617 } 1618 "CoreExpr")))) 1619 (TyFun 1620 SrcSpanInfo 1621 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 48 105 68 1622 , srcInfoPoints = 1623 [ SrcSpan "tests/examples/RealGHC.lhs" 105 57 105 59 ] 1624 } 1625 (TyCon 1626 SrcSpanInfo 1627 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 48 105 56 1628 , srcInfoPoints = [] 1629 } 1630 (UnQual 1631 SrcSpanInfo 1632 { srcInfoSpan = 1633 SrcSpan "tests/examples/RealGHC.lhs" 105 48 105 56 1634 , srcInfoPoints = [] 1635 } 1636 (Ident 1637 SrcSpanInfo 1638 { srcInfoSpan = 1639 SrcSpan "tests/examples/RealGHC.lhs" 105 48 105 56 1640 , srcInfoPoints = [] 1641 } 1642 "CoreExpr"))) 1643 (TyCon 1644 SrcSpanInfo 1645 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 105 60 105 68 1646 , srcInfoPoints = [] 1647 } 1648 (UnQual 1649 SrcSpanInfo 1650 { srcInfoSpan = 1651 SrcSpan "tests/examples/RealGHC.lhs" 105 60 105 68 1652 , srcInfoPoints = [] 1653 } 1654 (Ident 1655 SrcSpanInfo 1656 { srcInfoSpan = 1657 SrcSpan "tests/examples/RealGHC.lhs" 105 60 105 68 1658 , srcInfoPoints = [] 1659 } 1660 "CoreRule"))))))))) 1661 , FunBind 1662 SrcSpanInfo 1663 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 1 112 25 1664 , srcInfoPoints = [] 1665 } 1666 [ Match 1667 SrcSpanInfo 1668 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 1 112 25 1669 , srcInfoPoints = [] 1670 } 1671 (Ident 1672 SrcSpanInfo 1673 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 1 108 12 1674 , srcInfoPoints = [] 1675 } 1676 "mkLocalRule") 1677 [ PVar 1678 SrcSpanInfo 1679 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 13 108 17 1680 , srcInfoPoints = [] 1681 } 1682 (Ident 1683 SrcSpanInfo 1684 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 13 108 17 1685 , srcInfoPoints = [] 1686 } 1687 "name") 1688 , PVar 1689 SrcSpanInfo 1690 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 18 108 21 1691 , srcInfoPoints = [] 1692 } 1693 (Ident 1694 SrcSpanInfo 1695 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 18 108 21 1696 , srcInfoPoints = [] 1697 } 1698 "act") 1699 , PVar 1700 SrcSpanInfo 1701 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 22 108 24 1702 , srcInfoPoints = [] 1703 } 1704 (Ident 1705 SrcSpanInfo 1706 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 22 108 24 1707 , srcInfoPoints = [] 1708 } 1709 "fn") 1710 , PVar 1711 SrcSpanInfo 1712 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 25 108 30 1713 , srcInfoPoints = [] 1714 } 1715 (Ident 1716 SrcSpanInfo 1717 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 25 108 30 1718 , srcInfoPoints = [] 1719 } 1720 "bndrs") 1721 , PVar 1722 SrcSpanInfo 1723 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 31 108 35 1724 , srcInfoPoints = [] 1725 } 1726 (Ident 1727 SrcSpanInfo 1728 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 31 108 35 1729 , srcInfoPoints = [] 1730 } 1731 "args") 1732 , PVar 1733 SrcSpanInfo 1734 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 36 108 39 1735 , srcInfoPoints = [] 1736 } 1737 (Ident 1738 SrcSpanInfo 1739 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 108 36 108 39 1740 , srcInfoPoints = [] 1741 } 1742 "rhs") 1743 ] 1744 (UnGuardedRhs 1745 SrcSpanInfo 1746 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 3 112 25 1747 , srcInfoPoints = 1748 [ SrcSpan "tests/examples/RealGHC.lhs" 109 3 109 4 ] 1749 } 1750 (RecConstr 1751 SrcSpanInfo 1752 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 5 112 25 1753 , srcInfoPoints = 1754 [ SrcSpan "tests/examples/RealGHC.lhs" 109 10 109 11 1755 , SrcSpan "tests/examples/RealGHC.lhs" 109 26 109 27 1756 , SrcSpan "tests/examples/RealGHC.lhs" 109 38 109 39 1757 , SrcSpan "tests/examples/RealGHC.lhs" 109 52 109 53 1758 , SrcSpan "tests/examples/RealGHC.lhs" 110 24 110 25 1759 , SrcSpan "tests/examples/RealGHC.lhs" 110 40 110 41 1760 , SrcSpan "tests/examples/RealGHC.lhs" 111 20 111 21 1761 , SrcSpan "tests/examples/RealGHC.lhs" 111 51 111 52 1762 , SrcSpan "tests/examples/RealGHC.lhs" 112 24 112 25 1763 ] 1764 } 1765 (UnQual 1766 SrcSpanInfo 1767 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 5 109 9 1768 , srcInfoPoints = [] 1769 } 1770 (Ident 1771 SrcSpanInfo 1772 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 5 109 9 1773 , srcInfoPoints = [] 1774 } 1775 "Rule")) 1776 [ FieldUpdate 1777 SrcSpanInfo 1778 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 12 109 26 1779 , srcInfoPoints = 1780 [ SrcSpan "tests/examples/RealGHC.lhs" 109 20 109 21 ] 1781 } 1782 (UnQual 1783 SrcSpanInfo 1784 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 12 109 19 1785 , srcInfoPoints = [] 1786 } 1787 (Ident 1788 SrcSpanInfo 1789 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 12 109 19 1790 , srcInfoPoints = [] 1791 } 1792 "ru_name")) 1793 (Var 1794 SrcSpanInfo 1795 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 22 109 26 1796 , srcInfoPoints = [] 1797 } 1798 (UnQual 1799 SrcSpanInfo 1800 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 22 109 26 1801 , srcInfoPoints = [] 1802 } 1803 (Ident 1804 SrcSpanInfo 1805 { srcInfoSpan = 1806 SrcSpan "tests/examples/RealGHC.lhs" 109 22 109 26 1807 , srcInfoPoints = [] 1808 } 1809 "name"))) 1810 , FieldUpdate 1811 SrcSpanInfo 1812 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 28 109 38 1813 , srcInfoPoints = 1814 [ SrcSpan "tests/examples/RealGHC.lhs" 109 34 109 35 ] 1815 } 1816 (UnQual 1817 SrcSpanInfo 1818 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 28 109 33 1819 , srcInfoPoints = [] 1820 } 1821 (Ident 1822 SrcSpanInfo 1823 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 28 109 33 1824 , srcInfoPoints = [] 1825 } 1826 "ru_fn")) 1827 (Var 1828 SrcSpanInfo 1829 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 36 109 38 1830 , srcInfoPoints = [] 1831 } 1832 (UnQual 1833 SrcSpanInfo 1834 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 36 109 38 1835 , srcInfoPoints = [] 1836 } 1837 (Ident 1838 SrcSpanInfo 1839 { srcInfoSpan = 1840 SrcSpan "tests/examples/RealGHC.lhs" 109 36 109 38 1841 , srcInfoPoints = [] 1842 } 1843 "fn"))) 1844 , FieldUpdate 1845 SrcSpanInfo 1846 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 40 109 52 1847 , srcInfoPoints = 1848 [ SrcSpan "tests/examples/RealGHC.lhs" 109 47 109 48 ] 1849 } 1850 (UnQual 1851 SrcSpanInfo 1852 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 40 109 46 1853 , srcInfoPoints = [] 1854 } 1855 (Ident 1856 SrcSpanInfo 1857 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 40 109 46 1858 , srcInfoPoints = [] 1859 } 1860 "ru_act")) 1861 (Var 1862 SrcSpanInfo 1863 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 49 109 52 1864 , srcInfoPoints = [] 1865 } 1866 (UnQual 1867 SrcSpanInfo 1868 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 109 49 109 52 1869 , srcInfoPoints = [] 1870 } 1871 (Ident 1872 SrcSpanInfo 1873 { srcInfoSpan = 1874 SrcSpan "tests/examples/RealGHC.lhs" 109 49 109 52 1875 , srcInfoPoints = [] 1876 } 1877 "act"))) 1878 , FieldUpdate 1879 SrcSpanInfo 1880 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 8 110 24 1881 , srcInfoPoints = 1882 [ SrcSpan "tests/examples/RealGHC.lhs" 110 17 110 18 ] 1883 } 1884 (UnQual 1885 SrcSpanInfo 1886 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 8 110 16 1887 , srcInfoPoints = [] 1888 } 1889 (Ident 1890 SrcSpanInfo 1891 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 8 110 16 1892 , srcInfoPoints = [] 1893 } 1894 "ru_bndrs")) 1895 (Var 1896 SrcSpanInfo 1897 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 19 110 24 1898 , srcInfoPoints = [] 1899 } 1900 (UnQual 1901 SrcSpanInfo 1902 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 19 110 24 1903 , srcInfoPoints = [] 1904 } 1905 (Ident 1906 SrcSpanInfo 1907 { srcInfoSpan = 1908 SrcSpan "tests/examples/RealGHC.lhs" 110 19 110 24 1909 , srcInfoPoints = [] 1910 } 1911 "bndrs"))) 1912 , FieldUpdate 1913 SrcSpanInfo 1914 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 26 110 40 1915 , srcInfoPoints = 1916 [ SrcSpan "tests/examples/RealGHC.lhs" 110 34 110 35 ] 1917 } 1918 (UnQual 1919 SrcSpanInfo 1920 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 26 110 33 1921 , srcInfoPoints = [] 1922 } 1923 (Ident 1924 SrcSpanInfo 1925 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 26 110 33 1926 , srcInfoPoints = [] 1927 } 1928 "ru_args")) 1929 (Var 1930 SrcSpanInfo 1931 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 36 110 40 1932 , srcInfoPoints = [] 1933 } 1934 (UnQual 1935 SrcSpanInfo 1936 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 110 36 110 40 1937 , srcInfoPoints = [] 1938 } 1939 (Ident 1940 SrcSpanInfo 1941 { srcInfoSpan = 1942 SrcSpan "tests/examples/RealGHC.lhs" 110 36 110 40 1943 , srcInfoPoints = [] 1944 } 1945 "args"))) 1946 , FieldUpdate 1947 SrcSpanInfo 1948 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 8 111 20 1949 , srcInfoPoints = 1950 [ SrcSpan "tests/examples/RealGHC.lhs" 111 15 111 16 ] 1951 } 1952 (UnQual 1953 SrcSpanInfo 1954 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 8 111 14 1955 , srcInfoPoints = [] 1956 } 1957 (Ident 1958 SrcSpanInfo 1959 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 8 111 14 1960 , srcInfoPoints = [] 1961 } 1962 "ru_rhs")) 1963 (Var 1964 SrcSpanInfo 1965 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 17 111 20 1966 , srcInfoPoints = [] 1967 } 1968 (UnQual 1969 SrcSpanInfo 1970 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 17 111 20 1971 , srcInfoPoints = [] 1972 } 1973 (Ident 1974 SrcSpanInfo 1975 { srcInfoSpan = 1976 SrcSpan "tests/examples/RealGHC.lhs" 111 17 111 20 1977 , srcInfoPoints = [] 1978 } 1979 "rhs"))) 1980 , FieldUpdate 1981 SrcSpanInfo 1982 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 22 111 51 1983 , srcInfoPoints = 1984 [ SrcSpan "tests/examples/RealGHC.lhs" 111 31 111 32 ] 1985 } 1986 (UnQual 1987 SrcSpanInfo 1988 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 22 111 30 1989 , srcInfoPoints = [] 1990 } 1991 (Ident 1992 SrcSpanInfo 1993 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 22 111 30 1994 , srcInfoPoints = [] 1995 } 1996 "ru_rough")) 1997 (App 1998 SrcSpanInfo 1999 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 33 111 51 2000 , srcInfoPoints = [] 2001 } 2002 (Var 2003 SrcSpanInfo 2004 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 33 111 46 2005 , srcInfoPoints = [] 2006 } 2007 (UnQual 2008 SrcSpanInfo 2009 { srcInfoSpan = 2010 SrcSpan "tests/examples/RealGHC.lhs" 111 33 111 46 2011 , srcInfoPoints = [] 2012 } 2013 (Ident 2014 SrcSpanInfo 2015 { srcInfoSpan = 2016 SrcSpan "tests/examples/RealGHC.lhs" 111 33 111 46 2017 , srcInfoPoints = [] 2018 } 2019 "roughTopNames"))) 2020 (Var 2021 SrcSpanInfo 2022 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 111 47 111 51 2023 , srcInfoPoints = [] 2024 } 2025 (UnQual 2026 SrcSpanInfo 2027 { srcInfoSpan = 2028 SrcSpan "tests/examples/RealGHC.lhs" 111 47 111 51 2029 , srcInfoPoints = [] 2030 } 2031 (Ident 2032 SrcSpanInfo 2033 { srcInfoSpan = 2034 SrcSpan "tests/examples/RealGHC.lhs" 111 47 111 51 2035 , srcInfoPoints = [] 2036 } 2037 "args")))) 2038 , FieldUpdate 2039 SrcSpanInfo 2040 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 112 8 112 23 2041 , srcInfoPoints = 2042 [ SrcSpan "tests/examples/RealGHC.lhs" 112 17 112 18 ] 2043 } 2044 (UnQual 2045 SrcSpanInfo 2046 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 112 8 112 16 2047 , srcInfoPoints = [] 2048 } 2049 (Ident 2050 SrcSpanInfo 2051 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 112 8 112 16 2052 , srcInfoPoints = [] 2053 } 2054 "ru_local")) 2055 (Con 2056 SrcSpanInfo 2057 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 112 19 112 23 2058 , srcInfoPoints = [] 2059 } 2060 (UnQual 2061 SrcSpanInfo 2062 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 112 19 112 23 2063 , srcInfoPoints = [] 2064 } 2065 (Ident 2066 SrcSpanInfo 2067 { srcInfoSpan = 2068 SrcSpan "tests/examples/RealGHC.lhs" 112 19 112 23 2069 , srcInfoPoints = [] 2070 } 2071 "True"))) 2072 ])) 2073 Nothing 2074 ] 2075 , TypeSig 2076 SrcSpanInfo 2077 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 1 115 44 2078 , srcInfoPoints = 2079 [ SrcSpan "tests/examples/RealGHC.lhs" 115 15 115 17 ] 2080 } 2081 [ Ident 2082 SrcSpanInfo 2083 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 1 115 14 2084 , srcInfoPoints = [] 2085 } 2086 "roughTopNames" 2087 ] 2088 (TyFun 2089 SrcSpanInfo 2090 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 18 115 44 2091 , srcInfoPoints = 2092 [ SrcSpan "tests/examples/RealGHC.lhs" 115 29 115 31 ] 2093 } 2094 (TyList 2095 SrcSpanInfo 2096 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 18 115 28 2097 , srcInfoPoints = 2098 [ SrcSpan "tests/examples/RealGHC.lhs" 115 18 115 19 2099 , SrcSpan "tests/examples/RealGHC.lhs" 115 27 115 28 2100 ] 2101 } 2102 (TyCon 2103 SrcSpanInfo 2104 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 19 115 27 2105 , srcInfoPoints = [] 2106 } 2107 (UnQual 2108 SrcSpanInfo 2109 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 19 115 27 2110 , srcInfoPoints = [] 2111 } 2112 (Ident 2113 SrcSpanInfo 2114 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 19 115 27 2115 , srcInfoPoints = [] 2116 } 2117 "CoreExpr")))) 2118 (TyList 2119 SrcSpanInfo 2120 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 32 115 44 2121 , srcInfoPoints = 2122 [ SrcSpan "tests/examples/RealGHC.lhs" 115 32 115 33 2123 , SrcSpan "tests/examples/RealGHC.lhs" 115 43 115 44 2124 ] 2125 } 2126 (TyApp 2127 SrcSpanInfo 2128 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 33 115 43 2129 , srcInfoPoints = [] 2130 } 2131 (TyCon 2132 SrcSpanInfo 2133 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 33 115 38 2134 , srcInfoPoints = [] 2135 } 2136 (UnQual 2137 SrcSpanInfo 2138 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 33 115 38 2139 , srcInfoPoints = [] 2140 } 2141 (Ident 2142 SrcSpanInfo 2143 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 33 115 38 2144 , srcInfoPoints = [] 2145 } 2146 "Maybe"))) 2147 (TyCon 2148 SrcSpanInfo 2149 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 39 115 43 2150 , srcInfoPoints = [] 2151 } 2152 (UnQual 2153 SrcSpanInfo 2154 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 39 115 43 2155 , srcInfoPoints = [] 2156 } 2157 (Ident 2158 SrcSpanInfo 2159 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 115 39 115 43 2160 , srcInfoPoints = [] 2161 } 2162 "Name")))))) 2163 , FunBind 2164 SrcSpanInfo 2165 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 1 126 43 2166 , srcInfoPoints = [] 2167 } 2168 [ Match 2169 SrcSpanInfo 2170 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 1 126 43 2171 , srcInfoPoints = [] 2172 } 2173 (Ident 2174 SrcSpanInfo 2175 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 1 126 14 2176 , srcInfoPoints = [] 2177 } 2178 "roughTopNames") 2179 [ PVar 2180 SrcSpanInfo 2181 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 15 126 19 2182 , srcInfoPoints = [] 2183 } 2184 (Ident 2185 SrcSpanInfo 2186 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 15 126 19 2187 , srcInfoPoints = [] 2188 } 2189 "args") 2190 ] 2191 (UnGuardedRhs 2192 SrcSpanInfo 2193 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 20 126 43 2194 , srcInfoPoints = 2195 [ SrcSpan "tests/examples/RealGHC.lhs" 126 20 126 21 ] 2196 } 2197 (App 2198 SrcSpanInfo 2199 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 22 126 43 2200 , srcInfoPoints = [] 2201 } 2202 (App 2203 SrcSpanInfo 2204 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 22 126 38 2205 , srcInfoPoints = [] 2206 } 2207 (Var 2208 SrcSpanInfo 2209 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 22 126 25 2210 , srcInfoPoints = [] 2211 } 2212 (UnQual 2213 SrcSpanInfo 2214 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 22 126 25 2215 , srcInfoPoints = [] 2216 } 2217 (Ident 2218 SrcSpanInfo 2219 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 22 126 25 2220 , srcInfoPoints = [] 2221 } 2222 "map"))) 2223 (Var 2224 SrcSpanInfo 2225 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 26 126 38 2226 , srcInfoPoints = [] 2227 } 2228 (UnQual 2229 SrcSpanInfo 2230 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 26 126 38 2231 , srcInfoPoints = [] 2232 } 2233 (Ident 2234 SrcSpanInfo 2235 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 26 126 38 2236 , srcInfoPoints = [] 2237 } 2238 "roughTopName")))) 2239 (Var 2240 SrcSpanInfo 2241 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 39 126 43 2242 , srcInfoPoints = [] 2243 } 2244 (UnQual 2245 SrcSpanInfo 2246 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 39 126 43 2247 , srcInfoPoints = [] 2248 } 2249 (Ident 2250 SrcSpanInfo 2251 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 126 39 126 43 2252 , srcInfoPoints = [] 2253 } 2254 "args"))))) 2255 Nothing 2256 ] 2257 , TypeSig 2258 SrcSpanInfo 2259 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 1 128 39 2260 , srcInfoPoints = 2261 [ SrcSpan "tests/examples/RealGHC.lhs" 128 14 128 16 ] 2262 } 2263 [ Ident 2264 SrcSpanInfo 2265 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 1 128 13 2266 , srcInfoPoints = [] 2267 } 2268 "roughTopName" 2269 ] 2270 (TyFun 2271 SrcSpanInfo 2272 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 17 128 39 2273 , srcInfoPoints = 2274 [ SrcSpan "tests/examples/RealGHC.lhs" 128 26 128 28 ] 2275 } 2276 (TyCon 2277 SrcSpanInfo 2278 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 17 128 25 2279 , srcInfoPoints = [] 2280 } 2281 (UnQual 2282 SrcSpanInfo 2283 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 17 128 25 2284 , srcInfoPoints = [] 2285 } 2286 (Ident 2287 SrcSpanInfo 2288 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 17 128 25 2289 , srcInfoPoints = [] 2290 } 2291 "CoreExpr"))) 2292 (TyApp 2293 SrcSpanInfo 2294 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 29 128 39 2295 , srcInfoPoints = [] 2296 } 2297 (TyCon 2298 SrcSpanInfo 2299 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 29 128 34 2300 , srcInfoPoints = [] 2301 } 2302 (UnQual 2303 SrcSpanInfo 2304 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 29 128 34 2305 , srcInfoPoints = [] 2306 } 2307 (Ident 2308 SrcSpanInfo 2309 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 29 128 34 2310 , srcInfoPoints = [] 2311 } 2312 "Maybe"))) 2313 (TyCon 2314 SrcSpanInfo 2315 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 35 128 39 2316 , srcInfoPoints = [] 2317 } 2318 (UnQual 2319 SrcSpanInfo 2320 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 35 128 39 2321 , srcInfoPoints = [] 2322 } 2323 (Ident 2324 SrcSpanInfo 2325 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 128 35 128 39 2326 , srcInfoPoints = [] 2327 } 2328 "Name"))))) 2329 , FunBind 2330 SrcSpanInfo 2331 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 1 135 29 2332 , srcInfoPoints = [] 2333 } 2334 [ Match 2335 SrcSpanInfo 2336 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 1 131 37 2337 , srcInfoPoints = [] 2338 } 2339 (Ident 2340 SrcSpanInfo 2341 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 1 129 13 2342 , srcInfoPoints = [] 2343 } 2344 "roughTopName") 2345 [ PParen 2346 SrcSpanInfo 2347 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 14 129 23 2348 , srcInfoPoints = 2349 [ SrcSpan "tests/examples/RealGHC.lhs" 129 14 129 15 2350 , SrcSpan "tests/examples/RealGHC.lhs" 129 22 129 23 2351 ] 2352 } 2353 (PApp 2354 SrcSpanInfo 2355 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 15 129 22 2356 , srcInfoPoints = [] 2357 } 2358 (UnQual 2359 SrcSpanInfo 2360 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 15 129 19 2361 , srcInfoPoints = [] 2362 } 2363 (Ident 2364 SrcSpanInfo 2365 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 15 129 19 2366 , srcInfoPoints = [] 2367 } 2368 "Type")) 2369 [ PVar 2370 SrcSpanInfo 2371 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 20 129 22 2372 , srcInfoPoints = [] 2373 } 2374 (Ident 2375 SrcSpanInfo 2376 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 20 129 22 2377 , srcInfoPoints = [] 2378 } 2379 "ty") 2380 ]) 2381 ] 2382 (UnGuardedRhs 2383 SrcSpanInfo 2384 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 24 131 37 2385 , srcInfoPoints = 2386 [ SrcSpan "tests/examples/RealGHC.lhs" 129 24 129 25 ] 2387 } 2388 (Case 2389 SrcSpanInfo 2390 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 26 131 37 2391 , srcInfoPoints = 2392 [ SrcSpan "tests/examples/RealGHC.lhs" 129 26 129 30 2393 , SrcSpan "tests/examples/RealGHC.lhs" 129 56 129 58 2394 , SrcSpan "tests/examples/RealGHC.lhs" 130 15 130 15 2395 , SrcSpan "tests/examples/RealGHC.lhs" 131 15 131 15 2396 , SrcSpan "tests/examples/RealGHC.lhs" 132 1 132 0 2397 ] 2398 } 2399 (App 2400 SrcSpanInfo 2401 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 31 129 55 2402 , srcInfoPoints = [] 2403 } 2404 (Var 2405 SrcSpanInfo 2406 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 31 129 52 2407 , srcInfoPoints = [] 2408 } 2409 (UnQual 2410 SrcSpanInfo 2411 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 31 129 52 2412 , srcInfoPoints = [] 2413 } 2414 (Ident 2415 SrcSpanInfo 2416 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 31 129 52 2417 , srcInfoPoints = [] 2418 } 2419 "tcSplitTyConApp_maybe"))) 2420 (Var 2421 SrcSpanInfo 2422 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 53 129 55 2423 , srcInfoPoints = [] 2424 } 2425 (UnQual 2426 SrcSpanInfo 2427 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 53 129 55 2428 , srcInfoPoints = [] 2429 } 2430 (Ident 2431 SrcSpanInfo 2432 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 129 53 129 55 2433 , srcInfoPoints = [] 2434 } 2435 "ty")))) 2436 [ Alt 2437 SrcSpanInfo 2438 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 15 130 47 2439 , srcInfoPoints = [] 2440 } 2441 (PApp 2442 SrcSpanInfo 2443 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 15 130 26 2444 , srcInfoPoints = [] 2445 } 2446 (UnQual 2447 SrcSpanInfo 2448 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 15 130 19 2449 , srcInfoPoints = [] 2450 } 2451 (Ident 2452 SrcSpanInfo 2453 { srcInfoSpan = 2454 SrcSpan "tests/examples/RealGHC.lhs" 130 15 130 19 2455 , srcInfoPoints = [] 2456 } 2457 "Just")) 2458 [ PTuple 2459 SrcSpanInfo 2460 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 20 130 26 2461 , srcInfoPoints = 2462 [ SrcSpan "tests/examples/RealGHC.lhs" 130 20 130 21 2463 , SrcSpan "tests/examples/RealGHC.lhs" 130 23 130 24 2464 , SrcSpan "tests/examples/RealGHC.lhs" 130 25 130 26 2465 ] 2466 } 2467 Boxed 2468 [ PVar 2469 SrcSpanInfo 2470 { srcInfoSpan = 2471 SrcSpan "tests/examples/RealGHC.lhs" 130 21 130 23 2472 , srcInfoPoints = [] 2473 } 2474 (Ident 2475 SrcSpanInfo 2476 { srcInfoSpan = 2477 SrcSpan "tests/examples/RealGHC.lhs" 130 21 130 23 2478 , srcInfoPoints = [] 2479 } 2480 "tc") 2481 , PWildCard 2482 SrcSpanInfo 2483 { srcInfoSpan = 2484 SrcSpan "tests/examples/RealGHC.lhs" 130 24 130 25 2485 , srcInfoPoints = [] 2486 } 2487 ] 2488 ]) 2489 (UnGuardedRhs 2490 SrcSpanInfo 2491 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 27 130 47 2492 , srcInfoPoints = 2493 [ SrcSpan "tests/examples/RealGHC.lhs" 130 27 130 29 ] 2494 } 2495 (App 2496 SrcSpanInfo 2497 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 130 30 130 47 2498 , srcInfoPoints = [] 2499 } 2500 (Con 2501 SrcSpanInfo 2502 { srcInfoSpan = 2503 SrcSpan "tests/examples/RealGHC.lhs" 130 30 130 34 2504 , srcInfoPoints = [] 2505 } 2506 (UnQual 2507 SrcSpanInfo 2508 { srcInfoSpan = 2509 SrcSpan "tests/examples/RealGHC.lhs" 130 30 130 34 2510 , srcInfoPoints = [] 2511 } 2512 (Ident 2513 SrcSpanInfo 2514 { srcInfoSpan = 2515 SrcSpan "tests/examples/RealGHC.lhs" 130 30 130 34 2516 , srcInfoPoints = [] 2517 } 2518 "Just"))) 2519 (Paren 2520 SrcSpanInfo 2521 { srcInfoSpan = 2522 SrcSpan "tests/examples/RealGHC.lhs" 130 35 130 47 2523 , srcInfoPoints = 2524 [ SrcSpan "tests/examples/RealGHC.lhs" 130 35 130 36 2525 , SrcSpan "tests/examples/RealGHC.lhs" 130 46 130 47 2526 ] 2527 } 2528 (App 2529 SrcSpanInfo 2530 { srcInfoSpan = 2531 SrcSpan "tests/examples/RealGHC.lhs" 130 36 130 46 2532 , srcInfoPoints = [] 2533 } 2534 (Var 2535 SrcSpanInfo 2536 { srcInfoSpan = 2537 SrcSpan "tests/examples/RealGHC.lhs" 130 36 130 43 2538 , srcInfoPoints = [] 2539 } 2540 (UnQual 2541 SrcSpanInfo 2542 { srcInfoSpan = 2543 SrcSpan "tests/examples/RealGHC.lhs" 130 36 130 43 2544 , srcInfoPoints = [] 2545 } 2546 (Ident 2547 SrcSpanInfo 2548 { srcInfoSpan = 2549 SrcSpan 2550 "tests/examples/RealGHC.lhs" 130 36 130 43 2551 , srcInfoPoints = [] 2552 } 2553 "getName"))) 2554 (Var 2555 SrcSpanInfo 2556 { srcInfoSpan = 2557 SrcSpan "tests/examples/RealGHC.lhs" 130 44 130 46 2558 , srcInfoPoints = [] 2559 } 2560 (UnQual 2561 SrcSpanInfo 2562 { srcInfoSpan = 2563 SrcSpan "tests/examples/RealGHC.lhs" 130 44 130 46 2564 , srcInfoPoints = [] 2565 } 2566 (Ident 2567 SrcSpanInfo 2568 { srcInfoSpan = 2569 SrcSpan 2570 "tests/examples/RealGHC.lhs" 130 44 130 46 2571 , srcInfoPoints = [] 2572 } 2573 "tc"))))))) 2574 Nothing 2575 , Alt 2576 SrcSpanInfo 2577 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 131 15 131 37 2578 , srcInfoPoints = [] 2579 } 2580 (PApp 2581 SrcSpanInfo 2582 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 131 15 131 22 2583 , srcInfoPoints = [] 2584 } 2585 (UnQual 2586 SrcSpanInfo 2587 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 131 15 131 22 2588 , srcInfoPoints = [] 2589 } 2590 (Ident 2591 SrcSpanInfo 2592 { srcInfoSpan = 2593 SrcSpan "tests/examples/RealGHC.lhs" 131 15 131 22 2594 , srcInfoPoints = [] 2595 } 2596 "Nothing")) 2597 []) 2598 (UnGuardedRhs 2599 SrcSpanInfo 2600 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 131 27 131 37 2601 , srcInfoPoints = 2602 [ SrcSpan "tests/examples/RealGHC.lhs" 131 27 131 29 ] 2603 } 2604 (Con 2605 SrcSpanInfo 2606 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 131 30 131 37 2607 , srcInfoPoints = [] 2608 } 2609 (UnQual 2610 SrcSpanInfo 2611 { srcInfoSpan = 2612 SrcSpan "tests/examples/RealGHC.lhs" 131 30 131 37 2613 , srcInfoPoints = [] 2614 } 2615 (Ident 2616 SrcSpanInfo 2617 { srcInfoSpan = 2618 SrcSpan "tests/examples/RealGHC.lhs" 131 30 131 37 2619 , srcInfoPoints = [] 2620 } 2621 "Nothing")))) 2622 Nothing 2623 ])) 2624 Nothing 2625 , Match 2626 SrcSpanInfo 2627 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 1 132 40 2628 , srcInfoPoints = [] 2629 } 2630 (Ident 2631 SrcSpanInfo 2632 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 1 132 13 2633 , srcInfoPoints = [] 2634 } 2635 "roughTopName") 2636 [ PParen 2637 SrcSpanInfo 2638 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 14 132 23 2639 , srcInfoPoints = 2640 [ SrcSpan "tests/examples/RealGHC.lhs" 132 14 132 15 2641 , SrcSpan "tests/examples/RealGHC.lhs" 132 22 132 23 2642 ] 2643 } 2644 (PApp 2645 SrcSpanInfo 2646 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 15 132 22 2647 , srcInfoPoints = [] 2648 } 2649 (UnQual 2650 SrcSpanInfo 2651 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 15 132 18 2652 , srcInfoPoints = [] 2653 } 2654 (Ident 2655 SrcSpanInfo 2656 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 15 132 18 2657 , srcInfoPoints = [] 2658 } 2659 "App")) 2660 [ PVar 2661 SrcSpanInfo 2662 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 19 132 20 2663 , srcInfoPoints = [] 2664 } 2665 (Ident 2666 SrcSpanInfo 2667 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 19 132 20 2668 , srcInfoPoints = [] 2669 } 2670 "f") 2671 , PVar 2672 SrcSpanInfo 2673 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 21 132 22 2674 , srcInfoPoints = [] 2675 } 2676 (Ident 2677 SrcSpanInfo 2678 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 21 132 22 2679 , srcInfoPoints = [] 2680 } 2681 "a") 2682 ]) 2683 ] 2684 (UnGuardedRhs 2685 SrcSpanInfo 2686 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 24 132 40 2687 , srcInfoPoints = 2688 [ SrcSpan "tests/examples/RealGHC.lhs" 132 24 132 25 ] 2689 } 2690 (App 2691 SrcSpanInfo 2692 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 26 132 40 2693 , srcInfoPoints = [] 2694 } 2695 (Var 2696 SrcSpanInfo 2697 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 26 132 38 2698 , srcInfoPoints = [] 2699 } 2700 (UnQual 2701 SrcSpanInfo 2702 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 26 132 38 2703 , srcInfoPoints = [] 2704 } 2705 (Ident 2706 SrcSpanInfo 2707 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 26 132 38 2708 , srcInfoPoints = [] 2709 } 2710 "roughTopName"))) 2711 (Var 2712 SrcSpanInfo 2713 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 39 132 40 2714 , srcInfoPoints = [] 2715 } 2716 (UnQual 2717 SrcSpanInfo 2718 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 39 132 40 2719 , srcInfoPoints = [] 2720 } 2721 (Ident 2722 SrcSpanInfo 2723 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 132 39 132 40 2724 , srcInfoPoints = [] 2725 } 2726 "f"))))) 2727 Nothing 2728 , Match 2729 SrcSpanInfo 2730 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 1 134 38 2731 , srcInfoPoints = [] 2732 } 2733 (Ident 2734 SrcSpanInfo 2735 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 1 133 13 2736 , srcInfoPoints = [] 2737 } 2738 "roughTopName") 2739 [ PParen 2740 SrcSpanInfo 2741 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 14 133 21 2742 , srcInfoPoints = 2743 [ SrcSpan "tests/examples/RealGHC.lhs" 133 14 133 15 2744 , SrcSpan "tests/examples/RealGHC.lhs" 133 20 133 21 2745 ] 2746 } 2747 (PApp 2748 SrcSpanInfo 2749 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 15 133 20 2750 , srcInfoPoints = [] 2751 } 2752 (UnQual 2753 SrcSpanInfo 2754 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 15 133 18 2755 , srcInfoPoints = [] 2756 } 2757 (Ident 2758 SrcSpanInfo 2759 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 15 133 18 2760 , srcInfoPoints = [] 2761 } 2762 "Var")) 2763 [ PVar 2764 SrcSpanInfo 2765 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 19 133 20 2766 , srcInfoPoints = [] 2767 } 2768 (Ident 2769 SrcSpanInfo 2770 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 19 133 20 2771 , srcInfoPoints = [] 2772 } 2773 "f") 2774 ]) 2775 ] 2776 (GuardedRhss 2777 SrcSpanInfo 2778 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 22 134 38 2779 , srcInfoPoints = [] 2780 } 2781 [ GuardedRhs 2782 SrcSpanInfo 2783 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 22 133 54 2784 , srcInfoPoints = 2785 [ SrcSpan "tests/examples/RealGHC.lhs" 133 22 133 23 2786 , SrcSpan "tests/examples/RealGHC.lhs" 133 37 133 38 2787 ] 2788 } 2789 [ Qualifier 2790 SrcSpanInfo 2791 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 24 133 36 2792 , srcInfoPoints = [] 2793 } 2794 (App 2795 SrcSpanInfo 2796 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 24 133 36 2797 , srcInfoPoints = [] 2798 } 2799 (Var 2800 SrcSpanInfo 2801 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 24 133 34 2802 , srcInfoPoints = [] 2803 } 2804 (UnQual 2805 SrcSpanInfo 2806 { srcInfoSpan = 2807 SrcSpan "tests/examples/RealGHC.lhs" 133 24 133 34 2808 , srcInfoPoints = [] 2809 } 2810 (Ident 2811 SrcSpanInfo 2812 { srcInfoSpan = 2813 SrcSpan "tests/examples/RealGHC.lhs" 133 24 133 34 2814 , srcInfoPoints = [] 2815 } 2816 "isGlobalId"))) 2817 (Var 2818 SrcSpanInfo 2819 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 35 133 36 2820 , srcInfoPoints = [] 2821 } 2822 (UnQual 2823 SrcSpanInfo 2824 { srcInfoSpan = 2825 SrcSpan "tests/examples/RealGHC.lhs" 133 35 133 36 2826 , srcInfoPoints = [] 2827 } 2828 (Ident 2829 SrcSpanInfo 2830 { srcInfoSpan = 2831 SrcSpan "tests/examples/RealGHC.lhs" 133 35 133 36 2832 , srcInfoPoints = [] 2833 } 2834 "f")))) 2835 ] 2836 (App 2837 SrcSpanInfo 2838 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 39 133 54 2839 , srcInfoPoints = [] 2840 } 2841 (Con 2842 SrcSpanInfo 2843 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 39 133 43 2844 , srcInfoPoints = [] 2845 } 2846 (UnQual 2847 SrcSpanInfo 2848 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 39 133 43 2849 , srcInfoPoints = [] 2850 } 2851 (Ident 2852 SrcSpanInfo 2853 { srcInfoSpan = 2854 SrcSpan "tests/examples/RealGHC.lhs" 133 39 133 43 2855 , srcInfoPoints = [] 2856 } 2857 "Just"))) 2858 (Paren 2859 SrcSpanInfo 2860 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 44 133 54 2861 , srcInfoPoints = 2862 [ SrcSpan "tests/examples/RealGHC.lhs" 133 44 133 45 2863 , SrcSpan "tests/examples/RealGHC.lhs" 133 53 133 54 2864 ] 2865 } 2866 (App 2867 SrcSpanInfo 2868 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 133 45 133 53 2869 , srcInfoPoints = [] 2870 } 2871 (Var 2872 SrcSpanInfo 2873 { srcInfoSpan = 2874 SrcSpan "tests/examples/RealGHC.lhs" 133 45 133 51 2875 , srcInfoPoints = [] 2876 } 2877 (UnQual 2878 SrcSpanInfo 2879 { srcInfoSpan = 2880 SrcSpan "tests/examples/RealGHC.lhs" 133 45 133 51 2881 , srcInfoPoints = [] 2882 } 2883 (Ident 2884 SrcSpanInfo 2885 { srcInfoSpan = 2886 SrcSpan "tests/examples/RealGHC.lhs" 133 45 133 51 2887 , srcInfoPoints = [] 2888 } 2889 "idName"))) 2890 (Var 2891 SrcSpanInfo 2892 { srcInfoSpan = 2893 SrcSpan "tests/examples/RealGHC.lhs" 133 52 133 53 2894 , srcInfoPoints = [] 2895 } 2896 (UnQual 2897 SrcSpanInfo 2898 { srcInfoSpan = 2899 SrcSpan "tests/examples/RealGHC.lhs" 133 52 133 53 2900 , srcInfoPoints = [] 2901 } 2902 (Ident 2903 SrcSpanInfo 2904 { srcInfoSpan = 2905 SrcSpan "tests/examples/RealGHC.lhs" 133 52 133 53 2906 , srcInfoPoints = [] 2907 } 2908 "f")))))) 2909 , GuardedRhs 2910 SrcSpanInfo 2911 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 134 14 134 38 2912 , srcInfoPoints = 2913 [ SrcSpan "tests/examples/RealGHC.lhs" 134 14 134 15 2914 , SrcSpan "tests/examples/RealGHC.lhs" 134 29 134 30 2915 ] 2916 } 2917 [ Qualifier 2918 SrcSpanInfo 2919 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 134 16 134 25 2920 , srcInfoPoints = [] 2921 } 2922 (Var 2923 SrcSpanInfo 2924 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 134 16 134 25 2925 , srcInfoPoints = [] 2926 } 2927 (UnQual 2928 SrcSpanInfo 2929 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 134 16 134 25 2930 , srcInfoPoints = [] 2931 } 2932 (Ident 2933 SrcSpanInfo 2934 { srcInfoSpan = 2935 SrcSpan "tests/examples/RealGHC.lhs" 134 16 134 25 2936 , srcInfoPoints = [] 2937 } 2938 "otherwise"))) 2939 ] 2940 (Con 2941 SrcSpanInfo 2942 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 134 31 134 38 2943 , srcInfoPoints = [] 2944 } 2945 (UnQual 2946 SrcSpanInfo 2947 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 134 31 134 38 2948 , srcInfoPoints = [] 2949 } 2950 (Ident 2951 SrcSpanInfo 2952 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 134 31 134 38 2953 , srcInfoPoints = [] 2954 } 2955 "Nothing"))) 2956 ]) 2957 Nothing 2958 , Match 2959 SrcSpanInfo 2960 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 135 1 135 29 2961 , srcInfoPoints = [] 2962 } 2963 (Ident 2964 SrcSpanInfo 2965 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 135 1 135 13 2966 , srcInfoPoints = [] 2967 } 2968 "roughTopName") 2969 [ PVar 2970 SrcSpanInfo 2971 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 135 14 135 19 2972 , srcInfoPoints = [] 2973 } 2974 (Ident 2975 SrcSpanInfo 2976 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 135 14 135 19 2977 , srcInfoPoints = [] 2978 } 2979 "other") 2980 ] 2981 (UnGuardedRhs 2982 SrcSpanInfo 2983 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 135 20 135 29 2984 , srcInfoPoints = 2985 [ SrcSpan "tests/examples/RealGHC.lhs" 135 20 135 21 ] 2986 } 2987 (Con 2988 SrcSpanInfo 2989 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 135 22 135 29 2990 , srcInfoPoints = [] 2991 } 2992 (UnQual 2993 SrcSpanInfo 2994 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 135 22 135 29 2995 , srcInfoPoints = [] 2996 } 2997 (Ident 2998 SrcSpanInfo 2999 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 135 22 135 29 3000 , srcInfoPoints = [] 3001 } 3002 "Nothing")))) 3003 Nothing 3004 ] 3005 , TypeSig 3006 SrcSpanInfo 3007 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 1 137 54 3008 , srcInfoPoints = 3009 [ SrcSpan "tests/examples/RealGHC.lhs" 137 15 137 17 ] 3010 } 3011 [ Ident 3012 SrcSpanInfo 3013 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 1 137 14 3014 , srcInfoPoints = [] 3015 } 3016 "ruleCantMatch" 3017 ] 3018 (TyFun 3019 SrcSpanInfo 3020 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 18 137 54 3021 , srcInfoPoints = 3022 [ SrcSpan "tests/examples/RealGHC.lhs" 137 31 137 33 ] 3023 } 3024 (TyList 3025 SrcSpanInfo 3026 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 18 137 30 3027 , srcInfoPoints = 3028 [ SrcSpan "tests/examples/RealGHC.lhs" 137 18 137 19 3029 , SrcSpan "tests/examples/RealGHC.lhs" 137 29 137 30 3030 ] 3031 } 3032 (TyApp 3033 SrcSpanInfo 3034 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 19 137 29 3035 , srcInfoPoints = [] 3036 } 3037 (TyCon 3038 SrcSpanInfo 3039 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 19 137 24 3040 , srcInfoPoints = [] 3041 } 3042 (UnQual 3043 SrcSpanInfo 3044 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 19 137 24 3045 , srcInfoPoints = [] 3046 } 3047 (Ident 3048 SrcSpanInfo 3049 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 19 137 24 3050 , srcInfoPoints = [] 3051 } 3052 "Maybe"))) 3053 (TyCon 3054 SrcSpanInfo 3055 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 25 137 29 3056 , srcInfoPoints = [] 3057 } 3058 (UnQual 3059 SrcSpanInfo 3060 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 25 137 29 3061 , srcInfoPoints = [] 3062 } 3063 (Ident 3064 SrcSpanInfo 3065 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 25 137 29 3066 , srcInfoPoints = [] 3067 } 3068 "Name"))))) 3069 (TyFun 3070 SrcSpanInfo 3071 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 34 137 54 3072 , srcInfoPoints = 3073 [ SrcSpan "tests/examples/RealGHC.lhs" 137 47 137 49 ] 3074 } 3075 (TyList 3076 SrcSpanInfo 3077 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 34 137 46 3078 , srcInfoPoints = 3079 [ SrcSpan "tests/examples/RealGHC.lhs" 137 34 137 35 3080 , SrcSpan "tests/examples/RealGHC.lhs" 137 45 137 46 3081 ] 3082 } 3083 (TyApp 3084 SrcSpanInfo 3085 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 35 137 45 3086 , srcInfoPoints = [] 3087 } 3088 (TyCon 3089 SrcSpanInfo 3090 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 35 137 40 3091 , srcInfoPoints = [] 3092 } 3093 (UnQual 3094 SrcSpanInfo 3095 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 35 137 40 3096 , srcInfoPoints = [] 3097 } 3098 (Ident 3099 SrcSpanInfo 3100 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 35 137 40 3101 , srcInfoPoints = [] 3102 } 3103 "Maybe"))) 3104 (TyCon 3105 SrcSpanInfo 3106 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 41 137 45 3107 , srcInfoPoints = [] 3108 } 3109 (UnQual 3110 SrcSpanInfo 3111 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 41 137 45 3112 , srcInfoPoints = [] 3113 } 3114 (Ident 3115 SrcSpanInfo 3116 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 41 137 45 3117 , srcInfoPoints = [] 3118 } 3119 "Name"))))) 3120 (TyCon 3121 SrcSpanInfo 3122 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 50 137 54 3123 , srcInfoPoints = [] 3124 } 3125 (UnQual 3126 SrcSpanInfo 3127 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 50 137 54 3128 , srcInfoPoints = [] 3129 } 3130 (Ident 3131 SrcSpanInfo 3132 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 137 50 137 54 3133 , srcInfoPoints = [] 3134 } 3135 "Bool"))))) 3136 , FunBind 3137 SrcSpanInfo 3138 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 1 152 44 3139 , srcInfoPoints = [] 3140 } 3141 [ Match 3142 SrcSpanInfo 3143 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 1 150 78 3144 , srcInfoPoints = [] 3145 } 3146 (Ident 3147 SrcSpanInfo 3148 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 1 150 14 3149 , srcInfoPoints = [] 3150 } 3151 "ruleCantMatch") 3152 [ PParen 3153 SrcSpanInfo 3154 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 15 150 29 3155 , srcInfoPoints = 3156 [ SrcSpan "tests/examples/RealGHC.lhs" 150 15 150 16 3157 , SrcSpan "tests/examples/RealGHC.lhs" 150 28 150 29 3158 ] 3159 } 3160 (PInfixApp 3161 SrcSpanInfo 3162 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 16 150 28 3163 , srcInfoPoints = [] 3164 } 3165 (PApp 3166 SrcSpanInfo 3167 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 16 150 23 3168 , srcInfoPoints = [] 3169 } 3170 (UnQual 3171 SrcSpanInfo 3172 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 16 150 20 3173 , srcInfoPoints = [] 3174 } 3175 (Ident 3176 SrcSpanInfo 3177 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 16 150 20 3178 , srcInfoPoints = [] 3179 } 3180 "Just")) 3181 [ PVar 3182 SrcSpanInfo 3183 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 21 150 23 3184 , srcInfoPoints = [] 3185 } 3186 (Ident 3187 SrcSpanInfo 3188 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 21 150 23 3189 , srcInfoPoints = [] 3190 } 3191 "n1") 3192 ]) 3193 (Special 3194 SrcSpanInfo 3195 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 24 150 25 3196 , srcInfoPoints = [] 3197 } 3198 (Cons 3199 SrcSpanInfo 3200 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 24 150 25 3201 , srcInfoPoints = [] 3202 })) 3203 (PVar 3204 SrcSpanInfo 3205 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 26 150 28 3206 , srcInfoPoints = [] 3207 } 3208 (Ident 3209 SrcSpanInfo 3210 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 26 150 28 3211 , srcInfoPoints = [] 3212 } 3213 "ts"))) 3214 , PParen 3215 SrcSpanInfo 3216 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 30 150 44 3217 , srcInfoPoints = 3218 [ SrcSpan "tests/examples/RealGHC.lhs" 150 30 150 31 3219 , SrcSpan "tests/examples/RealGHC.lhs" 150 43 150 44 3220 ] 3221 } 3222 (PInfixApp 3223 SrcSpanInfo 3224 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 31 150 43 3225 , srcInfoPoints = [] 3226 } 3227 (PApp 3228 SrcSpanInfo 3229 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 31 150 38 3230 , srcInfoPoints = [] 3231 } 3232 (UnQual 3233 SrcSpanInfo 3234 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 31 150 35 3235 , srcInfoPoints = [] 3236 } 3237 (Ident 3238 SrcSpanInfo 3239 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 31 150 35 3240 , srcInfoPoints = [] 3241 } 3242 "Just")) 3243 [ PVar 3244 SrcSpanInfo 3245 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 36 150 38 3246 , srcInfoPoints = [] 3247 } 3248 (Ident 3249 SrcSpanInfo 3250 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 36 150 38 3251 , srcInfoPoints = [] 3252 } 3253 "n2") 3254 ]) 3255 (Special 3256 SrcSpanInfo 3257 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 39 150 40 3258 , srcInfoPoints = [] 3259 } 3260 (Cons 3261 SrcSpanInfo 3262 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 39 150 40 3263 , srcInfoPoints = [] 3264 })) 3265 (PVar 3266 SrcSpanInfo 3267 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 41 150 43 3268 , srcInfoPoints = [] 3269 } 3270 (Ident 3271 SrcSpanInfo 3272 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 41 150 43 3273 , srcInfoPoints = [] 3274 } 3275 "as"))) 3276 ] 3277 (UnGuardedRhs 3278 SrcSpanInfo 3279 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 45 150 78 3280 , srcInfoPoints = 3281 [ SrcSpan "tests/examples/RealGHC.lhs" 150 45 150 46 ] 3282 } 3283 (InfixApp 3284 SrcSpanInfo 3285 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 47 150 78 3286 , srcInfoPoints = [] 3287 } 3288 (InfixApp 3289 SrcSpanInfo 3290 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 47 150 55 3291 , srcInfoPoints = [] 3292 } 3293 (Var 3294 SrcSpanInfo 3295 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 47 150 49 3296 , srcInfoPoints = [] 3297 } 3298 (UnQual 3299 SrcSpanInfo 3300 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 47 150 49 3301 , srcInfoPoints = [] 3302 } 3303 (Ident 3304 SrcSpanInfo 3305 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 47 150 49 3306 , srcInfoPoints = [] 3307 } 3308 "n1"))) 3309 (QVarOp 3310 SrcSpanInfo 3311 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 50 150 52 3312 , srcInfoPoints = [] 3313 } 3314 (UnQual 3315 SrcSpanInfo 3316 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 50 150 52 3317 , srcInfoPoints = [] 3318 } 3319 (Symbol 3320 SrcSpanInfo 3321 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 50 150 52 3322 , srcInfoPoints = [] 3323 } 3324 "/="))) 3325 (Var 3326 SrcSpanInfo 3327 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 53 150 55 3328 , srcInfoPoints = [] 3329 } 3330 (UnQual 3331 SrcSpanInfo 3332 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 53 150 55 3333 , srcInfoPoints = [] 3334 } 3335 (Ident 3336 SrcSpanInfo 3337 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 53 150 55 3338 , srcInfoPoints = [] 3339 } 3340 "n2")))) 3341 (QVarOp 3342 SrcSpanInfo 3343 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 56 150 58 3344 , srcInfoPoints = [] 3345 } 3346 (UnQual 3347 SrcSpanInfo 3348 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 56 150 58 3349 , srcInfoPoints = [] 3350 } 3351 (Symbol 3352 SrcSpanInfo 3353 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 56 150 58 3354 , srcInfoPoints = [] 3355 } 3356 "||"))) 3357 (App 3358 SrcSpanInfo 3359 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 59 150 78 3360 , srcInfoPoints = [] 3361 } 3362 (App 3363 SrcSpanInfo 3364 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 59 150 75 3365 , srcInfoPoints = [] 3366 } 3367 (Var 3368 SrcSpanInfo 3369 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 59 150 72 3370 , srcInfoPoints = [] 3371 } 3372 (UnQual 3373 SrcSpanInfo 3374 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 59 150 72 3375 , srcInfoPoints = [] 3376 } 3377 (Ident 3378 SrcSpanInfo 3379 { srcInfoSpan = 3380 SrcSpan "tests/examples/RealGHC.lhs" 150 59 150 72 3381 , srcInfoPoints = [] 3382 } 3383 "ruleCantMatch"))) 3384 (Var 3385 SrcSpanInfo 3386 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 73 150 75 3387 , srcInfoPoints = [] 3388 } 3389 (UnQual 3390 SrcSpanInfo 3391 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 73 150 75 3392 , srcInfoPoints = [] 3393 } 3394 (Ident 3395 SrcSpanInfo 3396 { srcInfoSpan = 3397 SrcSpan "tests/examples/RealGHC.lhs" 150 73 150 75 3398 , srcInfoPoints = [] 3399 } 3400 "ts")))) 3401 (Var 3402 SrcSpanInfo 3403 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 76 150 78 3404 , srcInfoPoints = [] 3405 } 3406 (UnQual 3407 SrcSpanInfo 3408 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 76 150 78 3409 , srcInfoPoints = [] 3410 } 3411 (Ident 3412 SrcSpanInfo 3413 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 150 76 150 78 3414 , srcInfoPoints = [] 3415 } 3416 "as")))))) 3417 Nothing 3418 , Match 3419 SrcSpanInfo 3420 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 1 151 66 3421 , srcInfoPoints = [] 3422 } 3423 (Ident 3424 SrcSpanInfo 3425 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 1 151 14 3426 , srcInfoPoints = [] 3427 } 3428 "ruleCantMatch") 3429 [ PParen 3430 SrcSpanInfo 3431 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 15 151 29 3432 , srcInfoPoints = 3433 [ SrcSpan "tests/examples/RealGHC.lhs" 151 15 151 16 3434 , SrcSpan "tests/examples/RealGHC.lhs" 151 28 151 29 3435 ] 3436 } 3437 (PInfixApp 3438 SrcSpanInfo 3439 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 16 151 28 3440 , srcInfoPoints = [] 3441 } 3442 (PVar 3443 SrcSpanInfo 3444 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 16 151 17 3445 , srcInfoPoints = [] 3446 } 3447 (Ident 3448 SrcSpanInfo 3449 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 16 151 17 3450 , srcInfoPoints = [] 3451 } 3452 "t")) 3453 (Special 3454 SrcSpanInfo 3455 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 24 151 25 3456 , srcInfoPoints = [] 3457 } 3458 (Cons 3459 SrcSpanInfo 3460 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 24 151 25 3461 , srcInfoPoints = [] 3462 })) 3463 (PVar 3464 SrcSpanInfo 3465 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 26 151 28 3466 , srcInfoPoints = [] 3467 } 3468 (Ident 3469 SrcSpanInfo 3470 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 26 151 28 3471 , srcInfoPoints = [] 3472 } 3473 "ts"))) 3474 , PParen 3475 SrcSpanInfo 3476 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 30 151 44 3477 , srcInfoPoints = 3478 [ SrcSpan "tests/examples/RealGHC.lhs" 151 30 151 31 3479 , SrcSpan "tests/examples/RealGHC.lhs" 151 43 151 44 3480 ] 3481 } 3482 (PInfixApp 3483 SrcSpanInfo 3484 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 31 151 43 3485 , srcInfoPoints = [] 3486 } 3487 (PVar 3488 SrcSpanInfo 3489 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 31 151 32 3490 , srcInfoPoints = [] 3491 } 3492 (Ident 3493 SrcSpanInfo 3494 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 31 151 32 3495 , srcInfoPoints = [] 3496 } 3497 "a")) 3498 (Special 3499 SrcSpanInfo 3500 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 39 151 40 3501 , srcInfoPoints = [] 3502 } 3503 (Cons 3504 SrcSpanInfo 3505 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 39 151 40 3506 , srcInfoPoints = [] 3507 })) 3508 (PVar 3509 SrcSpanInfo 3510 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 41 151 43 3511 , srcInfoPoints = [] 3512 } 3513 (Ident 3514 SrcSpanInfo 3515 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 41 151 43 3516 , srcInfoPoints = [] 3517 } 3518 "as"))) 3519 ] 3520 (UnGuardedRhs 3521 SrcSpanInfo 3522 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 45 151 66 3523 , srcInfoPoints = 3524 [ SrcSpan "tests/examples/RealGHC.lhs" 151 45 151 46 ] 3525 } 3526 (App 3527 SrcSpanInfo 3528 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 47 151 66 3529 , srcInfoPoints = [] 3530 } 3531 (App 3532 SrcSpanInfo 3533 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 47 151 63 3534 , srcInfoPoints = [] 3535 } 3536 (Var 3537 SrcSpanInfo 3538 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 47 151 60 3539 , srcInfoPoints = [] 3540 } 3541 (UnQual 3542 SrcSpanInfo 3543 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 47 151 60 3544 , srcInfoPoints = [] 3545 } 3546 (Ident 3547 SrcSpanInfo 3548 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 47 151 60 3549 , srcInfoPoints = [] 3550 } 3551 "ruleCantMatch"))) 3552 (Var 3553 SrcSpanInfo 3554 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 61 151 63 3555 , srcInfoPoints = [] 3556 } 3557 (UnQual 3558 SrcSpanInfo 3559 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 61 151 63 3560 , srcInfoPoints = [] 3561 } 3562 (Ident 3563 SrcSpanInfo 3564 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 61 151 63 3565 , srcInfoPoints = [] 3566 } 3567 "ts")))) 3568 (Var 3569 SrcSpanInfo 3570 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 64 151 66 3571 , srcInfoPoints = [] 3572 } 3573 (UnQual 3574 SrcSpanInfo 3575 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 64 151 66 3576 , srcInfoPoints = [] 3577 } 3578 (Ident 3579 SrcSpanInfo 3580 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 151 64 151 66 3581 , srcInfoPoints = [] 3582 } 3583 "as"))))) 3584 Nothing 3585 , Match 3586 SrcSpanInfo 3587 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 1 152 44 3588 , srcInfoPoints = [] 3589 } 3590 (Ident 3591 SrcSpanInfo 3592 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 1 152 14 3593 , srcInfoPoints = [] 3594 } 3595 "ruleCantMatch") 3596 [ PVar 3597 SrcSpanInfo 3598 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 15 152 17 3599 , srcInfoPoints = [] 3600 } 3601 (Ident 3602 SrcSpanInfo 3603 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 15 152 17 3604 , srcInfoPoints = [] 3605 } 3606 "ts") 3607 , PVar 3608 SrcSpanInfo 3609 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 26 152 28 3610 , srcInfoPoints = [] 3611 } 3612 (Ident 3613 SrcSpanInfo 3614 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 26 152 28 3615 , srcInfoPoints = [] 3616 } 3617 "as") 3618 ] 3619 (UnGuardedRhs 3620 SrcSpanInfo 3621 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 37 152 44 3622 , srcInfoPoints = 3623 [ SrcSpan "tests/examples/RealGHC.lhs" 152 37 152 38 ] 3624 } 3625 (Con 3626 SrcSpanInfo 3627 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 39 152 44 3628 , srcInfoPoints = [] 3629 } 3630 (UnQual 3631 SrcSpanInfo 3632 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 39 152 44 3633 , srcInfoPoints = [] 3634 } 3635 (Ident 3636 SrcSpanInfo 3637 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 152 39 152 44 3638 , srcInfoPoints = [] 3639 } 3640 "False")))) 3641 Nothing 3642 ] 3643 , TypeSig 3644 SrcSpanInfo 3645 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 1 156 38 3646 , srcInfoPoints = 3647 [ SrcSpan "tests/examples/RealGHC.lhs" 156 17 156 19 ] 3648 } 3649 [ Ident 3650 SrcSpanInfo 3651 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 1 156 16 3652 , srcInfoPoints = [] 3653 } 3654 "pprRulesForUser" 3655 ] 3656 (TyFun 3657 SrcSpanInfo 3658 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 20 156 38 3659 , srcInfoPoints = 3660 [ SrcSpan "tests/examples/RealGHC.lhs" 156 31 156 33 ] 3661 } 3662 (TyList 3663 SrcSpanInfo 3664 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 20 156 30 3665 , srcInfoPoints = 3666 [ SrcSpan "tests/examples/RealGHC.lhs" 156 20 156 21 3667 , SrcSpan "tests/examples/RealGHC.lhs" 156 29 156 30 3668 ] 3669 } 3670 (TyCon 3671 SrcSpanInfo 3672 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 21 156 29 3673 , srcInfoPoints = [] 3674 } 3675 (UnQual 3676 SrcSpanInfo 3677 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 21 156 29 3678 , srcInfoPoints = [] 3679 } 3680 (Ident 3681 SrcSpanInfo 3682 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 21 156 29 3683 , srcInfoPoints = [] 3684 } 3685 "CoreRule")))) 3686 (TyCon 3687 SrcSpanInfo 3688 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 34 156 38 3689 , srcInfoPoints = [] 3690 } 3691 (UnQual 3692 SrcSpanInfo 3693 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 34 156 38 3694 , srcInfoPoints = [] 3695 } 3696 (Ident 3697 SrcSpanInfo 3698 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 156 34 156 38 3699 , srcInfoPoints = [] 3700 } 3701 "SDoc")))) 3702 , FunBind 3703 SrcSpanInfo 3704 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 162 1 168 45 3705 , srcInfoPoints = 3706 [ SrcSpan "tests/examples/RealGHC.lhs" 167 3 167 8 ] 3707 } 3708 [ Match 3709 SrcSpanInfo 3710 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 162 1 168 45 3711 , srcInfoPoints = 3712 [ SrcSpan "tests/examples/RealGHC.lhs" 167 3 167 8 ] 3713 } 3714 (Ident 3715 SrcSpanInfo 3716 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 162 1 162 16 3717 , srcInfoPoints = [] 3718 } 3719 "pprRulesForUser") 3720 [ PVar 3721 SrcSpanInfo 3722 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 162 17 162 22 3723 , srcInfoPoints = [] 3724 } 3725 (Ident 3726 SrcSpanInfo 3727 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 162 17 162 22 3728 , srcInfoPoints = [] 3729 } 3730 "rules") 3731 ] 3732 (UnGuardedRhs 3733 SrcSpanInfo 3734 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 3 166 33 3735 , srcInfoPoints = 3736 [ SrcSpan "tests/examples/RealGHC.lhs" 163 3 163 4 ] 3737 } 3738 (InfixApp 3739 SrcSpanInfo 3740 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 5 166 33 3741 , srcInfoPoints = [] 3742 } 3743 (App 3744 SrcSpanInfo 3745 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 5 163 34 3746 , srcInfoPoints = [] 3747 } 3748 (Var 3749 SrcSpanInfo 3750 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 5 163 17 3751 , srcInfoPoints = [] 3752 } 3753 (UnQual 3754 SrcSpanInfo 3755 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 5 163 17 3756 , srcInfoPoints = [] 3757 } 3758 (Ident 3759 SrcSpanInfo 3760 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 5 163 17 3761 , srcInfoPoints = [] 3762 } 3763 "withPprStyle"))) 3764 (Var 3765 SrcSpanInfo 3766 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 18 163 34 3767 , srcInfoPoints = [] 3768 } 3769 (UnQual 3770 SrcSpanInfo 3771 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 18 163 34 3772 , srcInfoPoints = [] 3773 } 3774 (Ident 3775 SrcSpanInfo 3776 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 18 163 34 3777 , srcInfoPoints = [] 3778 } 3779 "defaultUserStyle")))) 3780 (QVarOp 3781 SrcSpanInfo 3782 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 35 163 36 3783 , srcInfoPoints = [] 3784 } 3785 (UnQual 3786 SrcSpanInfo 3787 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 35 163 36 3788 , srcInfoPoints = [] 3789 } 3790 (Symbol 3791 SrcSpanInfo 3792 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 163 35 163 36 3793 , srcInfoPoints = [] 3794 } 3795 "$"))) 3796 (InfixApp 3797 SrcSpanInfo 3798 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 164 5 166 33 3799 , srcInfoPoints = [] 3800 } 3801 (Var 3802 SrcSpanInfo 3803 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 164 5 164 13 3804 , srcInfoPoints = [] 3805 } 3806 (UnQual 3807 SrcSpanInfo 3808 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 164 5 164 13 3809 , srcInfoPoints = [] 3810 } 3811 (Ident 3812 SrcSpanInfo 3813 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 164 5 164 13 3814 , srcInfoPoints = [] 3815 } 3816 "pprRules"))) 3817 (QVarOp 3818 SrcSpanInfo 3819 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 164 14 164 15 3820 , srcInfoPoints = [] 3821 } 3822 (UnQual 3823 SrcSpanInfo 3824 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 164 14 164 15 3825 , srcInfoPoints = [] 3826 } 3827 (Symbol 3828 SrcSpanInfo 3829 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 164 14 164 15 3830 , srcInfoPoints = [] 3831 } 3832 "$"))) 3833 (InfixApp 3834 SrcSpanInfo 3835 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 165 5 166 33 3836 , srcInfoPoints = [] 3837 } 3838 (App 3839 SrcSpanInfo 3840 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 165 5 165 19 3841 , srcInfoPoints = [] 3842 } 3843 (Var 3844 SrcSpanInfo 3845 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 165 5 165 11 3846 , srcInfoPoints = [] 3847 } 3848 (UnQual 3849 SrcSpanInfo 3850 { srcInfoSpan = 3851 SrcSpan "tests/examples/RealGHC.lhs" 165 5 165 11 3852 , srcInfoPoints = [] 3853 } 3854 (Ident 3855 SrcSpanInfo 3856 { srcInfoSpan = 3857 SrcSpan "tests/examples/RealGHC.lhs" 165 5 165 11 3858 , srcInfoPoints = [] 3859 } 3860 "sortLe"))) 3861 (Var 3862 SrcSpanInfo 3863 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 165 12 165 19 3864 , srcInfoPoints = [] 3865 } 3866 (UnQual 3867 SrcSpanInfo 3868 { srcInfoSpan = 3869 SrcSpan "tests/examples/RealGHC.lhs" 165 12 165 19 3870 , srcInfoPoints = [] 3871 } 3872 (Ident 3873 SrcSpanInfo 3874 { srcInfoSpan = 3875 SrcSpan "tests/examples/RealGHC.lhs" 165 12 165 19 3876 , srcInfoPoints = [] 3877 } 3878 "le_rule")))) 3879 (QVarOp 3880 SrcSpanInfo 3881 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 165 21 165 22 3882 , srcInfoPoints = [] 3883 } 3884 (UnQual 3885 SrcSpanInfo 3886 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 165 21 165 22 3887 , srcInfoPoints = [] 3888 } 3889 (Symbol 3890 SrcSpanInfo 3891 { srcInfoSpan = 3892 SrcSpan "tests/examples/RealGHC.lhs" 165 21 165 22 3893 , srcInfoPoints = [] 3894 } 3895 "$"))) 3896 (App 3897 SrcSpanInfo 3898 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 166 5 166 33 3899 , srcInfoPoints = [] 3900 } 3901 (App 3902 SrcSpanInfo 3903 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 166 5 166 27 3904 , srcInfoPoints = [] 3905 } 3906 (Var 3907 SrcSpanInfo 3908 { srcInfoSpan = 3909 SrcSpan "tests/examples/RealGHC.lhs" 166 5 166 14 3910 , srcInfoPoints = [] 3911 } 3912 (UnQual 3913 SrcSpanInfo 3914 { srcInfoSpan = 3915 SrcSpan "tests/examples/RealGHC.lhs" 166 5 166 14 3916 , srcInfoPoints = [] 3917 } 3918 (Ident 3919 SrcSpanInfo 3920 { srcInfoSpan = 3921 SrcSpan "tests/examples/RealGHC.lhs" 166 5 166 14 3922 , srcInfoPoints = [] 3923 } 3924 "tidyRules"))) 3925 (Var 3926 SrcSpanInfo 3927 { srcInfoSpan = 3928 SrcSpan "tests/examples/RealGHC.lhs" 166 15 166 27 3929 , srcInfoPoints = [] 3930 } 3931 (UnQual 3932 SrcSpanInfo 3933 { srcInfoSpan = 3934 SrcSpan "tests/examples/RealGHC.lhs" 166 15 166 27 3935 , srcInfoPoints = [] 3936 } 3937 (Ident 3938 SrcSpanInfo 3939 { srcInfoSpan = 3940 SrcSpan "tests/examples/RealGHC.lhs" 166 15 166 27 3941 , srcInfoPoints = [] 3942 } 3943 "emptyTidyEnv")))) 3944 (Var 3945 SrcSpanInfo 3946 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 166 28 166 33 3947 , srcInfoPoints = [] 3948 } 3949 (UnQual 3950 SrcSpanInfo 3951 { srcInfoSpan = 3952 SrcSpan "tests/examples/RealGHC.lhs" 166 28 166 33 3953 , srcInfoPoints = [] 3954 } 3955 (Ident 3956 SrcSpanInfo 3957 { srcInfoSpan = 3958 SrcSpan "tests/examples/RealGHC.lhs" 166 28 166 33 3959 , srcInfoPoints = [] 3960 } 3961 "rules")))))))) 3962 (Just 3963 (BDecls 3964 SrcSpanInfo 3965 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 5 168 45 3966 , srcInfoPoints = 3967 [ SrcSpan "tests/examples/RealGHC.lhs" 168 5 168 5 3968 , SrcSpan "tests/examples/RealGHC.lhs" 181 1 181 0 3969 ] 3970 } 3971 [ FunBind 3972 SrcSpanInfo 3973 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 5 168 45 3974 , srcInfoPoints = [] 3975 } 3976 [ Match 3977 SrcSpanInfo 3978 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 5 168 45 3979 , srcInfoPoints = [] 3980 } 3981 (Ident 3982 SrcSpanInfo 3983 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 5 168 12 3984 , srcInfoPoints = [] 3985 } 3986 "le_rule") 3987 [ PVar 3988 SrcSpanInfo 3989 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 13 168 15 3990 , srcInfoPoints = [] 3991 } 3992 (Ident 3993 SrcSpanInfo 3994 { srcInfoSpan = 3995 SrcSpan "tests/examples/RealGHC.lhs" 168 13 168 15 3996 , srcInfoPoints = [] 3997 } 3998 "r1") 3999 , PVar 4000 SrcSpanInfo 4001 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 16 168 18 4002 , srcInfoPoints = [] 4003 } 4004 (Ident 4005 SrcSpanInfo 4006 { srcInfoSpan = 4007 SrcSpan "tests/examples/RealGHC.lhs" 168 16 168 18 4008 , srcInfoPoints = [] 4009 } 4010 "r2") 4011 ] 4012 (UnGuardedRhs 4013 SrcSpanInfo 4014 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 168 19 168 45 4015 , srcInfoPoints = 4016 [ SrcSpan "tests/examples/RealGHC.lhs" 168 19 168 20 ] 4017 } 4018 (InfixApp 4019 SrcSpanInfo 4020 { srcInfoSpan = 4021 SrcSpan "tests/examples/RealGHC.lhs" 168 21 168 45 4022 , srcInfoPoints = [] 4023 } 4024 (App 4025 SrcSpanInfo 4026 { srcInfoSpan = 4027 SrcSpan "tests/examples/RealGHC.lhs" 168 21 168 31 4028 , srcInfoPoints = [] 4029 } 4030 (Var 4031 SrcSpanInfo 4032 { srcInfoSpan = 4033 SrcSpan "tests/examples/RealGHC.lhs" 168 21 168 28 4034 , srcInfoPoints = [] 4035 } 4036 (UnQual 4037 SrcSpanInfo 4038 { srcInfoSpan = 4039 SrcSpan "tests/examples/RealGHC.lhs" 168 21 168 28 4040 , srcInfoPoints = [] 4041 } 4042 (Ident 4043 SrcSpanInfo 4044 { srcInfoSpan = 4045 SrcSpan 4046 "tests/examples/RealGHC.lhs" 168 21 168 28 4047 , srcInfoPoints = [] 4048 } 4049 "ru_name"))) 4050 (Var 4051 SrcSpanInfo 4052 { srcInfoSpan = 4053 SrcSpan "tests/examples/RealGHC.lhs" 168 29 168 31 4054 , srcInfoPoints = [] 4055 } 4056 (UnQual 4057 SrcSpanInfo 4058 { srcInfoSpan = 4059 SrcSpan "tests/examples/RealGHC.lhs" 168 29 168 31 4060 , srcInfoPoints = [] 4061 } 4062 (Ident 4063 SrcSpanInfo 4064 { srcInfoSpan = 4065 SrcSpan 4066 "tests/examples/RealGHC.lhs" 168 29 168 31 4067 , srcInfoPoints = [] 4068 } 4069 "r1")))) 4070 (QVarOp 4071 SrcSpanInfo 4072 { srcInfoSpan = 4073 SrcSpan "tests/examples/RealGHC.lhs" 168 32 168 34 4074 , srcInfoPoints = [] 4075 } 4076 (UnQual 4077 SrcSpanInfo 4078 { srcInfoSpan = 4079 SrcSpan "tests/examples/RealGHC.lhs" 168 32 168 34 4080 , srcInfoPoints = [] 4081 } 4082 (Symbol 4083 SrcSpanInfo 4084 { srcInfoSpan = 4085 SrcSpan "tests/examples/RealGHC.lhs" 168 32 168 34 4086 , srcInfoPoints = [] 4087 } 4088 "<="))) 4089 (App 4090 SrcSpanInfo 4091 { srcInfoSpan = 4092 SrcSpan "tests/examples/RealGHC.lhs" 168 35 168 45 4093 , srcInfoPoints = [] 4094 } 4095 (Var 4096 SrcSpanInfo 4097 { srcInfoSpan = 4098 SrcSpan "tests/examples/RealGHC.lhs" 168 35 168 42 4099 , srcInfoPoints = [] 4100 } 4101 (UnQual 4102 SrcSpanInfo 4103 { srcInfoSpan = 4104 SrcSpan "tests/examples/RealGHC.lhs" 168 35 168 42 4105 , srcInfoPoints = [] 4106 } 4107 (Ident 4108 SrcSpanInfo 4109 { srcInfoSpan = 4110 SrcSpan 4111 "tests/examples/RealGHC.lhs" 168 35 168 42 4112 , srcInfoPoints = [] 4113 } 4114 "ru_name"))) 4115 (Var 4116 SrcSpanInfo 4117 { srcInfoSpan = 4118 SrcSpan "tests/examples/RealGHC.lhs" 168 43 168 45 4119 , srcInfoPoints = [] 4120 } 4121 (UnQual 4122 SrcSpanInfo 4123 { srcInfoSpan = 4124 SrcSpan "tests/examples/RealGHC.lhs" 168 43 168 45 4125 , srcInfoPoints = [] 4126 } 4127 (Ident 4128 SrcSpanInfo 4129 { srcInfoSpan = 4130 SrcSpan 4131 "tests/examples/RealGHC.lhs" 168 43 168 45 4132 , srcInfoPoints = [] 4133 } 4134 "r2")))))) 4135 Nothing 4136 ] 4137 ])) 4138 ] 4139 , TypeSig 4140 SrcSpanInfo 4141 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 1 181 37 4142 , srcInfoPoints = 4143 [ SrcSpan "tests/examples/RealGHC.lhs" 181 12 181 14 ] 4144 } 4145 [ Ident 4146 SrcSpanInfo 4147 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 1 181 11 4148 , srcInfoPoints = [] 4149 } 4150 "mkSpecInfo" 4151 ] 4152 (TyFun 4153 SrcSpanInfo 4154 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 15 181 37 4155 , srcInfoPoints = 4156 [ SrcSpan "tests/examples/RealGHC.lhs" 181 26 181 28 ] 4157 } 4158 (TyList 4159 SrcSpanInfo 4160 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 15 181 25 4161 , srcInfoPoints = 4162 [ SrcSpan "tests/examples/RealGHC.lhs" 181 15 181 16 4163 , SrcSpan "tests/examples/RealGHC.lhs" 181 24 181 25 4164 ] 4165 } 4166 (TyCon 4167 SrcSpanInfo 4168 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 16 181 24 4169 , srcInfoPoints = [] 4170 } 4171 (UnQual 4172 SrcSpanInfo 4173 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 16 181 24 4174 , srcInfoPoints = [] 4175 } 4176 (Ident 4177 SrcSpanInfo 4178 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 16 181 24 4179 , srcInfoPoints = [] 4180 } 4181 "CoreRule")))) 4182 (TyCon 4183 SrcSpanInfo 4184 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 29 181 37 4185 , srcInfoPoints = [] 4186 } 4187 (UnQual 4188 SrcSpanInfo 4189 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 29 181 37 4190 , srcInfoPoints = [] 4191 } 4192 (Ident 4193 SrcSpanInfo 4194 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 181 29 181 37 4195 , srcInfoPoints = [] 4196 } 4197 "SpecInfo")))) 4198 , FunBind 4199 SrcSpanInfo 4200 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 1 182 56 4201 , srcInfoPoints = [] 4202 } 4203 [ Match 4204 SrcSpanInfo 4205 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 1 182 56 4206 , srcInfoPoints = [] 4207 } 4208 (Ident 4209 SrcSpanInfo 4210 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 1 182 11 4211 , srcInfoPoints = [] 4212 } 4213 "mkSpecInfo") 4214 [ PVar 4215 SrcSpanInfo 4216 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 12 182 17 4217 , srcInfoPoints = [] 4218 } 4219 (Ident 4220 SrcSpanInfo 4221 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 12 182 17 4222 , srcInfoPoints = [] 4223 } 4224 "rules") 4225 ] 4226 (UnGuardedRhs 4227 SrcSpanInfo 4228 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 18 182 56 4229 , srcInfoPoints = 4230 [ SrcSpan "tests/examples/RealGHC.lhs" 182 18 182 19 ] 4231 } 4232 (App 4233 SrcSpanInfo 4234 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 20 182 56 4235 , srcInfoPoints = [] 4236 } 4237 (App 4238 SrcSpanInfo 4239 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 20 182 34 4240 , srcInfoPoints = [] 4241 } 4242 (Con 4243 SrcSpanInfo 4244 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 20 182 28 4245 , srcInfoPoints = [] 4246 } 4247 (UnQual 4248 SrcSpanInfo 4249 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 20 182 28 4250 , srcInfoPoints = [] 4251 } 4252 (Ident 4253 SrcSpanInfo 4254 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 20 182 28 4255 , srcInfoPoints = [] 4256 } 4257 "SpecInfo"))) 4258 (Var 4259 SrcSpanInfo 4260 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 29 182 34 4261 , srcInfoPoints = [] 4262 } 4263 (UnQual 4264 SrcSpanInfo 4265 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 29 182 34 4266 , srcInfoPoints = [] 4267 } 4268 (Ident 4269 SrcSpanInfo 4270 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 29 182 34 4271 , srcInfoPoints = [] 4272 } 4273 "rules")))) 4274 (Paren 4275 SrcSpanInfo 4276 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 35 182 56 4277 , srcInfoPoints = 4278 [ SrcSpan "tests/examples/RealGHC.lhs" 182 35 182 36 4279 , SrcSpan "tests/examples/RealGHC.lhs" 182 55 182 56 4280 ] 4281 } 4282 (App 4283 SrcSpanInfo 4284 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 36 182 55 4285 , srcInfoPoints = [] 4286 } 4287 (Var 4288 SrcSpanInfo 4289 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 36 182 49 4290 , srcInfoPoints = [] 4291 } 4292 (UnQual 4293 SrcSpanInfo 4294 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 36 182 49 4295 , srcInfoPoints = [] 4296 } 4297 (Ident 4298 SrcSpanInfo 4299 { srcInfoSpan = 4300 SrcSpan "tests/examples/RealGHC.lhs" 182 36 182 49 4301 , srcInfoPoints = [] 4302 } 4303 "rulesFreeVars"))) 4304 (Var 4305 SrcSpanInfo 4306 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 50 182 55 4307 , srcInfoPoints = [] 4308 } 4309 (UnQual 4310 SrcSpanInfo 4311 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 182 50 182 55 4312 , srcInfoPoints = [] 4313 } 4314 (Ident 4315 SrcSpanInfo 4316 { srcInfoSpan = 4317 SrcSpan "tests/examples/RealGHC.lhs" 182 50 182 55 4318 , srcInfoPoints = [] 4319 } 4320 "rules"))))))) 4321 Nothing 4322 ] 4323 , TypeSig 4324 SrcSpanInfo 4325 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 1 184 53 4326 , srcInfoPoints = 4327 [ SrcSpan "tests/examples/RealGHC.lhs" 184 16 184 18 ] 4328 } 4329 [ Ident 4330 SrcSpanInfo 4331 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 1 184 15 4332 , srcInfoPoints = [] 4333 } 4334 "extendSpecInfo" 4335 ] 4336 (TyFun 4337 SrcSpanInfo 4338 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 19 184 53 4339 , srcInfoPoints = 4340 [ SrcSpan "tests/examples/RealGHC.lhs" 184 28 184 30 ] 4341 } 4342 (TyCon 4343 SrcSpanInfo 4344 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 19 184 27 4345 , srcInfoPoints = [] 4346 } 4347 (UnQual 4348 SrcSpanInfo 4349 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 19 184 27 4350 , srcInfoPoints = [] 4351 } 4352 (Ident 4353 SrcSpanInfo 4354 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 19 184 27 4355 , srcInfoPoints = [] 4356 } 4357 "SpecInfo"))) 4358 (TyFun 4359 SrcSpanInfo 4360 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 31 184 53 4361 , srcInfoPoints = 4362 [ SrcSpan "tests/examples/RealGHC.lhs" 184 42 184 44 ] 4363 } 4364 (TyList 4365 SrcSpanInfo 4366 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 31 184 41 4367 , srcInfoPoints = 4368 [ SrcSpan "tests/examples/RealGHC.lhs" 184 31 184 32 4369 , SrcSpan "tests/examples/RealGHC.lhs" 184 40 184 41 4370 ] 4371 } 4372 (TyCon 4373 SrcSpanInfo 4374 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 32 184 40 4375 , srcInfoPoints = [] 4376 } 4377 (UnQual 4378 SrcSpanInfo 4379 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 32 184 40 4380 , srcInfoPoints = [] 4381 } 4382 (Ident 4383 SrcSpanInfo 4384 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 32 184 40 4385 , srcInfoPoints = [] 4386 } 4387 "CoreRule")))) 4388 (TyCon 4389 SrcSpanInfo 4390 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 45 184 53 4391 , srcInfoPoints = [] 4392 } 4393 (UnQual 4394 SrcSpanInfo 4395 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 45 184 53 4396 , srcInfoPoints = [] 4397 } 4398 (Ident 4399 SrcSpanInfo 4400 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 184 45 184 53 4401 , srcInfoPoints = [] 4402 } 4403 "SpecInfo"))))) 4404 , FunBind 4405 SrcSpanInfo 4406 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 1 186 65 4407 , srcInfoPoints = [] 4408 } 4409 [ Match 4410 SrcSpanInfo 4411 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 1 186 65 4412 , srcInfoPoints = [] 4413 } 4414 (Ident 4415 SrcSpanInfo 4416 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 1 185 15 4417 , srcInfoPoints = [] 4418 } 4419 "extendSpecInfo") 4420 [ PParen 4421 SrcSpanInfo 4422 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 16 185 35 4423 , srcInfoPoints = 4424 [ SrcSpan "tests/examples/RealGHC.lhs" 185 16 185 17 4425 , SrcSpan "tests/examples/RealGHC.lhs" 185 34 185 35 4426 ] 4427 } 4428 (PApp 4429 SrcSpanInfo 4430 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 17 185 34 4431 , srcInfoPoints = [] 4432 } 4433 (UnQual 4434 SrcSpanInfo 4435 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 17 185 25 4436 , srcInfoPoints = [] 4437 } 4438 (Ident 4439 SrcSpanInfo 4440 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 17 185 25 4441 , srcInfoPoints = [] 4442 } 4443 "SpecInfo")) 4444 [ PVar 4445 SrcSpanInfo 4446 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 26 185 29 4447 , srcInfoPoints = [] 4448 } 4449 (Ident 4450 SrcSpanInfo 4451 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 26 185 29 4452 , srcInfoPoints = [] 4453 } 4454 "rs1") 4455 , PVar 4456 SrcSpanInfo 4457 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 30 185 34 4458 , srcInfoPoints = [] 4459 } 4460 (Ident 4461 SrcSpanInfo 4462 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 30 185 34 4463 , srcInfoPoints = [] 4464 } 4465 "fvs1") 4466 ]) 4467 , PVar 4468 SrcSpanInfo 4469 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 36 185 39 4470 , srcInfoPoints = [] 4471 } 4472 (Ident 4473 SrcSpanInfo 4474 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 185 36 185 39 4475 , srcInfoPoints = [] 4476 } 4477 "rs2") 4478 ] 4479 (UnGuardedRhs 4480 SrcSpanInfo 4481 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 3 186 65 4482 , srcInfoPoints = 4483 [ SrcSpan "tests/examples/RealGHC.lhs" 186 3 186 4 ] 4484 } 4485 (App 4486 SrcSpanInfo 4487 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 5 186 65 4488 , srcInfoPoints = [] 4489 } 4490 (App 4491 SrcSpanInfo 4492 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 5 186 26 4493 , srcInfoPoints = [] 4494 } 4495 (Con 4496 SrcSpanInfo 4497 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 5 186 13 4498 , srcInfoPoints = [] 4499 } 4500 (UnQual 4501 SrcSpanInfo 4502 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 5 186 13 4503 , srcInfoPoints = [] 4504 } 4505 (Ident 4506 SrcSpanInfo 4507 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 5 186 13 4508 , srcInfoPoints = [] 4509 } 4510 "SpecInfo"))) 4511 (Paren 4512 SrcSpanInfo 4513 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 14 186 26 4514 , srcInfoPoints = 4515 [ SrcSpan "tests/examples/RealGHC.lhs" 186 14 186 15 4516 , SrcSpan "tests/examples/RealGHC.lhs" 186 25 186 26 4517 ] 4518 } 4519 (InfixApp 4520 SrcSpanInfo 4521 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 15 186 25 4522 , srcInfoPoints = [] 4523 } 4524 (Var 4525 SrcSpanInfo 4526 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 15 186 18 4527 , srcInfoPoints = [] 4528 } 4529 (UnQual 4530 SrcSpanInfo 4531 { srcInfoSpan = 4532 SrcSpan "tests/examples/RealGHC.lhs" 186 15 186 18 4533 , srcInfoPoints = [] 4534 } 4535 (Ident 4536 SrcSpanInfo 4537 { srcInfoSpan = 4538 SrcSpan "tests/examples/RealGHC.lhs" 186 15 186 18 4539 , srcInfoPoints = [] 4540 } 4541 "rs2"))) 4542 (QVarOp 4543 SrcSpanInfo 4544 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 19 186 21 4545 , srcInfoPoints = [] 4546 } 4547 (UnQual 4548 SrcSpanInfo 4549 { srcInfoSpan = 4550 SrcSpan "tests/examples/RealGHC.lhs" 186 19 186 21 4551 , srcInfoPoints = [] 4552 } 4553 (Symbol 4554 SrcSpanInfo 4555 { srcInfoSpan = 4556 SrcSpan "tests/examples/RealGHC.lhs" 186 19 186 21 4557 , srcInfoPoints = [] 4558 } 4559 "++"))) 4560 (Var 4561 SrcSpanInfo 4562 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 22 186 25 4563 , srcInfoPoints = [] 4564 } 4565 (UnQual 4566 SrcSpanInfo 4567 { srcInfoSpan = 4568 SrcSpan "tests/examples/RealGHC.lhs" 186 22 186 25 4569 , srcInfoPoints = [] 4570 } 4571 (Ident 4572 SrcSpanInfo 4573 { srcInfoSpan = 4574 SrcSpan "tests/examples/RealGHC.lhs" 186 22 186 25 4575 , srcInfoPoints = [] 4576 } 4577 "rs1")))))) 4578 (Paren 4579 SrcSpanInfo 4580 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 27 186 65 4581 , srcInfoPoints = 4582 [ SrcSpan "tests/examples/RealGHC.lhs" 186 27 186 28 4583 , SrcSpan "tests/examples/RealGHC.lhs" 186 64 186 65 4584 ] 4585 } 4586 (InfixApp 4587 SrcSpanInfo 4588 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 28 186 64 4589 , srcInfoPoints = [] 4590 } 4591 (App 4592 SrcSpanInfo 4593 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 28 186 45 4594 , srcInfoPoints = [] 4595 } 4596 (Var 4597 SrcSpanInfo 4598 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 28 186 41 4599 , srcInfoPoints = [] 4600 } 4601 (UnQual 4602 SrcSpanInfo 4603 { srcInfoSpan = 4604 SrcSpan "tests/examples/RealGHC.lhs" 186 28 186 41 4605 , srcInfoPoints = [] 4606 } 4607 (Ident 4608 SrcSpanInfo 4609 { srcInfoSpan = 4610 SrcSpan "tests/examples/RealGHC.lhs" 186 28 186 41 4611 , srcInfoPoints = [] 4612 } 4613 "rulesFreeVars"))) 4614 (Var 4615 SrcSpanInfo 4616 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 42 186 45 4617 , srcInfoPoints = [] 4618 } 4619 (UnQual 4620 SrcSpanInfo 4621 { srcInfoSpan = 4622 SrcSpan "tests/examples/RealGHC.lhs" 186 42 186 45 4623 , srcInfoPoints = [] 4624 } 4625 (Ident 4626 SrcSpanInfo 4627 { srcInfoSpan = 4628 SrcSpan "tests/examples/RealGHC.lhs" 186 42 186 45 4629 , srcInfoPoints = [] 4630 } 4631 "rs2")))) 4632 (QVarOp 4633 SrcSpanInfo 4634 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 46 186 59 4635 , srcInfoPoints = 4636 [ SrcSpan "tests/examples/RealGHC.lhs" 186 46 186 47 4637 , SrcSpan "tests/examples/RealGHC.lhs" 186 47 186 58 4638 , SrcSpan "tests/examples/RealGHC.lhs" 186 58 186 59 4639 ] 4640 } 4641 (UnQual 4642 SrcSpanInfo 4643 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 46 186 59 4644 , srcInfoPoints = 4645 [ SrcSpan "tests/examples/RealGHC.lhs" 186 46 186 47 4646 , SrcSpan "tests/examples/RealGHC.lhs" 186 47 186 58 4647 , SrcSpan "tests/examples/RealGHC.lhs" 186 58 186 59 4648 ] 4649 } 4650 (Ident 4651 SrcSpanInfo 4652 { srcInfoSpan = 4653 SrcSpan "tests/examples/RealGHC.lhs" 186 47 186 58 4654 , srcInfoPoints = [] 4655 } 4656 "unionVarSet"))) 4657 (Var 4658 SrcSpanInfo 4659 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 60 186 64 4660 , srcInfoPoints = [] 4661 } 4662 (UnQual 4663 SrcSpanInfo 4664 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 186 60 186 64 4665 , srcInfoPoints = [] 4666 } 4667 (Ident 4668 SrcSpanInfo 4669 { srcInfoSpan = 4670 SrcSpan "tests/examples/RealGHC.lhs" 186 60 186 64 4671 , srcInfoPoints = [] 4672 } 4673 "fvs1"))))))) 4674 Nothing 4675 ] 4676 , TypeSig 4677 SrcSpanInfo 4678 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 1 188 48 4679 , srcInfoPoints = 4680 [ SrcSpan "tests/examples/RealGHC.lhs" 188 13 188 15 ] 4681 } 4682 [ Ident 4683 SrcSpanInfo 4684 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 1 188 12 4685 , srcInfoPoints = [] 4686 } 4687 "addSpecInfo" 4688 ] 4689 (TyFun 4690 SrcSpanInfo 4691 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 16 188 48 4692 , srcInfoPoints = 4693 [ SrcSpan "tests/examples/RealGHC.lhs" 188 25 188 27 ] 4694 } 4695 (TyCon 4696 SrcSpanInfo 4697 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 16 188 24 4698 , srcInfoPoints = [] 4699 } 4700 (UnQual 4701 SrcSpanInfo 4702 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 16 188 24 4703 , srcInfoPoints = [] 4704 } 4705 (Ident 4706 SrcSpanInfo 4707 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 16 188 24 4708 , srcInfoPoints = [] 4709 } 4710 "SpecInfo"))) 4711 (TyFun 4712 SrcSpanInfo 4713 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 28 188 48 4714 , srcInfoPoints = 4715 [ SrcSpan "tests/examples/RealGHC.lhs" 188 37 188 39 ] 4716 } 4717 (TyCon 4718 SrcSpanInfo 4719 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 28 188 36 4720 , srcInfoPoints = [] 4721 } 4722 (UnQual 4723 SrcSpanInfo 4724 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 28 188 36 4725 , srcInfoPoints = [] 4726 } 4727 (Ident 4728 SrcSpanInfo 4729 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 28 188 36 4730 , srcInfoPoints = [] 4731 } 4732 "SpecInfo"))) 4733 (TyCon 4734 SrcSpanInfo 4735 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 40 188 48 4736 , srcInfoPoints = [] 4737 } 4738 (UnQual 4739 SrcSpanInfo 4740 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 40 188 48 4741 , srcInfoPoints = [] 4742 } 4743 (Ident 4744 SrcSpanInfo 4745 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 188 40 188 48 4746 , srcInfoPoints = [] 4747 } 4748 "SpecInfo"))))) 4749 , FunBind 4750 SrcSpanInfo 4751 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 1 190 52 4752 , srcInfoPoints = [] 4753 } 4754 [ Match 4755 SrcSpanInfo 4756 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 1 190 52 4757 , srcInfoPoints = [] 4758 } 4759 (Ident 4760 SrcSpanInfo 4761 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 1 189 12 4762 , srcInfoPoints = [] 4763 } 4764 "addSpecInfo") 4765 [ PParen 4766 SrcSpanInfo 4767 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 13 189 32 4768 , srcInfoPoints = 4769 [ SrcSpan "tests/examples/RealGHC.lhs" 189 13 189 14 4770 , SrcSpan "tests/examples/RealGHC.lhs" 189 31 189 32 4771 ] 4772 } 4773 (PApp 4774 SrcSpanInfo 4775 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 14 189 31 4776 , srcInfoPoints = [] 4777 } 4778 (UnQual 4779 SrcSpanInfo 4780 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 14 189 22 4781 , srcInfoPoints = [] 4782 } 4783 (Ident 4784 SrcSpanInfo 4785 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 14 189 22 4786 , srcInfoPoints = [] 4787 } 4788 "SpecInfo")) 4789 [ PVar 4790 SrcSpanInfo 4791 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 23 189 26 4792 , srcInfoPoints = [] 4793 } 4794 (Ident 4795 SrcSpanInfo 4796 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 23 189 26 4797 , srcInfoPoints = [] 4798 } 4799 "rs1") 4800 , PVar 4801 SrcSpanInfo 4802 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 27 189 31 4803 , srcInfoPoints = [] 4804 } 4805 (Ident 4806 SrcSpanInfo 4807 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 27 189 31 4808 , srcInfoPoints = [] 4809 } 4810 "fvs1") 4811 ]) 4812 , PParen 4813 SrcSpanInfo 4814 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 33 189 52 4815 , srcInfoPoints = 4816 [ SrcSpan "tests/examples/RealGHC.lhs" 189 33 189 34 4817 , SrcSpan "tests/examples/RealGHC.lhs" 189 51 189 52 4818 ] 4819 } 4820 (PApp 4821 SrcSpanInfo 4822 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 34 189 51 4823 , srcInfoPoints = [] 4824 } 4825 (UnQual 4826 SrcSpanInfo 4827 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 34 189 42 4828 , srcInfoPoints = [] 4829 } 4830 (Ident 4831 SrcSpanInfo 4832 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 34 189 42 4833 , srcInfoPoints = [] 4834 } 4835 "SpecInfo")) 4836 [ PVar 4837 SrcSpanInfo 4838 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 43 189 46 4839 , srcInfoPoints = [] 4840 } 4841 (Ident 4842 SrcSpanInfo 4843 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 43 189 46 4844 , srcInfoPoints = [] 4845 } 4846 "rs2") 4847 , PVar 4848 SrcSpanInfo 4849 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 47 189 51 4850 , srcInfoPoints = [] 4851 } 4852 (Ident 4853 SrcSpanInfo 4854 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 189 47 189 51 4855 , srcInfoPoints = [] 4856 } 4857 "fvs2") 4858 ]) 4859 ] 4860 (UnGuardedRhs 4861 SrcSpanInfo 4862 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 3 190 52 4863 , srcInfoPoints = 4864 [ SrcSpan "tests/examples/RealGHC.lhs" 190 3 190 4 ] 4865 } 4866 (App 4867 SrcSpanInfo 4868 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 5 190 52 4869 , srcInfoPoints = [] 4870 } 4871 (App 4872 SrcSpanInfo 4873 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 5 190 26 4874 , srcInfoPoints = [] 4875 } 4876 (Con 4877 SrcSpanInfo 4878 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 5 190 13 4879 , srcInfoPoints = [] 4880 } 4881 (UnQual 4882 SrcSpanInfo 4883 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 5 190 13 4884 , srcInfoPoints = [] 4885 } 4886 (Ident 4887 SrcSpanInfo 4888 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 5 190 13 4889 , srcInfoPoints = [] 4890 } 4891 "SpecInfo"))) 4892 (Paren 4893 SrcSpanInfo 4894 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 14 190 26 4895 , srcInfoPoints = 4896 [ SrcSpan "tests/examples/RealGHC.lhs" 190 14 190 15 4897 , SrcSpan "tests/examples/RealGHC.lhs" 190 25 190 26 4898 ] 4899 } 4900 (InfixApp 4901 SrcSpanInfo 4902 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 15 190 25 4903 , srcInfoPoints = [] 4904 } 4905 (Var 4906 SrcSpanInfo 4907 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 15 190 18 4908 , srcInfoPoints = [] 4909 } 4910 (UnQual 4911 SrcSpanInfo 4912 { srcInfoSpan = 4913 SrcSpan "tests/examples/RealGHC.lhs" 190 15 190 18 4914 , srcInfoPoints = [] 4915 } 4916 (Ident 4917 SrcSpanInfo 4918 { srcInfoSpan = 4919 SrcSpan "tests/examples/RealGHC.lhs" 190 15 190 18 4920 , srcInfoPoints = [] 4921 } 4922 "rs1"))) 4923 (QVarOp 4924 SrcSpanInfo 4925 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 19 190 21 4926 , srcInfoPoints = [] 4927 } 4928 (UnQual 4929 SrcSpanInfo 4930 { srcInfoSpan = 4931 SrcSpan "tests/examples/RealGHC.lhs" 190 19 190 21 4932 , srcInfoPoints = [] 4933 } 4934 (Symbol 4935 SrcSpanInfo 4936 { srcInfoSpan = 4937 SrcSpan "tests/examples/RealGHC.lhs" 190 19 190 21 4938 , srcInfoPoints = [] 4939 } 4940 "++"))) 4941 (Var 4942 SrcSpanInfo 4943 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 22 190 25 4944 , srcInfoPoints = [] 4945 } 4946 (UnQual 4947 SrcSpanInfo 4948 { srcInfoSpan = 4949 SrcSpan "tests/examples/RealGHC.lhs" 190 22 190 25 4950 , srcInfoPoints = [] 4951 } 4952 (Ident 4953 SrcSpanInfo 4954 { srcInfoSpan = 4955 SrcSpan "tests/examples/RealGHC.lhs" 190 22 190 25 4956 , srcInfoPoints = [] 4957 } 4958 "rs2")))))) 4959 (Paren 4960 SrcSpanInfo 4961 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 27 190 52 4962 , srcInfoPoints = 4963 [ SrcSpan "tests/examples/RealGHC.lhs" 190 27 190 28 4964 , SrcSpan "tests/examples/RealGHC.lhs" 190 51 190 52 4965 ] 4966 } 4967 (InfixApp 4968 SrcSpanInfo 4969 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 28 190 51 4970 , srcInfoPoints = [] 4971 } 4972 (Var 4973 SrcSpanInfo 4974 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 28 190 32 4975 , srcInfoPoints = [] 4976 } 4977 (UnQual 4978 SrcSpanInfo 4979 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 28 190 32 4980 , srcInfoPoints = [] 4981 } 4982 (Ident 4983 SrcSpanInfo 4984 { srcInfoSpan = 4985 SrcSpan "tests/examples/RealGHC.lhs" 190 28 190 32 4986 , srcInfoPoints = [] 4987 } 4988 "fvs1"))) 4989 (QVarOp 4990 SrcSpanInfo 4991 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 33 190 46 4992 , srcInfoPoints = 4993 [ SrcSpan "tests/examples/RealGHC.lhs" 190 33 190 34 4994 , SrcSpan "tests/examples/RealGHC.lhs" 190 34 190 45 4995 , SrcSpan "tests/examples/RealGHC.lhs" 190 45 190 46 4996 ] 4997 } 4998 (UnQual 4999 SrcSpanInfo 5000 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 33 190 46 5001 , srcInfoPoints = 5002 [ SrcSpan "tests/examples/RealGHC.lhs" 190 33 190 34 5003 , SrcSpan "tests/examples/RealGHC.lhs" 190 34 190 45 5004 , SrcSpan "tests/examples/RealGHC.lhs" 190 45 190 46 5005 ] 5006 } 5007 (Ident 5008 SrcSpanInfo 5009 { srcInfoSpan = 5010 SrcSpan "tests/examples/RealGHC.lhs" 190 34 190 45 5011 , srcInfoPoints = [] 5012 } 5013 "unionVarSet"))) 5014 (Var 5015 SrcSpanInfo 5016 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 47 190 51 5017 , srcInfoPoints = [] 5018 } 5019 (UnQual 5020 SrcSpanInfo 5021 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 190 47 190 51 5022 , srcInfoPoints = [] 5023 } 5024 (Ident 5025 SrcSpanInfo 5026 { srcInfoSpan = 5027 SrcSpan "tests/examples/RealGHC.lhs" 190 47 190 51 5028 , srcInfoPoints = [] 5029 } 5030 "fvs2"))))))) 5031 Nothing 5032 ] 5033 , TypeSig 5034 SrcSpanInfo 5035 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 1 192 47 5036 , srcInfoPoints = 5037 [ SrcSpan "tests/examples/RealGHC.lhs" 192 22 192 24 ] 5038 } 5039 [ Ident 5040 SrcSpanInfo 5041 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 1 192 21 5042 , srcInfoPoints = [] 5043 } 5044 "addIdSpecialisations" 5045 ] 5046 (TyFun 5047 SrcSpanInfo 5048 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 25 192 47 5049 , srcInfoPoints = 5050 [ SrcSpan "tests/examples/RealGHC.lhs" 192 28 192 30 ] 5051 } 5052 (TyCon 5053 SrcSpanInfo 5054 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 25 192 27 5055 , srcInfoPoints = [] 5056 } 5057 (UnQual 5058 SrcSpanInfo 5059 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 25 192 27 5060 , srcInfoPoints = [] 5061 } 5062 (Ident 5063 SrcSpanInfo 5064 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 25 192 27 5065 , srcInfoPoints = [] 5066 } 5067 "Id"))) 5068 (TyFun 5069 SrcSpanInfo 5070 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 31 192 47 5071 , srcInfoPoints = 5072 [ SrcSpan "tests/examples/RealGHC.lhs" 192 42 192 44 ] 5073 } 5074 (TyList 5075 SrcSpanInfo 5076 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 31 192 41 5077 , srcInfoPoints = 5078 [ SrcSpan "tests/examples/RealGHC.lhs" 192 31 192 32 5079 , SrcSpan "tests/examples/RealGHC.lhs" 192 40 192 41 5080 ] 5081 } 5082 (TyCon 5083 SrcSpanInfo 5084 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 32 192 40 5085 , srcInfoPoints = [] 5086 } 5087 (UnQual 5088 SrcSpanInfo 5089 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 32 192 40 5090 , srcInfoPoints = [] 5091 } 5092 (Ident 5093 SrcSpanInfo 5094 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 32 192 40 5095 , srcInfoPoints = [] 5096 } 5097 "CoreRule")))) 5098 (TyCon 5099 SrcSpanInfo 5100 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 45 192 47 5101 , srcInfoPoints = [] 5102 } 5103 (UnQual 5104 SrcSpanInfo 5105 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 45 192 47 5106 , srcInfoPoints = [] 5107 } 5108 (Ident 5109 SrcSpanInfo 5110 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 192 45 192 47 5111 , srcInfoPoints = [] 5112 } 5113 "Id"))))) 5114 , FunBind 5115 SrcSpanInfo 5116 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 193 1 197 47 5117 , srcInfoPoints = [] 5118 } 5119 [ Match 5120 SrcSpanInfo 5121 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 193 1 194 7 5122 , srcInfoPoints = [] 5123 } 5124 (Ident 5125 SrcSpanInfo 5126 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 193 1 193 21 5127 , srcInfoPoints = [] 5128 } 5129 "addIdSpecialisations") 5130 [ PVar 5131 SrcSpanInfo 5132 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 193 22 193 24 5133 , srcInfoPoints = [] 5134 } 5135 (Ident 5136 SrcSpanInfo 5137 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 193 22 193 24 5138 , srcInfoPoints = [] 5139 } 5140 "id") 5141 , PList 5142 SrcSpanInfo 5143 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 193 25 193 27 5144 , srcInfoPoints = 5145 [ SrcSpan "tests/examples/RealGHC.lhs" 193 25 193 26 5146 , SrcSpan "tests/examples/RealGHC.lhs" 193 26 193 27 5147 ] 5148 } 5149 [] 5150 ] 5151 (UnGuardedRhs 5152 SrcSpanInfo 5153 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 194 3 194 7 5154 , srcInfoPoints = 5155 [ SrcSpan "tests/examples/RealGHC.lhs" 194 3 194 4 ] 5156 } 5157 (Var 5158 SrcSpanInfo 5159 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 194 5 194 7 5160 , srcInfoPoints = [] 5161 } 5162 (UnQual 5163 SrcSpanInfo 5164 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 194 5 194 7 5165 , srcInfoPoints = [] 5166 } 5167 (Ident 5168 SrcSpanInfo 5169 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 194 5 194 7 5170 , srcInfoPoints = [] 5171 } 5172 "id")))) 5173 Nothing 5174 , Match 5175 SrcSpanInfo 5176 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 195 1 197 47 5177 , srcInfoPoints = [] 5178 } 5179 (Ident 5180 SrcSpanInfo 5181 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 195 1 195 21 5182 , srcInfoPoints = [] 5183 } 5184 "addIdSpecialisations") 5185 [ PVar 5186 SrcSpanInfo 5187 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 195 22 195 24 5188 , srcInfoPoints = [] 5189 } 5190 (Ident 5191 SrcSpanInfo 5192 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 195 22 195 24 5193 , srcInfoPoints = [] 5194 } 5195 "id") 5196 , PVar 5197 SrcSpanInfo 5198 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 195 25 195 30 5199 , srcInfoPoints = [] 5200 } 5201 (Ident 5202 SrcSpanInfo 5203 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 195 25 195 30 5204 , srcInfoPoints = [] 5205 } 5206 "rules") 5207 ] 5208 (UnGuardedRhs 5209 SrcSpanInfo 5210 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 3 197 47 5211 , srcInfoPoints = 5212 [ SrcSpan "tests/examples/RealGHC.lhs" 196 3 196 4 ] 5213 } 5214 (InfixApp 5215 SrcSpanInfo 5216 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 5 197 47 5217 , srcInfoPoints = [] 5218 } 5219 (App 5220 SrcSpanInfo 5221 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 5 196 27 5222 , srcInfoPoints = [] 5223 } 5224 (Var 5225 SrcSpanInfo 5226 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 5 196 24 5227 , srcInfoPoints = [] 5228 } 5229 (UnQual 5230 SrcSpanInfo 5231 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 5 196 24 5232 , srcInfoPoints = [] 5233 } 5234 (Ident 5235 SrcSpanInfo 5236 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 5 196 24 5237 , srcInfoPoints = [] 5238 } 5239 "setIdSpecialisation"))) 5240 (Var 5241 SrcSpanInfo 5242 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 25 196 27 5243 , srcInfoPoints = [] 5244 } 5245 (UnQual 5246 SrcSpanInfo 5247 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 25 196 27 5248 , srcInfoPoints = [] 5249 } 5250 (Ident 5251 SrcSpanInfo 5252 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 25 196 27 5253 , srcInfoPoints = [] 5254 } 5255 "id")))) 5256 (QVarOp 5257 SrcSpanInfo 5258 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 28 196 29 5259 , srcInfoPoints = [] 5260 } 5261 (UnQual 5262 SrcSpanInfo 5263 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 28 196 29 5264 , srcInfoPoints = [] 5265 } 5266 (Symbol 5267 SrcSpanInfo 5268 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 196 28 196 29 5269 , srcInfoPoints = [] 5270 } 5271 "$"))) 5272 (App 5273 SrcSpanInfo 5274 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 5 197 47 5275 , srcInfoPoints = [] 5276 } 5277 (App 5278 SrcSpanInfo 5279 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 5 197 41 5280 , srcInfoPoints = [] 5281 } 5282 (Var 5283 SrcSpanInfo 5284 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 5 197 19 5285 , srcInfoPoints = [] 5286 } 5287 (UnQual 5288 SrcSpanInfo 5289 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 5 197 19 5290 , srcInfoPoints = [] 5291 } 5292 (Ident 5293 SrcSpanInfo 5294 { srcInfoSpan = 5295 SrcSpan "tests/examples/RealGHC.lhs" 197 5 197 19 5296 , srcInfoPoints = [] 5297 } 5298 "extendSpecInfo"))) 5299 (Paren 5300 SrcSpanInfo 5301 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 20 197 41 5302 , srcInfoPoints = 5303 [ SrcSpan "tests/examples/RealGHC.lhs" 197 20 197 21 5304 , SrcSpan "tests/examples/RealGHC.lhs" 197 40 197 41 5305 ] 5306 } 5307 (App 5308 SrcSpanInfo 5309 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 21 197 40 5310 , srcInfoPoints = [] 5311 } 5312 (Var 5313 SrcSpanInfo 5314 { srcInfoSpan = 5315 SrcSpan "tests/examples/RealGHC.lhs" 197 21 197 37 5316 , srcInfoPoints = [] 5317 } 5318 (UnQual 5319 SrcSpanInfo 5320 { srcInfoSpan = 5321 SrcSpan "tests/examples/RealGHC.lhs" 197 21 197 37 5322 , srcInfoPoints = [] 5323 } 5324 (Ident 5325 SrcSpanInfo 5326 { srcInfoSpan = 5327 SrcSpan "tests/examples/RealGHC.lhs" 197 21 197 37 5328 , srcInfoPoints = [] 5329 } 5330 "idSpecialisation"))) 5331 (Var 5332 SrcSpanInfo 5333 { srcInfoSpan = 5334 SrcSpan "tests/examples/RealGHC.lhs" 197 38 197 40 5335 , srcInfoPoints = [] 5336 } 5337 (UnQual 5338 SrcSpanInfo 5339 { srcInfoSpan = 5340 SrcSpan "tests/examples/RealGHC.lhs" 197 38 197 40 5341 , srcInfoPoints = [] 5342 } 5343 (Ident 5344 SrcSpanInfo 5345 { srcInfoSpan = 5346 SrcSpan "tests/examples/RealGHC.lhs" 197 38 197 40 5347 , srcInfoPoints = [] 5348 } 5349 "id")))))) 5350 (Var 5351 SrcSpanInfo 5352 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 42 197 47 5353 , srcInfoPoints = [] 5354 } 5355 (UnQual 5356 SrcSpanInfo 5357 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 42 197 47 5358 , srcInfoPoints = [] 5359 } 5360 (Ident 5361 SrcSpanInfo 5362 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 197 42 197 47 5363 , srcInfoPoints = [] 5364 } 5365 "rules")))))) 5366 Nothing 5367 ] 5368 , TypeSig 5369 SrcSpanInfo 5370 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 1 200 41 5371 , srcInfoPoints = 5372 [ SrcSpan "tests/examples/RealGHC.lhs" 200 14 200 16 ] 5373 } 5374 [ Ident 5375 SrcSpanInfo 5376 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 1 200 13 5377 , srcInfoPoints = [] 5378 } 5379 "rulesOfBinds" 5380 ] 5381 (TyFun 5382 SrcSpanInfo 5383 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 17 200 41 5384 , srcInfoPoints = 5385 [ SrcSpan "tests/examples/RealGHC.lhs" 200 28 200 30 ] 5386 } 5387 (TyList 5388 SrcSpanInfo 5389 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 17 200 27 5390 , srcInfoPoints = 5391 [ SrcSpan "tests/examples/RealGHC.lhs" 200 17 200 18 5392 , SrcSpan "tests/examples/RealGHC.lhs" 200 26 200 27 5393 ] 5394 } 5395 (TyCon 5396 SrcSpanInfo 5397 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 18 200 26 5398 , srcInfoPoints = [] 5399 } 5400 (UnQual 5401 SrcSpanInfo 5402 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 18 200 26 5403 , srcInfoPoints = [] 5404 } 5405 (Ident 5406 SrcSpanInfo 5407 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 18 200 26 5408 , srcInfoPoints = [] 5409 } 5410 "CoreBind")))) 5411 (TyList 5412 SrcSpanInfo 5413 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 31 200 41 5414 , srcInfoPoints = 5415 [ SrcSpan "tests/examples/RealGHC.lhs" 200 31 200 32 5416 , SrcSpan "tests/examples/RealGHC.lhs" 200 40 200 41 5417 ] 5418 } 5419 (TyCon 5420 SrcSpanInfo 5421 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 32 200 40 5422 , srcInfoPoints = [] 5423 } 5424 (UnQual 5425 SrcSpanInfo 5426 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 32 200 40 5427 , srcInfoPoints = [] 5428 } 5429 (Ident 5430 SrcSpanInfo 5431 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 200 32 200 40 5432 , srcInfoPoints = [] 5433 } 5434 "CoreRule"))))) 5435 , FunBind 5436 SrcSpanInfo 5437 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 1 201 73 5438 , srcInfoPoints = [] 5439 } 5440 [ Match 5441 SrcSpanInfo 5442 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 1 201 73 5443 , srcInfoPoints = [] 5444 } 5445 (Ident 5446 SrcSpanInfo 5447 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 1 201 13 5448 , srcInfoPoints = [] 5449 } 5450 "rulesOfBinds") 5451 [ PVar 5452 SrcSpanInfo 5453 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 14 201 19 5454 , srcInfoPoints = [] 5455 } 5456 (Ident 5457 SrcSpanInfo 5458 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 14 201 19 5459 , srcInfoPoints = [] 5460 } 5461 "binds") 5462 ] 5463 (UnGuardedRhs 5464 SrcSpanInfo 5465 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 20 201 73 5466 , srcInfoPoints = 5467 [ SrcSpan "tests/examples/RealGHC.lhs" 201 20 201 21 ] 5468 } 5469 (App 5470 SrcSpanInfo 5471 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 22 201 73 5472 , srcInfoPoints = [] 5473 } 5474 (App 5475 SrcSpanInfo 5476 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 22 201 67 5477 , srcInfoPoints = [] 5478 } 5479 (Var 5480 SrcSpanInfo 5481 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 22 201 31 5482 , srcInfoPoints = [] 5483 } 5484 (UnQual 5485 SrcSpanInfo 5486 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 22 201 31 5487 , srcInfoPoints = [] 5488 } 5489 (Ident 5490 SrcSpanInfo 5491 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 22 201 31 5492 , srcInfoPoints = [] 5493 } 5494 "concatMap"))) 5495 (Paren 5496 SrcSpanInfo 5497 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 32 201 67 5498 , srcInfoPoints = 5499 [ SrcSpan "tests/examples/RealGHC.lhs" 201 32 201 33 5500 , SrcSpan "tests/examples/RealGHC.lhs" 201 66 201 67 5501 ] 5502 } 5503 (InfixApp 5504 SrcSpanInfo 5505 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 33 201 66 5506 , srcInfoPoints = [] 5507 } 5508 (App 5509 SrcSpanInfo 5510 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 33 201 54 5511 , srcInfoPoints = [] 5512 } 5513 (Var 5514 SrcSpanInfo 5515 { srcInfoSpan = 5516 SrcSpan "tests/examples/RealGHC.lhs" 201 33 201 42 5517 , srcInfoPoints = [] 5518 } 5519 (UnQual 5520 SrcSpanInfo 5521 { srcInfoSpan = 5522 SrcSpan "tests/examples/RealGHC.lhs" 201 33 201 42 5523 , srcInfoPoints = [] 5524 } 5525 (Ident 5526 SrcSpanInfo 5527 { srcInfoSpan = 5528 SrcSpan "tests/examples/RealGHC.lhs" 201 33 201 42 5529 , srcInfoPoints = [] 5530 } 5531 "concatMap"))) 5532 (Var 5533 SrcSpanInfo 5534 { srcInfoSpan = 5535 SrcSpan "tests/examples/RealGHC.lhs" 201 43 201 54 5536 , srcInfoPoints = [] 5537 } 5538 (UnQual 5539 SrcSpanInfo 5540 { srcInfoSpan = 5541 SrcSpan "tests/examples/RealGHC.lhs" 201 43 201 54 5542 , srcInfoPoints = [] 5543 } 5544 (Ident 5545 SrcSpanInfo 5546 { srcInfoSpan = 5547 SrcSpan "tests/examples/RealGHC.lhs" 201 43 201 54 5548 , srcInfoPoints = [] 5549 } 5550 "idCoreRules")))) 5551 (QVarOp 5552 SrcSpanInfo 5553 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 55 201 56 5554 , srcInfoPoints = [] 5555 } 5556 (UnQual 5557 SrcSpanInfo 5558 { srcInfoSpan = 5559 SrcSpan "tests/examples/RealGHC.lhs" 201 55 201 56 5560 , srcInfoPoints = [] 5561 } 5562 (Symbol 5563 SrcSpanInfo 5564 { srcInfoSpan = 5565 SrcSpan "tests/examples/RealGHC.lhs" 201 55 201 56 5566 , srcInfoPoints = [] 5567 } 5568 "."))) 5569 (Var 5570 SrcSpanInfo 5571 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 57 201 66 5572 , srcInfoPoints = [] 5573 } 5574 (UnQual 5575 SrcSpanInfo 5576 { srcInfoSpan = 5577 SrcSpan "tests/examples/RealGHC.lhs" 201 57 201 66 5578 , srcInfoPoints = [] 5579 } 5580 (Ident 5581 SrcSpanInfo 5582 { srcInfoSpan = 5583 SrcSpan "tests/examples/RealGHC.lhs" 201 57 201 66 5584 , srcInfoPoints = [] 5585 } 5586 "bindersOf")))))) 5587 (Var 5588 SrcSpanInfo 5589 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 68 201 73 5590 , srcInfoPoints = [] 5591 } 5592 (UnQual 5593 SrcSpanInfo 5594 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 68 201 73 5595 , srcInfoPoints = [] 5596 } 5597 (Ident 5598 SrcSpanInfo 5599 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 201 68 201 73 5600 , srcInfoPoints = [] 5601 } 5602 "binds"))))) 5603 Nothing 5604 ] 5605 , TypeSig 5606 SrcSpanInfo 5607 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 1 203 41 5608 , srcInfoPoints = 5609 [ SrcSpan "tests/examples/RealGHC.lhs" 203 10 203 12 ] 5610 } 5611 [ Ident 5612 SrcSpanInfo 5613 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 1 203 9 5614 , srcInfoPoints = [] 5615 } 5616 "getRules" 5617 ] 5618 (TyFun 5619 SrcSpanInfo 5620 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 13 203 41 5621 , srcInfoPoints = 5622 [ SrcSpan "tests/examples/RealGHC.lhs" 203 22 203 24 ] 5623 } 5624 (TyCon 5625 SrcSpanInfo 5626 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 13 203 21 5627 , srcInfoPoints = [] 5628 } 5629 (UnQual 5630 SrcSpanInfo 5631 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 13 203 21 5632 , srcInfoPoints = [] 5633 } 5634 (Ident 5635 SrcSpanInfo 5636 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 13 203 21 5637 , srcInfoPoints = [] 5638 } 5639 "RuleBase"))) 5640 (TyFun 5641 SrcSpanInfo 5642 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 25 203 41 5643 , srcInfoPoints = 5644 [ SrcSpan "tests/examples/RealGHC.lhs" 203 28 203 30 ] 5645 } 5646 (TyCon 5647 SrcSpanInfo 5648 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 25 203 27 5649 , srcInfoPoints = [] 5650 } 5651 (UnQual 5652 SrcSpanInfo 5653 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 25 203 27 5654 , srcInfoPoints = [] 5655 } 5656 (Ident 5657 SrcSpanInfo 5658 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 25 203 27 5659 , srcInfoPoints = [] 5660 } 5661 "Id"))) 5662 (TyList 5663 SrcSpanInfo 5664 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 31 203 41 5665 , srcInfoPoints = 5666 [ SrcSpan "tests/examples/RealGHC.lhs" 203 31 203 32 5667 , SrcSpan "tests/examples/RealGHC.lhs" 203 40 203 41 5668 ] 5669 } 5670 (TyCon 5671 SrcSpanInfo 5672 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 32 203 40 5673 , srcInfoPoints = [] 5674 } 5675 (UnQual 5676 SrcSpanInfo 5677 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 32 203 40 5678 , srcInfoPoints = [] 5679 } 5680 (Ident 5681 SrcSpanInfo 5682 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 203 32 203 40 5683 , srcInfoPoints = [] 5684 } 5685 "CoreRule")))))) 5686 , FunBind 5687 SrcSpanInfo 5688 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 208 1 212 80 5689 , srcInfoPoints = [] 5690 } 5691 [ Match 5692 SrcSpanInfo 5693 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 208 1 212 80 5694 , srcInfoPoints = [] 5695 } 5696 (Ident 5697 SrcSpanInfo 5698 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 208 1 208 9 5699 , srcInfoPoints = [] 5700 } 5701 "getRules") 5702 [ PVar 5703 SrcSpanInfo 5704 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 208 10 208 19 5705 , srcInfoPoints = [] 5706 } 5707 (Ident 5708 SrcSpanInfo 5709 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 208 10 208 19 5710 , srcInfoPoints = [] 5711 } 5712 "rule_base") 5713 , PVar 5714 SrcSpanInfo 5715 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 208 20 208 22 5716 , srcInfoPoints = [] 5717 } 5718 (Ident 5719 SrcSpanInfo 5720 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 208 20 208 22 5721 , srcInfoPoints = [] 5722 } 5723 "fn") 5724 ] 5725 (GuardedRhss 5726 SrcSpanInfo 5727 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 3 212 80 5728 , srcInfoPoints = [] 5729 } 5730 [ GuardedRhs 5731 SrcSpanInfo 5732 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 3 209 35 5733 , srcInfoPoints = 5734 [ SrcSpan "tests/examples/RealGHC.lhs" 209 3 209 4 5735 , SrcSpan "tests/examples/RealGHC.lhs" 209 19 209 20 5736 ] 5737 } 5738 [ Qualifier 5739 SrcSpanInfo 5740 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 5 209 17 5741 , srcInfoPoints = [] 5742 } 5743 (App 5744 SrcSpanInfo 5745 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 5 209 17 5746 , srcInfoPoints = [] 5747 } 5748 (Var 5749 SrcSpanInfo 5750 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 5 209 14 5751 , srcInfoPoints = [] 5752 } 5753 (UnQual 5754 SrcSpanInfo 5755 { srcInfoSpan = 5756 SrcSpan "tests/examples/RealGHC.lhs" 209 5 209 14 5757 , srcInfoPoints = [] 5758 } 5759 (Ident 5760 SrcSpanInfo 5761 { srcInfoSpan = 5762 SrcSpan "tests/examples/RealGHC.lhs" 209 5 209 14 5763 , srcInfoPoints = [] 5764 } 5765 "isLocalId"))) 5766 (Var 5767 SrcSpanInfo 5768 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 15 209 17 5769 , srcInfoPoints = [] 5770 } 5771 (UnQual 5772 SrcSpanInfo 5773 { srcInfoSpan = 5774 SrcSpan "tests/examples/RealGHC.lhs" 209 15 209 17 5775 , srcInfoPoints = [] 5776 } 5777 (Ident 5778 SrcSpanInfo 5779 { srcInfoSpan = 5780 SrcSpan "tests/examples/RealGHC.lhs" 209 15 209 17 5781 , srcInfoPoints = [] 5782 } 5783 "fn")))) 5784 ] 5785 (App 5786 SrcSpanInfo 5787 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 21 209 35 5788 , srcInfoPoints = [] 5789 } 5790 (Var 5791 SrcSpanInfo 5792 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 21 209 32 5793 , srcInfoPoints = [] 5794 } 5795 (UnQual 5796 SrcSpanInfo 5797 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 21 209 32 5798 , srcInfoPoints = [] 5799 } 5800 (Ident 5801 SrcSpanInfo 5802 { srcInfoSpan = 5803 SrcSpan "tests/examples/RealGHC.lhs" 209 21 209 32 5804 , srcInfoPoints = [] 5805 } 5806 "idCoreRules"))) 5807 (Var 5808 SrcSpanInfo 5809 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 33 209 35 5810 , srcInfoPoints = [] 5811 } 5812 (UnQual 5813 SrcSpanInfo 5814 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 209 33 209 35 5815 , srcInfoPoints = [] 5816 } 5817 (Ident 5818 SrcSpanInfo 5819 { srcInfoSpan = 5820 SrcSpan "tests/examples/RealGHC.lhs" 209 33 209 35 5821 , srcInfoPoints = [] 5822 } 5823 "fn")))) 5824 , GuardedRhs 5825 SrcSpanInfo 5826 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 3 212 80 5827 , srcInfoPoints = 5828 [ SrcSpan "tests/examples/RealGHC.lhs" 210 3 210 4 5829 , SrcSpan "tests/examples/RealGHC.lhs" 210 19 210 20 5830 ] 5831 } 5832 [ Qualifier 5833 SrcSpanInfo 5834 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 5 210 14 5835 , srcInfoPoints = [] 5836 } 5837 (Var 5838 SrcSpanInfo 5839 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 5 210 14 5840 , srcInfoPoints = [] 5841 } 5842 (UnQual 5843 SrcSpanInfo 5844 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 5 210 14 5845 , srcInfoPoints = [] 5846 } 5847 (Ident 5848 SrcSpanInfo 5849 { srcInfoSpan = 5850 SrcSpan "tests/examples/RealGHC.lhs" 210 5 210 14 5851 , srcInfoPoints = [] 5852 } 5853 "otherwise"))) 5854 ] 5855 (InfixApp 5856 SrcSpanInfo 5857 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 21 212 80 5858 , srcInfoPoints = [] 5859 } 5860 (App 5861 SrcSpanInfo 5862 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 21 212 27 5863 , srcInfoPoints = [] 5864 } 5865 (App 5866 SrcSpanInfo 5867 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 210 21 212 24 5868 , srcInfoPoints = [] 5869 } 5870 (App 5871 SrcSpanInfo 5872 { srcInfoSpan = 5873 SrcSpan "tests/examples/RealGHC.lhs" 210 21 211 48 5874 , srcInfoPoints = [] 5875 } 5876 (Con 5877 SrcSpanInfo 5878 { srcInfoSpan = 5879 SrcSpan "tests/examples/RealGHC.lhs" 210 21 210 25 5880 , srcInfoPoints = [] 5881 } 5882 (UnQual 5883 SrcSpanInfo 5884 { srcInfoSpan = 5885 SrcSpan "tests/examples/RealGHC.lhs" 210 21 210 25 5886 , srcInfoPoints = [] 5887 } 5888 (Ident 5889 SrcSpanInfo 5890 { srcInfoSpan = 5891 SrcSpan "tests/examples/RealGHC.lhs" 210 21 210 25 5892 , srcInfoPoints = [] 5893 } 5894 "WARN"))) 5895 (Tuple 5896 SrcSpanInfo 5897 { srcInfoSpan = 5898 SrcSpan "tests/examples/RealGHC.lhs" 210 25 211 48 5899 , srcInfoPoints = 5900 [ SrcSpan "tests/examples/RealGHC.lhs" 210 25 210 26 5901 , SrcSpan "tests/examples/RealGHC.lhs" 210 74 210 75 5902 , SrcSpan "tests/examples/RealGHC.lhs" 211 47 211 48 5903 ] 5904 } 5905 Boxed 5906 [ InfixApp 5907 SrcSpanInfo 5908 { srcInfoSpan = 5909 SrcSpan "tests/examples/RealGHC.lhs" 210 27 210 74 5910 , srcInfoPoints = [] 5911 } 5912 (App 5913 SrcSpanInfo 5914 { srcInfoSpan = 5915 SrcSpan "tests/examples/RealGHC.lhs" 210 27 210 46 5916 , srcInfoPoints = [] 5917 } 5918 (Var 5919 SrcSpanInfo 5920 { srcInfoSpan = 5921 SrcSpan 5922 "tests/examples/RealGHC.lhs" 210 27 210 30 5923 , srcInfoPoints = [] 5924 } 5925 (UnQual 5926 SrcSpanInfo 5927 { srcInfoSpan = 5928 SrcSpan 5929 "tests/examples/RealGHC.lhs" 210 27 210 30 5930 , srcInfoPoints = [] 5931 } 5932 (Ident 5933 SrcSpanInfo 5934 { srcInfoSpan = 5935 SrcSpan 5936 "tests/examples/RealGHC.lhs" 5937 210 5938 27 5939 210 5940 30 5941 , srcInfoPoints = [] 5942 } 5943 "not"))) 5944 (Paren 5945 SrcSpanInfo 5946 { srcInfoSpan = 5947 SrcSpan 5948 "tests/examples/RealGHC.lhs" 210 31 210 46 5949 , srcInfoPoints = 5950 [ SrcSpan 5951 "tests/examples/RealGHC.lhs" 210 31 210 32 5952 , SrcSpan 5953 "tests/examples/RealGHC.lhs" 210 45 210 46 5954 ] 5955 } 5956 (App 5957 SrcSpanInfo 5958 { srcInfoSpan = 5959 SrcSpan 5960 "tests/examples/RealGHC.lhs" 210 32 210 45 5961 , srcInfoPoints = [] 5962 } 5963 (Var 5964 SrcSpanInfo 5965 { srcInfoSpan = 5966 SrcSpan 5967 "tests/examples/RealGHC.lhs" 5968 210 5969 32 5970 210 5971 42 5972 , srcInfoPoints = [] 5973 } 5974 (UnQual 5975 SrcSpanInfo 5976 { srcInfoSpan = 5977 SrcSpan 5978 "tests/examples/RealGHC.lhs" 5979 210 5980 32 5981 210 5982 42 5983 , srcInfoPoints = [] 5984 } 5985 (Ident 5986 SrcSpanInfo 5987 { srcInfoSpan = 5988 SrcSpan 5989 "tests/examples/RealGHC.lhs" 5990 210 5991 32 5992 210 5993 42 5994 , srcInfoPoints = [] 5995 } 5996 "isPrimOpId"))) 5997 (Var 5998 SrcSpanInfo 5999 { srcInfoSpan = 6000 SrcSpan 6001 "tests/examples/RealGHC.lhs" 6002 210 6003 43 6004 210 6005 45 6006 , srcInfoPoints = [] 6007 } 6008 (UnQual 6009 SrcSpanInfo 6010 { srcInfoSpan = 6011 SrcSpan 6012 "tests/examples/RealGHC.lhs" 6013 210 6014 43 6015 210 6016 45 6017 , srcInfoPoints = [] 6018 } 6019 (Ident 6020 SrcSpanInfo 6021 { srcInfoSpan = 6022 SrcSpan 6023 "tests/examples/RealGHC.lhs" 6024 210 6025 43 6026 210 6027 45 6028 , srcInfoPoints = [] 6029 } 6030 "fn")))))) 6031 (QVarOp 6032 SrcSpanInfo 6033 { srcInfoSpan = 6034 SrcSpan "tests/examples/RealGHC.lhs" 210 47 210 49 6035 , srcInfoPoints = [] 6036 } 6037 (UnQual 6038 SrcSpanInfo 6039 { srcInfoSpan = 6040 SrcSpan 6041 "tests/examples/RealGHC.lhs" 210 47 210 49 6042 , srcInfoPoints = [] 6043 } 6044 (Symbol 6045 SrcSpanInfo 6046 { srcInfoSpan = 6047 SrcSpan 6048 "tests/examples/RealGHC.lhs" 210 47 210 49 6049 , srcInfoPoints = [] 6050 } 6051 "&&"))) 6052 (App 6053 SrcSpanInfo 6054 { srcInfoSpan = 6055 SrcSpan "tests/examples/RealGHC.lhs" 210 50 210 74 6056 , srcInfoPoints = [] 6057 } 6058 (Var 6059 SrcSpanInfo 6060 { srcInfoSpan = 6061 SrcSpan 6062 "tests/examples/RealGHC.lhs" 210 50 210 57 6063 , srcInfoPoints = [] 6064 } 6065 (UnQual 6066 SrcSpanInfo 6067 { srcInfoSpan = 6068 SrcSpan 6069 "tests/examples/RealGHC.lhs" 210 50 210 57 6070 , srcInfoPoints = [] 6071 } 6072 (Ident 6073 SrcSpanInfo 6074 { srcInfoSpan = 6075 SrcSpan 6076 "tests/examples/RealGHC.lhs" 6077 210 6078 50 6079 210 6080 57 6081 , srcInfoPoints = [] 6082 } 6083 "notNull"))) 6084 (Paren 6085 SrcSpanInfo 6086 { srcInfoSpan = 6087 SrcSpan 6088 "tests/examples/RealGHC.lhs" 210 58 210 74 6089 , srcInfoPoints = 6090 [ SrcSpan 6091 "tests/examples/RealGHC.lhs" 210 58 210 59 6092 , SrcSpan 6093 "tests/examples/RealGHC.lhs" 210 73 210 74 6094 ] 6095 } 6096 (App 6097 SrcSpanInfo 6098 { srcInfoSpan = 6099 SrcSpan 6100 "tests/examples/RealGHC.lhs" 210 59 210 73 6101 , srcInfoPoints = [] 6102 } 6103 (Var 6104 SrcSpanInfo 6105 { srcInfoSpan = 6106 SrcSpan 6107 "tests/examples/RealGHC.lhs" 6108 210 6109 59 6110 210 6111 70 6112 , srcInfoPoints = [] 6113 } 6114 (UnQual 6115 SrcSpanInfo 6116 { srcInfoSpan = 6117 SrcSpan 6118 "tests/examples/RealGHC.lhs" 6119 210 6120 59 6121 210 6122 70 6123 , srcInfoPoints = [] 6124 } 6125 (Ident 6126 SrcSpanInfo 6127 { srcInfoSpan = 6128 SrcSpan 6129 "tests/examples/RealGHC.lhs" 6130 210 6131 59 6132 210 6133 70 6134 , srcInfoPoints = [] 6135 } 6136 "idCoreRules"))) 6137 (Var 6138 SrcSpanInfo 6139 { srcInfoSpan = 6140 SrcSpan 6141 "tests/examples/RealGHC.lhs" 6142 210 6143 71 6144 210 6145 73 6146 , srcInfoPoints = [] 6147 } 6148 (UnQual 6149 SrcSpanInfo 6150 { srcInfoSpan = 6151 SrcSpan 6152 "tests/examples/RealGHC.lhs" 6153 210 6154 71 6155 210 6156 73 6157 , srcInfoPoints = [] 6158 } 6159 (Ident 6160 SrcSpanInfo 6161 { srcInfoSpan = 6162 SrcSpan 6163 "tests/examples/RealGHC.lhs" 6164 210 6165 71 6166 210 6167 73 6168 , srcInfoPoints = [] 6169 } 6170 "fn")))))) 6171 , InfixApp 6172 SrcSpanInfo 6173 { srcInfoSpan = 6174 SrcSpan "tests/examples/RealGHC.lhs" 211 15 211 46 6175 , srcInfoPoints = [] 6176 } 6177 (App 6178 SrcSpanInfo 6179 { srcInfoSpan = 6180 SrcSpan "tests/examples/RealGHC.lhs" 211 15 211 21 6181 , srcInfoPoints = [] 6182 } 6183 (Var 6184 SrcSpanInfo 6185 { srcInfoSpan = 6186 SrcSpan 6187 "tests/examples/RealGHC.lhs" 211 15 211 18 6188 , srcInfoPoints = [] 6189 } 6190 (UnQual 6191 SrcSpanInfo 6192 { srcInfoSpan = 6193 SrcSpan 6194 "tests/examples/RealGHC.lhs" 211 15 211 18 6195 , srcInfoPoints = [] 6196 } 6197 (Ident 6198 SrcSpanInfo 6199 { srcInfoSpan = 6200 SrcSpan 6201 "tests/examples/RealGHC.lhs" 6202 211 6203 15 6204 211 6205 18 6206 , srcInfoPoints = [] 6207 } 6208 "ppr"))) 6209 (Var 6210 SrcSpanInfo 6211 { srcInfoSpan = 6212 SrcSpan 6213 "tests/examples/RealGHC.lhs" 211 19 211 21 6214 , srcInfoPoints = [] 6215 } 6216 (UnQual 6217 SrcSpanInfo 6218 { srcInfoSpan = 6219 SrcSpan 6220 "tests/examples/RealGHC.lhs" 211 19 211 21 6221 , srcInfoPoints = [] 6222 } 6223 (Ident 6224 SrcSpanInfo 6225 { srcInfoSpan = 6226 SrcSpan 6227 "tests/examples/RealGHC.lhs" 6228 211 6229 19 6230 211 6231 21 6232 , srcInfoPoints = [] 6233 } 6234 "fn")))) 6235 (QVarOp 6236 SrcSpanInfo 6237 { srcInfoSpan = 6238 SrcSpan "tests/examples/RealGHC.lhs" 211 22 211 25 6239 , srcInfoPoints = [] 6240 } 6241 (UnQual 6242 SrcSpanInfo 6243 { srcInfoSpan = 6244 SrcSpan 6245 "tests/examples/RealGHC.lhs" 211 22 211 25 6246 , srcInfoPoints = [] 6247 } 6248 (Symbol 6249 SrcSpanInfo 6250 { srcInfoSpan = 6251 SrcSpan 6252 "tests/examples/RealGHC.lhs" 211 22 211 25 6253 , srcInfoPoints = [] 6254 } 6255 "<+>"))) 6256 (App 6257 SrcSpanInfo 6258 { srcInfoSpan = 6259 SrcSpan "tests/examples/RealGHC.lhs" 211 26 211 46 6260 , srcInfoPoints = [] 6261 } 6262 (Var 6263 SrcSpanInfo 6264 { srcInfoSpan = 6265 SrcSpan 6266 "tests/examples/RealGHC.lhs" 211 26 211 29 6267 , srcInfoPoints = [] 6268 } 6269 (UnQual 6270 SrcSpanInfo 6271 { srcInfoSpan = 6272 SrcSpan 6273 "tests/examples/RealGHC.lhs" 211 26 211 29 6274 , srcInfoPoints = [] 6275 } 6276 (Ident 6277 SrcSpanInfo 6278 { srcInfoSpan = 6279 SrcSpan 6280 "tests/examples/RealGHC.lhs" 6281 211 6282 26 6283 211 6284 29 6285 , srcInfoPoints = [] 6286 } 6287 "ppr"))) 6288 (Paren 6289 SrcSpanInfo 6290 { srcInfoSpan = 6291 SrcSpan 6292 "tests/examples/RealGHC.lhs" 211 30 211 46 6293 , srcInfoPoints = 6294 [ SrcSpan 6295 "tests/examples/RealGHC.lhs" 211 30 211 31 6296 , SrcSpan 6297 "tests/examples/RealGHC.lhs" 211 45 211 46 6298 ] 6299 } 6300 (App 6301 SrcSpanInfo 6302 { srcInfoSpan = 6303 SrcSpan 6304 "tests/examples/RealGHC.lhs" 211 31 211 45 6305 , srcInfoPoints = [] 6306 } 6307 (Var 6308 SrcSpanInfo 6309 { srcInfoSpan = 6310 SrcSpan 6311 "tests/examples/RealGHC.lhs" 6312 211 6313 31 6314 211 6315 42 6316 , srcInfoPoints = [] 6317 } 6318 (UnQual 6319 SrcSpanInfo 6320 { srcInfoSpan = 6321 SrcSpan 6322 "tests/examples/RealGHC.lhs" 6323 211 6324 31 6325 211 6326 42 6327 , srcInfoPoints = [] 6328 } 6329 (Ident 6330 SrcSpanInfo 6331 { srcInfoSpan = 6332 SrcSpan 6333 "tests/examples/RealGHC.lhs" 6334 211 6335 31 6336 211 6337 42 6338 , srcInfoPoints = [] 6339 } 6340 "idCoreRules"))) 6341 (Var 6342 SrcSpanInfo 6343 { srcInfoSpan = 6344 SrcSpan 6345 "tests/examples/RealGHC.lhs" 6346 211 6347 43 6348 211 6349 45 6350 , srcInfoPoints = [] 6351 } 6352 (UnQual 6353 SrcSpanInfo 6354 { srcInfoSpan = 6355 SrcSpan 6356 "tests/examples/RealGHC.lhs" 6357 211 6358 43 6359 211 6360 45 6361 , srcInfoPoints = [] 6362 } 6363 (Ident 6364 SrcSpanInfo 6365 { srcInfoSpan = 6366 SrcSpan 6367 "tests/examples/RealGHC.lhs" 6368 211 6369 43 6370 211 6371 45 6372 , srcInfoPoints = [] 6373 } 6374 "fn")))))) 6375 ])) 6376 (Var 6377 SrcSpanInfo 6378 { srcInfoSpan = 6379 SrcSpan "tests/examples/RealGHC.lhs" 212 13 212 24 6380 , srcInfoPoints = [] 6381 } 6382 (UnQual 6383 SrcSpanInfo 6384 { srcInfoSpan = 6385 SrcSpan "tests/examples/RealGHC.lhs" 212 13 212 24 6386 , srcInfoPoints = [] 6387 } 6388 (Ident 6389 SrcSpanInfo 6390 { srcInfoSpan = 6391 SrcSpan "tests/examples/RealGHC.lhs" 212 13 212 24 6392 , srcInfoPoints = [] 6393 } 6394 "idCoreRules")))) 6395 (Var 6396 SrcSpanInfo 6397 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 25 212 27 6398 , srcInfoPoints = [] 6399 } 6400 (UnQual 6401 SrcSpanInfo 6402 { srcInfoSpan = 6403 SrcSpan "tests/examples/RealGHC.lhs" 212 25 212 27 6404 , srcInfoPoints = [] 6405 } 6406 (Ident 6407 SrcSpanInfo 6408 { srcInfoSpan = 6409 SrcSpan "tests/examples/RealGHC.lhs" 212 25 212 27 6410 , srcInfoPoints = [] 6411 } 6412 "fn")))) 6413 (QVarOp 6414 SrcSpanInfo 6415 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 28 212 30 6416 , srcInfoPoints = [] 6417 } 6418 (UnQual 6419 SrcSpanInfo 6420 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 28 212 30 6421 , srcInfoPoints = [] 6422 } 6423 (Symbol 6424 SrcSpanInfo 6425 { srcInfoSpan = 6426 SrcSpan "tests/examples/RealGHC.lhs" 212 28 212 30 6427 , srcInfoPoints = [] 6428 } 6429 "++"))) 6430 (Paren 6431 SrcSpanInfo 6432 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 31 212 80 6433 , srcInfoPoints = 6434 [ SrcSpan "tests/examples/RealGHC.lhs" 212 31 212 32 6435 , SrcSpan "tests/examples/RealGHC.lhs" 212 79 212 80 6436 ] 6437 } 6438 (InfixApp 6439 SrcSpanInfo 6440 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 212 32 212 79 6441 , srcInfoPoints = [] 6442 } 6443 (App 6444 SrcSpanInfo 6445 { srcInfoSpan = 6446 SrcSpan "tests/examples/RealGHC.lhs" 212 32 212 67 6447 , srcInfoPoints = [] 6448 } 6449 (App 6450 SrcSpanInfo 6451 { srcInfoSpan = 6452 SrcSpan "tests/examples/RealGHC.lhs" 212 32 212 55 6453 , srcInfoPoints = [] 6454 } 6455 (Var 6456 SrcSpanInfo 6457 { srcInfoSpan = 6458 SrcSpan "tests/examples/RealGHC.lhs" 212 32 212 45 6459 , srcInfoPoints = [] 6460 } 6461 (UnQual 6462 SrcSpanInfo 6463 { srcInfoSpan = 6464 SrcSpan "tests/examples/RealGHC.lhs" 212 32 212 45 6465 , srcInfoPoints = [] 6466 } 6467 (Ident 6468 SrcSpanInfo 6469 { srcInfoSpan = 6470 SrcSpan 6471 "tests/examples/RealGHC.lhs" 212 32 212 45 6472 , srcInfoPoints = [] 6473 } 6474 "lookupNameEnv"))) 6475 (Var 6476 SrcSpanInfo 6477 { srcInfoSpan = 6478 SrcSpan "tests/examples/RealGHC.lhs" 212 46 212 55 6479 , srcInfoPoints = [] 6480 } 6481 (UnQual 6482 SrcSpanInfo 6483 { srcInfoSpan = 6484 SrcSpan "tests/examples/RealGHC.lhs" 212 46 212 55 6485 , srcInfoPoints = [] 6486 } 6487 (Ident 6488 SrcSpanInfo 6489 { srcInfoSpan = 6490 SrcSpan 6491 "tests/examples/RealGHC.lhs" 212 46 212 55 6492 , srcInfoPoints = [] 6493 } 6494 "rule_base")))) 6495 (Paren 6496 SrcSpanInfo 6497 { srcInfoSpan = 6498 SrcSpan "tests/examples/RealGHC.lhs" 212 56 212 67 6499 , srcInfoPoints = 6500 [ SrcSpan "tests/examples/RealGHC.lhs" 212 56 212 57 6501 , SrcSpan "tests/examples/RealGHC.lhs" 212 66 212 67 6502 ] 6503 } 6504 (App 6505 SrcSpanInfo 6506 { srcInfoSpan = 6507 SrcSpan "tests/examples/RealGHC.lhs" 212 57 212 66 6508 , srcInfoPoints = [] 6509 } 6510 (Var 6511 SrcSpanInfo 6512 { srcInfoSpan = 6513 SrcSpan "tests/examples/RealGHC.lhs" 212 57 212 63 6514 , srcInfoPoints = [] 6515 } 6516 (UnQual 6517 SrcSpanInfo 6518 { srcInfoSpan = 6519 SrcSpan 6520 "tests/examples/RealGHC.lhs" 212 57 212 63 6521 , srcInfoPoints = [] 6522 } 6523 (Ident 6524 SrcSpanInfo 6525 { srcInfoSpan = 6526 SrcSpan 6527 "tests/examples/RealGHC.lhs" 212 57 212 63 6528 , srcInfoPoints = [] 6529 } 6530 "idName"))) 6531 (Var 6532 SrcSpanInfo 6533 { srcInfoSpan = 6534 SrcSpan "tests/examples/RealGHC.lhs" 212 64 212 66 6535 , srcInfoPoints = [] 6536 } 6537 (UnQual 6538 SrcSpanInfo 6539 { srcInfoSpan = 6540 SrcSpan 6541 "tests/examples/RealGHC.lhs" 212 64 212 66 6542 , srcInfoPoints = [] 6543 } 6544 (Ident 6545 SrcSpanInfo 6546 { srcInfoSpan = 6547 SrcSpan 6548 "tests/examples/RealGHC.lhs" 212 64 212 66 6549 , srcInfoPoints = [] 6550 } 6551 "fn")))))) 6552 (QVarOp 6553 SrcSpanInfo 6554 { srcInfoSpan = 6555 SrcSpan "tests/examples/RealGHC.lhs" 212 68 212 76 6556 , srcInfoPoints = 6557 [ SrcSpan "tests/examples/RealGHC.lhs" 212 68 212 69 6558 , SrcSpan "tests/examples/RealGHC.lhs" 212 69 212 75 6559 , SrcSpan "tests/examples/RealGHC.lhs" 212 75 212 76 6560 ] 6561 } 6562 (UnQual 6563 SrcSpanInfo 6564 { srcInfoSpan = 6565 SrcSpan "tests/examples/RealGHC.lhs" 212 68 212 76 6566 , srcInfoPoints = 6567 [ SrcSpan "tests/examples/RealGHC.lhs" 212 68 212 69 6568 , SrcSpan "tests/examples/RealGHC.lhs" 212 69 212 75 6569 , SrcSpan "tests/examples/RealGHC.lhs" 212 75 212 76 6570 ] 6571 } 6572 (Ident 6573 SrcSpanInfo 6574 { srcInfoSpan = 6575 SrcSpan "tests/examples/RealGHC.lhs" 212 69 212 75 6576 , srcInfoPoints = [] 6577 } 6578 "orElse"))) 6579 (List 6580 SrcSpanInfo 6581 { srcInfoSpan = 6582 SrcSpan "tests/examples/RealGHC.lhs" 212 77 212 79 6583 , srcInfoPoints = 6584 [ SrcSpan "tests/examples/RealGHC.lhs" 212 77 212 78 6585 , SrcSpan "tests/examples/RealGHC.lhs" 212 78 212 79 6586 ] 6587 } 6588 [])))) 6589 ]) 6590 Nothing 6591 ] 6592 , TypeDecl 6593 SrcSpanInfo 6594 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 1 225 35 6595 , srcInfoPoints = 6596 [ SrcSpan "tests/examples/RealGHC.lhs" 225 1 225 5 6597 , SrcSpan "tests/examples/RealGHC.lhs" 225 15 225 16 6598 ] 6599 } 6600 (DHead 6601 SrcSpanInfo 6602 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 6 225 14 6603 , srcInfoPoints = [] 6604 } 6605 (Ident 6606 SrcSpanInfo 6607 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 6 225 14 6608 , srcInfoPoints = [] 6609 } 6610 "RuleBase")) 6611 (TyApp 6612 SrcSpanInfo 6613 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 17 225 35 6614 , srcInfoPoints = [] 6615 } 6616 (TyCon 6617 SrcSpanInfo 6618 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 17 225 24 6619 , srcInfoPoints = [] 6620 } 6621 (UnQual 6622 SrcSpanInfo 6623 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 17 225 24 6624 , srcInfoPoints = [] 6625 } 6626 (Ident 6627 SrcSpanInfo 6628 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 17 225 24 6629 , srcInfoPoints = [] 6630 } 6631 "NameEnv"))) 6632 (TyList 6633 SrcSpanInfo 6634 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 25 225 35 6635 , srcInfoPoints = 6636 [ SrcSpan "tests/examples/RealGHC.lhs" 225 25 225 26 6637 , SrcSpan "tests/examples/RealGHC.lhs" 225 34 225 35 6638 ] 6639 } 6640 (TyCon 6641 SrcSpanInfo 6642 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 26 225 34 6643 , srcInfoPoints = [] 6644 } 6645 (UnQual 6646 SrcSpanInfo 6647 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 26 225 34 6648 , srcInfoPoints = [] 6649 } 6650 (Ident 6651 SrcSpanInfo 6652 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 225 26 225 34 6653 , srcInfoPoints = [] 6654 } 6655 "CoreRule"))))) 6656 , PatBind 6657 SrcSpanInfo 6658 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 229 1 229 29 6659 , srcInfoPoints = [] 6660 } 6661 (PVar 6662 SrcSpanInfo 6663 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 229 1 229 14 6664 , srcInfoPoints = [] 6665 } 6666 (Ident 6667 SrcSpanInfo 6668 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 229 1 229 14 6669 , srcInfoPoints = [] 6670 } 6671 "emptyRuleBase")) 6672 (UnGuardedRhs 6673 SrcSpanInfo 6674 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 229 15 229 29 6675 , srcInfoPoints = 6676 [ SrcSpan "tests/examples/RealGHC.lhs" 229 15 229 16 ] 6677 } 6678 (Var 6679 SrcSpanInfo 6680 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 229 17 229 29 6681 , srcInfoPoints = [] 6682 } 6683 (UnQual 6684 SrcSpanInfo 6685 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 229 17 229 29 6686 , srcInfoPoints = [] 6687 } 6688 (Ident 6689 SrcSpanInfo 6690 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 229 17 229 29 6691 , srcInfoPoints = [] 6692 } 6693 "emptyNameEnv")))) 6694 Nothing 6695 , TypeSig 6696 SrcSpanInfo 6697 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 1 231 37 6698 , srcInfoPoints = 6699 [ SrcSpan "tests/examples/RealGHC.lhs" 231 12 231 14 ] 6700 } 6701 [ Ident 6702 SrcSpanInfo 6703 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 1 231 11 6704 , srcInfoPoints = [] 6705 } 6706 "mkRuleBase" 6707 ] 6708 (TyFun 6709 SrcSpanInfo 6710 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 15 231 37 6711 , srcInfoPoints = 6712 [ SrcSpan "tests/examples/RealGHC.lhs" 231 26 231 28 ] 6713 } 6714 (TyList 6715 SrcSpanInfo 6716 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 15 231 25 6717 , srcInfoPoints = 6718 [ SrcSpan "tests/examples/RealGHC.lhs" 231 15 231 16 6719 , SrcSpan "tests/examples/RealGHC.lhs" 231 24 231 25 6720 ] 6721 } 6722 (TyCon 6723 SrcSpanInfo 6724 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 16 231 24 6725 , srcInfoPoints = [] 6726 } 6727 (UnQual 6728 SrcSpanInfo 6729 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 16 231 24 6730 , srcInfoPoints = [] 6731 } 6732 (Ident 6733 SrcSpanInfo 6734 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 16 231 24 6735 , srcInfoPoints = [] 6736 } 6737 "CoreRule")))) 6738 (TyCon 6739 SrcSpanInfo 6740 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 29 231 37 6741 , srcInfoPoints = [] 6742 } 6743 (UnQual 6744 SrcSpanInfo 6745 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 29 231 37 6746 , srcInfoPoints = [] 6747 } 6748 (Ident 6749 SrcSpanInfo 6750 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 231 29 231 37 6751 , srcInfoPoints = [] 6752 } 6753 "RuleBase")))) 6754 , FunBind 6755 SrcSpanInfo 6756 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 1 232 58 6757 , srcInfoPoints = [] 6758 } 6759 [ Match 6760 SrcSpanInfo 6761 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 1 232 58 6762 , srcInfoPoints = [] 6763 } 6764 (Ident 6765 SrcSpanInfo 6766 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 1 232 11 6767 , srcInfoPoints = [] 6768 } 6769 "mkRuleBase") 6770 [ PVar 6771 SrcSpanInfo 6772 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 12 232 17 6773 , srcInfoPoints = [] 6774 } 6775 (Ident 6776 SrcSpanInfo 6777 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 12 232 17 6778 , srcInfoPoints = [] 6779 } 6780 "rules") 6781 ] 6782 (UnGuardedRhs 6783 SrcSpanInfo 6784 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 18 232 58 6785 , srcInfoPoints = 6786 [ SrcSpan "tests/examples/RealGHC.lhs" 232 18 232 19 ] 6787 } 6788 (App 6789 SrcSpanInfo 6790 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 20 232 58 6791 , srcInfoPoints = [] 6792 } 6793 (App 6794 SrcSpanInfo 6795 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 20 232 52 6796 , srcInfoPoints = [] 6797 } 6798 (Var 6799 SrcSpanInfo 6800 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 20 232 38 6801 , srcInfoPoints = [] 6802 } 6803 (UnQual 6804 SrcSpanInfo 6805 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 20 232 38 6806 , srcInfoPoints = [] 6807 } 6808 (Ident 6809 SrcSpanInfo 6810 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 20 232 38 6811 , srcInfoPoints = [] 6812 } 6813 "extendRuleBaseList"))) 6814 (Var 6815 SrcSpanInfo 6816 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 39 232 52 6817 , srcInfoPoints = [] 6818 } 6819 (UnQual 6820 SrcSpanInfo 6821 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 39 232 52 6822 , srcInfoPoints = [] 6823 } 6824 (Ident 6825 SrcSpanInfo 6826 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 39 232 52 6827 , srcInfoPoints = [] 6828 } 6829 "emptyRuleBase")))) 6830 (Var 6831 SrcSpanInfo 6832 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 53 232 58 6833 , srcInfoPoints = [] 6834 } 6835 (UnQual 6836 SrcSpanInfo 6837 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 53 232 58 6838 , srcInfoPoints = [] 6839 } 6840 (Ident 6841 SrcSpanInfo 6842 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 232 53 232 58 6843 , srcInfoPoints = [] 6844 } 6845 "rules"))))) 6846 Nothing 6847 ] 6848 , TypeSig 6849 SrcSpanInfo 6850 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 1 234 57 6851 , srcInfoPoints = 6852 [ SrcSpan "tests/examples/RealGHC.lhs" 234 20 234 22 ] 6853 } 6854 [ Ident 6855 SrcSpanInfo 6856 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 1 234 19 6857 , srcInfoPoints = [] 6858 } 6859 "extendRuleBaseList" 6860 ] 6861 (TyFun 6862 SrcSpanInfo 6863 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 23 234 57 6864 , srcInfoPoints = 6865 [ SrcSpan "tests/examples/RealGHC.lhs" 234 32 234 34 ] 6866 } 6867 (TyCon 6868 SrcSpanInfo 6869 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 23 234 31 6870 , srcInfoPoints = [] 6871 } 6872 (UnQual 6873 SrcSpanInfo 6874 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 23 234 31 6875 , srcInfoPoints = [] 6876 } 6877 (Ident 6878 SrcSpanInfo 6879 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 23 234 31 6880 , srcInfoPoints = [] 6881 } 6882 "RuleBase"))) 6883 (TyFun 6884 SrcSpanInfo 6885 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 35 234 57 6886 , srcInfoPoints = 6887 [ SrcSpan "tests/examples/RealGHC.lhs" 234 46 234 48 ] 6888 } 6889 (TyList 6890 SrcSpanInfo 6891 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 35 234 45 6892 , srcInfoPoints = 6893 [ SrcSpan "tests/examples/RealGHC.lhs" 234 35 234 36 6894 , SrcSpan "tests/examples/RealGHC.lhs" 234 44 234 45 6895 ] 6896 } 6897 (TyCon 6898 SrcSpanInfo 6899 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 36 234 44 6900 , srcInfoPoints = [] 6901 } 6902 (UnQual 6903 SrcSpanInfo 6904 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 36 234 44 6905 , srcInfoPoints = [] 6906 } 6907 (Ident 6908 SrcSpanInfo 6909 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 36 234 44 6910 , srcInfoPoints = [] 6911 } 6912 "CoreRule")))) 6913 (TyCon 6914 SrcSpanInfo 6915 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 49 234 57 6916 , srcInfoPoints = [] 6917 } 6918 (UnQual 6919 SrcSpanInfo 6920 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 49 234 57 6921 , srcInfoPoints = [] 6922 } 6923 (Ident 6924 SrcSpanInfo 6925 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 234 49 234 57 6926 , srcInfoPoints = [] 6927 } 6928 "RuleBase"))))) 6929 , FunBind 6930 SrcSpanInfo 6931 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 235 1 236 44 6932 , srcInfoPoints = [] 6933 } 6934 [ Match 6935 SrcSpanInfo 6936 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 235 1 236 44 6937 , srcInfoPoints = [] 6938 } 6939 (Ident 6940 SrcSpanInfo 6941 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 235 1 235 19 6942 , srcInfoPoints = [] 6943 } 6944 "extendRuleBaseList") 6945 [ PVar 6946 SrcSpanInfo 6947 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 235 20 235 29 6948 , srcInfoPoints = [] 6949 } 6950 (Ident 6951 SrcSpanInfo 6952 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 235 20 235 29 6953 , srcInfoPoints = [] 6954 } 6955 "rule_base") 6956 , PVar 6957 SrcSpanInfo 6958 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 235 30 235 38 6959 , srcInfoPoints = [] 6960 } 6961 (Ident 6962 SrcSpanInfo 6963 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 235 30 235 38 6964 , srcInfoPoints = [] 6965 } 6966 "new_guys") 6967 ] 6968 (UnGuardedRhs 6969 SrcSpanInfo 6970 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 3 236 44 6971 , srcInfoPoints = 6972 [ SrcSpan "tests/examples/RealGHC.lhs" 236 3 236 4 ] 6973 } 6974 (App 6975 SrcSpanInfo 6976 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 5 236 44 6977 , srcInfoPoints = [] 6978 } 6979 (App 6980 SrcSpanInfo 6981 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 5 236 35 6982 , srcInfoPoints = [] 6983 } 6984 (App 6985 SrcSpanInfo 6986 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 5 236 25 6987 , srcInfoPoints = [] 6988 } 6989 (Var 6990 SrcSpanInfo 6991 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 5 236 10 6992 , srcInfoPoints = [] 6993 } 6994 (UnQual 6995 SrcSpanInfo 6996 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 5 236 10 6997 , srcInfoPoints = [] 6998 } 6999 (Ident 7000 SrcSpanInfo 7001 { srcInfoSpan = 7002 SrcSpan "tests/examples/RealGHC.lhs" 236 5 236 10 7003 , srcInfoPoints = [] 7004 } 7005 "foldl"))) 7006 (Var 7007 SrcSpanInfo 7008 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 11 236 25 7009 , srcInfoPoints = [] 7010 } 7011 (UnQual 7012 SrcSpanInfo 7013 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 11 236 25 7014 , srcInfoPoints = [] 7015 } 7016 (Ident 7017 SrcSpanInfo 7018 { srcInfoSpan = 7019 SrcSpan "tests/examples/RealGHC.lhs" 236 11 236 25 7020 , srcInfoPoints = [] 7021 } 7022 "extendRuleBase")))) 7023 (Var 7024 SrcSpanInfo 7025 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 26 236 35 7026 , srcInfoPoints = [] 7027 } 7028 (UnQual 7029 SrcSpanInfo 7030 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 26 236 35 7031 , srcInfoPoints = [] 7032 } 7033 (Ident 7034 SrcSpanInfo 7035 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 26 236 35 7036 , srcInfoPoints = [] 7037 } 7038 "rule_base")))) 7039 (Var 7040 SrcSpanInfo 7041 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 36 236 44 7042 , srcInfoPoints = [] 7043 } 7044 (UnQual 7045 SrcSpanInfo 7046 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 36 236 44 7047 , srcInfoPoints = [] 7048 } 7049 (Ident 7050 SrcSpanInfo 7051 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 236 36 236 44 7052 , srcInfoPoints = [] 7053 } 7054 "new_guys"))))) 7055 Nothing 7056 ] 7057 , TypeSig 7058 SrcSpanInfo 7059 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 1 238 50 7060 , srcInfoPoints = 7061 [ SrcSpan "tests/examples/RealGHC.lhs" 238 15 238 17 ] 7062 } 7063 [ Ident 7064 SrcSpanInfo 7065 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 1 238 14 7066 , srcInfoPoints = [] 7067 } 7068 "unionRuleBase" 7069 ] 7070 (TyFun 7071 SrcSpanInfo 7072 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 18 238 50 7073 , srcInfoPoints = 7074 [ SrcSpan "tests/examples/RealGHC.lhs" 238 27 238 29 ] 7075 } 7076 (TyCon 7077 SrcSpanInfo 7078 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 18 238 26 7079 , srcInfoPoints = [] 7080 } 7081 (UnQual 7082 SrcSpanInfo 7083 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 18 238 26 7084 , srcInfoPoints = [] 7085 } 7086 (Ident 7087 SrcSpanInfo 7088 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 18 238 26 7089 , srcInfoPoints = [] 7090 } 7091 "RuleBase"))) 7092 (TyFun 7093 SrcSpanInfo 7094 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 30 238 50 7095 , srcInfoPoints = 7096 [ SrcSpan "tests/examples/RealGHC.lhs" 238 39 238 41 ] 7097 } 7098 (TyCon 7099 SrcSpanInfo 7100 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 30 238 38 7101 , srcInfoPoints = [] 7102 } 7103 (UnQual 7104 SrcSpanInfo 7105 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 30 238 38 7106 , srcInfoPoints = [] 7107 } 7108 (Ident 7109 SrcSpanInfo 7110 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 30 238 38 7111 , srcInfoPoints = [] 7112 } 7113 "RuleBase"))) 7114 (TyCon 7115 SrcSpanInfo 7116 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 42 238 50 7117 , srcInfoPoints = [] 7118 } 7119 (UnQual 7120 SrcSpanInfo 7121 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 42 238 50 7122 , srcInfoPoints = [] 7123 } 7124 (Ident 7125 SrcSpanInfo 7126 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 238 42 238 50 7127 , srcInfoPoints = [] 7128 } 7129 "RuleBase"))))) 7130 , FunBind 7131 SrcSpanInfo 7132 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 1 239 51 7133 , srcInfoPoints = [] 7134 } 7135 [ Match 7136 SrcSpanInfo 7137 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 1 239 51 7138 , srcInfoPoints = [] 7139 } 7140 (Ident 7141 SrcSpanInfo 7142 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 1 239 14 7143 , srcInfoPoints = [] 7144 } 7145 "unionRuleBase") 7146 [ PVar 7147 SrcSpanInfo 7148 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 15 239 18 7149 , srcInfoPoints = [] 7150 } 7151 (Ident 7152 SrcSpanInfo 7153 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 15 239 18 7154 , srcInfoPoints = [] 7155 } 7156 "rb1") 7157 , PVar 7158 SrcSpanInfo 7159 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 19 239 22 7160 , srcInfoPoints = [] 7161 } 7162 (Ident 7163 SrcSpanInfo 7164 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 19 239 22 7165 , srcInfoPoints = [] 7166 } 7167 "rb2") 7168 ] 7169 (UnGuardedRhs 7170 SrcSpanInfo 7171 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 23 239 51 7172 , srcInfoPoints = 7173 [ SrcSpan "tests/examples/RealGHC.lhs" 239 23 239 24 ] 7174 } 7175 (App 7176 SrcSpanInfo 7177 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 25 239 51 7178 , srcInfoPoints = [] 7179 } 7180 (App 7181 SrcSpanInfo 7182 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 25 239 47 7183 , srcInfoPoints = [] 7184 } 7185 (App 7186 SrcSpanInfo 7187 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 25 239 43 7188 , srcInfoPoints = [] 7189 } 7190 (Var 7191 SrcSpanInfo 7192 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 25 239 38 7193 , srcInfoPoints = [] 7194 } 7195 (UnQual 7196 SrcSpanInfo 7197 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 25 239 38 7198 , srcInfoPoints = [] 7199 } 7200 (Ident 7201 SrcSpanInfo 7202 { srcInfoSpan = 7203 SrcSpan "tests/examples/RealGHC.lhs" 239 25 239 38 7204 , srcInfoPoints = [] 7205 } 7206 "plusNameEnv_C"))) 7207 (Var 7208 SrcSpanInfo 7209 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 39 239 43 7210 , srcInfoPoints = 7211 [ SrcSpan "tests/examples/RealGHC.lhs" 239 39 239 40 7212 , SrcSpan "tests/examples/RealGHC.lhs" 239 40 239 42 7213 , SrcSpan "tests/examples/RealGHC.lhs" 239 42 239 43 7214 ] 7215 } 7216 (UnQual 7217 SrcSpanInfo 7218 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 39 239 43 7219 , srcInfoPoints = 7220 [ SrcSpan "tests/examples/RealGHC.lhs" 239 39 239 40 7221 , SrcSpan "tests/examples/RealGHC.lhs" 239 40 239 42 7222 , SrcSpan "tests/examples/RealGHC.lhs" 239 42 239 43 7223 ] 7224 } 7225 (Symbol 7226 SrcSpanInfo 7227 { srcInfoSpan = 7228 SrcSpan "tests/examples/RealGHC.lhs" 239 40 239 42 7229 , srcInfoPoints = [] 7230 } 7231 "++")))) 7232 (Var 7233 SrcSpanInfo 7234 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 44 239 47 7235 , srcInfoPoints = [] 7236 } 7237 (UnQual 7238 SrcSpanInfo 7239 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 44 239 47 7240 , srcInfoPoints = [] 7241 } 7242 (Ident 7243 SrcSpanInfo 7244 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 44 239 47 7245 , srcInfoPoints = [] 7246 } 7247 "rb1")))) 7248 (Var 7249 SrcSpanInfo 7250 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 48 239 51 7251 , srcInfoPoints = [] 7252 } 7253 (UnQual 7254 SrcSpanInfo 7255 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 48 239 51 7256 , srcInfoPoints = [] 7257 } 7258 (Ident 7259 SrcSpanInfo 7260 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 239 48 239 51 7261 , srcInfoPoints = [] 7262 } 7263 "rb2"))))) 7264 Nothing 7265 ] 7266 , TypeSig 7267 SrcSpanInfo 7268 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 1 241 51 7269 , srcInfoPoints = 7270 [ SrcSpan "tests/examples/RealGHC.lhs" 241 16 241 18 ] 7271 } 7272 [ Ident 7273 SrcSpanInfo 7274 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 1 241 15 7275 , srcInfoPoints = [] 7276 } 7277 "extendRuleBase" 7278 ] 7279 (TyFun 7280 SrcSpanInfo 7281 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 19 241 51 7282 , srcInfoPoints = 7283 [ SrcSpan "tests/examples/RealGHC.lhs" 241 28 241 30 ] 7284 } 7285 (TyCon 7286 SrcSpanInfo 7287 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 19 241 27 7288 , srcInfoPoints = [] 7289 } 7290 (UnQual 7291 SrcSpanInfo 7292 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 19 241 27 7293 , srcInfoPoints = [] 7294 } 7295 (Ident 7296 SrcSpanInfo 7297 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 19 241 27 7298 , srcInfoPoints = [] 7299 } 7300 "RuleBase"))) 7301 (TyFun 7302 SrcSpanInfo 7303 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 31 241 51 7304 , srcInfoPoints = 7305 [ SrcSpan "tests/examples/RealGHC.lhs" 241 40 241 42 ] 7306 } 7307 (TyCon 7308 SrcSpanInfo 7309 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 31 241 39 7310 , srcInfoPoints = [] 7311 } 7312 (UnQual 7313 SrcSpanInfo 7314 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 31 241 39 7315 , srcInfoPoints = [] 7316 } 7317 (Ident 7318 SrcSpanInfo 7319 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 31 241 39 7320 , srcInfoPoints = [] 7321 } 7322 "CoreRule"))) 7323 (TyCon 7324 SrcSpanInfo 7325 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 43 241 51 7326 , srcInfoPoints = [] 7327 } 7328 (UnQual 7329 SrcSpanInfo 7330 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 43 241 51 7331 , srcInfoPoints = [] 7332 } 7333 (Ident 7334 SrcSpanInfo 7335 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 241 43 241 51 7336 , srcInfoPoints = [] 7337 } 7338 "RuleBase"))))) 7339 , FunBind 7340 SrcSpanInfo 7341 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 242 1 243 69 7342 , srcInfoPoints = [] 7343 } 7344 [ Match 7345 SrcSpanInfo 7346 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 242 1 243 69 7347 , srcInfoPoints = [] 7348 } 7349 (Ident 7350 SrcSpanInfo 7351 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 242 1 242 15 7352 , srcInfoPoints = [] 7353 } 7354 "extendRuleBase") 7355 [ PVar 7356 SrcSpanInfo 7357 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 242 16 242 25 7358 , srcInfoPoints = [] 7359 } 7360 (Ident 7361 SrcSpanInfo 7362 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 242 16 242 25 7363 , srcInfoPoints = [] 7364 } 7365 "rule_base") 7366 , PVar 7367 SrcSpanInfo 7368 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 242 26 242 30 7369 , srcInfoPoints = [] 7370 } 7371 (Ident 7372 SrcSpanInfo 7373 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 242 26 242 30 7374 , srcInfoPoints = [] 7375 } 7376 "rule") 7377 ] 7378 (UnGuardedRhs 7379 SrcSpanInfo 7380 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 3 243 69 7381 , srcInfoPoints = 7382 [ SrcSpan "tests/examples/RealGHC.lhs" 243 3 243 4 ] 7383 } 7384 (App 7385 SrcSpanInfo 7386 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 5 243 69 7387 , srcInfoPoints = [] 7388 } 7389 (App 7390 SrcSpanInfo 7391 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 5 243 64 7392 , srcInfoPoints = [] 7393 } 7394 (App 7395 SrcSpanInfo 7396 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 5 243 46 7397 , srcInfoPoints = [] 7398 } 7399 (App 7400 SrcSpanInfo 7401 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 5 243 36 7402 , srcInfoPoints = [] 7403 } 7404 (App 7405 SrcSpanInfo 7406 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 5 243 26 7407 , srcInfoPoints = [] 7408 } 7409 (Var 7410 SrcSpanInfo 7411 { srcInfoSpan = 7412 SrcSpan "tests/examples/RealGHC.lhs" 243 5 243 22 7413 , srcInfoPoints = [] 7414 } 7415 (UnQual 7416 SrcSpanInfo 7417 { srcInfoSpan = 7418 SrcSpan "tests/examples/RealGHC.lhs" 243 5 243 22 7419 , srcInfoPoints = [] 7420 } 7421 (Ident 7422 SrcSpanInfo 7423 { srcInfoSpan = 7424 SrcSpan "tests/examples/RealGHC.lhs" 243 5 243 22 7425 , srcInfoPoints = [] 7426 } 7427 "extendNameEnv_Acc"))) 7428 (Con 7429 SrcSpanInfo 7430 { srcInfoSpan = 7431 SrcSpan "tests/examples/RealGHC.lhs" 243 23 243 26 7432 , srcInfoPoints = 7433 [ SrcSpan "tests/examples/RealGHC.lhs" 243 23 243 24 7434 , SrcSpan "tests/examples/RealGHC.lhs" 243 24 243 25 7435 , SrcSpan "tests/examples/RealGHC.lhs" 243 25 243 26 7436 ] 7437 } 7438 (Special 7439 SrcSpanInfo 7440 { srcInfoSpan = 7441 SrcSpan "tests/examples/RealGHC.lhs" 243 23 243 26 7442 , srcInfoPoints = 7443 [ SrcSpan "tests/examples/RealGHC.lhs" 243 23 243 24 7444 , SrcSpan "tests/examples/RealGHC.lhs" 243 24 243 25 7445 , SrcSpan "tests/examples/RealGHC.lhs" 243 25 243 26 7446 ] 7447 } 7448 (Cons 7449 SrcSpanInfo 7450 { srcInfoSpan = 7451 SrcSpan "tests/examples/RealGHC.lhs" 243 24 243 25 7452 , srcInfoPoints = [] 7453 })))) 7454 (Var 7455 SrcSpanInfo 7456 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 27 243 36 7457 , srcInfoPoints = [] 7458 } 7459 (UnQual 7460 SrcSpanInfo 7461 { srcInfoSpan = 7462 SrcSpan "tests/examples/RealGHC.lhs" 243 27 243 36 7463 , srcInfoPoints = [] 7464 } 7465 (Ident 7466 SrcSpanInfo 7467 { srcInfoSpan = 7468 SrcSpan "tests/examples/RealGHC.lhs" 243 27 243 36 7469 , srcInfoPoints = [] 7470 } 7471 "singleton")))) 7472 (Var 7473 SrcSpanInfo 7474 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 37 243 46 7475 , srcInfoPoints = [] 7476 } 7477 (UnQual 7478 SrcSpanInfo 7479 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 37 243 46 7480 , srcInfoPoints = [] 7481 } 7482 (Ident 7483 SrcSpanInfo 7484 { srcInfoSpan = 7485 SrcSpan "tests/examples/RealGHC.lhs" 243 37 243 46 7486 , srcInfoPoints = [] 7487 } 7488 "rule_base")))) 7489 (Paren 7490 SrcSpanInfo 7491 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 47 243 64 7492 , srcInfoPoints = 7493 [ SrcSpan "tests/examples/RealGHC.lhs" 243 47 243 48 7494 , SrcSpan "tests/examples/RealGHC.lhs" 243 63 243 64 7495 ] 7496 } 7497 (App 7498 SrcSpanInfo 7499 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 48 243 63 7500 , srcInfoPoints = [] 7501 } 7502 (Var 7503 SrcSpanInfo 7504 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 48 243 58 7505 , srcInfoPoints = [] 7506 } 7507 (UnQual 7508 SrcSpanInfo 7509 { srcInfoSpan = 7510 SrcSpan "tests/examples/RealGHC.lhs" 243 48 243 58 7511 , srcInfoPoints = [] 7512 } 7513 (Ident 7514 SrcSpanInfo 7515 { srcInfoSpan = 7516 SrcSpan "tests/examples/RealGHC.lhs" 243 48 243 58 7517 , srcInfoPoints = [] 7518 } 7519 "ruleIdName"))) 7520 (Var 7521 SrcSpanInfo 7522 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 59 243 63 7523 , srcInfoPoints = [] 7524 } 7525 (UnQual 7526 SrcSpanInfo 7527 { srcInfoSpan = 7528 SrcSpan "tests/examples/RealGHC.lhs" 243 59 243 63 7529 , srcInfoPoints = [] 7530 } 7531 (Ident 7532 SrcSpanInfo 7533 { srcInfoSpan = 7534 SrcSpan "tests/examples/RealGHC.lhs" 243 59 243 63 7535 , srcInfoPoints = [] 7536 } 7537 "rule")))))) 7538 (Var 7539 SrcSpanInfo 7540 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 65 243 69 7541 , srcInfoPoints = [] 7542 } 7543 (UnQual 7544 SrcSpanInfo 7545 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 65 243 69 7546 , srcInfoPoints = [] 7547 } 7548 (Ident 7549 SrcSpanInfo 7550 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 243 65 243 69 7551 , srcInfoPoints = [] 7552 } 7553 "rule"))))) 7554 Nothing 7555 ] 7556 , TypeSig 7557 SrcSpanInfo 7558 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 1 245 32 7559 , srcInfoPoints = 7560 [ SrcSpan "tests/examples/RealGHC.lhs" 245 13 245 15 ] 7561 } 7562 [ Ident 7563 SrcSpanInfo 7564 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 1 245 12 7565 , srcInfoPoints = [] 7566 } 7567 "pprRuleBase" 7568 ] 7569 (TyFun 7570 SrcSpanInfo 7571 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 16 245 32 7572 , srcInfoPoints = 7573 [ SrcSpan "tests/examples/RealGHC.lhs" 245 25 245 27 ] 7574 } 7575 (TyCon 7576 SrcSpanInfo 7577 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 16 245 24 7578 , srcInfoPoints = [] 7579 } 7580 (UnQual 7581 SrcSpanInfo 7582 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 16 245 24 7583 , srcInfoPoints = [] 7584 } 7585 (Ident 7586 SrcSpanInfo 7587 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 16 245 24 7588 , srcInfoPoints = [] 7589 } 7590 "RuleBase"))) 7591 (TyCon 7592 SrcSpanInfo 7593 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 28 245 32 7594 , srcInfoPoints = [] 7595 } 7596 (UnQual 7597 SrcSpanInfo 7598 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 28 245 32 7599 , srcInfoPoints = [] 7600 } 7601 (Ident 7602 SrcSpanInfo 7603 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 245 28 245 32 7604 , srcInfoPoints = [] 7605 } 7606 "SDoc")))) 7607 , FunBind 7608 SrcSpanInfo 7609 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 1 247 41 7610 , srcInfoPoints = [] 7611 } 7612 [ Match 7613 SrcSpanInfo 7614 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 1 247 41 7615 , srcInfoPoints = [] 7616 } 7617 (Ident 7618 SrcSpanInfo 7619 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 1 246 12 7620 , srcInfoPoints = [] 7621 } 7622 "pprRuleBase") 7623 [ PVar 7624 SrcSpanInfo 7625 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 13 246 18 7626 , srcInfoPoints = [] 7627 } 7628 (Ident 7629 SrcSpanInfo 7630 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 13 246 18 7631 , srcInfoPoints = [] 7632 } 7633 "rules") 7634 ] 7635 (UnGuardedRhs 7636 SrcSpanInfo 7637 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 19 247 41 7638 , srcInfoPoints = 7639 [ SrcSpan "tests/examples/RealGHC.lhs" 246 19 246 20 ] 7640 } 7641 (App 7642 SrcSpanInfo 7643 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 21 247 41 7644 , srcInfoPoints = [] 7645 } 7646 (Var 7647 SrcSpanInfo 7648 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 21 246 25 7649 , srcInfoPoints = [] 7650 } 7651 (UnQual 7652 SrcSpanInfo 7653 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 21 246 25 7654 , srcInfoPoints = [] 7655 } 7656 (Ident 7657 SrcSpanInfo 7658 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 21 246 25 7659 , srcInfoPoints = [] 7660 } 7661 "vcat"))) 7662 (ListComp 7663 SrcSpanInfo 7664 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 26 247 41 7665 , srcInfoPoints = 7666 [ SrcSpan "tests/examples/RealGHC.lhs" 246 26 246 27 7667 , SrcSpan "tests/examples/RealGHC.lhs" 247 14 247 15 7668 , SrcSpan "tests/examples/RealGHC.lhs" 247 40 247 41 7669 ] 7670 } 7671 (App 7672 SrcSpanInfo 7673 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 28 246 64 7674 , srcInfoPoints = [] 7675 } 7676 (Var 7677 SrcSpanInfo 7678 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 28 246 36 7679 , srcInfoPoints = [] 7680 } 7681 (UnQual 7682 SrcSpanInfo 7683 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 28 246 36 7684 , srcInfoPoints = [] 7685 } 7686 (Ident 7687 SrcSpanInfo 7688 { srcInfoSpan = 7689 SrcSpan "tests/examples/RealGHC.lhs" 246 28 246 36 7690 , srcInfoPoints = [] 7691 } 7692 "pprRules"))) 7693 (Paren 7694 SrcSpanInfo 7695 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 37 246 64 7696 , srcInfoPoints = 7697 [ SrcSpan "tests/examples/RealGHC.lhs" 246 37 246 38 7698 , SrcSpan "tests/examples/RealGHC.lhs" 246 63 246 64 7699 ] 7700 } 7701 (App 7702 SrcSpanInfo 7703 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 246 38 246 63 7704 , srcInfoPoints = [] 7705 } 7706 (App 7707 SrcSpanInfo 7708 { srcInfoSpan = 7709 SrcSpan "tests/examples/RealGHC.lhs" 246 38 246 60 7710 , srcInfoPoints = [] 7711 } 7712 (Var 7713 SrcSpanInfo 7714 { srcInfoSpan = 7715 SrcSpan "tests/examples/RealGHC.lhs" 246 38 246 47 7716 , srcInfoPoints = [] 7717 } 7718 (UnQual 7719 SrcSpanInfo 7720 { srcInfoSpan = 7721 SrcSpan "tests/examples/RealGHC.lhs" 246 38 246 47 7722 , srcInfoPoints = [] 7723 } 7724 (Ident 7725 SrcSpanInfo 7726 { srcInfoSpan = 7727 SrcSpan "tests/examples/RealGHC.lhs" 246 38 246 47 7728 , srcInfoPoints = [] 7729 } 7730 "tidyRules"))) 7731 (Var 7732 SrcSpanInfo 7733 { srcInfoSpan = 7734 SrcSpan "tests/examples/RealGHC.lhs" 246 48 246 60 7735 , srcInfoPoints = [] 7736 } 7737 (UnQual 7738 SrcSpanInfo 7739 { srcInfoSpan = 7740 SrcSpan "tests/examples/RealGHC.lhs" 246 48 246 60 7741 , srcInfoPoints = [] 7742 } 7743 (Ident 7744 SrcSpanInfo 7745 { srcInfoSpan = 7746 SrcSpan "tests/examples/RealGHC.lhs" 246 48 246 60 7747 , srcInfoPoints = [] 7748 } 7749 "emptyTidyEnv")))) 7750 (Var 7751 SrcSpanInfo 7752 { srcInfoSpan = 7753 SrcSpan "tests/examples/RealGHC.lhs" 246 61 246 63 7754 , srcInfoPoints = [] 7755 } 7756 (UnQual 7757 SrcSpanInfo 7758 { srcInfoSpan = 7759 SrcSpan "tests/examples/RealGHC.lhs" 246 61 246 63 7760 , srcInfoPoints = [] 7761 } 7762 (Ident 7763 SrcSpanInfo 7764 { srcInfoSpan = 7765 SrcSpan "tests/examples/RealGHC.lhs" 246 61 246 63 7766 , srcInfoPoints = [] 7767 } 7768 "rs")))))) 7769 [ QualStmt 7770 SrcSpanInfo 7771 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 247 16 247 39 7772 , srcInfoPoints = 7773 [ SrcSpan "tests/examples/RealGHC.lhs" 247 19 247 21 ] 7774 } 7775 (Generator 7776 SrcSpanInfo 7777 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 247 16 247 39 7778 , srcInfoPoints = 7779 [ SrcSpan "tests/examples/RealGHC.lhs" 247 19 247 21 ] 7780 } 7781 (PVar 7782 SrcSpanInfo 7783 { srcInfoSpan = 7784 SrcSpan "tests/examples/RealGHC.lhs" 247 16 247 18 7785 , srcInfoPoints = [] 7786 } 7787 (Ident 7788 SrcSpanInfo 7789 { srcInfoSpan = 7790 SrcSpan "tests/examples/RealGHC.lhs" 247 16 247 18 7791 , srcInfoPoints = [] 7792 } 7793 "rs")) 7794 (App 7795 SrcSpanInfo 7796 { srcInfoSpan = 7797 SrcSpan "tests/examples/RealGHC.lhs" 247 22 247 39 7798 , srcInfoPoints = [] 7799 } 7800 (Var 7801 SrcSpanInfo 7802 { srcInfoSpan = 7803 SrcSpan "tests/examples/RealGHC.lhs" 247 22 247 33 7804 , srcInfoPoints = [] 7805 } 7806 (UnQual 7807 SrcSpanInfo 7808 { srcInfoSpan = 7809 SrcSpan "tests/examples/RealGHC.lhs" 247 22 247 33 7810 , srcInfoPoints = [] 7811 } 7812 (Ident 7813 SrcSpanInfo 7814 { srcInfoSpan = 7815 SrcSpan "tests/examples/RealGHC.lhs" 247 22 247 33 7816 , srcInfoPoints = [] 7817 } 7818 "nameEnvElts"))) 7819 (Var 7820 SrcSpanInfo 7821 { srcInfoSpan = 7822 SrcSpan "tests/examples/RealGHC.lhs" 247 34 247 39 7823 , srcInfoPoints = [] 7824 } 7825 (UnQual 7826 SrcSpanInfo 7827 { srcInfoSpan = 7828 SrcSpan "tests/examples/RealGHC.lhs" 247 34 247 39 7829 , srcInfoPoints = [] 7830 } 7831 (Ident 7832 SrcSpanInfo 7833 { srcInfoSpan = 7834 SrcSpan "tests/examples/RealGHC.lhs" 247 34 247 39 7835 , srcInfoPoints = [] 7836 } 7837 "rules"))))) 7838 ]))) 7839 Nothing 7840 ] 7841 , TypeSig 7842 SrcSpanInfo 7843 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 1 280 52 7844 , srcInfoPoints = 7845 [ SrcSpan "tests/examples/RealGHC.lhs" 278 12 278 14 ] 7846 } 7847 [ Ident 7848 SrcSpanInfo 7849 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 1 278 11 7850 , srcInfoPoints = [] 7851 } 7852 "lookupRule" 7853 ] 7854 (TyFun 7855 SrcSpanInfo 7856 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 15 280 52 7857 , srcInfoPoints = 7858 [ SrcSpan "tests/examples/RealGHC.lhs" 278 36 278 38 ] 7859 } 7860 (TyParen 7861 SrcSpanInfo 7862 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 15 278 35 7863 , srcInfoPoints = 7864 [ SrcSpan "tests/examples/RealGHC.lhs" 278 15 278 16 7865 , SrcSpan "tests/examples/RealGHC.lhs" 278 34 278 35 7866 ] 7867 } 7868 (TyFun 7869 SrcSpanInfo 7870 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 16 278 34 7871 , srcInfoPoints = 7872 [ SrcSpan "tests/examples/RealGHC.lhs" 278 27 278 29 ] 7873 } 7874 (TyCon 7875 SrcSpanInfo 7876 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 16 278 26 7877 , srcInfoPoints = [] 7878 } 7879 (UnQual 7880 SrcSpanInfo 7881 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 16 278 26 7882 , srcInfoPoints = [] 7883 } 7884 (Ident 7885 SrcSpanInfo 7886 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 16 278 26 7887 , srcInfoPoints = [] 7888 } 7889 "Activation"))) 7890 (TyCon 7891 SrcSpanInfo 7892 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 30 278 34 7893 , srcInfoPoints = [] 7894 } 7895 (UnQual 7896 SrcSpanInfo 7897 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 30 278 34 7898 , srcInfoPoints = [] 7899 } 7900 (Ident 7901 SrcSpanInfo 7902 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 30 278 34 7903 , srcInfoPoints = [] 7904 } 7905 "Bool"))))) 7906 (TyFun 7907 SrcSpanInfo 7908 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 39 280 52 7909 , srcInfoPoints = 7910 [ SrcSpan "tests/examples/RealGHC.lhs" 279 9 279 11 ] 7911 } 7912 (TyCon 7913 SrcSpanInfo 7914 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 39 278 49 7915 , srcInfoPoints = [] 7916 } 7917 (UnQual 7918 SrcSpanInfo 7919 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 39 278 49 7920 , srcInfoPoints = [] 7921 } 7922 (Ident 7923 SrcSpanInfo 7924 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 278 39 278 49 7925 , srcInfoPoints = [] 7926 } 7927 "InScopeSet"))) 7928 (TyFun 7929 SrcSpanInfo 7930 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 279 12 280 52 7931 , srcInfoPoints = 7932 [ SrcSpan "tests/examples/RealGHC.lhs" 279 15 279 17 ] 7933 } 7934 (TyCon 7935 SrcSpanInfo 7936 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 279 12 279 14 7937 , srcInfoPoints = [] 7938 } 7939 (UnQual 7940 SrcSpanInfo 7941 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 279 12 279 14 7942 , srcInfoPoints = [] 7943 } 7944 (Ident 7945 SrcSpanInfo 7946 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 279 12 279 14 7947 , srcInfoPoints = [] 7948 } 7949 "Id"))) 7950 (TyFun 7951 SrcSpanInfo 7952 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 279 18 280 52 7953 , srcInfoPoints = 7954 [ SrcSpan "tests/examples/RealGHC.lhs" 280 9 280 11 ] 7955 } 7956 (TyList 7957 SrcSpanInfo 7958 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 279 18 279 28 7959 , srcInfoPoints = 7960 [ SrcSpan "tests/examples/RealGHC.lhs" 279 18 279 19 7961 , SrcSpan "tests/examples/RealGHC.lhs" 279 27 279 28 7962 ] 7963 } 7964 (TyCon 7965 SrcSpanInfo 7966 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 279 19 279 27 7967 , srcInfoPoints = [] 7968 } 7969 (UnQual 7970 SrcSpanInfo 7971 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 279 19 279 27 7972 , srcInfoPoints = [] 7973 } 7974 (Ident 7975 SrcSpanInfo 7976 { srcInfoSpan = 7977 SrcSpan "tests/examples/RealGHC.lhs" 279 19 279 27 7978 , srcInfoPoints = [] 7979 } 7980 "CoreExpr")))) 7981 (TyFun 7982 SrcSpanInfo 7983 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 12 280 52 7984 , srcInfoPoints = 7985 [ SrcSpan "tests/examples/RealGHC.lhs" 280 23 280 25 ] 7986 } 7987 (TyList 7988 SrcSpanInfo 7989 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 12 280 22 7990 , srcInfoPoints = 7991 [ SrcSpan "tests/examples/RealGHC.lhs" 280 12 280 13 7992 , SrcSpan "tests/examples/RealGHC.lhs" 280 21 280 22 7993 ] 7994 } 7995 (TyCon 7996 SrcSpanInfo 7997 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 13 280 21 7998 , srcInfoPoints = [] 7999 } 8000 (UnQual 8001 SrcSpanInfo 8002 { srcInfoSpan = 8003 SrcSpan "tests/examples/RealGHC.lhs" 280 13 280 21 8004 , srcInfoPoints = [] 8005 } 8006 (Ident 8007 SrcSpanInfo 8008 { srcInfoSpan = 8009 SrcSpan "tests/examples/RealGHC.lhs" 280 13 280 21 8010 , srcInfoPoints = [] 8011 } 8012 "CoreRule")))) 8013 (TyApp 8014 SrcSpanInfo 8015 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 26 280 52 8016 , srcInfoPoints = [] 8017 } 8018 (TyCon 8019 SrcSpanInfo 8020 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 26 280 31 8021 , srcInfoPoints = [] 8022 } 8023 (UnQual 8024 SrcSpanInfo 8025 { srcInfoSpan = 8026 SrcSpan "tests/examples/RealGHC.lhs" 280 26 280 31 8027 , srcInfoPoints = [] 8028 } 8029 (Ident 8030 SrcSpanInfo 8031 { srcInfoSpan = 8032 SrcSpan "tests/examples/RealGHC.lhs" 280 26 280 31 8033 , srcInfoPoints = [] 8034 } 8035 "Maybe"))) 8036 (TyTuple 8037 SrcSpanInfo 8038 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 280 32 280 52 8039 , srcInfoPoints = 8040 [ SrcSpan "tests/examples/RealGHC.lhs" 280 32 280 33 8041 , SrcSpan "tests/examples/RealGHC.lhs" 280 41 280 42 8042 , SrcSpan "tests/examples/RealGHC.lhs" 280 51 280 52 8043 ] 8044 } 8045 Boxed 8046 [ TyCon 8047 SrcSpanInfo 8048 { srcInfoSpan = 8049 SrcSpan "tests/examples/RealGHC.lhs" 280 33 280 41 8050 , srcInfoPoints = [] 8051 } 8052 (UnQual 8053 SrcSpanInfo 8054 { srcInfoSpan = 8055 SrcSpan "tests/examples/RealGHC.lhs" 280 33 280 41 8056 , srcInfoPoints = [] 8057 } 8058 (Ident 8059 SrcSpanInfo 8060 { srcInfoSpan = 8061 SrcSpan "tests/examples/RealGHC.lhs" 280 33 280 41 8062 , srcInfoPoints = [] 8063 } 8064 "CoreRule")) 8065 , TyCon 8066 SrcSpanInfo 8067 { srcInfoSpan = 8068 SrcSpan "tests/examples/RealGHC.lhs" 280 43 280 51 8069 , srcInfoPoints = [] 8070 } 8071 (UnQual 8072 SrcSpanInfo 8073 { srcInfoSpan = 8074 SrcSpan "tests/examples/RealGHC.lhs" 280 43 280 51 8075 , srcInfoPoints = [] 8076 } 8077 (Ident 8078 SrcSpanInfo 8079 { srcInfoSpan = 8080 SrcSpan "tests/examples/RealGHC.lhs" 280 43 280 51 8081 , srcInfoPoints = [] 8082 } 8083 "CoreExpr")) 8084 ]))))))) 8085 , FunBind 8086 SrcSpanInfo 8087 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 1 298 36 8088 , srcInfoPoints = 8089 [ SrcSpan "tests/examples/RealGHC.lhs" 289 3 289 8 ] 8090 } 8091 [ Match 8092 SrcSpanInfo 8093 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 1 298 36 8094 , srcInfoPoints = 8095 [ SrcSpan "tests/examples/RealGHC.lhs" 289 3 289 8 ] 8096 } 8097 (Ident 8098 SrcSpanInfo 8099 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 1 284 11 8100 , srcInfoPoints = [] 8101 } 8102 "lookupRule") 8103 [ PVar 8104 SrcSpanInfo 8105 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 12 284 21 8106 , srcInfoPoints = [] 8107 } 8108 (Ident 8109 SrcSpanInfo 8110 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 12 284 21 8111 , srcInfoPoints = [] 8112 } 8113 "is_active") 8114 , PVar 8115 SrcSpanInfo 8116 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 22 284 30 8117 , srcInfoPoints = [] 8118 } 8119 (Ident 8120 SrcSpanInfo 8121 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 22 284 30 8122 , srcInfoPoints = [] 8123 } 8124 "in_scope") 8125 , PVar 8126 SrcSpanInfo 8127 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 31 284 33 8128 , srcInfoPoints = [] 8129 } 8130 (Ident 8131 SrcSpanInfo 8132 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 31 284 33 8133 , srcInfoPoints = [] 8134 } 8135 "fn") 8136 , PVar 8137 SrcSpanInfo 8138 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 34 284 38 8139 , srcInfoPoints = [] 8140 } 8141 (Ident 8142 SrcSpanInfo 8143 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 34 284 38 8144 , srcInfoPoints = [] 8145 } 8146 "args") 8147 , PVar 8148 SrcSpanInfo 8149 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 39 284 44 8150 , srcInfoPoints = [] 8151 } 8152 (Ident 8153 SrcSpanInfo 8154 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 284 39 284 44 8155 , srcInfoPoints = [] 8156 } 8157 "rules") 8158 ] 8159 (UnGuardedRhs 8160 SrcSpanInfo 8161 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 285 3 288 45 8162 , srcInfoPoints = 8163 [ SrcSpan "tests/examples/RealGHC.lhs" 285 3 285 4 ] 8164 } 8165 (Case 8166 SrcSpanInfo 8167 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 5 288 45 8168 , srcInfoPoints = 8169 [ SrcSpan "tests/examples/RealGHC.lhs" 286 5 286 9 8170 , SrcSpan "tests/examples/RealGHC.lhs" 286 22 286 24 8171 , SrcSpan "tests/examples/RealGHC.lhs" 287 5 287 5 8172 , SrcSpan "tests/examples/RealGHC.lhs" 288 5 288 5 8173 , SrcSpan "tests/examples/RealGHC.lhs" 289 3 289 0 8174 ] 8175 } 8176 (App 8177 SrcSpanInfo 8178 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 10 286 21 8179 , srcInfoPoints = [] 8180 } 8181 (App 8182 SrcSpanInfo 8183 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 10 286 15 8184 , srcInfoPoints = [] 8185 } 8186 (Var 8187 SrcSpanInfo 8188 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 10 286 12 8189 , srcInfoPoints = [] 8190 } 8191 (UnQual 8192 SrcSpanInfo 8193 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 10 286 12 8194 , srcInfoPoints = [] 8195 } 8196 (Ident 8197 SrcSpanInfo 8198 { srcInfoSpan = 8199 SrcSpan "tests/examples/RealGHC.lhs" 286 10 286 12 8200 , srcInfoPoints = [] 8201 } 8202 "go"))) 8203 (List 8204 SrcSpanInfo 8205 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 13 286 15 8206 , srcInfoPoints = 8207 [ SrcSpan "tests/examples/RealGHC.lhs" 286 13 286 14 8208 , SrcSpan "tests/examples/RealGHC.lhs" 286 14 286 15 8209 ] 8210 } 8211 [])) 8212 (Var 8213 SrcSpanInfo 8214 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 16 286 21 8215 , srcInfoPoints = [] 8216 } 8217 (UnQual 8218 SrcSpanInfo 8219 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 16 286 21 8220 , srcInfoPoints = [] 8221 } 8222 (Ident 8223 SrcSpanInfo 8224 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 286 16 286 21 8225 , srcInfoPoints = [] 8226 } 8227 "rules")))) 8228 [ Alt 8229 SrcSpanInfo 8230 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 287 5 287 22 8231 , srcInfoPoints = [] 8232 } 8233 (PList 8234 SrcSpanInfo 8235 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 287 5 287 7 8236 , srcInfoPoints = 8237 [ SrcSpan "tests/examples/RealGHC.lhs" 287 5 287 6 8238 , SrcSpan "tests/examples/RealGHC.lhs" 287 6 287 7 8239 ] 8240 } 8241 []) 8242 (UnGuardedRhs 8243 SrcSpanInfo 8244 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 287 12 287 22 8245 , srcInfoPoints = 8246 [ SrcSpan "tests/examples/RealGHC.lhs" 287 12 287 14 ] 8247 } 8248 (Con 8249 SrcSpanInfo 8250 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 287 15 287 22 8251 , srcInfoPoints = [] 8252 } 8253 (UnQual 8254 SrcSpanInfo 8255 { srcInfoSpan = 8256 SrcSpan "tests/examples/RealGHC.lhs" 287 15 287 22 8257 , srcInfoPoints = [] 8258 } 8259 (Ident 8260 SrcSpanInfo 8261 { srcInfoSpan = 8262 SrcSpan "tests/examples/RealGHC.lhs" 287 15 287 22 8263 , srcInfoPoints = [] 8264 } 8265 "Nothing")))) 8266 Nothing 8267 , Alt 8268 SrcSpanInfo 8269 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 5 288 45 8270 , srcInfoPoints = [] 8271 } 8272 (PParen 8273 SrcSpanInfo 8274 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 5 288 11 8275 , srcInfoPoints = 8276 [ SrcSpan "tests/examples/RealGHC.lhs" 288 5 288 6 8277 , SrcSpan "tests/examples/RealGHC.lhs" 288 10 288 11 8278 ] 8279 } 8280 (PInfixApp 8281 SrcSpanInfo 8282 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 6 288 10 8283 , srcInfoPoints = [] 8284 } 8285 (PVar 8286 SrcSpanInfo 8287 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 6 288 7 8288 , srcInfoPoints = [] 8289 } 8290 (Ident 8291 SrcSpanInfo 8292 { srcInfoSpan = 8293 SrcSpan "tests/examples/RealGHC.lhs" 288 6 288 7 8294 , srcInfoPoints = [] 8295 } 8296 "m")) 8297 (Special 8298 SrcSpanInfo 8299 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 7 288 8 8300 , srcInfoPoints = [] 8301 } 8302 (Cons 8303 SrcSpanInfo 8304 { srcInfoSpan = 8305 SrcSpan "tests/examples/RealGHC.lhs" 288 7 288 8 8306 , srcInfoPoints = [] 8307 })) 8308 (PVar 8309 SrcSpanInfo 8310 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 8 288 10 8311 , srcInfoPoints = [] 8312 } 8313 (Ident 8314 SrcSpanInfo 8315 { srcInfoSpan = 8316 SrcSpan "tests/examples/RealGHC.lhs" 288 8 288 10 8317 , srcInfoPoints = [] 8318 } 8319 "ms")))) 8320 (UnGuardedRhs 8321 SrcSpanInfo 8322 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 12 288 45 8323 , srcInfoPoints = 8324 [ SrcSpan "tests/examples/RealGHC.lhs" 288 12 288 14 ] 8325 } 8326 (App 8327 SrcSpanInfo 8328 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 288 15 288 45 8329 , srcInfoPoints = [] 8330 } 8331 (Con 8332 SrcSpanInfo 8333 { srcInfoSpan = 8334 SrcSpan "tests/examples/RealGHC.lhs" 288 15 288 19 8335 , srcInfoPoints = [] 8336 } 8337 (UnQual 8338 SrcSpanInfo 8339 { srcInfoSpan = 8340 SrcSpan "tests/examples/RealGHC.lhs" 288 15 288 19 8341 , srcInfoPoints = [] 8342 } 8343 (Ident 8344 SrcSpanInfo 8345 { srcInfoSpan = 8346 SrcSpan "tests/examples/RealGHC.lhs" 288 15 288 19 8347 , srcInfoPoints = [] 8348 } 8349 "Just"))) 8350 (Paren 8351 SrcSpanInfo 8352 { srcInfoSpan = 8353 SrcSpan "tests/examples/RealGHC.lhs" 288 20 288 45 8354 , srcInfoPoints = 8355 [ SrcSpan "tests/examples/RealGHC.lhs" 288 20 288 21 8356 , SrcSpan "tests/examples/RealGHC.lhs" 288 44 288 45 8357 ] 8358 } 8359 (App 8360 SrcSpanInfo 8361 { srcInfoSpan = 8362 SrcSpan "tests/examples/RealGHC.lhs" 288 21 288 44 8363 , srcInfoPoints = [] 8364 } 8365 (App 8366 SrcSpanInfo 8367 { srcInfoSpan = 8368 SrcSpan "tests/examples/RealGHC.lhs" 288 21 288 41 8369 , srcInfoPoints = [] 8370 } 8371 (App 8372 SrcSpanInfo 8373 { srcInfoSpan = 8374 SrcSpan "tests/examples/RealGHC.lhs" 288 21 288 39 8375 , srcInfoPoints = [] 8376 } 8377 (Var 8378 SrcSpanInfo 8379 { srcInfoSpan = 8380 SrcSpan 8381 "tests/examples/RealGHC.lhs" 288 21 288 29 8382 , srcInfoPoints = [] 8383 } 8384 (UnQual 8385 SrcSpanInfo 8386 { srcInfoSpan = 8387 SrcSpan 8388 "tests/examples/RealGHC.lhs" 288 21 288 29 8389 , srcInfoPoints = [] 8390 } 8391 (Ident 8392 SrcSpanInfo 8393 { srcInfoSpan = 8394 SrcSpan 8395 "tests/examples/RealGHC.lhs" 8396 288 8397 21 8398 288 8399 29 8400 , srcInfoPoints = [] 8401 } 8402 "findBest"))) 8403 (Tuple 8404 SrcSpanInfo 8405 { srcInfoSpan = 8406 SrcSpan 8407 "tests/examples/RealGHC.lhs" 288 30 288 39 8408 , srcInfoPoints = 8409 [ SrcSpan 8410 "tests/examples/RealGHC.lhs" 288 30 288 31 8411 , SrcSpan 8412 "tests/examples/RealGHC.lhs" 288 33 288 34 8413 , SrcSpan 8414 "tests/examples/RealGHC.lhs" 288 38 288 39 8415 ] 8416 } 8417 Boxed 8418 [ Var 8419 SrcSpanInfo 8420 { srcInfoSpan = 8421 SrcSpan 8422 "tests/examples/RealGHC.lhs" 288 31 288 33 8423 , srcInfoPoints = [] 8424 } 8425 (UnQual 8426 SrcSpanInfo 8427 { srcInfoSpan = 8428 SrcSpan 8429 "tests/examples/RealGHC.lhs" 8430 288 8431 31 8432 288 8433 33 8434 , srcInfoPoints = [] 8435 } 8436 (Ident 8437 SrcSpanInfo 8438 { srcInfoSpan = 8439 SrcSpan 8440 "tests/examples/RealGHC.lhs" 8441 288 8442 31 8443 288 8444 33 8445 , srcInfoPoints = [] 8446 } 8447 "fn")) 8448 , Var 8449 SrcSpanInfo 8450 { srcInfoSpan = 8451 SrcSpan 8452 "tests/examples/RealGHC.lhs" 288 34 288 38 8453 , srcInfoPoints = [] 8454 } 8455 (UnQual 8456 SrcSpanInfo 8457 { srcInfoSpan = 8458 SrcSpan 8459 "tests/examples/RealGHC.lhs" 8460 288 8461 34 8462 288 8463 38 8464 , srcInfoPoints = [] 8465 } 8466 (Ident 8467 SrcSpanInfo 8468 { srcInfoSpan = 8469 SrcSpan 8470 "tests/examples/RealGHC.lhs" 8471 288 8472 34 8473 288 8474 38 8475 , srcInfoPoints = [] 8476 } 8477 "args")) 8478 ])) 8479 (Var 8480 SrcSpanInfo 8481 { srcInfoSpan = 8482 SrcSpan "tests/examples/RealGHC.lhs" 288 40 288 41 8483 , srcInfoPoints = [] 8484 } 8485 (UnQual 8486 SrcSpanInfo 8487 { srcInfoSpan = 8488 SrcSpan 8489 "tests/examples/RealGHC.lhs" 288 40 288 41 8490 , srcInfoPoints = [] 8491 } 8492 (Ident 8493 SrcSpanInfo 8494 { srcInfoSpan = 8495 SrcSpan 8496 "tests/examples/RealGHC.lhs" 288 40 288 41 8497 , srcInfoPoints = [] 8498 } 8499 "m")))) 8500 (Var 8501 SrcSpanInfo 8502 { srcInfoSpan = 8503 SrcSpan "tests/examples/RealGHC.lhs" 288 42 288 44 8504 , srcInfoPoints = [] 8505 } 8506 (UnQual 8507 SrcSpanInfo 8508 { srcInfoSpan = 8509 SrcSpan "tests/examples/RealGHC.lhs" 288 42 288 44 8510 , srcInfoPoints = [] 8511 } 8512 (Ident 8513 SrcSpanInfo 8514 { srcInfoSpan = 8515 SrcSpan 8516 "tests/examples/RealGHC.lhs" 288 42 288 44 8517 , srcInfoPoints = [] 8518 } 8519 "ms"))))))) 8520 Nothing 8521 ])) 8522 (Just 8523 (BDecls 8524 SrcSpanInfo 8525 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 5 298 36 8526 , srcInfoPoints = 8527 [ SrcSpan "tests/examples/RealGHC.lhs" 290 5 290 5 8528 , SrcSpan "tests/examples/RealGHC.lhs" 292 5 292 5 8529 , SrcSpan "tests/examples/RealGHC.lhs" 293 5 293 5 8530 , SrcSpan "tests/examples/RealGHC.lhs" 294 5 294 5 8531 , SrcSpan "tests/examples/RealGHC.lhs" 300 1 300 0 8532 ] 8533 } 8534 [ PatBind 8535 SrcSpanInfo 8536 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 5 290 39 8537 , srcInfoPoints = [] 8538 } 8539 (PVar 8540 SrcSpanInfo 8541 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 5 290 15 8542 , srcInfoPoints = [] 8543 } 8544 (Ident 8545 SrcSpanInfo 8546 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 5 290 15 8547 , srcInfoPoints = [] 8548 } 8549 "rough_args")) 8550 (UnGuardedRhs 8551 SrcSpanInfo 8552 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 16 290 39 8553 , srcInfoPoints = 8554 [ SrcSpan "tests/examples/RealGHC.lhs" 290 16 290 17 ] 8555 } 8556 (App 8557 SrcSpanInfo 8558 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 290 18 290 39 8559 , srcInfoPoints = [] 8560 } 8561 (App 8562 SrcSpanInfo 8563 { srcInfoSpan = 8564 SrcSpan "tests/examples/RealGHC.lhs" 290 18 290 34 8565 , srcInfoPoints = [] 8566 } 8567 (Var 8568 SrcSpanInfo 8569 { srcInfoSpan = 8570 SrcSpan "tests/examples/RealGHC.lhs" 290 18 290 21 8571 , srcInfoPoints = [] 8572 } 8573 (UnQual 8574 SrcSpanInfo 8575 { srcInfoSpan = 8576 SrcSpan "tests/examples/RealGHC.lhs" 290 18 290 21 8577 , srcInfoPoints = [] 8578 } 8579 (Ident 8580 SrcSpanInfo 8581 { srcInfoSpan = 8582 SrcSpan "tests/examples/RealGHC.lhs" 290 18 290 21 8583 , srcInfoPoints = [] 8584 } 8585 "map"))) 8586 (Var 8587 SrcSpanInfo 8588 { srcInfoSpan = 8589 SrcSpan "tests/examples/RealGHC.lhs" 290 22 290 34 8590 , srcInfoPoints = [] 8591 } 8592 (UnQual 8593 SrcSpanInfo 8594 { srcInfoSpan = 8595 SrcSpan "tests/examples/RealGHC.lhs" 290 22 290 34 8596 , srcInfoPoints = [] 8597 } 8598 (Ident 8599 SrcSpanInfo 8600 { srcInfoSpan = 8601 SrcSpan "tests/examples/RealGHC.lhs" 290 22 290 34 8602 , srcInfoPoints = [] 8603 } 8604 "roughTopName")))) 8605 (Var 8606 SrcSpanInfo 8607 { srcInfoSpan = 8608 SrcSpan "tests/examples/RealGHC.lhs" 290 35 290 39 8609 , srcInfoPoints = [] 8610 } 8611 (UnQual 8612 SrcSpanInfo 8613 { srcInfoSpan = 8614 SrcSpan "tests/examples/RealGHC.lhs" 290 35 290 39 8615 , srcInfoPoints = [] 8616 } 8617 (Ident 8618 SrcSpanInfo 8619 { srcInfoSpan = 8620 SrcSpan "tests/examples/RealGHC.lhs" 290 35 290 39 8621 , srcInfoPoints = [] 8622 } 8623 "args"))))) 8624 Nothing 8625 , TypeSig 8626 SrcSpanInfo 8627 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 5 292 71 8628 , srcInfoPoints = 8629 [ SrcSpan "tests/examples/RealGHC.lhs" 292 8 292 10 ] 8630 } 8631 [ Ident 8632 SrcSpanInfo 8633 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 5 292 7 8634 , srcInfoPoints = [] 8635 } 8636 "go" 8637 ] 8638 (TyFun 8639 SrcSpanInfo 8640 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 11 292 71 8641 , srcInfoPoints = 8642 [ SrcSpan "tests/examples/RealGHC.lhs" 292 33 292 35 ] 8643 } 8644 (TyList 8645 SrcSpanInfo 8646 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 11 292 32 8647 , srcInfoPoints = 8648 [ SrcSpan "tests/examples/RealGHC.lhs" 292 11 292 12 8649 , SrcSpan "tests/examples/RealGHC.lhs" 292 31 292 32 8650 ] 8651 } 8652 (TyTuple 8653 SrcSpanInfo 8654 { srcInfoSpan = 8655 SrcSpan "tests/examples/RealGHC.lhs" 292 12 292 31 8656 , srcInfoPoints = 8657 [ SrcSpan "tests/examples/RealGHC.lhs" 292 12 292 13 8658 , SrcSpan "tests/examples/RealGHC.lhs" 292 21 292 22 8659 , SrcSpan "tests/examples/RealGHC.lhs" 292 30 292 31 8660 ] 8661 } 8662 Boxed 8663 [ TyCon 8664 SrcSpanInfo 8665 { srcInfoSpan = 8666 SrcSpan "tests/examples/RealGHC.lhs" 292 13 292 21 8667 , srcInfoPoints = [] 8668 } 8669 (UnQual 8670 SrcSpanInfo 8671 { srcInfoSpan = 8672 SrcSpan "tests/examples/RealGHC.lhs" 292 13 292 21 8673 , srcInfoPoints = [] 8674 } 8675 (Ident 8676 SrcSpanInfo 8677 { srcInfoSpan = 8678 SrcSpan "tests/examples/RealGHC.lhs" 292 13 292 21 8679 , srcInfoPoints = [] 8680 } 8681 "CoreRule")) 8682 , TyCon 8683 SrcSpanInfo 8684 { srcInfoSpan = 8685 SrcSpan "tests/examples/RealGHC.lhs" 292 22 292 30 8686 , srcInfoPoints = [] 8687 } 8688 (UnQual 8689 SrcSpanInfo 8690 { srcInfoSpan = 8691 SrcSpan "tests/examples/RealGHC.lhs" 292 22 292 30 8692 , srcInfoPoints = [] 8693 } 8694 (Ident 8695 SrcSpanInfo 8696 { srcInfoSpan = 8697 SrcSpan "tests/examples/RealGHC.lhs" 292 22 292 30 8698 , srcInfoPoints = [] 8699 } 8700 "CoreExpr")) 8701 ])) 8702 (TyFun 8703 SrcSpanInfo 8704 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 292 36 292 71 8705 , srcInfoPoints = 8706 [ SrcSpan "tests/examples/RealGHC.lhs" 292 47 292 49 ] 8707 } 8708 (TyList 8709 SrcSpanInfo 8710 { srcInfoSpan = 8711 SrcSpan "tests/examples/RealGHC.lhs" 292 36 292 46 8712 , srcInfoPoints = 8713 [ SrcSpan "tests/examples/RealGHC.lhs" 292 36 292 37 8714 , SrcSpan "tests/examples/RealGHC.lhs" 292 45 292 46 8715 ] 8716 } 8717 (TyCon 8718 SrcSpanInfo 8719 { srcInfoSpan = 8720 SrcSpan "tests/examples/RealGHC.lhs" 292 37 292 45 8721 , srcInfoPoints = [] 8722 } 8723 (UnQual 8724 SrcSpanInfo 8725 { srcInfoSpan = 8726 SrcSpan "tests/examples/RealGHC.lhs" 292 37 292 45 8727 , srcInfoPoints = [] 8728 } 8729 (Ident 8730 SrcSpanInfo 8731 { srcInfoSpan = 8732 SrcSpan "tests/examples/RealGHC.lhs" 292 37 292 45 8733 , srcInfoPoints = [] 8734 } 8735 "CoreRule")))) 8736 (TyList 8737 SrcSpanInfo 8738 { srcInfoSpan = 8739 SrcSpan "tests/examples/RealGHC.lhs" 292 50 292 71 8740 , srcInfoPoints = 8741 [ SrcSpan "tests/examples/RealGHC.lhs" 292 50 292 51 8742 , SrcSpan "tests/examples/RealGHC.lhs" 292 70 292 71 8743 ] 8744 } 8745 (TyTuple 8746 SrcSpanInfo 8747 { srcInfoSpan = 8748 SrcSpan "tests/examples/RealGHC.lhs" 292 51 292 70 8749 , srcInfoPoints = 8750 [ SrcSpan "tests/examples/RealGHC.lhs" 292 51 292 52 8751 , SrcSpan "tests/examples/RealGHC.lhs" 292 60 292 61 8752 , SrcSpan "tests/examples/RealGHC.lhs" 292 69 292 70 8753 ] 8754 } 8755 Boxed 8756 [ TyCon 8757 SrcSpanInfo 8758 { srcInfoSpan = 8759 SrcSpan "tests/examples/RealGHC.lhs" 292 52 292 60 8760 , srcInfoPoints = [] 8761 } 8762 (UnQual 8763 SrcSpanInfo 8764 { srcInfoSpan = 8765 SrcSpan "tests/examples/RealGHC.lhs" 292 52 292 60 8766 , srcInfoPoints = [] 8767 } 8768 (Ident 8769 SrcSpanInfo 8770 { srcInfoSpan = 8771 SrcSpan 8772 "tests/examples/RealGHC.lhs" 292 52 292 60 8773 , srcInfoPoints = [] 8774 } 8775 "CoreRule")) 8776 , TyCon 8777 SrcSpanInfo 8778 { srcInfoSpan = 8779 SrcSpan "tests/examples/RealGHC.lhs" 292 61 292 69 8780 , srcInfoPoints = [] 8781 } 8782 (UnQual 8783 SrcSpanInfo 8784 { srcInfoSpan = 8785 SrcSpan "tests/examples/RealGHC.lhs" 292 61 292 69 8786 , srcInfoPoints = [] 8787 } 8788 (Ident 8789 SrcSpanInfo 8790 { srcInfoSpan = 8791 SrcSpan 8792 "tests/examples/RealGHC.lhs" 292 61 292 69 8793 , srcInfoPoints = [] 8794 } 8795 "CoreExpr")) 8796 ])))) 8797 , FunBind 8798 SrcSpanInfo 8799 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 293 5 298 36 8800 , srcInfoPoints = [] 8801 } 8802 [ Match 8803 SrcSpanInfo 8804 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 293 5 293 28 8805 , srcInfoPoints = [] 8806 } 8807 (Ident 8808 SrcSpanInfo 8809 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 293 5 293 7 8810 , srcInfoPoints = [] 8811 } 8812 "go") 8813 [ PVar 8814 SrcSpanInfo 8815 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 293 8 293 10 8816 , srcInfoPoints = [] 8817 } 8818 (Ident 8819 SrcSpanInfo 8820 { srcInfoSpan = 8821 SrcSpan "tests/examples/RealGHC.lhs" 293 8 293 10 8822 , srcInfoPoints = [] 8823 } 8824 "ms") 8825 , PList 8826 SrcSpanInfo 8827 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 293 11 293 13 8828 , srcInfoPoints = 8829 [ SrcSpan "tests/examples/RealGHC.lhs" 293 11 293 12 8830 , SrcSpan "tests/examples/RealGHC.lhs" 293 12 293 13 8831 ] 8832 } 8833 [] 8834 ] 8835 (UnGuardedRhs 8836 SrcSpanInfo 8837 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 293 24 293 28 8838 , srcInfoPoints = 8839 [ SrcSpan "tests/examples/RealGHC.lhs" 293 24 293 25 ] 8840 } 8841 (Var 8842 SrcSpanInfo 8843 { srcInfoSpan = 8844 SrcSpan "tests/examples/RealGHC.lhs" 293 26 293 28 8845 , srcInfoPoints = [] 8846 } 8847 (UnQual 8848 SrcSpanInfo 8849 { srcInfoSpan = 8850 SrcSpan "tests/examples/RealGHC.lhs" 293 26 293 28 8851 , srcInfoPoints = [] 8852 } 8853 (Ident 8854 SrcSpanInfo 8855 { srcInfoSpan = 8856 SrcSpan "tests/examples/RealGHC.lhs" 293 26 293 28 8857 , srcInfoPoints = [] 8858 } 8859 "ms")))) 8860 Nothing 8861 , Match 8862 SrcSpanInfo 8863 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 5 298 36 8864 , srcInfoPoints = [] 8865 } 8866 (Ident 8867 SrcSpanInfo 8868 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 5 294 7 8869 , srcInfoPoints = [] 8870 } 8871 "go") 8872 [ PVar 8873 SrcSpanInfo 8874 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 8 294 10 8875 , srcInfoPoints = [] 8876 } 8877 (Ident 8878 SrcSpanInfo 8879 { srcInfoSpan = 8880 SrcSpan "tests/examples/RealGHC.lhs" 294 8 294 10 8881 , srcInfoPoints = [] 8882 } 8883 "ms") 8884 , PParen 8885 SrcSpanInfo 8886 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 11 294 17 8887 , srcInfoPoints = 8888 [ SrcSpan "tests/examples/RealGHC.lhs" 294 11 294 12 8889 , SrcSpan "tests/examples/RealGHC.lhs" 294 16 294 17 8890 ] 8891 } 8892 (PInfixApp 8893 SrcSpanInfo 8894 { srcInfoSpan = 8895 SrcSpan "tests/examples/RealGHC.lhs" 294 12 294 16 8896 , srcInfoPoints = [] 8897 } 8898 (PVar 8899 SrcSpanInfo 8900 { srcInfoSpan = 8901 SrcSpan "tests/examples/RealGHC.lhs" 294 12 294 13 8902 , srcInfoPoints = [] 8903 } 8904 (Ident 8905 SrcSpanInfo 8906 { srcInfoSpan = 8907 SrcSpan "tests/examples/RealGHC.lhs" 294 12 294 13 8908 , srcInfoPoints = [] 8909 } 8910 "r")) 8911 (Special 8912 SrcSpanInfo 8913 { srcInfoSpan = 8914 SrcSpan "tests/examples/RealGHC.lhs" 294 13 294 14 8915 , srcInfoPoints = [] 8916 } 8917 (Cons 8918 SrcSpanInfo 8919 { srcInfoSpan = 8920 SrcSpan "tests/examples/RealGHC.lhs" 294 13 294 14 8921 , srcInfoPoints = [] 8922 })) 8923 (PVar 8924 SrcSpanInfo 8925 { srcInfoSpan = 8926 SrcSpan "tests/examples/RealGHC.lhs" 294 14 294 16 8927 , srcInfoPoints = [] 8928 } 8929 (Ident 8930 SrcSpanInfo 8931 { srcInfoSpan = 8932 SrcSpan "tests/examples/RealGHC.lhs" 294 14 294 16 8933 , srcInfoPoints = [] 8934 } 8935 "rs"))) 8936 ] 8937 (UnGuardedRhs 8938 SrcSpanInfo 8939 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 294 18 298 36 8940 , srcInfoPoints = 8941 [ SrcSpan "tests/examples/RealGHC.lhs" 294 18 294 19 ] 8942 } 8943 (Case 8944 SrcSpanInfo 8945 { srcInfoSpan = 8946 SrcSpan "tests/examples/RealGHC.lhs" 294 20 298 36 8947 , srcInfoPoints = 8948 [ SrcSpan "tests/examples/RealGHC.lhs" 294 20 294 24 8949 , SrcSpan "tests/examples/RealGHC.lhs" 294 74 294 76 8950 , SrcSpan "tests/examples/RealGHC.lhs" 295 13 295 13 8951 , SrcSpan "tests/examples/RealGHC.lhs" 296 13 296 13 8952 , SrcSpan "tests/examples/RealGHC.lhs" 300 1 300 0 8953 ] 8954 } 8955 (Paren 8956 SrcSpanInfo 8957 { srcInfoSpan = 8958 SrcSpan "tests/examples/RealGHC.lhs" 294 25 294 73 8959 , srcInfoPoints = 8960 [ SrcSpan "tests/examples/RealGHC.lhs" 294 25 294 26 8961 , SrcSpan "tests/examples/RealGHC.lhs" 294 72 294 73 8962 ] 8963 } 8964 (App 8965 SrcSpanInfo 8966 { srcInfoSpan = 8967 SrcSpan "tests/examples/RealGHC.lhs" 294 26 294 72 8968 , srcInfoPoints = [] 8969 } 8970 (App 8971 SrcSpanInfo 8972 { srcInfoSpan = 8973 SrcSpan "tests/examples/RealGHC.lhs" 294 26 294 70 8974 , srcInfoPoints = [] 8975 } 8976 (App 8977 SrcSpanInfo 8978 { srcInfoSpan = 8979 SrcSpan 8980 "tests/examples/RealGHC.lhs" 294 26 294 59 8981 , srcInfoPoints = [] 8982 } 8983 (App 8984 SrcSpanInfo 8985 { srcInfoSpan = 8986 SrcSpan 8987 "tests/examples/RealGHC.lhs" 294 26 294 54 8988 , srcInfoPoints = [] 8989 } 8990 (App 8991 SrcSpanInfo 8992 { srcInfoSpan = 8993 SrcSpan 8994 "tests/examples/RealGHC.lhs" 8995 294 8996 26 8997 294 8998 45 8999 , srcInfoPoints = [] 9000 } 9001 (Var 9002 SrcSpanInfo 9003 { srcInfoSpan = 9004 SrcSpan 9005 "tests/examples/RealGHC.lhs" 9006 294 9007 26 9008 294 9009 35 9010 , srcInfoPoints = [] 9011 } 9012 (UnQual 9013 SrcSpanInfo 9014 { srcInfoSpan = 9015 SrcSpan 9016 "tests/examples/RealGHC.lhs" 9017 294 9018 26 9019 294 9020 35 9021 , srcInfoPoints = [] 9022 } 9023 (Ident 9024 SrcSpanInfo 9025 { srcInfoSpan = 9026 SrcSpan 9027 "tests/examples/RealGHC.lhs" 9028 294 9029 26 9030 294 9031 35 9032 , srcInfoPoints = [] 9033 } 9034 "matchRule"))) 9035 (Var 9036 SrcSpanInfo 9037 { srcInfoSpan = 9038 SrcSpan 9039 "tests/examples/RealGHC.lhs" 9040 294 9041 36 9042 294 9043 45 9044 , srcInfoPoints = [] 9045 } 9046 (UnQual 9047 SrcSpanInfo 9048 { srcInfoSpan = 9049 SrcSpan 9050 "tests/examples/RealGHC.lhs" 9051 294 9052 36 9053 294 9054 45 9055 , srcInfoPoints = [] 9056 } 9057 (Ident 9058 SrcSpanInfo 9059 { srcInfoSpan = 9060 SrcSpan 9061 "tests/examples/RealGHC.lhs" 9062 294 9063 36 9064 294 9065 45 9066 , srcInfoPoints = [] 9067 } 9068 "is_active")))) 9069 (Var 9070 SrcSpanInfo 9071 { srcInfoSpan = 9072 SrcSpan 9073 "tests/examples/RealGHC.lhs" 9074 294 9075 46 9076 294 9077 54 9078 , srcInfoPoints = [] 9079 } 9080 (UnQual 9081 SrcSpanInfo 9082 { srcInfoSpan = 9083 SrcSpan 9084 "tests/examples/RealGHC.lhs" 9085 294 9086 46 9087 294 9088 54 9089 , srcInfoPoints = [] 9090 } 9091 (Ident 9092 SrcSpanInfo 9093 { srcInfoSpan = 9094 SrcSpan 9095 "tests/examples/RealGHC.lhs" 9096 294 9097 46 9098 294 9099 54 9100 , srcInfoPoints = [] 9101 } 9102 "in_scope")))) 9103 (Var 9104 SrcSpanInfo 9105 { srcInfoSpan = 9106 SrcSpan 9107 "tests/examples/RealGHC.lhs" 294 55 294 59 9108 , srcInfoPoints = [] 9109 } 9110 (UnQual 9111 SrcSpanInfo 9112 { srcInfoSpan = 9113 SrcSpan 9114 "tests/examples/RealGHC.lhs" 9115 294 9116 55 9117 294 9118 59 9119 , srcInfoPoints = [] 9120 } 9121 (Ident 9122 SrcSpanInfo 9123 { srcInfoSpan = 9124 SrcSpan 9125 "tests/examples/RealGHC.lhs" 9126 294 9127 55 9128 294 9129 59 9130 , srcInfoPoints = [] 9131 } 9132 "args")))) 9133 (Var 9134 SrcSpanInfo 9135 { srcInfoSpan = 9136 SrcSpan 9137 "tests/examples/RealGHC.lhs" 294 60 294 70 9138 , srcInfoPoints = [] 9139 } 9140 (UnQual 9141 SrcSpanInfo 9142 { srcInfoSpan = 9143 SrcSpan 9144 "tests/examples/RealGHC.lhs" 294 60 294 70 9145 , srcInfoPoints = [] 9146 } 9147 (Ident 9148 SrcSpanInfo 9149 { srcInfoSpan = 9150 SrcSpan 9151 "tests/examples/RealGHC.lhs" 9152 294 9153 60 9154 294 9155 70 9156 , srcInfoPoints = [] 9157 } 9158 "rough_args")))) 9159 (Var 9160 SrcSpanInfo 9161 { srcInfoSpan = 9162 SrcSpan "tests/examples/RealGHC.lhs" 294 71 294 72 9163 , srcInfoPoints = [] 9164 } 9165 (UnQual 9166 SrcSpanInfo 9167 { srcInfoSpan = 9168 SrcSpan 9169 "tests/examples/RealGHC.lhs" 294 71 294 72 9170 , srcInfoPoints = [] 9171 } 9172 (Ident 9173 SrcSpanInfo 9174 { srcInfoSpan = 9175 SrcSpan 9176 "tests/examples/RealGHC.lhs" 294 71 294 72 9177 , srcInfoPoints = [] 9178 } 9179 "r"))))) 9180 [ Alt 9181 SrcSpanInfo 9182 { srcInfoSpan = 9183 SrcSpan "tests/examples/RealGHC.lhs" 295 13 295 40 9184 , srcInfoPoints = [] 9185 } 9186 (PApp 9187 SrcSpanInfo 9188 { srcInfoSpan = 9189 SrcSpan "tests/examples/RealGHC.lhs" 295 13 295 19 9190 , srcInfoPoints = [] 9191 } 9192 (UnQual 9193 SrcSpanInfo 9194 { srcInfoSpan = 9195 SrcSpan "tests/examples/RealGHC.lhs" 295 13 295 17 9196 , srcInfoPoints = [] 9197 } 9198 (Ident 9199 SrcSpanInfo 9200 { srcInfoSpan = 9201 SrcSpan 9202 "tests/examples/RealGHC.lhs" 295 13 295 17 9203 , srcInfoPoints = [] 9204 } 9205 "Just")) 9206 [ PVar 9207 SrcSpanInfo 9208 { srcInfoSpan = 9209 SrcSpan 9210 "tests/examples/RealGHC.lhs" 295 18 295 19 9211 , srcInfoPoints = [] 9212 } 9213 (Ident 9214 SrcSpanInfo 9215 { srcInfoSpan = 9216 SrcSpan 9217 "tests/examples/RealGHC.lhs" 295 18 295 19 9218 , srcInfoPoints = [] 9219 } 9220 "e") 9221 ]) 9222 (UnGuardedRhs 9223 SrcSpanInfo 9224 { srcInfoSpan = 9225 SrcSpan "tests/examples/RealGHC.lhs" 295 21 295 40 9226 , srcInfoPoints = 9227 [ SrcSpan "tests/examples/RealGHC.lhs" 295 21 295 23 9228 ] 9229 } 9230 (App 9231 SrcSpanInfo 9232 { srcInfoSpan = 9233 SrcSpan "tests/examples/RealGHC.lhs" 295 24 295 40 9234 , srcInfoPoints = [] 9235 } 9236 (App 9237 SrcSpanInfo 9238 { srcInfoSpan = 9239 SrcSpan 9240 "tests/examples/RealGHC.lhs" 295 24 295 37 9241 , srcInfoPoints = [] 9242 } 9243 (Var 9244 SrcSpanInfo 9245 { srcInfoSpan = 9246 SrcSpan 9247 "tests/examples/RealGHC.lhs" 295 24 295 26 9248 , srcInfoPoints = [] 9249 } 9250 (UnQual 9251 SrcSpanInfo 9252 { srcInfoSpan = 9253 SrcSpan 9254 "tests/examples/RealGHC.lhs" 9255 295 9256 24 9257 295 9258 26 9259 , srcInfoPoints = [] 9260 } 9261 (Ident 9262 SrcSpanInfo 9263 { srcInfoSpan = 9264 SrcSpan 9265 "tests/examples/RealGHC.lhs" 9266 295 9267 24 9268 295 9269 26 9270 , srcInfoPoints = [] 9271 } 9272 "go"))) 9273 (Paren 9274 SrcSpanInfo 9275 { srcInfoSpan = 9276 SrcSpan 9277 "tests/examples/RealGHC.lhs" 295 27 295 37 9278 , srcInfoPoints = 9279 [ SrcSpan 9280 "tests/examples/RealGHC.lhs" 9281 295 9282 27 9283 295 9284 28 9285 , SrcSpan 9286 "tests/examples/RealGHC.lhs" 9287 295 9288 36 9289 295 9290 37 9291 ] 9292 } 9293 (InfixApp 9294 SrcSpanInfo 9295 { srcInfoSpan = 9296 SrcSpan 9297 "tests/examples/RealGHC.lhs" 9298 295 9299 28 9300 295 9301 36 9302 , srcInfoPoints = [] 9303 } 9304 (Tuple 9305 SrcSpanInfo 9306 { srcInfoSpan = 9307 SrcSpan 9308 "tests/examples/RealGHC.lhs" 9309 295 9310 28 9311 295 9312 33 9313 , srcInfoPoints = 9314 [ SrcSpan 9315 "tests/examples/RealGHC.lhs" 9316 295 9317 28 9318 295 9319 29 9320 , SrcSpan 9321 "tests/examples/RealGHC.lhs" 9322 295 9323 30 9324 295 9325 31 9326 , SrcSpan 9327 "tests/examples/RealGHC.lhs" 9328 295 9329 32 9330 295 9331 33 9332 ] 9333 } 9334 Boxed 9335 [ Var 9336 SrcSpanInfo 9337 { srcInfoSpan = 9338 SrcSpan 9339 "tests/examples/RealGHC.lhs" 9340 295 9341 29 9342 295 9343 30 9344 , srcInfoPoints = [] 9345 } 9346 (UnQual 9347 SrcSpanInfo 9348 { srcInfoSpan = 9349 SrcSpan 9350 "tests/examples/RealGHC.lhs" 9351 295 9352 29 9353 295 9354 30 9355 , srcInfoPoints = [] 9356 } 9357 (Ident 9358 SrcSpanInfo 9359 { srcInfoSpan = 9360 SrcSpan 9361 "tests/examples/RealGHC.lhs" 9362 295 9363 29 9364 295 9365 30 9366 , srcInfoPoints = [] 9367 } 9368 "r")) 9369 , Var 9370 SrcSpanInfo 9371 { srcInfoSpan = 9372 SrcSpan 9373 "tests/examples/RealGHC.lhs" 9374 295 9375 31 9376 295 9377 32 9378 , srcInfoPoints = [] 9379 } 9380 (UnQual 9381 SrcSpanInfo 9382 { srcInfoSpan = 9383 SrcSpan 9384 "tests/examples/RealGHC.lhs" 9385 295 9386 31 9387 295 9388 32 9389 , srcInfoPoints = [] 9390 } 9391 (Ident 9392 SrcSpanInfo 9393 { srcInfoSpan = 9394 SrcSpan 9395 "tests/examples/RealGHC.lhs" 9396 295 9397 31 9398 295 9399 32 9400 , srcInfoPoints = [] 9401 } 9402 "e")) 9403 ]) 9404 (QConOp 9405 SrcSpanInfo 9406 { srcInfoSpan = 9407 SrcSpan 9408 "tests/examples/RealGHC.lhs" 9409 295 9410 33 9411 295 9412 34 9413 , srcInfoPoints = [] 9414 } 9415 (Special 9416 SrcSpanInfo 9417 { srcInfoSpan = 9418 SrcSpan 9419 "tests/examples/RealGHC.lhs" 9420 295 9421 33 9422 295 9423 34 9424 , srcInfoPoints = [] 9425 } 9426 (Cons 9427 SrcSpanInfo 9428 { srcInfoSpan = 9429 SrcSpan 9430 "tests/examples/RealGHC.lhs" 9431 295 9432 33 9433 295 9434 34 9435 , srcInfoPoints = [] 9436 }))) 9437 (Var 9438 SrcSpanInfo 9439 { srcInfoSpan = 9440 SrcSpan 9441 "tests/examples/RealGHC.lhs" 9442 295 9443 34 9444 295 9445 36 9446 , srcInfoPoints = [] 9447 } 9448 (UnQual 9449 SrcSpanInfo 9450 { srcInfoSpan = 9451 SrcSpan 9452 "tests/examples/RealGHC.lhs" 9453 295 9454 34 9455 295 9456 36 9457 , srcInfoPoints = [] 9458 } 9459 (Ident 9460 SrcSpanInfo 9461 { srcInfoSpan = 9462 SrcSpan 9463 "tests/examples/RealGHC.lhs" 9464 295 9465 34 9466 295 9467 36 9468 , srcInfoPoints = [] 9469 } 9470 "ms")))))) 9471 (Var 9472 SrcSpanInfo 9473 { srcInfoSpan = 9474 SrcSpan 9475 "tests/examples/RealGHC.lhs" 295 38 295 40 9476 , srcInfoPoints = [] 9477 } 9478 (UnQual 9479 SrcSpanInfo 9480 { srcInfoSpan = 9481 SrcSpan 9482 "tests/examples/RealGHC.lhs" 295 38 295 40 9483 , srcInfoPoints = [] 9484 } 9485 (Ident 9486 SrcSpanInfo 9487 { srcInfoSpan = 9488 SrcSpan 9489 "tests/examples/RealGHC.lhs" 9490 295 9491 38 9492 295 9493 40 9494 , srcInfoPoints = [] 9495 } 9496 "rs"))))) 9497 Nothing 9498 , Alt 9499 SrcSpanInfo 9500 { srcInfoSpan = 9501 SrcSpan "tests/examples/RealGHC.lhs" 296 13 298 36 9502 , srcInfoPoints = [] 9503 } 9504 (PApp 9505 SrcSpanInfo 9506 { srcInfoSpan = 9507 SrcSpan "tests/examples/RealGHC.lhs" 296 13 296 20 9508 , srcInfoPoints = [] 9509 } 9510 (UnQual 9511 SrcSpanInfo 9512 { srcInfoSpan = 9513 SrcSpan "tests/examples/RealGHC.lhs" 296 13 296 20 9514 , srcInfoPoints = [] 9515 } 9516 (Ident 9517 SrcSpanInfo 9518 { srcInfoSpan = 9519 SrcSpan 9520 "tests/examples/RealGHC.lhs" 296 13 296 20 9521 , srcInfoPoints = [] 9522 } 9523 "Nothing")) 9524 []) 9525 (UnGuardedRhs 9526 SrcSpanInfo 9527 { srcInfoSpan = 9528 SrcSpan "tests/examples/RealGHC.lhs" 296 21 298 36 9529 , srcInfoPoints = 9530 [ SrcSpan "tests/examples/RealGHC.lhs" 296 21 296 23 9531 ] 9532 } 9533 (App 9534 SrcSpanInfo 9535 { srcInfoSpan = 9536 SrcSpan "tests/examples/RealGHC.lhs" 298 20 298 36 9537 , srcInfoPoints = [] 9538 } 9539 (App 9540 SrcSpanInfo 9541 { srcInfoSpan = 9542 SrcSpan 9543 "tests/examples/RealGHC.lhs" 298 20 298 25 9544 , srcInfoPoints = [] 9545 } 9546 (Var 9547 SrcSpanInfo 9548 { srcInfoSpan = 9549 SrcSpan 9550 "tests/examples/RealGHC.lhs" 298 20 298 22 9551 , srcInfoPoints = [] 9552 } 9553 (UnQual 9554 SrcSpanInfo 9555 { srcInfoSpan = 9556 SrcSpan 9557 "tests/examples/RealGHC.lhs" 9558 298 9559 20 9560 298 9561 22 9562 , srcInfoPoints = [] 9563 } 9564 (Ident 9565 SrcSpanInfo 9566 { srcInfoSpan = 9567 SrcSpan 9568 "tests/examples/RealGHC.lhs" 9569 298 9570 20 9571 298 9572 22 9573 , srcInfoPoints = [] 9574 } 9575 "go"))) 9576 (Var 9577 SrcSpanInfo 9578 { srcInfoSpan = 9579 SrcSpan 9580 "tests/examples/RealGHC.lhs" 298 23 298 25 9581 , srcInfoPoints = [] 9582 } 9583 (UnQual 9584 SrcSpanInfo 9585 { srcInfoSpan = 9586 SrcSpan 9587 "tests/examples/RealGHC.lhs" 9588 298 9589 23 9590 298 9591 25 9592 , srcInfoPoints = [] 9593 } 9594 (Ident 9595 SrcSpanInfo 9596 { srcInfoSpan = 9597 SrcSpan 9598 "tests/examples/RealGHC.lhs" 9599 298 9600 23 9601 298 9602 25 9603 , srcInfoPoints = [] 9604 } 9605 "ms")))) 9606 (Var 9607 SrcSpanInfo 9608 { srcInfoSpan = 9609 SrcSpan 9610 "tests/examples/RealGHC.lhs" 298 34 298 36 9611 , srcInfoPoints = [] 9612 } 9613 (UnQual 9614 SrcSpanInfo 9615 { srcInfoSpan = 9616 SrcSpan 9617 "tests/examples/RealGHC.lhs" 298 34 298 36 9618 , srcInfoPoints = [] 9619 } 9620 (Ident 9621 SrcSpanInfo 9622 { srcInfoSpan = 9623 SrcSpan 9624 "tests/examples/RealGHC.lhs" 9625 298 9626 34 9627 298 9628 36 9629 , srcInfoPoints = [] 9630 } 9631 "rs"))))) 9632 Nothing 9633 ])) 9634 Nothing 9635 ] 9636 ])) 9637 ] 9638 , TypeSig 9639 SrcSpanInfo 9640 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 1 301 76 9641 , srcInfoPoints = 9642 [ SrcSpan "tests/examples/RealGHC.lhs" 300 10 300 12 ] 9643 } 9644 [ Ident 9645 SrcSpanInfo 9646 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 1 300 9 9647 , srcInfoPoints = [] 9648 } 9649 "findBest" 9650 ] 9651 (TyFun 9652 SrcSpanInfo 9653 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 13 301 76 9654 , srcInfoPoints = 9655 [ SrcSpan "tests/examples/RealGHC.lhs" 301 6 301 8 ] 9656 } 9657 (TyTuple 9658 SrcSpanInfo 9659 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 13 300 29 9660 , srcInfoPoints = 9661 [ SrcSpan "tests/examples/RealGHC.lhs" 300 13 300 14 9662 , SrcSpan "tests/examples/RealGHC.lhs" 300 16 300 17 9663 , SrcSpan "tests/examples/RealGHC.lhs" 300 28 300 29 9664 ] 9665 } 9666 Boxed 9667 [ TyCon 9668 SrcSpanInfo 9669 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 14 300 16 9670 , srcInfoPoints = [] 9671 } 9672 (UnQual 9673 SrcSpanInfo 9674 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 14 300 16 9675 , srcInfoPoints = [] 9676 } 9677 (Ident 9678 SrcSpanInfo 9679 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 14 300 16 9680 , srcInfoPoints = [] 9681 } 9682 "Id")) 9683 , TyList 9684 SrcSpanInfo 9685 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 18 300 28 9686 , srcInfoPoints = 9687 [ SrcSpan "tests/examples/RealGHC.lhs" 300 18 300 19 9688 , SrcSpan "tests/examples/RealGHC.lhs" 300 27 300 28 9689 ] 9690 } 9691 (TyCon 9692 SrcSpanInfo 9693 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 19 300 27 9694 , srcInfoPoints = [] 9695 } 9696 (UnQual 9697 SrcSpanInfo 9698 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 19 300 27 9699 , srcInfoPoints = [] 9700 } 9701 (Ident 9702 SrcSpanInfo 9703 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 300 19 300 27 9704 , srcInfoPoints = [] 9705 } 9706 "CoreExpr"))) 9707 ]) 9708 (TyFun 9709 SrcSpanInfo 9710 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 9 301 76 9711 , srcInfoPoints = 9712 [ SrcSpan "tests/examples/RealGHC.lhs" 301 29 301 31 ] 9713 } 9714 (TyTuple 9715 SrcSpanInfo 9716 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 9 301 28 9717 , srcInfoPoints = 9718 [ SrcSpan "tests/examples/RealGHC.lhs" 301 9 301 10 9719 , SrcSpan "tests/examples/RealGHC.lhs" 301 18 301 19 9720 , SrcSpan "tests/examples/RealGHC.lhs" 301 27 301 28 9721 ] 9722 } 9723 Boxed 9724 [ TyCon 9725 SrcSpanInfo 9726 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 10 301 18 9727 , srcInfoPoints = [] 9728 } 9729 (UnQual 9730 SrcSpanInfo 9731 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 10 301 18 9732 , srcInfoPoints = [] 9733 } 9734 (Ident 9735 SrcSpanInfo 9736 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 10 301 18 9737 , srcInfoPoints = [] 9738 } 9739 "CoreRule")) 9740 , TyCon 9741 SrcSpanInfo 9742 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 19 301 27 9743 , srcInfoPoints = [] 9744 } 9745 (UnQual 9746 SrcSpanInfo 9747 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 19 301 27 9748 , srcInfoPoints = [] 9749 } 9750 (Ident 9751 SrcSpanInfo 9752 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 19 301 27 9753 , srcInfoPoints = [] 9754 } 9755 "CoreExpr")) 9756 ]) 9757 (TyFun 9758 SrcSpanInfo 9759 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 32 301 76 9760 , srcInfoPoints = 9761 [ SrcSpan "tests/examples/RealGHC.lhs" 301 54 301 56 ] 9762 } 9763 (TyList 9764 SrcSpanInfo 9765 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 32 301 53 9766 , srcInfoPoints = 9767 [ SrcSpan "tests/examples/RealGHC.lhs" 301 32 301 33 9768 , SrcSpan "tests/examples/RealGHC.lhs" 301 52 301 53 9769 ] 9770 } 9771 (TyTuple 9772 SrcSpanInfo 9773 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 33 301 52 9774 , srcInfoPoints = 9775 [ SrcSpan "tests/examples/RealGHC.lhs" 301 33 301 34 9776 , SrcSpan "tests/examples/RealGHC.lhs" 301 42 301 43 9777 , SrcSpan "tests/examples/RealGHC.lhs" 301 51 301 52 9778 ] 9779 } 9780 Boxed 9781 [ TyCon 9782 SrcSpanInfo 9783 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 34 301 42 9784 , srcInfoPoints = [] 9785 } 9786 (UnQual 9787 SrcSpanInfo 9788 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 34 301 42 9789 , srcInfoPoints = [] 9790 } 9791 (Ident 9792 SrcSpanInfo 9793 { srcInfoSpan = 9794 SrcSpan "tests/examples/RealGHC.lhs" 301 34 301 42 9795 , srcInfoPoints = [] 9796 } 9797 "CoreRule")) 9798 , TyCon 9799 SrcSpanInfo 9800 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 43 301 51 9801 , srcInfoPoints = [] 9802 } 9803 (UnQual 9804 SrcSpanInfo 9805 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 43 301 51 9806 , srcInfoPoints = [] 9807 } 9808 (Ident 9809 SrcSpanInfo 9810 { srcInfoSpan = 9811 SrcSpan "tests/examples/RealGHC.lhs" 301 43 301 51 9812 , srcInfoPoints = [] 9813 } 9814 "CoreExpr")) 9815 ])) 9816 (TyTuple 9817 SrcSpanInfo 9818 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 57 301 76 9819 , srcInfoPoints = 9820 [ SrcSpan "tests/examples/RealGHC.lhs" 301 57 301 58 9821 , SrcSpan "tests/examples/RealGHC.lhs" 301 66 301 67 9822 , SrcSpan "tests/examples/RealGHC.lhs" 301 75 301 76 9823 ] 9824 } 9825 Boxed 9826 [ TyCon 9827 SrcSpanInfo 9828 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 58 301 66 9829 , srcInfoPoints = [] 9830 } 9831 (UnQual 9832 SrcSpanInfo 9833 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 58 301 66 9834 , srcInfoPoints = [] 9835 } 9836 (Ident 9837 SrcSpanInfo 9838 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 58 301 66 9839 , srcInfoPoints = [] 9840 } 9841 "CoreRule")) 9842 , TyCon 9843 SrcSpanInfo 9844 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 67 301 75 9845 , srcInfoPoints = [] 9846 } 9847 (UnQual 9848 SrcSpanInfo 9849 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 67 301 75 9850 , srcInfoPoints = [] 9851 } 9852 (Ident 9853 SrcSpanInfo 9854 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 301 67 301 75 9855 , srcInfoPoints = [] 9856 } 9857 "CoreExpr")) 9858 ])))) 9859 , FunBind 9860 SrcSpanInfo 9861 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 1 322 23 9862 , srcInfoPoints = [] 9863 } 9864 [ Match 9865 SrcSpanInfo 9866 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 1 306 45 9867 , srcInfoPoints = [] 9868 } 9869 (Ident 9870 SrcSpanInfo 9871 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 1 306 9 9872 , srcInfoPoints = [] 9873 } 9874 "findBest") 9875 [ PVar 9876 SrcSpanInfo 9877 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 10 306 16 9878 , srcInfoPoints = [] 9879 } 9880 (Ident 9881 SrcSpanInfo 9882 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 10 306 16 9883 , srcInfoPoints = [] 9884 } 9885 "target") 9886 , PTuple 9887 SrcSpanInfo 9888 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 17 306 27 9889 , srcInfoPoints = 9890 [ SrcSpan "tests/examples/RealGHC.lhs" 306 17 306 18 9891 , SrcSpan "tests/examples/RealGHC.lhs" 306 22 306 23 9892 , SrcSpan "tests/examples/RealGHC.lhs" 306 26 306 27 9893 ] 9894 } 9895 Boxed 9896 [ PVar 9897 SrcSpanInfo 9898 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 18 306 22 9899 , srcInfoPoints = [] 9900 } 9901 (Ident 9902 SrcSpanInfo 9903 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 18 306 22 9904 , srcInfoPoints = [] 9905 } 9906 "rule") 9907 , PVar 9908 SrcSpanInfo 9909 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 23 306 26 9910 , srcInfoPoints = [] 9911 } 9912 (Ident 9913 SrcSpanInfo 9914 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 23 306 26 9915 , srcInfoPoints = [] 9916 } 9917 "ans") 9918 ] 9919 , PList 9920 SrcSpanInfo 9921 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 30 306 32 9922 , srcInfoPoints = 9923 [ SrcSpan "tests/examples/RealGHC.lhs" 306 30 306 31 9924 , SrcSpan "tests/examples/RealGHC.lhs" 306 31 306 32 9925 ] 9926 } 9927 [] 9928 ] 9929 (UnGuardedRhs 9930 SrcSpanInfo 9931 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 33 306 45 9932 , srcInfoPoints = 9933 [ SrcSpan "tests/examples/RealGHC.lhs" 306 33 306 34 ] 9934 } 9935 (Tuple 9936 SrcSpanInfo 9937 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 35 306 45 9938 , srcInfoPoints = 9939 [ SrcSpan "tests/examples/RealGHC.lhs" 306 35 306 36 9940 , SrcSpan "tests/examples/RealGHC.lhs" 306 40 306 41 9941 , SrcSpan "tests/examples/RealGHC.lhs" 306 44 306 45 9942 ] 9943 } 9944 Boxed 9945 [ Var 9946 SrcSpanInfo 9947 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 36 306 40 9948 , srcInfoPoints = [] 9949 } 9950 (UnQual 9951 SrcSpanInfo 9952 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 36 306 40 9953 , srcInfoPoints = [] 9954 } 9955 (Ident 9956 SrcSpanInfo 9957 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 36 306 40 9958 , srcInfoPoints = [] 9959 } 9960 "rule")) 9961 , Var 9962 SrcSpanInfo 9963 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 41 306 44 9964 , srcInfoPoints = [] 9965 } 9966 (UnQual 9967 SrcSpanInfo 9968 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 41 306 44 9969 , srcInfoPoints = [] 9970 } 9971 (Ident 9972 SrcSpanInfo 9973 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 306 41 306 44 9974 , srcInfoPoints = [] 9975 } 9976 "ans")) 9977 ])) 9978 Nothing 9979 , Match 9980 SrcSpanInfo 9981 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 1 322 23 9982 , srcInfoPoints = 9983 [ SrcSpan "tests/examples/RealGHC.lhs" 321 3 321 8 ] 9984 } 9985 (Ident 9986 SrcSpanInfo 9987 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 1 307 9 9988 , srcInfoPoints = [] 9989 } 9990 "findBest") 9991 [ PVar 9992 SrcSpanInfo 9993 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 10 307 16 9994 , srcInfoPoints = [] 9995 } 9996 (Ident 9997 SrcSpanInfo 9998 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 10 307 16 9999 , srcInfoPoints = [] 10000 } 10001 "target") 10002 , PTuple 10003 SrcSpanInfo 10004 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 17 307 29 10005 , srcInfoPoints = 10006 [ SrcSpan "tests/examples/RealGHC.lhs" 307 17 307 18 10007 , SrcSpan "tests/examples/RealGHC.lhs" 307 23 307 24 10008 , SrcSpan "tests/examples/RealGHC.lhs" 307 28 307 29 10009 ] 10010 } 10011 Boxed 10012 [ PVar 10013 SrcSpanInfo 10014 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 18 307 23 10015 , srcInfoPoints = [] 10016 } 10017 (Ident 10018 SrcSpanInfo 10019 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 18 307 23 10020 , srcInfoPoints = [] 10021 } 10022 "rule1") 10023 , PVar 10024 SrcSpanInfo 10025 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 24 307 28 10026 , srcInfoPoints = [] 10027 } 10028 (Ident 10029 SrcSpanInfo 10030 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 24 307 28 10031 , srcInfoPoints = [] 10032 } 10033 "ans1") 10034 ] 10035 , PParen 10036 SrcSpanInfo 10037 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 30 307 48 10038 , srcInfoPoints = 10039 [ SrcSpan "tests/examples/RealGHC.lhs" 307 30 307 31 10040 , SrcSpan "tests/examples/RealGHC.lhs" 307 47 307 48 10041 ] 10042 } 10043 (PInfixApp 10044 SrcSpanInfo 10045 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 31 307 47 10046 , srcInfoPoints = [] 10047 } 10048 (PTuple 10049 SrcSpanInfo 10050 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 31 307 43 10051 , srcInfoPoints = 10052 [ SrcSpan "tests/examples/RealGHC.lhs" 307 31 307 32 10053 , SrcSpan "tests/examples/RealGHC.lhs" 307 37 307 38 10054 , SrcSpan "tests/examples/RealGHC.lhs" 307 42 307 43 10055 ] 10056 } 10057 Boxed 10058 [ PVar 10059 SrcSpanInfo 10060 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 32 307 37 10061 , srcInfoPoints = [] 10062 } 10063 (Ident 10064 SrcSpanInfo 10065 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 32 307 37 10066 , srcInfoPoints = [] 10067 } 10068 "rule2") 10069 , PVar 10070 SrcSpanInfo 10071 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 38 307 42 10072 , srcInfoPoints = [] 10073 } 10074 (Ident 10075 SrcSpanInfo 10076 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 38 307 42 10077 , srcInfoPoints = [] 10078 } 10079 "ans2") 10080 ]) 10081 (Special 10082 SrcSpanInfo 10083 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 43 307 44 10084 , srcInfoPoints = [] 10085 } 10086 (Cons 10087 SrcSpanInfo 10088 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 43 307 44 10089 , srcInfoPoints = [] 10090 })) 10091 (PVar 10092 SrcSpanInfo 10093 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 44 307 47 10094 , srcInfoPoints = [] 10095 } 10096 (Ident 10097 SrcSpanInfo 10098 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 307 44 307 47 10099 , srcInfoPoints = [] 10100 } 10101 "prs"))) 10102 ] 10103 (GuardedRhss 10104 SrcSpanInfo 10105 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 3 320 49 10106 , srcInfoPoints = [] 10107 } 10108 [ GuardedRhs 10109 SrcSpanInfo 10110 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 3 308 68 10111 , srcInfoPoints = 10112 [ SrcSpan "tests/examples/RealGHC.lhs" 308 3 308 4 10113 , SrcSpan "tests/examples/RealGHC.lhs" 308 34 308 35 10114 ] 10115 } 10116 [ Qualifier 10117 SrcSpanInfo 10118 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 5 308 33 10119 , srcInfoPoints = [] 10120 } 10121 (InfixApp 10122 SrcSpanInfo 10123 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 5 308 33 10124 , srcInfoPoints = [] 10125 } 10126 (Var 10127 SrcSpanInfo 10128 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 5 308 10 10129 , srcInfoPoints = [] 10130 } 10131 (UnQual 10132 SrcSpanInfo 10133 { srcInfoSpan = 10134 SrcSpan "tests/examples/RealGHC.lhs" 308 5 308 10 10135 , srcInfoPoints = [] 10136 } 10137 (Ident 10138 SrcSpanInfo 10139 { srcInfoSpan = 10140 SrcSpan "tests/examples/RealGHC.lhs" 308 5 308 10 10141 , srcInfoPoints = [] 10142 } 10143 "rule1"))) 10144 (QVarOp 10145 SrcSpanInfo 10146 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 11 308 27 10147 , srcInfoPoints = 10148 [ SrcSpan "tests/examples/RealGHC.lhs" 308 11 308 12 10149 , SrcSpan "tests/examples/RealGHC.lhs" 308 12 308 26 10150 , SrcSpan "tests/examples/RealGHC.lhs" 308 26 308 27 10151 ] 10152 } 10153 (UnQual 10154 SrcSpanInfo 10155 { srcInfoSpan = 10156 SrcSpan "tests/examples/RealGHC.lhs" 308 11 308 27 10157 , srcInfoPoints = 10158 [ SrcSpan "tests/examples/RealGHC.lhs" 308 11 308 12 10159 , SrcSpan "tests/examples/RealGHC.lhs" 308 12 308 26 10160 , SrcSpan "tests/examples/RealGHC.lhs" 308 26 308 27 10161 ] 10162 } 10163 (Ident 10164 SrcSpanInfo 10165 { srcInfoSpan = 10166 SrcSpan "tests/examples/RealGHC.lhs" 308 12 308 26 10167 , srcInfoPoints = [] 10168 } 10169 "isMoreSpecific"))) 10170 (Var 10171 SrcSpanInfo 10172 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 28 308 33 10173 , srcInfoPoints = [] 10174 } 10175 (UnQual 10176 SrcSpanInfo 10177 { srcInfoSpan = 10178 SrcSpan "tests/examples/RealGHC.lhs" 308 28 308 33 10179 , srcInfoPoints = [] 10180 } 10181 (Ident 10182 SrcSpanInfo 10183 { srcInfoSpan = 10184 SrcSpan "tests/examples/RealGHC.lhs" 308 28 308 33 10185 , srcInfoPoints = [] 10186 } 10187 "rule2")))) 10188 ] 10189 (App 10190 SrcSpanInfo 10191 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 36 308 68 10192 , srcInfoPoints = [] 10193 } 10194 (App 10195 SrcSpanInfo 10196 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 36 308 64 10197 , srcInfoPoints = [] 10198 } 10199 (App 10200 SrcSpanInfo 10201 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 36 308 51 10202 , srcInfoPoints = [] 10203 } 10204 (Var 10205 SrcSpanInfo 10206 { srcInfoSpan = 10207 SrcSpan "tests/examples/RealGHC.lhs" 308 36 308 44 10208 , srcInfoPoints = [] 10209 } 10210 (UnQual 10211 SrcSpanInfo 10212 { srcInfoSpan = 10213 SrcSpan "tests/examples/RealGHC.lhs" 308 36 308 44 10214 , srcInfoPoints = [] 10215 } 10216 (Ident 10217 SrcSpanInfo 10218 { srcInfoSpan = 10219 SrcSpan "tests/examples/RealGHC.lhs" 308 36 308 44 10220 , srcInfoPoints = [] 10221 } 10222 "findBest"))) 10223 (Var 10224 SrcSpanInfo 10225 { srcInfoSpan = 10226 SrcSpan "tests/examples/RealGHC.lhs" 308 45 308 51 10227 , srcInfoPoints = [] 10228 } 10229 (UnQual 10230 SrcSpanInfo 10231 { srcInfoSpan = 10232 SrcSpan "tests/examples/RealGHC.lhs" 308 45 308 51 10233 , srcInfoPoints = [] 10234 } 10235 (Ident 10236 SrcSpanInfo 10237 { srcInfoSpan = 10238 SrcSpan "tests/examples/RealGHC.lhs" 308 45 308 51 10239 , srcInfoPoints = [] 10240 } 10241 "target")))) 10242 (Tuple 10243 SrcSpanInfo 10244 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 52 308 64 10245 , srcInfoPoints = 10246 [ SrcSpan "tests/examples/RealGHC.lhs" 308 52 308 53 10247 , SrcSpan "tests/examples/RealGHC.lhs" 308 58 308 59 10248 , SrcSpan "tests/examples/RealGHC.lhs" 308 63 308 64 10249 ] 10250 } 10251 Boxed 10252 [ Var 10253 SrcSpanInfo 10254 { srcInfoSpan = 10255 SrcSpan "tests/examples/RealGHC.lhs" 308 53 308 58 10256 , srcInfoPoints = [] 10257 } 10258 (UnQual 10259 SrcSpanInfo 10260 { srcInfoSpan = 10261 SrcSpan "tests/examples/RealGHC.lhs" 308 53 308 58 10262 , srcInfoPoints = [] 10263 } 10264 (Ident 10265 SrcSpanInfo 10266 { srcInfoSpan = 10267 SrcSpan "tests/examples/RealGHC.lhs" 308 53 308 58 10268 , srcInfoPoints = [] 10269 } 10270 "rule1")) 10271 , Var 10272 SrcSpanInfo 10273 { srcInfoSpan = 10274 SrcSpan "tests/examples/RealGHC.lhs" 308 59 308 63 10275 , srcInfoPoints = [] 10276 } 10277 (UnQual 10278 SrcSpanInfo 10279 { srcInfoSpan = 10280 SrcSpan "tests/examples/RealGHC.lhs" 308 59 308 63 10281 , srcInfoPoints = [] 10282 } 10283 (Ident 10284 SrcSpanInfo 10285 { srcInfoSpan = 10286 SrcSpan "tests/examples/RealGHC.lhs" 308 59 308 63 10287 , srcInfoPoints = [] 10288 } 10289 "ans1")) 10290 ])) 10291 (Var 10292 SrcSpanInfo 10293 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 65 308 68 10294 , srcInfoPoints = [] 10295 } 10296 (UnQual 10297 SrcSpanInfo 10298 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 308 65 308 68 10299 , srcInfoPoints = [] 10300 } 10301 (Ident 10302 SrcSpanInfo 10303 { srcInfoSpan = 10304 SrcSpan "tests/examples/RealGHC.lhs" 308 65 308 68 10305 , srcInfoPoints = [] 10306 } 10307 "prs")))) 10308 , GuardedRhs 10309 SrcSpanInfo 10310 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 3 309 68 10311 , srcInfoPoints = 10312 [ SrcSpan "tests/examples/RealGHC.lhs" 309 3 309 4 10313 , SrcSpan "tests/examples/RealGHC.lhs" 309 34 309 35 10314 ] 10315 } 10316 [ Qualifier 10317 SrcSpanInfo 10318 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 5 309 33 10319 , srcInfoPoints = [] 10320 } 10321 (InfixApp 10322 SrcSpanInfo 10323 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 5 309 33 10324 , srcInfoPoints = [] 10325 } 10326 (Var 10327 SrcSpanInfo 10328 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 5 309 10 10329 , srcInfoPoints = [] 10330 } 10331 (UnQual 10332 SrcSpanInfo 10333 { srcInfoSpan = 10334 SrcSpan "tests/examples/RealGHC.lhs" 309 5 309 10 10335 , srcInfoPoints = [] 10336 } 10337 (Ident 10338 SrcSpanInfo 10339 { srcInfoSpan = 10340 SrcSpan "tests/examples/RealGHC.lhs" 309 5 309 10 10341 , srcInfoPoints = [] 10342 } 10343 "rule2"))) 10344 (QVarOp 10345 SrcSpanInfo 10346 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 11 309 27 10347 , srcInfoPoints = 10348 [ SrcSpan "tests/examples/RealGHC.lhs" 309 11 309 12 10349 , SrcSpan "tests/examples/RealGHC.lhs" 309 12 309 26 10350 , SrcSpan "tests/examples/RealGHC.lhs" 309 26 309 27 10351 ] 10352 } 10353 (UnQual 10354 SrcSpanInfo 10355 { srcInfoSpan = 10356 SrcSpan "tests/examples/RealGHC.lhs" 309 11 309 27 10357 , srcInfoPoints = 10358 [ SrcSpan "tests/examples/RealGHC.lhs" 309 11 309 12 10359 , SrcSpan "tests/examples/RealGHC.lhs" 309 12 309 26 10360 , SrcSpan "tests/examples/RealGHC.lhs" 309 26 309 27 10361 ] 10362 } 10363 (Ident 10364 SrcSpanInfo 10365 { srcInfoSpan = 10366 SrcSpan "tests/examples/RealGHC.lhs" 309 12 309 26 10367 , srcInfoPoints = [] 10368 } 10369 "isMoreSpecific"))) 10370 (Var 10371 SrcSpanInfo 10372 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 28 309 33 10373 , srcInfoPoints = [] 10374 } 10375 (UnQual 10376 SrcSpanInfo 10377 { srcInfoSpan = 10378 SrcSpan "tests/examples/RealGHC.lhs" 309 28 309 33 10379 , srcInfoPoints = [] 10380 } 10381 (Ident 10382 SrcSpanInfo 10383 { srcInfoSpan = 10384 SrcSpan "tests/examples/RealGHC.lhs" 309 28 309 33 10385 , srcInfoPoints = [] 10386 } 10387 "rule1")))) 10388 ] 10389 (App 10390 SrcSpanInfo 10391 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 36 309 68 10392 , srcInfoPoints = [] 10393 } 10394 (App 10395 SrcSpanInfo 10396 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 36 309 64 10397 , srcInfoPoints = [] 10398 } 10399 (App 10400 SrcSpanInfo 10401 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 36 309 51 10402 , srcInfoPoints = [] 10403 } 10404 (Var 10405 SrcSpanInfo 10406 { srcInfoSpan = 10407 SrcSpan "tests/examples/RealGHC.lhs" 309 36 309 44 10408 , srcInfoPoints = [] 10409 } 10410 (UnQual 10411 SrcSpanInfo 10412 { srcInfoSpan = 10413 SrcSpan "tests/examples/RealGHC.lhs" 309 36 309 44 10414 , srcInfoPoints = [] 10415 } 10416 (Ident 10417 SrcSpanInfo 10418 { srcInfoSpan = 10419 SrcSpan "tests/examples/RealGHC.lhs" 309 36 309 44 10420 , srcInfoPoints = [] 10421 } 10422 "findBest"))) 10423 (Var 10424 SrcSpanInfo 10425 { srcInfoSpan = 10426 SrcSpan "tests/examples/RealGHC.lhs" 309 45 309 51 10427 , srcInfoPoints = [] 10428 } 10429 (UnQual 10430 SrcSpanInfo 10431 { srcInfoSpan = 10432 SrcSpan "tests/examples/RealGHC.lhs" 309 45 309 51 10433 , srcInfoPoints = [] 10434 } 10435 (Ident 10436 SrcSpanInfo 10437 { srcInfoSpan = 10438 SrcSpan "tests/examples/RealGHC.lhs" 309 45 309 51 10439 , srcInfoPoints = [] 10440 } 10441 "target")))) 10442 (Tuple 10443 SrcSpanInfo 10444 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 52 309 64 10445 , srcInfoPoints = 10446 [ SrcSpan "tests/examples/RealGHC.lhs" 309 52 309 53 10447 , SrcSpan "tests/examples/RealGHC.lhs" 309 58 309 59 10448 , SrcSpan "tests/examples/RealGHC.lhs" 309 63 309 64 10449 ] 10450 } 10451 Boxed 10452 [ Var 10453 SrcSpanInfo 10454 { srcInfoSpan = 10455 SrcSpan "tests/examples/RealGHC.lhs" 309 53 309 58 10456 , srcInfoPoints = [] 10457 } 10458 (UnQual 10459 SrcSpanInfo 10460 { srcInfoSpan = 10461 SrcSpan "tests/examples/RealGHC.lhs" 309 53 309 58 10462 , srcInfoPoints = [] 10463 } 10464 (Ident 10465 SrcSpanInfo 10466 { srcInfoSpan = 10467 SrcSpan "tests/examples/RealGHC.lhs" 309 53 309 58 10468 , srcInfoPoints = [] 10469 } 10470 "rule2")) 10471 , Var 10472 SrcSpanInfo 10473 { srcInfoSpan = 10474 SrcSpan "tests/examples/RealGHC.lhs" 309 59 309 63 10475 , srcInfoPoints = [] 10476 } 10477 (UnQual 10478 SrcSpanInfo 10479 { srcInfoSpan = 10480 SrcSpan "tests/examples/RealGHC.lhs" 309 59 309 63 10481 , srcInfoPoints = [] 10482 } 10483 (Ident 10484 SrcSpanInfo 10485 { srcInfoSpan = 10486 SrcSpan "tests/examples/RealGHC.lhs" 309 59 309 63 10487 , srcInfoPoints = [] 10488 } 10489 "ans2")) 10490 ])) 10491 (Var 10492 SrcSpanInfo 10493 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 65 309 68 10494 , srcInfoPoints = [] 10495 } 10496 (UnQual 10497 SrcSpanInfo 10498 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 309 65 309 68 10499 , srcInfoPoints = [] 10500 } 10501 (Ident 10502 SrcSpanInfo 10503 { srcInfoSpan = 10504 SrcSpan "tests/examples/RealGHC.lhs" 309 65 309 68 10505 , srcInfoPoints = [] 10506 } 10507 "prs")))) 10508 , GuardedRhs 10509 SrcSpanInfo 10510 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 3 319 57 10511 , srcInfoPoints = 10512 [ SrcSpan "tests/examples/RealGHC.lhs" 310 3 310 4 10513 , SrcSpan "tests/examples/RealGHC.lhs" 310 15 310 16 10514 ] 10515 } 10516 [ Qualifier 10517 SrcSpanInfo 10518 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 5 310 14 10519 , srcInfoPoints = [] 10520 } 10521 (Var 10522 SrcSpanInfo 10523 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 5 310 14 10524 , srcInfoPoints = [] 10525 } 10526 (UnQual 10527 SrcSpanInfo 10528 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 5 310 14 10529 , srcInfoPoints = [] 10530 } 10531 (Ident 10532 SrcSpanInfo 10533 { srcInfoSpan = 10534 SrcSpan "tests/examples/RealGHC.lhs" 310 5 310 14 10535 , srcInfoPoints = [] 10536 } 10537 "debugIsOn"))) 10538 ] 10539 (Let 10540 SrcSpanInfo 10541 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 17 319 57 10542 , srcInfoPoints = 10543 [ SrcSpan "tests/examples/RealGHC.lhs" 310 17 310 20 10544 , SrcSpan "tests/examples/RealGHC.lhs" 313 17 313 19 10545 ] 10546 } 10547 (BDecls 10548 SrcSpanInfo 10549 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 21 312 83 10550 , srcInfoPoints = 10551 [ SrcSpan "tests/examples/RealGHC.lhs" 310 21 310 21 10552 , SrcSpan "tests/examples/RealGHC.lhs" 313 17 313 0 10553 ] 10554 } 10555 [ FunBind 10556 SrcSpanInfo 10557 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 310 21 312 83 10558 , srcInfoPoints = [] 10559 } 10560 [ Match 10561 SrcSpanInfo 10562 { srcInfoSpan = 10563 SrcSpan "tests/examples/RealGHC.lhs" 310 21 312 83 10564 , srcInfoPoints = [] 10565 } 10566 (Ident 10567 SrcSpanInfo 10568 { srcInfoSpan = 10569 SrcSpan "tests/examples/RealGHC.lhs" 310 21 310 28 10570 , srcInfoPoints = [] 10571 } 10572 "pp_rule") 10573 [ PVar 10574 SrcSpanInfo 10575 { srcInfoSpan = 10576 SrcSpan "tests/examples/RealGHC.lhs" 310 29 310 33 10577 , srcInfoPoints = [] 10578 } 10579 (Ident 10580 SrcSpanInfo 10581 { srcInfoSpan = 10582 SrcSpan "tests/examples/RealGHC.lhs" 310 29 310 33 10583 , srcInfoPoints = [] 10584 } 10585 "rule") 10586 ] 10587 (GuardedRhss 10588 SrcSpanInfo 10589 { srcInfoSpan = 10590 SrcSpan "tests/examples/RealGHC.lhs" 311 25 312 83 10591 , srcInfoPoints = [] 10592 } 10593 [ GuardedRhs 10594 SrcSpanInfo 10595 { srcInfoSpan = 10596 SrcSpan "tests/examples/RealGHC.lhs" 311 25 311 56 10597 , srcInfoPoints = 10598 [ SrcSpan "tests/examples/RealGHC.lhs" 311 25 311 26 10599 , SrcSpan "tests/examples/RealGHC.lhs" 311 46 311 47 10600 ] 10601 } 10602 [ Qualifier 10603 SrcSpanInfo 10604 { srcInfoSpan = 10605 SrcSpan 10606 "tests/examples/RealGHC.lhs" 311 27 311 45 10607 , srcInfoPoints = [] 10608 } 10609 (Var 10610 SrcSpanInfo 10611 { srcInfoSpan = 10612 SrcSpan 10613 "tests/examples/RealGHC.lhs" 311 27 311 45 10614 , srcInfoPoints = [] 10615 } 10616 (UnQual 10617 SrcSpanInfo 10618 { srcInfoSpan = 10619 SrcSpan 10620 "tests/examples/RealGHC.lhs" 10621 311 10622 27 10623 311 10624 45 10625 , srcInfoPoints = [] 10626 } 10627 (Ident 10628 SrcSpanInfo 10629 { srcInfoSpan = 10630 SrcSpan 10631 "tests/examples/RealGHC.lhs" 10632 311 10633 27 10634 311 10635 45 10636 , srcInfoPoints = [] 10637 } 10638 "opt_PprStyle_Debug"))) 10639 ] 10640 (App 10641 SrcSpanInfo 10642 { srcInfoSpan = 10643 SrcSpan 10644 "tests/examples/RealGHC.lhs" 311 48 311 56 10645 , srcInfoPoints = [] 10646 } 10647 (Var 10648 SrcSpanInfo 10649 { srcInfoSpan = 10650 SrcSpan 10651 "tests/examples/RealGHC.lhs" 311 48 311 51 10652 , srcInfoPoints = [] 10653 } 10654 (UnQual 10655 SrcSpanInfo 10656 { srcInfoSpan = 10657 SrcSpan 10658 "tests/examples/RealGHC.lhs" 10659 311 10660 48 10661 311 10662 51 10663 , srcInfoPoints = [] 10664 } 10665 (Ident 10666 SrcSpanInfo 10667 { srcInfoSpan = 10668 SrcSpan 10669 "tests/examples/RealGHC.lhs" 10670 311 10671 48 10672 311 10673 51 10674 , srcInfoPoints = [] 10675 } 10676 "ppr"))) 10677 (Var 10678 SrcSpanInfo 10679 { srcInfoSpan = 10680 SrcSpan 10681 "tests/examples/RealGHC.lhs" 311 52 311 56 10682 , srcInfoPoints = [] 10683 } 10684 (UnQual 10685 SrcSpanInfo 10686 { srcInfoSpan = 10687 SrcSpan 10688 "tests/examples/RealGHC.lhs" 10689 311 10690 52 10691 311 10692 56 10693 , srcInfoPoints = [] 10694 } 10695 (Ident 10696 SrcSpanInfo 10697 { srcInfoSpan = 10698 SrcSpan 10699 "tests/examples/RealGHC.lhs" 10700 311 10701 52 10702 311 10703 56 10704 , srcInfoPoints = [] 10705 } 10706 "rule")))) 10707 , GuardedRhs 10708 SrcSpanInfo 10709 { srcInfoSpan = 10710 SrcSpan "tests/examples/RealGHC.lhs" 312 25 312 83 10711 , srcInfoPoints = 10712 [ SrcSpan "tests/examples/RealGHC.lhs" 312 25 312 26 10713 , SrcSpan "tests/examples/RealGHC.lhs" 312 46 312 47 10714 ] 10715 } 10716 [ Qualifier 10717 SrcSpanInfo 10718 { srcInfoSpan = 10719 SrcSpan 10720 "tests/examples/RealGHC.lhs" 312 27 312 36 10721 , srcInfoPoints = [] 10722 } 10723 (Var 10724 SrcSpanInfo 10725 { srcInfoSpan = 10726 SrcSpan 10727 "tests/examples/RealGHC.lhs" 312 27 312 36 10728 , srcInfoPoints = [] 10729 } 10730 (UnQual 10731 SrcSpanInfo 10732 { srcInfoSpan = 10733 SrcSpan 10734 "tests/examples/RealGHC.lhs" 10735 312 10736 27 10737 312 10738 36 10739 , srcInfoPoints = [] 10740 } 10741 (Ident 10742 SrcSpanInfo 10743 { srcInfoSpan = 10744 SrcSpan 10745 "tests/examples/RealGHC.lhs" 10746 312 10747 27 10748 312 10749 36 10750 , srcInfoPoints = [] 10751 } 10752 "otherwise"))) 10753 ] 10754 (App 10755 SrcSpanInfo 10756 { srcInfoSpan = 10757 SrcSpan 10758 "tests/examples/RealGHC.lhs" 312 48 312 83 10759 , srcInfoPoints = [] 10760 } 10761 (Var 10762 SrcSpanInfo 10763 { srcInfoSpan = 10764 SrcSpan 10765 "tests/examples/RealGHC.lhs" 312 48 312 60 10766 , srcInfoPoints = [] 10767 } 10768 (UnQual 10769 SrcSpanInfo 10770 { srcInfoSpan = 10771 SrcSpan 10772 "tests/examples/RealGHC.lhs" 10773 312 10774 48 10775 312 10776 60 10777 , srcInfoPoints = [] 10778 } 10779 (Ident 10780 SrcSpanInfo 10781 { srcInfoSpan = 10782 SrcSpan 10783 "tests/examples/RealGHC.lhs" 10784 312 10785 48 10786 312 10787 60 10788 , srcInfoPoints = [] 10789 } 10790 "doubleQuotes"))) 10791 (Paren 10792 SrcSpanInfo 10793 { srcInfoSpan = 10794 SrcSpan 10795 "tests/examples/RealGHC.lhs" 312 61 312 83 10796 , srcInfoPoints = 10797 [ SrcSpan 10798 "tests/examples/RealGHC.lhs" 312 61 312 62 10799 , SrcSpan 10800 "tests/examples/RealGHC.lhs" 312 82 312 83 10801 ] 10802 } 10803 (App 10804 SrcSpanInfo 10805 { srcInfoSpan = 10806 SrcSpan 10807 "tests/examples/RealGHC.lhs" 10808 312 10809 62 10810 312 10811 82 10812 , srcInfoPoints = [] 10813 } 10814 (Var 10815 SrcSpanInfo 10816 { srcInfoSpan = 10817 SrcSpan 10818 "tests/examples/RealGHC.lhs" 10819 312 10820 62 10821 312 10822 67 10823 , srcInfoPoints = [] 10824 } 10825 (UnQual 10826 SrcSpanInfo 10827 { srcInfoSpan = 10828 SrcSpan 10829 "tests/examples/RealGHC.lhs" 10830 312 10831 62 10832 312 10833 67 10834 , srcInfoPoints = [] 10835 } 10836 (Ident 10837 SrcSpanInfo 10838 { srcInfoSpan = 10839 SrcSpan 10840 "tests/examples/RealGHC.lhs" 10841 312 10842 62 10843 312 10844 67 10845 , srcInfoPoints = [] 10846 } 10847 "ftext"))) 10848 (Paren 10849 SrcSpanInfo 10850 { srcInfoSpan = 10851 SrcSpan 10852 "tests/examples/RealGHC.lhs" 10853 312 10854 68 10855 312 10856 82 10857 , srcInfoPoints = 10858 [ SrcSpan 10859 "tests/examples/RealGHC.lhs" 10860 312 10861 68 10862 312 10863 69 10864 , SrcSpan 10865 "tests/examples/RealGHC.lhs" 10866 312 10867 81 10868 312 10869 82 10870 ] 10871 } 10872 (App 10873 SrcSpanInfo 10874 { srcInfoSpan = 10875 SrcSpan 10876 "tests/examples/RealGHC.lhs" 10877 312 10878 69 10879 312 10880 81 10881 , srcInfoPoints = [] 10882 } 10883 (Var 10884 SrcSpanInfo 10885 { srcInfoSpan = 10886 SrcSpan 10887 "tests/examples/RealGHC.lhs" 10888 312 10889 69 10890 312 10891 76 10892 , srcInfoPoints = [] 10893 } 10894 (UnQual 10895 SrcSpanInfo 10896 { srcInfoSpan = 10897 SrcSpan 10898 "tests/examples/RealGHC.lhs" 10899 312 10900 69 10901 312 10902 76 10903 , srcInfoPoints = [] 10904 } 10905 (Ident 10906 SrcSpanInfo 10907 { srcInfoSpan = 10908 SrcSpan 10909 "tests/examples/RealGHC.lhs" 10910 312 10911 69 10912 312 10913 76 10914 , srcInfoPoints = [] 10915 } 10916 "ru_name"))) 10917 (Var 10918 SrcSpanInfo 10919 { srcInfoSpan = 10920 SrcSpan 10921 "tests/examples/RealGHC.lhs" 10922 312 10923 77 10924 312 10925 81 10926 , srcInfoPoints = [] 10927 } 10928 (UnQual 10929 SrcSpanInfo 10930 { srcInfoSpan = 10931 SrcSpan 10932 "tests/examples/RealGHC.lhs" 10933 312 10934 77 10935 312 10936 81 10937 , srcInfoPoints = [] 10938 } 10939 (Ident 10940 SrcSpanInfo 10941 { srcInfoSpan = 10942 SrcSpan 10943 "tests/examples/RealGHC.lhs" 10944 312 10945 77 10946 312 10947 81 10948 , srcInfoPoints = [] 10949 } 10950 "rule")))))))) 10951 ]) 10952 Nothing 10953 ] 10954 ]) 10955 (InfixApp 10956 SrcSpanInfo 10957 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 313 20 319 57 10958 , srcInfoPoints = [] 10959 } 10960 (App 10961 SrcSpanInfo 10962 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 313 20 318 71 10963 , srcInfoPoints = [] 10964 } 10965 (App 10966 SrcSpanInfo 10967 { srcInfoSpan = 10968 SrcSpan "tests/examples/RealGHC.lhs" 313 20 313 73 10969 , srcInfoPoints = [] 10970 } 10971 (Var 10972 SrcSpanInfo 10973 { srcInfoSpan = 10974 SrcSpan "tests/examples/RealGHC.lhs" 313 20 313 28 10975 , srcInfoPoints = [] 10976 } 10977 (UnQual 10978 SrcSpanInfo 10979 { srcInfoSpan = 10980 SrcSpan "tests/examples/RealGHC.lhs" 313 20 313 28 10981 , srcInfoPoints = [] 10982 } 10983 (Ident 10984 SrcSpanInfo 10985 { srcInfoSpan = 10986 SrcSpan "tests/examples/RealGHC.lhs" 313 20 313 28 10987 , srcInfoPoints = [] 10988 } 10989 "pprTrace"))) 10990 (Lit 10991 SrcSpanInfo 10992 { srcInfoSpan = 10993 SrcSpan "tests/examples/RealGHC.lhs" 313 29 313 73 10994 , srcInfoPoints = [] 10995 } 10996 (String 10997 SrcSpanInfo 10998 { srcInfoSpan = 10999 SrcSpan "tests/examples/RealGHC.lhs" 313 29 313 73 11000 , srcInfoPoints = [] 11001 } 11002 "Rules.findBest: rule overlap (Rule 1 wins)" 11003 "Rules.findBest: rule overlap (Rule 1 wins)"))) 11004 (Paren 11005 SrcSpanInfo 11006 { srcInfoSpan = 11007 SrcSpan "tests/examples/RealGHC.lhs" 314 22 318 71 11008 , srcInfoPoints = 11009 [ SrcSpan "tests/examples/RealGHC.lhs" 314 22 314 23 11010 , SrcSpan "tests/examples/RealGHC.lhs" 318 70 318 71 11011 ] 11012 } 11013 (App 11014 SrcSpanInfo 11015 { srcInfoSpan = 11016 SrcSpan "tests/examples/RealGHC.lhs" 314 23 318 70 11017 , srcInfoPoints = [] 11018 } 11019 (Var 11020 SrcSpanInfo 11021 { srcInfoSpan = 11022 SrcSpan "tests/examples/RealGHC.lhs" 314 23 314 27 11023 , srcInfoPoints = [] 11024 } 11025 (UnQual 11026 SrcSpanInfo 11027 { srcInfoSpan = 11028 SrcSpan "tests/examples/RealGHC.lhs" 314 23 314 27 11029 , srcInfoPoints = [] 11030 } 11031 (Ident 11032 SrcSpanInfo 11033 { srcInfoSpan = 11034 SrcSpan 11035 "tests/examples/RealGHC.lhs" 314 23 314 27 11036 , srcInfoPoints = [] 11037 } 11038 "vcat"))) 11039 (List 11040 SrcSpanInfo 11041 { srcInfoSpan = 11042 SrcSpan "tests/examples/RealGHC.lhs" 314 28 318 70 11043 , srcInfoPoints = 11044 [ SrcSpan "tests/examples/RealGHC.lhs" 314 28 314 29 11045 , SrcSpan "tests/examples/RealGHC.lhs" 316 43 316 44 11046 , SrcSpan "tests/examples/RealGHC.lhs" 317 69 317 70 11047 , SrcSpan "tests/examples/RealGHC.lhs" 318 69 318 70 11048 ] 11049 } 11050 [ If 11051 SrcSpanInfo 11052 { srcInfoSpan = 11053 SrcSpan "tests/examples/RealGHC.lhs" 314 29 316 43 11054 , srcInfoPoints = 11055 [ SrcSpan 11056 "tests/examples/RealGHC.lhs" 314 29 314 31 11057 , SrcSpan 11058 "tests/examples/RealGHC.lhs" 314 51 314 55 11059 , SrcSpan 11060 "tests/examples/RealGHC.lhs" 316 33 316 37 11061 ] 11062 } 11063 (Var 11064 SrcSpanInfo 11065 { srcInfoSpan = 11066 SrcSpan 11067 "tests/examples/RealGHC.lhs" 314 32 314 50 11068 , srcInfoPoints = [] 11069 } 11070 (UnQual 11071 SrcSpanInfo 11072 { srcInfoSpan = 11073 SrcSpan 11074 "tests/examples/RealGHC.lhs" 314 32 314 50 11075 , srcInfoPoints = [] 11076 } 11077 (Ident 11078 SrcSpanInfo 11079 { srcInfoSpan = 11080 SrcSpan 11081 "tests/examples/RealGHC.lhs" 11082 314 11083 32 11084 314 11085 50 11086 , srcInfoPoints = [] 11087 } 11088 "opt_PprStyle_Debug"))) 11089 (InfixApp 11090 SrcSpanInfo 11091 { srcInfoSpan = 11092 SrcSpan 11093 "tests/examples/RealGHC.lhs" 315 32 315 101 11094 , srcInfoPoints = [] 11095 } 11096 (InfixApp 11097 SrcSpanInfo 11098 { srcInfoSpan = 11099 SrcSpan 11100 "tests/examples/RealGHC.lhs" 315 32 315 78 11101 , srcInfoPoints = [] 11102 } 11103 (App 11104 SrcSpanInfo 11105 { srcInfoSpan = 11106 SrcSpan 11107 "tests/examples/RealGHC.lhs" 11108 315 11109 32 11110 315 11111 67 11112 , srcInfoPoints = [] 11113 } 11114 (Var 11115 SrcSpanInfo 11116 { srcInfoSpan = 11117 SrcSpan 11118 "tests/examples/RealGHC.lhs" 11119 315 11120 32 11121 315 11122 37 11123 , srcInfoPoints = [] 11124 } 11125 (UnQual 11126 SrcSpanInfo 11127 { srcInfoSpan = 11128 SrcSpan 11129 "tests/examples/RealGHC.lhs" 11130 315 11131 32 11132 315 11133 37 11134 , srcInfoPoints = [] 11135 } 11136 (Ident 11137 SrcSpanInfo 11138 { srcInfoSpan = 11139 SrcSpan 11140 "tests/examples/RealGHC.lhs" 11141 315 11142 32 11143 315 11144 37 11145 , srcInfoPoints = [] 11146 } 11147 "ptext"))) 11148 (Paren 11149 SrcSpanInfo 11150 { srcInfoSpan = 11151 SrcSpan 11152 "tests/examples/RealGHC.lhs" 11153 315 11154 38 11155 315 11156 67 11157 , srcInfoPoints = 11158 [ SrcSpan 11159 "tests/examples/RealGHC.lhs" 11160 315 11161 38 11162 315 11163 39 11164 , SrcSpan 11165 "tests/examples/RealGHC.lhs" 11166 315 11167 66 11168 315 11169 67 11170 ] 11171 } 11172 (App 11173 SrcSpanInfo 11174 { srcInfoSpan = 11175 SrcSpan 11176 "tests/examples/RealGHC.lhs" 11177 315 11178 39 11179 315 11180 66 11181 , srcInfoPoints = [] 11182 } 11183 (Var 11184 SrcSpanInfo 11185 { srcInfoSpan = 11186 SrcSpan 11187 "tests/examples/RealGHC.lhs" 11188 315 11189 39 11190 315 11191 43 11192 , srcInfoPoints = [] 11193 } 11194 (UnQual 11195 SrcSpanInfo 11196 { srcInfoSpan = 11197 SrcSpan 11198 "tests/examples/RealGHC.lhs" 11199 315 11200 39 11201 315 11202 43 11203 , srcInfoPoints = [] 11204 } 11205 (Ident 11206 SrcSpanInfo 11207 { srcInfoSpan = 11208 SrcSpan 11209 "tests/examples/RealGHC.lhs" 11210 315 11211 39 11212 315 11213 43 11214 , srcInfoPoints = [] 11215 } 11216 "sLit"))) 11217 (Lit 11218 SrcSpanInfo 11219 { srcInfoSpan = 11220 SrcSpan 11221 "tests/examples/RealGHC.lhs" 11222 315 11223 44 11224 315 11225 66 11226 , srcInfoPoints = [] 11227 } 11228 (String 11229 SrcSpanInfo 11230 { srcInfoSpan = 11231 SrcSpan 11232 "tests/examples/RealGHC.lhs" 11233 315 11234 44 11235 315 11236 66 11237 , srcInfoPoints = [] 11238 } 11239 "Expression to match:" 11240 "Expression to match:"))))) 11241 (QVarOp 11242 SrcSpanInfo 11243 { srcInfoSpan = 11244 SrcSpan 11245 "tests/examples/RealGHC.lhs" 11246 315 11247 68 11248 315 11249 71 11250 , srcInfoPoints = [] 11251 } 11252 (UnQual 11253 SrcSpanInfo 11254 { srcInfoSpan = 11255 SrcSpan 11256 "tests/examples/RealGHC.lhs" 11257 315 11258 68 11259 315 11260 71 11261 , srcInfoPoints = [] 11262 } 11263 (Symbol 11264 SrcSpanInfo 11265 { srcInfoSpan = 11266 SrcSpan 11267 "tests/examples/RealGHC.lhs" 11268 315 11269 68 11270 315 11271 71 11272 , srcInfoPoints = [] 11273 } 11274 "<+>"))) 11275 (App 11276 SrcSpanInfo 11277 { srcInfoSpan = 11278 SrcSpan 11279 "tests/examples/RealGHC.lhs" 11280 315 11281 72 11282 315 11283 78 11284 , srcInfoPoints = [] 11285 } 11286 (Var 11287 SrcSpanInfo 11288 { srcInfoSpan = 11289 SrcSpan 11290 "tests/examples/RealGHC.lhs" 11291 315 11292 72 11293 315 11294 75 11295 , srcInfoPoints = [] 11296 } 11297 (UnQual 11298 SrcSpanInfo 11299 { srcInfoSpan = 11300 SrcSpan 11301 "tests/examples/RealGHC.lhs" 11302 315 11303 72 11304 315 11305 75 11306 , srcInfoPoints = [] 11307 } 11308 (Ident 11309 SrcSpanInfo 11310 { srcInfoSpan = 11311 SrcSpan 11312 "tests/examples/RealGHC.lhs" 11313 315 11314 72 11315 315 11316 75 11317 , srcInfoPoints = [] 11318 } 11319 "ppr"))) 11320 (Var 11321 SrcSpanInfo 11322 { srcInfoSpan = 11323 SrcSpan 11324 "tests/examples/RealGHC.lhs" 11325 315 11326 76 11327 315 11328 78 11329 , srcInfoPoints = [] 11330 } 11331 (UnQual 11332 SrcSpanInfo 11333 { srcInfoSpan = 11334 SrcSpan 11335 "tests/examples/RealGHC.lhs" 11336 315 11337 76 11338 315 11339 78 11340 , srcInfoPoints = [] 11341 } 11342 (Ident 11343 SrcSpanInfo 11344 { srcInfoSpan = 11345 SrcSpan 11346 "tests/examples/RealGHC.lhs" 11347 315 11348 76 11349 315 11350 78 11351 , srcInfoPoints = [] 11352 } 11353 "fn"))))) 11354 (QVarOp 11355 SrcSpanInfo 11356 { srcInfoSpan = 11357 SrcSpan 11358 "tests/examples/RealGHC.lhs" 315 79 315 82 11359 , srcInfoPoints = [] 11360 } 11361 (UnQual 11362 SrcSpanInfo 11363 { srcInfoSpan = 11364 SrcSpan 11365 "tests/examples/RealGHC.lhs" 11366 315 11367 79 11368 315 11369 82 11370 , srcInfoPoints = [] 11371 } 11372 (Symbol 11373 SrcSpanInfo 11374 { srcInfoSpan = 11375 SrcSpan 11376 "tests/examples/RealGHC.lhs" 11377 315 11378 79 11379 315 11380 82 11381 , srcInfoPoints = [] 11382 } 11383 "<+>"))) 11384 (App 11385 SrcSpanInfo 11386 { srcInfoSpan = 11387 SrcSpan 11388 "tests/examples/RealGHC.lhs" 315 83 315 101 11389 , srcInfoPoints = [] 11390 } 11391 (Var 11392 SrcSpanInfo 11393 { srcInfoSpan = 11394 SrcSpan 11395 "tests/examples/RealGHC.lhs" 11396 315 11397 83 11398 315 11399 86 11400 , srcInfoPoints = [] 11401 } 11402 (UnQual 11403 SrcSpanInfo 11404 { srcInfoSpan = 11405 SrcSpan 11406 "tests/examples/RealGHC.lhs" 11407 315 11408 83 11409 315 11410 86 11411 , srcInfoPoints = [] 11412 } 11413 (Ident 11414 SrcSpanInfo 11415 { srcInfoSpan = 11416 SrcSpan 11417 "tests/examples/RealGHC.lhs" 11418 315 11419 83 11420 315 11421 86 11422 , srcInfoPoints = [] 11423 } 11424 "sep"))) 11425 (Paren 11426 SrcSpanInfo 11427 { srcInfoSpan = 11428 SrcSpan 11429 "tests/examples/RealGHC.lhs" 11430 315 11431 87 11432 315 11433 101 11434 , srcInfoPoints = 11435 [ SrcSpan 11436 "tests/examples/RealGHC.lhs" 11437 315 11438 87 11439 315 11440 88 11441 , SrcSpan 11442 "tests/examples/RealGHC.lhs" 11443 315 11444 100 11445 315 11446 101 11447 ] 11448 } 11449 (App 11450 SrcSpanInfo 11451 { srcInfoSpan = 11452 SrcSpan 11453 "tests/examples/RealGHC.lhs" 11454 315 11455 88 11456 315 11457 100 11458 , srcInfoPoints = [] 11459 } 11460 (App 11461 SrcSpanInfo 11462 { srcInfoSpan = 11463 SrcSpan 11464 "tests/examples/RealGHC.lhs" 11465 315 11466 88 11467 315 11468 95 11469 , srcInfoPoints = [] 11470 } 11471 (Var 11472 SrcSpanInfo 11473 { srcInfoSpan = 11474 SrcSpan 11475 "tests/examples/RealGHC.lhs" 11476 315 11477 88 11478 315 11479 91 11480 , srcInfoPoints = [] 11481 } 11482 (UnQual 11483 SrcSpanInfo 11484 { srcInfoSpan = 11485 SrcSpan 11486 "tests/examples/RealGHC.lhs" 11487 315 11488 88 11489 315 11490 91 11491 , srcInfoPoints = [] 11492 } 11493 (Ident 11494 SrcSpanInfo 11495 { srcInfoSpan = 11496 SrcSpan 11497 "tests/examples/RealGHC.lhs" 11498 315 11499 88 11500 315 11501 91 11502 , srcInfoPoints = [] 11503 } 11504 "map"))) 11505 (Var 11506 SrcSpanInfo 11507 { srcInfoSpan = 11508 SrcSpan 11509 "tests/examples/RealGHC.lhs" 11510 315 11511 92 11512 315 11513 95 11514 , srcInfoPoints = [] 11515 } 11516 (UnQual 11517 SrcSpanInfo 11518 { srcInfoSpan = 11519 SrcSpan 11520 "tests/examples/RealGHC.lhs" 11521 315 11522 92 11523 315 11524 95 11525 , srcInfoPoints = [] 11526 } 11527 (Ident 11528 SrcSpanInfo 11529 { srcInfoSpan = 11530 SrcSpan 11531 "tests/examples/RealGHC.lhs" 11532 315 11533 92 11534 315 11535 95 11536 , srcInfoPoints = [] 11537 } 11538 "ppr")))) 11539 (Var 11540 SrcSpanInfo 11541 { srcInfoSpan = 11542 SrcSpan 11543 "tests/examples/RealGHC.lhs" 11544 315 11545 96 11546 315 11547 100 11548 , srcInfoPoints = [] 11549 } 11550 (UnQual 11551 SrcSpanInfo 11552 { srcInfoSpan = 11553 SrcSpan 11554 "tests/examples/RealGHC.lhs" 11555 315 11556 96 11557 315 11558 100 11559 , srcInfoPoints = [] 11560 } 11561 (Ident 11562 SrcSpanInfo 11563 { srcInfoSpan = 11564 SrcSpan 11565 "tests/examples/RealGHC.lhs" 11566 315 11567 96 11568 315 11569 100 11570 , srcInfoPoints = [] 11571 } 11572 "args"))))))) 11573 (Var 11574 SrcSpanInfo 11575 { srcInfoSpan = 11576 SrcSpan 11577 "tests/examples/RealGHC.lhs" 316 38 316 43 11578 , srcInfoPoints = [] 11579 } 11580 (UnQual 11581 SrcSpanInfo 11582 { srcInfoSpan = 11583 SrcSpan 11584 "tests/examples/RealGHC.lhs" 316 38 316 43 11585 , srcInfoPoints = [] 11586 } 11587 (Ident 11588 SrcSpanInfo 11589 { srcInfoSpan = 11590 SrcSpan 11591 "tests/examples/RealGHC.lhs" 11592 316 11593 38 11594 316 11595 43 11596 , srcInfoPoints = [] 11597 } 11598 "empty"))) 11599 , InfixApp 11600 SrcSpanInfo 11601 { srcInfoSpan = 11602 SrcSpan "tests/examples/RealGHC.lhs" 317 29 317 69 11603 , srcInfoPoints = [] 11604 } 11605 (App 11606 SrcSpanInfo 11607 { srcInfoSpan = 11608 SrcSpan 11609 "tests/examples/RealGHC.lhs" 317 29 317 51 11610 , srcInfoPoints = [] 11611 } 11612 (Var 11613 SrcSpanInfo 11614 { srcInfoSpan = 11615 SrcSpan 11616 "tests/examples/RealGHC.lhs" 317 29 317 34 11617 , srcInfoPoints = [] 11618 } 11619 (UnQual 11620 SrcSpanInfo 11621 { srcInfoSpan = 11622 SrcSpan 11623 "tests/examples/RealGHC.lhs" 11624 317 11625 29 11626 317 11627 34 11628 , srcInfoPoints = [] 11629 } 11630 (Ident 11631 SrcSpanInfo 11632 { srcInfoSpan = 11633 SrcSpan 11634 "tests/examples/RealGHC.lhs" 11635 317 11636 29 11637 317 11638 34 11639 , srcInfoPoints = [] 11640 } 11641 "ptext"))) 11642 (Paren 11643 SrcSpanInfo 11644 { srcInfoSpan = 11645 SrcSpan 11646 "tests/examples/RealGHC.lhs" 317 35 317 51 11647 , srcInfoPoints = 11648 [ SrcSpan 11649 "tests/examples/RealGHC.lhs" 11650 317 11651 35 11652 317 11653 36 11654 , SrcSpan 11655 "tests/examples/RealGHC.lhs" 11656 317 11657 50 11658 317 11659 51 11660 ] 11661 } 11662 (App 11663 SrcSpanInfo 11664 { srcInfoSpan = 11665 SrcSpan 11666 "tests/examples/RealGHC.lhs" 11667 317 11668 36 11669 317 11670 50 11671 , srcInfoPoints = [] 11672 } 11673 (Var 11674 SrcSpanInfo 11675 { srcInfoSpan = 11676 SrcSpan 11677 "tests/examples/RealGHC.lhs" 11678 317 11679 36 11680 317 11681 40 11682 , srcInfoPoints = [] 11683 } 11684 (UnQual 11685 SrcSpanInfo 11686 { srcInfoSpan = 11687 SrcSpan 11688 "tests/examples/RealGHC.lhs" 11689 317 11690 36 11691 317 11692 40 11693 , srcInfoPoints = [] 11694 } 11695 (Ident 11696 SrcSpanInfo 11697 { srcInfoSpan = 11698 SrcSpan 11699 "tests/examples/RealGHC.lhs" 11700 317 11701 36 11702 317 11703 40 11704 , srcInfoPoints = [] 11705 } 11706 "sLit"))) 11707 (Lit 11708 SrcSpanInfo 11709 { srcInfoSpan = 11710 SrcSpan 11711 "tests/examples/RealGHC.lhs" 11712 317 11713 41 11714 317 11715 50 11716 , srcInfoPoints = [] 11717 } 11718 (String 11719 SrcSpanInfo 11720 { srcInfoSpan = 11721 SrcSpan 11722 "tests/examples/RealGHC.lhs" 11723 317 11724 41 11725 317 11726 50 11727 , srcInfoPoints = [] 11728 } 11729 "Rule 1:" 11730 "Rule 1:"))))) 11731 (QVarOp 11732 SrcSpanInfo 11733 { srcInfoSpan = 11734 SrcSpan 11735 "tests/examples/RealGHC.lhs" 317 52 317 55 11736 , srcInfoPoints = [] 11737 } 11738 (UnQual 11739 SrcSpanInfo 11740 { srcInfoSpan = 11741 SrcSpan 11742 "tests/examples/RealGHC.lhs" 317 52 317 55 11743 , srcInfoPoints = [] 11744 } 11745 (Symbol 11746 SrcSpanInfo 11747 { srcInfoSpan = 11748 SrcSpan 11749 "tests/examples/RealGHC.lhs" 11750 317 11751 52 11752 317 11753 55 11754 , srcInfoPoints = [] 11755 } 11756 "<+>"))) 11757 (App 11758 SrcSpanInfo 11759 { srcInfoSpan = 11760 SrcSpan 11761 "tests/examples/RealGHC.lhs" 317 56 317 69 11762 , srcInfoPoints = [] 11763 } 11764 (Var 11765 SrcSpanInfo 11766 { srcInfoSpan = 11767 SrcSpan 11768 "tests/examples/RealGHC.lhs" 317 56 317 63 11769 , srcInfoPoints = [] 11770 } 11771 (UnQual 11772 SrcSpanInfo 11773 { srcInfoSpan = 11774 SrcSpan 11775 "tests/examples/RealGHC.lhs" 11776 317 11777 56 11778 317 11779 63 11780 , srcInfoPoints = [] 11781 } 11782 (Ident 11783 SrcSpanInfo 11784 { srcInfoSpan = 11785 SrcSpan 11786 "tests/examples/RealGHC.lhs" 11787 317 11788 56 11789 317 11790 63 11791 , srcInfoPoints = [] 11792 } 11793 "pp_rule"))) 11794 (Var 11795 SrcSpanInfo 11796 { srcInfoSpan = 11797 SrcSpan 11798 "tests/examples/RealGHC.lhs" 317 64 317 69 11799 , srcInfoPoints = [] 11800 } 11801 (UnQual 11802 SrcSpanInfo 11803 { srcInfoSpan = 11804 SrcSpan 11805 "tests/examples/RealGHC.lhs" 11806 317 11807 64 11808 317 11809 69 11810 , srcInfoPoints = [] 11811 } 11812 (Ident 11813 SrcSpanInfo 11814 { srcInfoSpan = 11815 SrcSpan 11816 "tests/examples/RealGHC.lhs" 11817 317 11818 64 11819 317 11820 69 11821 , srcInfoPoints = [] 11822 } 11823 "rule1")))) 11824 , InfixApp 11825 SrcSpanInfo 11826 { srcInfoSpan = 11827 SrcSpan "tests/examples/RealGHC.lhs" 318 29 318 69 11828 , srcInfoPoints = [] 11829 } 11830 (App 11831 SrcSpanInfo 11832 { srcInfoSpan = 11833 SrcSpan 11834 "tests/examples/RealGHC.lhs" 318 29 318 51 11835 , srcInfoPoints = [] 11836 } 11837 (Var 11838 SrcSpanInfo 11839 { srcInfoSpan = 11840 SrcSpan 11841 "tests/examples/RealGHC.lhs" 318 29 318 34 11842 , srcInfoPoints = [] 11843 } 11844 (UnQual 11845 SrcSpanInfo 11846 { srcInfoSpan = 11847 SrcSpan 11848 "tests/examples/RealGHC.lhs" 11849 318 11850 29 11851 318 11852 34 11853 , srcInfoPoints = [] 11854 } 11855 (Ident 11856 SrcSpanInfo 11857 { srcInfoSpan = 11858 SrcSpan 11859 "tests/examples/RealGHC.lhs" 11860 318 11861 29 11862 318 11863 34 11864 , srcInfoPoints = [] 11865 } 11866 "ptext"))) 11867 (Paren 11868 SrcSpanInfo 11869 { srcInfoSpan = 11870 SrcSpan 11871 "tests/examples/RealGHC.lhs" 318 35 318 51 11872 , srcInfoPoints = 11873 [ SrcSpan 11874 "tests/examples/RealGHC.lhs" 11875 318 11876 35 11877 318 11878 36 11879 , SrcSpan 11880 "tests/examples/RealGHC.lhs" 11881 318 11882 50 11883 318 11884 51 11885 ] 11886 } 11887 (App 11888 SrcSpanInfo 11889 { srcInfoSpan = 11890 SrcSpan 11891 "tests/examples/RealGHC.lhs" 11892 318 11893 36 11894 318 11895 50 11896 , srcInfoPoints = [] 11897 } 11898 (Var 11899 SrcSpanInfo 11900 { srcInfoSpan = 11901 SrcSpan 11902 "tests/examples/RealGHC.lhs" 11903 318 11904 36 11905 318 11906 40 11907 , srcInfoPoints = [] 11908 } 11909 (UnQual 11910 SrcSpanInfo 11911 { srcInfoSpan = 11912 SrcSpan 11913 "tests/examples/RealGHC.lhs" 11914 318 11915 36 11916 318 11917 40 11918 , srcInfoPoints = [] 11919 } 11920 (Ident 11921 SrcSpanInfo 11922 { srcInfoSpan = 11923 SrcSpan 11924 "tests/examples/RealGHC.lhs" 11925 318 11926 36 11927 318 11928 40 11929 , srcInfoPoints = [] 11930 } 11931 "sLit"))) 11932 (Lit 11933 SrcSpanInfo 11934 { srcInfoSpan = 11935 SrcSpan 11936 "tests/examples/RealGHC.lhs" 11937 318 11938 41 11939 318 11940 50 11941 , srcInfoPoints = [] 11942 } 11943 (String 11944 SrcSpanInfo 11945 { srcInfoSpan = 11946 SrcSpan 11947 "tests/examples/RealGHC.lhs" 11948 318 11949 41 11950 318 11951 50 11952 , srcInfoPoints = [] 11953 } 11954 "Rule 2:" 11955 "Rule 2:"))))) 11956 (QVarOp 11957 SrcSpanInfo 11958 { srcInfoSpan = 11959 SrcSpan 11960 "tests/examples/RealGHC.lhs" 318 52 318 55 11961 , srcInfoPoints = [] 11962 } 11963 (UnQual 11964 SrcSpanInfo 11965 { srcInfoSpan = 11966 SrcSpan 11967 "tests/examples/RealGHC.lhs" 318 52 318 55 11968 , srcInfoPoints = [] 11969 } 11970 (Symbol 11971 SrcSpanInfo 11972 { srcInfoSpan = 11973 SrcSpan 11974 "tests/examples/RealGHC.lhs" 11975 318 11976 52 11977 318 11978 55 11979 , srcInfoPoints = [] 11980 } 11981 "<+>"))) 11982 (App 11983 SrcSpanInfo 11984 { srcInfoSpan = 11985 SrcSpan 11986 "tests/examples/RealGHC.lhs" 318 56 318 69 11987 , srcInfoPoints = [] 11988 } 11989 (Var 11990 SrcSpanInfo 11991 { srcInfoSpan = 11992 SrcSpan 11993 "tests/examples/RealGHC.lhs" 318 56 318 63 11994 , srcInfoPoints = [] 11995 } 11996 (UnQual 11997 SrcSpanInfo 11998 { srcInfoSpan = 11999 SrcSpan 12000 "tests/examples/RealGHC.lhs" 12001 318 12002 56 12003 318 12004 63 12005 , srcInfoPoints = [] 12006 } 12007 (Ident 12008 SrcSpanInfo 12009 { srcInfoSpan = 12010 SrcSpan 12011 "tests/examples/RealGHC.lhs" 12012 318 12013 56 12014 318 12015 63 12016 , srcInfoPoints = [] 12017 } 12018 "pp_rule"))) 12019 (Var 12020 SrcSpanInfo 12021 { srcInfoSpan = 12022 SrcSpan 12023 "tests/examples/RealGHC.lhs" 318 64 318 69 12024 , srcInfoPoints = [] 12025 } 12026 (UnQual 12027 SrcSpanInfo 12028 { srcInfoSpan = 12029 SrcSpan 12030 "tests/examples/RealGHC.lhs" 12031 318 12032 64 12033 318 12034 69 12035 , srcInfoPoints = [] 12036 } 12037 (Ident 12038 SrcSpanInfo 12039 { srcInfoSpan = 12040 SrcSpan 12041 "tests/examples/RealGHC.lhs" 12042 318 12043 64 12044 318 12045 69 12046 , srcInfoPoints = [] 12047 } 12048 "rule2")))) 12049 ])))) 12050 (QVarOp 12051 SrcSpanInfo 12052 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 318 72 318 73 12053 , srcInfoPoints = [] 12054 } 12055 (UnQual 12056 SrcSpanInfo 12057 { srcInfoSpan = 12058 SrcSpan "tests/examples/RealGHC.lhs" 318 72 318 73 12059 , srcInfoPoints = [] 12060 } 12061 (Symbol 12062 SrcSpanInfo 12063 { srcInfoSpan = 12064 SrcSpan "tests/examples/RealGHC.lhs" 318 72 318 73 12065 , srcInfoPoints = [] 12066 } 12067 "$"))) 12068 (App 12069 SrcSpanInfo 12070 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 319 25 319 57 12071 , srcInfoPoints = [] 12072 } 12073 (App 12074 SrcSpanInfo 12075 { srcInfoSpan = 12076 SrcSpan "tests/examples/RealGHC.lhs" 319 25 319 53 12077 , srcInfoPoints = [] 12078 } 12079 (App 12080 SrcSpanInfo 12081 { srcInfoSpan = 12082 SrcSpan "tests/examples/RealGHC.lhs" 319 25 319 40 12083 , srcInfoPoints = [] 12084 } 12085 (Var 12086 SrcSpanInfo 12087 { srcInfoSpan = 12088 SrcSpan "tests/examples/RealGHC.lhs" 319 25 319 33 12089 , srcInfoPoints = [] 12090 } 12091 (UnQual 12092 SrcSpanInfo 12093 { srcInfoSpan = 12094 SrcSpan "tests/examples/RealGHC.lhs" 319 25 319 33 12095 , srcInfoPoints = [] 12096 } 12097 (Ident 12098 SrcSpanInfo 12099 { srcInfoSpan = 12100 SrcSpan 12101 "tests/examples/RealGHC.lhs" 319 25 319 33 12102 , srcInfoPoints = [] 12103 } 12104 "findBest"))) 12105 (Var 12106 SrcSpanInfo 12107 { srcInfoSpan = 12108 SrcSpan "tests/examples/RealGHC.lhs" 319 34 319 40 12109 , srcInfoPoints = [] 12110 } 12111 (UnQual 12112 SrcSpanInfo 12113 { srcInfoSpan = 12114 SrcSpan "tests/examples/RealGHC.lhs" 319 34 319 40 12115 , srcInfoPoints = [] 12116 } 12117 (Ident 12118 SrcSpanInfo 12119 { srcInfoSpan = 12120 SrcSpan 12121 "tests/examples/RealGHC.lhs" 319 34 319 40 12122 , srcInfoPoints = [] 12123 } 12124 "target")))) 12125 (Tuple 12126 SrcSpanInfo 12127 { srcInfoSpan = 12128 SrcSpan "tests/examples/RealGHC.lhs" 319 41 319 53 12129 , srcInfoPoints = 12130 [ SrcSpan "tests/examples/RealGHC.lhs" 319 41 319 42 12131 , SrcSpan "tests/examples/RealGHC.lhs" 319 47 319 48 12132 , SrcSpan "tests/examples/RealGHC.lhs" 319 52 319 53 12133 ] 12134 } 12135 Boxed 12136 [ Var 12137 SrcSpanInfo 12138 { srcInfoSpan = 12139 SrcSpan "tests/examples/RealGHC.lhs" 319 42 319 47 12140 , srcInfoPoints = [] 12141 } 12142 (UnQual 12143 SrcSpanInfo 12144 { srcInfoSpan = 12145 SrcSpan "tests/examples/RealGHC.lhs" 319 42 319 47 12146 , srcInfoPoints = [] 12147 } 12148 (Ident 12149 SrcSpanInfo 12150 { srcInfoSpan = 12151 SrcSpan 12152 "tests/examples/RealGHC.lhs" 319 42 319 47 12153 , srcInfoPoints = [] 12154 } 12155 "rule1")) 12156 , Var 12157 SrcSpanInfo 12158 { srcInfoSpan = 12159 SrcSpan "tests/examples/RealGHC.lhs" 319 48 319 52 12160 , srcInfoPoints = [] 12161 } 12162 (UnQual 12163 SrcSpanInfo 12164 { srcInfoSpan = 12165 SrcSpan "tests/examples/RealGHC.lhs" 319 48 319 52 12166 , srcInfoPoints = [] 12167 } 12168 (Ident 12169 SrcSpanInfo 12170 { srcInfoSpan = 12171 SrcSpan 12172 "tests/examples/RealGHC.lhs" 319 48 319 52 12173 , srcInfoPoints = [] 12174 } 12175 "ans1")) 12176 ])) 12177 (Var 12178 SrcSpanInfo 12179 { srcInfoSpan = 12180 SrcSpan "tests/examples/RealGHC.lhs" 319 54 319 57 12181 , srcInfoPoints = [] 12182 } 12183 (UnQual 12184 SrcSpanInfo 12185 { srcInfoSpan = 12186 SrcSpan "tests/examples/RealGHC.lhs" 319 54 319 57 12187 , srcInfoPoints = [] 12188 } 12189 (Ident 12190 SrcSpanInfo 12191 { srcInfoSpan = 12192 SrcSpan "tests/examples/RealGHC.lhs" 319 54 319 57 12193 , srcInfoPoints = [] 12194 } 12195 "prs")))))) 12196 , GuardedRhs 12197 SrcSpanInfo 12198 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 3 320 49 12199 , srcInfoPoints = 12200 [ SrcSpan "tests/examples/RealGHC.lhs" 320 3 320 4 12201 , SrcSpan "tests/examples/RealGHC.lhs" 320 15 320 16 12202 ] 12203 } 12204 [ Qualifier 12205 SrcSpanInfo 12206 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 5 320 14 12207 , srcInfoPoints = [] 12208 } 12209 (Var 12210 SrcSpanInfo 12211 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 5 320 14 12212 , srcInfoPoints = [] 12213 } 12214 (UnQual 12215 SrcSpanInfo 12216 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 5 320 14 12217 , srcInfoPoints = [] 12218 } 12219 (Ident 12220 SrcSpanInfo 12221 { srcInfoSpan = 12222 SrcSpan "tests/examples/RealGHC.lhs" 320 5 320 14 12223 , srcInfoPoints = [] 12224 } 12225 "otherwise"))) 12226 ] 12227 (App 12228 SrcSpanInfo 12229 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 17 320 49 12230 , srcInfoPoints = [] 12231 } 12232 (App 12233 SrcSpanInfo 12234 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 17 320 45 12235 , srcInfoPoints = [] 12236 } 12237 (App 12238 SrcSpanInfo 12239 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 17 320 32 12240 , srcInfoPoints = [] 12241 } 12242 (Var 12243 SrcSpanInfo 12244 { srcInfoSpan = 12245 SrcSpan "tests/examples/RealGHC.lhs" 320 17 320 25 12246 , srcInfoPoints = [] 12247 } 12248 (UnQual 12249 SrcSpanInfo 12250 { srcInfoSpan = 12251 SrcSpan "tests/examples/RealGHC.lhs" 320 17 320 25 12252 , srcInfoPoints = [] 12253 } 12254 (Ident 12255 SrcSpanInfo 12256 { srcInfoSpan = 12257 SrcSpan "tests/examples/RealGHC.lhs" 320 17 320 25 12258 , srcInfoPoints = [] 12259 } 12260 "findBest"))) 12261 (Var 12262 SrcSpanInfo 12263 { srcInfoSpan = 12264 SrcSpan "tests/examples/RealGHC.lhs" 320 26 320 32 12265 , srcInfoPoints = [] 12266 } 12267 (UnQual 12268 SrcSpanInfo 12269 { srcInfoSpan = 12270 SrcSpan "tests/examples/RealGHC.lhs" 320 26 320 32 12271 , srcInfoPoints = [] 12272 } 12273 (Ident 12274 SrcSpanInfo 12275 { srcInfoSpan = 12276 SrcSpan "tests/examples/RealGHC.lhs" 320 26 320 32 12277 , srcInfoPoints = [] 12278 } 12279 "target")))) 12280 (Tuple 12281 SrcSpanInfo 12282 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 33 320 45 12283 , srcInfoPoints = 12284 [ SrcSpan "tests/examples/RealGHC.lhs" 320 33 320 34 12285 , SrcSpan "tests/examples/RealGHC.lhs" 320 39 320 40 12286 , SrcSpan "tests/examples/RealGHC.lhs" 320 44 320 45 12287 ] 12288 } 12289 Boxed 12290 [ Var 12291 SrcSpanInfo 12292 { srcInfoSpan = 12293 SrcSpan "tests/examples/RealGHC.lhs" 320 34 320 39 12294 , srcInfoPoints = [] 12295 } 12296 (UnQual 12297 SrcSpanInfo 12298 { srcInfoSpan = 12299 SrcSpan "tests/examples/RealGHC.lhs" 320 34 320 39 12300 , srcInfoPoints = [] 12301 } 12302 (Ident 12303 SrcSpanInfo 12304 { srcInfoSpan = 12305 SrcSpan "tests/examples/RealGHC.lhs" 320 34 320 39 12306 , srcInfoPoints = [] 12307 } 12308 "rule1")) 12309 , Var 12310 SrcSpanInfo 12311 { srcInfoSpan = 12312 SrcSpan "tests/examples/RealGHC.lhs" 320 40 320 44 12313 , srcInfoPoints = [] 12314 } 12315 (UnQual 12316 SrcSpanInfo 12317 { srcInfoSpan = 12318 SrcSpan "tests/examples/RealGHC.lhs" 320 40 320 44 12319 , srcInfoPoints = [] 12320 } 12321 (Ident 12322 SrcSpanInfo 12323 { srcInfoSpan = 12324 SrcSpan "tests/examples/RealGHC.lhs" 320 40 320 44 12325 , srcInfoPoints = [] 12326 } 12327 "ans1")) 12328 ])) 12329 (Var 12330 SrcSpanInfo 12331 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 46 320 49 12332 , srcInfoPoints = [] 12333 } 12334 (UnQual 12335 SrcSpanInfo 12336 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 320 46 320 49 12337 , srcInfoPoints = [] 12338 } 12339 (Ident 12340 SrcSpanInfo 12341 { srcInfoSpan = 12342 SrcSpan "tests/examples/RealGHC.lhs" 320 46 320 49 12343 , srcInfoPoints = [] 12344 } 12345 "prs")))) 12346 ]) 12347 (Just 12348 (BDecls 12349 SrcSpanInfo 12350 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 5 322 23 12351 , srcInfoPoints = 12352 [ SrcSpan "tests/examples/RealGHC.lhs" 322 5 322 5 12353 , SrcSpan "tests/examples/RealGHC.lhs" 324 1 324 0 12354 ] 12355 } 12356 [ PatBind 12357 SrcSpanInfo 12358 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 5 322 23 12359 , srcInfoPoints = [] 12360 } 12361 (PTuple 12362 SrcSpanInfo 12363 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 5 322 14 12364 , srcInfoPoints = 12365 [ SrcSpan "tests/examples/RealGHC.lhs" 322 5 322 6 12366 , SrcSpan "tests/examples/RealGHC.lhs" 322 8 322 9 12367 , SrcSpan "tests/examples/RealGHC.lhs" 322 13 322 14 12368 ] 12369 } 12370 Boxed 12371 [ PVar 12372 SrcSpanInfo 12373 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 6 322 8 12374 , srcInfoPoints = [] 12375 } 12376 (Ident 12377 SrcSpanInfo 12378 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 6 322 8 12379 , srcInfoPoints = [] 12380 } 12381 "fn") 12382 , PVar 12383 SrcSpanInfo 12384 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 9 322 13 12385 , srcInfoPoints = [] 12386 } 12387 (Ident 12388 SrcSpanInfo 12389 { srcInfoSpan = 12390 SrcSpan "tests/examples/RealGHC.lhs" 322 9 322 13 12391 , srcInfoPoints = [] 12392 } 12393 "args") 12394 ]) 12395 (UnGuardedRhs 12396 SrcSpanInfo 12397 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 15 322 23 12398 , srcInfoPoints = 12399 [ SrcSpan "tests/examples/RealGHC.lhs" 322 15 322 16 ] 12400 } 12401 (Var 12402 SrcSpanInfo 12403 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 322 17 322 23 12404 , srcInfoPoints = [] 12405 } 12406 (UnQual 12407 SrcSpanInfo 12408 { srcInfoSpan = 12409 SrcSpan "tests/examples/RealGHC.lhs" 322 17 322 23 12410 , srcInfoPoints = [] 12411 } 12412 (Ident 12413 SrcSpanInfo 12414 { srcInfoSpan = 12415 SrcSpan "tests/examples/RealGHC.lhs" 322 17 322 23 12416 , srcInfoPoints = [] 12417 } 12418 "target")))) 12419 Nothing 12420 ])) 12421 ] 12422 , TypeSig 12423 SrcSpanInfo 12424 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 1 324 47 12425 , srcInfoPoints = 12426 [ SrcSpan "tests/examples/RealGHC.lhs" 324 16 324 18 ] 12427 } 12428 [ Ident 12429 SrcSpanInfo 12430 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 1 324 15 12431 , srcInfoPoints = [] 12432 } 12433 "isMoreSpecific" 12434 ] 12435 (TyFun 12436 SrcSpanInfo 12437 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 19 324 47 12438 , srcInfoPoints = 12439 [ SrcSpan "tests/examples/RealGHC.lhs" 324 28 324 30 ] 12440 } 12441 (TyCon 12442 SrcSpanInfo 12443 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 19 324 27 12444 , srcInfoPoints = [] 12445 } 12446 (UnQual 12447 SrcSpanInfo 12448 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 19 324 27 12449 , srcInfoPoints = [] 12450 } 12451 (Ident 12452 SrcSpanInfo 12453 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 19 324 27 12454 , srcInfoPoints = [] 12455 } 12456 "CoreRule"))) 12457 (TyFun 12458 SrcSpanInfo 12459 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 31 324 47 12460 , srcInfoPoints = 12461 [ SrcSpan "tests/examples/RealGHC.lhs" 324 40 324 42 ] 12462 } 12463 (TyCon 12464 SrcSpanInfo 12465 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 31 324 39 12466 , srcInfoPoints = [] 12467 } 12468 (UnQual 12469 SrcSpanInfo 12470 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 31 324 39 12471 , srcInfoPoints = [] 12472 } 12473 (Ident 12474 SrcSpanInfo 12475 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 31 324 39 12476 , srcInfoPoints = [] 12477 } 12478 "CoreRule"))) 12479 (TyCon 12480 SrcSpanInfo 12481 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 43 324 47 12482 , srcInfoPoints = [] 12483 } 12484 (UnQual 12485 SrcSpanInfo 12486 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 43 324 47 12487 , srcInfoPoints = [] 12488 } 12489 (Ident 12490 SrcSpanInfo 12491 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 324 43 324 47 12492 , srcInfoPoints = [] 12493 } 12494 "Bool"))))) 12495 , FunBind 12496 SrcSpanInfo 12497 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 1 331 45 12498 , srcInfoPoints = [] 12499 } 12500 [ Match 12501 SrcSpanInfo 12502 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 1 325 42 12503 , srcInfoPoints = [] 12504 } 12505 (Ident 12506 SrcSpanInfo 12507 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 1 325 15 12508 , srcInfoPoints = [] 12509 } 12510 "isMoreSpecific") 12511 [ PParen 12512 SrcSpanInfo 12513 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 16 325 32 12514 , srcInfoPoints = 12515 [ SrcSpan "tests/examples/RealGHC.lhs" 325 16 325 17 12516 , SrcSpan "tests/examples/RealGHC.lhs" 325 31 325 32 12517 ] 12518 } 12519 (PRec 12520 SrcSpanInfo 12521 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 17 325 31 12522 , srcInfoPoints = 12523 [ SrcSpan "tests/examples/RealGHC.lhs" 325 29 325 30 12524 , SrcSpan "tests/examples/RealGHC.lhs" 325 30 325 31 12525 ] 12526 } 12527 (UnQual 12528 SrcSpanInfo 12529 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 17 325 28 12530 , srcInfoPoints = [] 12531 } 12532 (Ident 12533 SrcSpanInfo 12534 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 17 325 28 12535 , srcInfoPoints = [] 12536 } 12537 "BuiltinRule")) 12538 []) 12539 , PVar 12540 SrcSpanInfo 12541 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 33 325 35 12542 , srcInfoPoints = [] 12543 } 12544 (Ident 12545 SrcSpanInfo 12546 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 33 325 35 12547 , srcInfoPoints = [] 12548 } 12549 "r2") 12550 ] 12551 (UnGuardedRhs 12552 SrcSpanInfo 12553 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 36 325 42 12554 , srcInfoPoints = 12555 [ SrcSpan "tests/examples/RealGHC.lhs" 325 36 325 37 ] 12556 } 12557 (Con 12558 SrcSpanInfo 12559 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 38 325 42 12560 , srcInfoPoints = [] 12561 } 12562 (UnQual 12563 SrcSpanInfo 12564 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 38 325 42 12565 , srcInfoPoints = [] 12566 } 12567 (Ident 12568 SrcSpanInfo 12569 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 325 38 325 42 12570 , srcInfoPoints = [] 12571 } 12572 "True")))) 12573 Nothing 12574 , Match 12575 SrcSpanInfo 12576 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 1 326 43 12577 , srcInfoPoints = [] 12578 } 12579 (Ident 12580 SrcSpanInfo 12581 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 1 326 15 12582 , srcInfoPoints = [] 12583 } 12584 "isMoreSpecific") 12585 [ PVar 12586 SrcSpanInfo 12587 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 16 326 18 12588 , srcInfoPoints = [] 12589 } 12590 (Ident 12591 SrcSpanInfo 12592 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 16 326 18 12593 , srcInfoPoints = [] 12594 } 12595 "r1") 12596 , PParen 12597 SrcSpanInfo 12598 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 19 326 35 12599 , srcInfoPoints = 12600 [ SrcSpan "tests/examples/RealGHC.lhs" 326 19 326 20 12601 , SrcSpan "tests/examples/RealGHC.lhs" 326 34 326 35 12602 ] 12603 } 12604 (PRec 12605 SrcSpanInfo 12606 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 20 326 34 12607 , srcInfoPoints = 12608 [ SrcSpan "tests/examples/RealGHC.lhs" 326 32 326 33 12609 , SrcSpan "tests/examples/RealGHC.lhs" 326 33 326 34 12610 ] 12611 } 12612 (UnQual 12613 SrcSpanInfo 12614 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 20 326 31 12615 , srcInfoPoints = [] 12616 } 12617 (Ident 12618 SrcSpanInfo 12619 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 20 326 31 12620 , srcInfoPoints = [] 12621 } 12622 "BuiltinRule")) 12623 []) 12624 ] 12625 (UnGuardedRhs 12626 SrcSpanInfo 12627 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 36 326 43 12628 , srcInfoPoints = 12629 [ SrcSpan "tests/examples/RealGHC.lhs" 326 36 326 37 ] 12630 } 12631 (Con 12632 SrcSpanInfo 12633 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 38 326 43 12634 , srcInfoPoints = [] 12635 } 12636 (UnQual 12637 SrcSpanInfo 12638 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 38 326 43 12639 , srcInfoPoints = [] 12640 } 12641 (Ident 12642 SrcSpanInfo 12643 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 326 38 326 43 12644 , srcInfoPoints = [] 12645 } 12646 "False")))) 12647 Nothing 12648 , Match 12649 SrcSpanInfo 12650 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 1 331 45 12651 , srcInfoPoints = 12652 [ SrcSpan "tests/examples/RealGHC.lhs" 330 3 330 8 ] 12653 } 12654 (Ident 12655 SrcSpanInfo 12656 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 1 327 15 12657 , srcInfoPoints = [] 12658 } 12659 "isMoreSpecific") 12660 [ PParen 12661 SrcSpanInfo 12662 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 16 327 61 12663 , srcInfoPoints = 12664 [ SrcSpan "tests/examples/RealGHC.lhs" 327 16 327 17 12665 , SrcSpan "tests/examples/RealGHC.lhs" 327 60 327 61 12666 ] 12667 } 12668 (PRec 12669 SrcSpanInfo 12670 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 17 327 60 12671 , srcInfoPoints = 12672 [ SrcSpan "tests/examples/RealGHC.lhs" 327 22 327 23 12673 , SrcSpan "tests/examples/RealGHC.lhs" 327 41 327 42 12674 , SrcSpan "tests/examples/RealGHC.lhs" 327 59 327 60 12675 ] 12676 } 12677 (UnQual 12678 SrcSpanInfo 12679 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 17 327 21 12680 , srcInfoPoints = [] 12681 } 12682 (Ident 12683 SrcSpanInfo 12684 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 17 327 21 12685 , srcInfoPoints = [] 12686 } 12687 "Rule")) 12688 [ PFieldPat 12689 SrcSpanInfo 12690 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 24 327 41 12691 , srcInfoPoints = 12692 [ SrcSpan "tests/examples/RealGHC.lhs" 327 33 327 34 ] 12693 } 12694 (UnQual 12695 SrcSpanInfo 12696 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 24 327 32 12697 , srcInfoPoints = [] 12698 } 12699 (Ident 12700 SrcSpanInfo 12701 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 24 327 32 12702 , srcInfoPoints = [] 12703 } 12704 "ru_bndrs")) 12705 (PVar 12706 SrcSpanInfo 12707 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 35 327 41 12708 , srcInfoPoints = [] 12709 } 12710 (Ident 12711 SrcSpanInfo 12712 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 35 327 41 12713 , srcInfoPoints = [] 12714 } 12715 "bndrs1")) 12716 , PFieldPat 12717 SrcSpanInfo 12718 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 43 327 58 12719 , srcInfoPoints = 12720 [ SrcSpan "tests/examples/RealGHC.lhs" 327 51 327 52 ] 12721 } 12722 (UnQual 12723 SrcSpanInfo 12724 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 43 327 50 12725 , srcInfoPoints = [] 12726 } 12727 (Ident 12728 SrcSpanInfo 12729 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 43 327 50 12730 , srcInfoPoints = [] 12731 } 12732 "ru_args")) 12733 (PVar 12734 SrcSpanInfo 12735 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 53 327 58 12736 , srcInfoPoints = [] 12737 } 12738 (Ident 12739 SrcSpanInfo 12740 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 327 53 327 58 12741 , srcInfoPoints = [] 12742 } 12743 "args1")) 12744 ]) 12745 , PParen 12746 SrcSpanInfo 12747 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 12 328 57 12748 , srcInfoPoints = 12749 [ SrcSpan "tests/examples/RealGHC.lhs" 328 12 328 13 12750 , SrcSpan "tests/examples/RealGHC.lhs" 328 56 328 57 12751 ] 12752 } 12753 (PRec 12754 SrcSpanInfo 12755 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 13 328 56 12756 , srcInfoPoints = 12757 [ SrcSpan "tests/examples/RealGHC.lhs" 328 18 328 19 12758 , SrcSpan "tests/examples/RealGHC.lhs" 328 37 328 38 12759 , SrcSpan "tests/examples/RealGHC.lhs" 328 55 328 56 12760 ] 12761 } 12762 (UnQual 12763 SrcSpanInfo 12764 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 13 328 17 12765 , srcInfoPoints = [] 12766 } 12767 (Ident 12768 SrcSpanInfo 12769 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 13 328 17 12770 , srcInfoPoints = [] 12771 } 12772 "Rule")) 12773 [ PFieldPat 12774 SrcSpanInfo 12775 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 20 328 37 12776 , srcInfoPoints = 12777 [ SrcSpan "tests/examples/RealGHC.lhs" 328 29 328 30 ] 12778 } 12779 (UnQual 12780 SrcSpanInfo 12781 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 20 328 28 12782 , srcInfoPoints = [] 12783 } 12784 (Ident 12785 SrcSpanInfo 12786 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 20 328 28 12787 , srcInfoPoints = [] 12788 } 12789 "ru_bndrs")) 12790 (PVar 12791 SrcSpanInfo 12792 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 31 328 37 12793 , srcInfoPoints = [] 12794 } 12795 (Ident 12796 SrcSpanInfo 12797 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 31 328 37 12798 , srcInfoPoints = [] 12799 } 12800 "bndrs2")) 12801 , PFieldPat 12802 SrcSpanInfo 12803 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 39 328 54 12804 , srcInfoPoints = 12805 [ SrcSpan "tests/examples/RealGHC.lhs" 328 47 328 48 ] 12806 } 12807 (UnQual 12808 SrcSpanInfo 12809 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 39 328 46 12810 , srcInfoPoints = [] 12811 } 12812 (Ident 12813 SrcSpanInfo 12814 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 39 328 46 12815 , srcInfoPoints = [] 12816 } 12817 "ru_args")) 12818 (PVar 12819 SrcSpanInfo 12820 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 49 328 54 12821 , srcInfoPoints = [] 12822 } 12823 (Ident 12824 SrcSpanInfo 12825 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 328 49 328 54 12826 , srcInfoPoints = [] 12827 } 12828 "args2")) 12829 ]) 12830 ] 12831 (UnGuardedRhs 12832 SrcSpanInfo 12833 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 3 329 48 12834 , srcInfoPoints = 12835 [ SrcSpan "tests/examples/RealGHC.lhs" 329 3 329 4 ] 12836 } 12837 (App 12838 SrcSpanInfo 12839 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 5 329 48 12840 , srcInfoPoints = [] 12841 } 12842 (Var 12843 SrcSpanInfo 12844 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 5 329 11 12845 , srcInfoPoints = [] 12846 } 12847 (UnQual 12848 SrcSpanInfo 12849 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 5 329 11 12850 , srcInfoPoints = [] 12851 } 12852 (Ident 12853 SrcSpanInfo 12854 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 5 329 11 12855 , srcInfoPoints = [] 12856 } 12857 "isJust"))) 12858 (Paren 12859 SrcSpanInfo 12860 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 12 329 48 12861 , srcInfoPoints = 12862 [ SrcSpan "tests/examples/RealGHC.lhs" 329 12 329 13 12863 , SrcSpan "tests/examples/RealGHC.lhs" 329 47 329 48 12864 ] 12865 } 12866 (App 12867 SrcSpanInfo 12868 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 13 329 47 12869 , srcInfoPoints = [] 12870 } 12871 (App 12872 SrcSpanInfo 12873 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 13 329 41 12874 , srcInfoPoints = [] 12875 } 12876 (App 12877 SrcSpanInfo 12878 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 13 329 35 12879 , srcInfoPoints = [] 12880 } 12881 (App 12882 SrcSpanInfo 12883 { srcInfoSpan = 12884 SrcSpan "tests/examples/RealGHC.lhs" 329 13 329 28 12885 , srcInfoPoints = [] 12886 } 12887 (Var 12888 SrcSpanInfo 12889 { srcInfoSpan = 12890 SrcSpan "tests/examples/RealGHC.lhs" 329 13 329 19 12891 , srcInfoPoints = [] 12892 } 12893 (UnQual 12894 SrcSpanInfo 12895 { srcInfoSpan = 12896 SrcSpan "tests/examples/RealGHC.lhs" 329 13 329 19 12897 , srcInfoPoints = [] 12898 } 12899 (Ident 12900 SrcSpanInfo 12901 { srcInfoSpan = 12902 SrcSpan "tests/examples/RealGHC.lhs" 329 13 329 19 12903 , srcInfoPoints = [] 12904 } 12905 "matchN"))) 12906 (Var 12907 SrcSpanInfo 12908 { srcInfoSpan = 12909 SrcSpan "tests/examples/RealGHC.lhs" 329 20 329 28 12910 , srcInfoPoints = [] 12911 } 12912 (UnQual 12913 SrcSpanInfo 12914 { srcInfoSpan = 12915 SrcSpan "tests/examples/RealGHC.lhs" 329 20 329 28 12916 , srcInfoPoints = [] 12917 } 12918 (Ident 12919 SrcSpanInfo 12920 { srcInfoSpan = 12921 SrcSpan "tests/examples/RealGHC.lhs" 329 20 329 28 12922 , srcInfoPoints = [] 12923 } 12924 "in_scope")))) 12925 (Var 12926 SrcSpanInfo 12927 { srcInfoSpan = 12928 SrcSpan "tests/examples/RealGHC.lhs" 329 29 329 35 12929 , srcInfoPoints = [] 12930 } 12931 (UnQual 12932 SrcSpanInfo 12933 { srcInfoSpan = 12934 SrcSpan "tests/examples/RealGHC.lhs" 329 29 329 35 12935 , srcInfoPoints = [] 12936 } 12937 (Ident 12938 SrcSpanInfo 12939 { srcInfoSpan = 12940 SrcSpan "tests/examples/RealGHC.lhs" 329 29 329 35 12941 , srcInfoPoints = [] 12942 } 12943 "bndrs2")))) 12944 (Var 12945 SrcSpanInfo 12946 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 36 329 41 12947 , srcInfoPoints = [] 12948 } 12949 (UnQual 12950 SrcSpanInfo 12951 { srcInfoSpan = 12952 SrcSpan "tests/examples/RealGHC.lhs" 329 36 329 41 12953 , srcInfoPoints = [] 12954 } 12955 (Ident 12956 SrcSpanInfo 12957 { srcInfoSpan = 12958 SrcSpan "tests/examples/RealGHC.lhs" 329 36 329 41 12959 , srcInfoPoints = [] 12960 } 12961 "args2")))) 12962 (Var 12963 SrcSpanInfo 12964 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 42 329 47 12965 , srcInfoPoints = [] 12966 } 12967 (UnQual 12968 SrcSpanInfo 12969 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 329 42 329 47 12970 , srcInfoPoints = [] 12971 } 12972 (Ident 12973 SrcSpanInfo 12974 { srcInfoSpan = 12975 SrcSpan "tests/examples/RealGHC.lhs" 329 42 329 47 12976 , srcInfoPoints = [] 12977 } 12978 "args1"))))))) 12979 (Just 12980 (BDecls 12981 SrcSpanInfo 12982 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 4 331 45 12983 , srcInfoPoints = 12984 [ SrcSpan "tests/examples/RealGHC.lhs" 331 4 331 4 12985 , SrcSpan "tests/examples/RealGHC.lhs" 335 1 335 0 12986 ] 12987 } 12988 [ PatBind 12989 SrcSpanInfo 12990 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 4 331 45 12991 , srcInfoPoints = [] 12992 } 12993 (PVar 12994 SrcSpanInfo 12995 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 4 331 12 12996 , srcInfoPoints = [] 12997 } 12998 (Ident 12999 SrcSpanInfo 13000 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 4 331 12 13001 , srcInfoPoints = [] 13002 } 13003 "in_scope")) 13004 (UnGuardedRhs 13005 SrcSpanInfo 13006 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 13 331 45 13007 , srcInfoPoints = 13008 [ SrcSpan "tests/examples/RealGHC.lhs" 331 13 331 14 ] 13009 } 13010 (App 13011 SrcSpanInfo 13012 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 331 15 331 45 13013 , srcInfoPoints = [] 13014 } 13015 (Var 13016 SrcSpanInfo 13017 { srcInfoSpan = 13018 SrcSpan "tests/examples/RealGHC.lhs" 331 15 331 27 13019 , srcInfoPoints = [] 13020 } 13021 (UnQual 13022 SrcSpanInfo 13023 { srcInfoSpan = 13024 SrcSpan "tests/examples/RealGHC.lhs" 331 15 331 27 13025 , srcInfoPoints = [] 13026 } 13027 (Ident 13028 SrcSpanInfo 13029 { srcInfoSpan = 13030 SrcSpan "tests/examples/RealGHC.lhs" 331 15 331 27 13031 , srcInfoPoints = [] 13032 } 13033 "mkInScopeSet"))) 13034 (Paren 13035 SrcSpanInfo 13036 { srcInfoSpan = 13037 SrcSpan "tests/examples/RealGHC.lhs" 331 28 331 45 13038 , srcInfoPoints = 13039 [ SrcSpan "tests/examples/RealGHC.lhs" 331 28 331 29 13040 , SrcSpan "tests/examples/RealGHC.lhs" 331 44 331 45 13041 ] 13042 } 13043 (App 13044 SrcSpanInfo 13045 { srcInfoSpan = 13046 SrcSpan "tests/examples/RealGHC.lhs" 331 29 331 44 13047 , srcInfoPoints = [] 13048 } 13049 (Var 13050 SrcSpanInfo 13051 { srcInfoSpan = 13052 SrcSpan "tests/examples/RealGHC.lhs" 331 29 331 37 13053 , srcInfoPoints = [] 13054 } 13055 (UnQual 13056 SrcSpanInfo 13057 { srcInfoSpan = 13058 SrcSpan "tests/examples/RealGHC.lhs" 331 29 331 37 13059 , srcInfoPoints = [] 13060 } 13061 (Ident 13062 SrcSpanInfo 13063 { srcInfoSpan = 13064 SrcSpan 13065 "tests/examples/RealGHC.lhs" 331 29 331 37 13066 , srcInfoPoints = [] 13067 } 13068 "mkVarSet"))) 13069 (Var 13070 SrcSpanInfo 13071 { srcInfoSpan = 13072 SrcSpan "tests/examples/RealGHC.lhs" 331 38 331 44 13073 , srcInfoPoints = [] 13074 } 13075 (UnQual 13076 SrcSpanInfo 13077 { srcInfoSpan = 13078 SrcSpan "tests/examples/RealGHC.lhs" 331 38 331 44 13079 , srcInfoPoints = [] 13080 } 13081 (Ident 13082 SrcSpanInfo 13083 { srcInfoSpan = 13084 SrcSpan 13085 "tests/examples/RealGHC.lhs" 331 38 331 44 13086 , srcInfoPoints = [] 13087 } 13088 "bndrs1"))))))) 13089 Nothing 13090 ])) 13091 ] 13092 , TypeSig 13093 SrcSpanInfo 13094 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 1 335 34 13095 , srcInfoPoints = 13096 [ SrcSpan "tests/examples/RealGHC.lhs" 335 13 335 15 ] 13097 } 13098 [ Ident 13099 SrcSpanInfo 13100 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 1 335 12 13101 , srcInfoPoints = [] 13102 } 13103 "noBlackList" 13104 ] 13105 (TyFun 13106 SrcSpanInfo 13107 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 16 335 34 13108 , srcInfoPoints = 13109 [ SrcSpan "tests/examples/RealGHC.lhs" 335 27 335 29 ] 13110 } 13111 (TyCon 13112 SrcSpanInfo 13113 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 16 335 26 13114 , srcInfoPoints = [] 13115 } 13116 (UnQual 13117 SrcSpanInfo 13118 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 16 335 26 13119 , srcInfoPoints = [] 13120 } 13121 (Ident 13122 SrcSpanInfo 13123 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 16 335 26 13124 , srcInfoPoints = [] 13125 } 13126 "Activation"))) 13127 (TyCon 13128 SrcSpanInfo 13129 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 30 335 34 13130 , srcInfoPoints = [] 13131 } 13132 (UnQual 13133 SrcSpanInfo 13134 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 30 335 34 13135 , srcInfoPoints = [] 13136 } 13137 (Ident 13138 SrcSpanInfo 13139 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 335 30 335 34 13140 , srcInfoPoints = [] 13141 } 13142 "Bool")))) 13143 , FunBind 13144 SrcSpanInfo 13145 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 1 336 24 13146 , srcInfoPoints = [] 13147 } 13148 [ Match 13149 SrcSpanInfo 13150 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 1 336 24 13151 , srcInfoPoints = [] 13152 } 13153 (Ident 13154 SrcSpanInfo 13155 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 1 336 12 13156 , srcInfoPoints = [] 13157 } 13158 "noBlackList") 13159 [ PVar 13160 SrcSpanInfo 13161 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 13 336 16 13162 , srcInfoPoints = [] 13163 } 13164 (Ident 13165 SrcSpanInfo 13166 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 13 336 16 13167 , srcInfoPoints = [] 13168 } 13169 "act") 13170 ] 13171 (UnGuardedRhs 13172 SrcSpanInfo 13173 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 17 336 24 13174 , srcInfoPoints = 13175 [ SrcSpan "tests/examples/RealGHC.lhs" 336 17 336 18 ] 13176 } 13177 (Con 13178 SrcSpanInfo 13179 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 19 336 24 13180 , srcInfoPoints = [] 13181 } 13182 (UnQual 13183 SrcSpanInfo 13184 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 19 336 24 13185 , srcInfoPoints = [] 13186 } 13187 (Ident 13188 SrcSpanInfo 13189 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 336 19 336 24 13190 , srcInfoPoints = [] 13191 } 13192 "False")))) 13193 Nothing 13194 ] 13195 , TypeSig 13196 SrcSpanInfo 13197 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 1 340 36 13198 , srcInfoPoints = 13199 [ SrcSpan "tests/examples/RealGHC.lhs" 338 11 338 13 ] 13200 } 13201 [ Ident 13202 SrcSpanInfo 13203 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 1 338 10 13204 , srcInfoPoints = [] 13205 } 13206 "matchRule" 13207 ] 13208 (TyFun 13209 SrcSpanInfo 13210 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 14 340 36 13211 , srcInfoPoints = 13212 [ SrcSpan "tests/examples/RealGHC.lhs" 338 35 338 37 ] 13213 } 13214 (TyParen 13215 SrcSpanInfo 13216 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 14 338 34 13217 , srcInfoPoints = 13218 [ SrcSpan "tests/examples/RealGHC.lhs" 338 14 338 15 13219 , SrcSpan "tests/examples/RealGHC.lhs" 338 33 338 34 13220 ] 13221 } 13222 (TyFun 13223 SrcSpanInfo 13224 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 15 338 33 13225 , srcInfoPoints = 13226 [ SrcSpan "tests/examples/RealGHC.lhs" 338 26 338 28 ] 13227 } 13228 (TyCon 13229 SrcSpanInfo 13230 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 15 338 25 13231 , srcInfoPoints = [] 13232 } 13233 (UnQual 13234 SrcSpanInfo 13235 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 15 338 25 13236 , srcInfoPoints = [] 13237 } 13238 (Ident 13239 SrcSpanInfo 13240 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 15 338 25 13241 , srcInfoPoints = [] 13242 } 13243 "Activation"))) 13244 (TyCon 13245 SrcSpanInfo 13246 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 29 338 33 13247 , srcInfoPoints = [] 13248 } 13249 (UnQual 13250 SrcSpanInfo 13251 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 29 338 33 13252 , srcInfoPoints = [] 13253 } 13254 (Ident 13255 SrcSpanInfo 13256 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 29 338 33 13257 , srcInfoPoints = [] 13258 } 13259 "Bool"))))) 13260 (TyFun 13261 SrcSpanInfo 13262 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 38 340 36 13263 , srcInfoPoints = 13264 [ SrcSpan "tests/examples/RealGHC.lhs" 339 7 339 9 ] 13265 } 13266 (TyCon 13267 SrcSpanInfo 13268 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 38 338 48 13269 , srcInfoPoints = [] 13270 } 13271 (UnQual 13272 SrcSpanInfo 13273 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 38 338 48 13274 , srcInfoPoints = [] 13275 } 13276 (Ident 13277 SrcSpanInfo 13278 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 338 38 338 48 13279 , srcInfoPoints = [] 13280 } 13281 "InScopeSet"))) 13282 (TyFun 13283 SrcSpanInfo 13284 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 10 340 36 13285 , srcInfoPoints = 13286 [ SrcSpan "tests/examples/RealGHC.lhs" 339 21 339 23 ] 13287 } 13288 (TyList 13289 SrcSpanInfo 13290 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 10 339 20 13291 , srcInfoPoints = 13292 [ SrcSpan "tests/examples/RealGHC.lhs" 339 10 339 11 13293 , SrcSpan "tests/examples/RealGHC.lhs" 339 19 339 20 13294 ] 13295 } 13296 (TyCon 13297 SrcSpanInfo 13298 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 11 339 19 13299 , srcInfoPoints = [] 13300 } 13301 (UnQual 13302 SrcSpanInfo 13303 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 11 339 19 13304 , srcInfoPoints = [] 13305 } 13306 (Ident 13307 SrcSpanInfo 13308 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 11 339 19 13309 , srcInfoPoints = [] 13310 } 13311 "CoreExpr")))) 13312 (TyFun 13313 SrcSpanInfo 13314 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 24 340 36 13315 , srcInfoPoints = 13316 [ SrcSpan "tests/examples/RealGHC.lhs" 340 7 340 9 ] 13317 } 13318 (TyList 13319 SrcSpanInfo 13320 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 24 339 36 13321 , srcInfoPoints = 13322 [ SrcSpan "tests/examples/RealGHC.lhs" 339 24 339 25 13323 , SrcSpan "tests/examples/RealGHC.lhs" 339 35 339 36 13324 ] 13325 } 13326 (TyApp 13327 SrcSpanInfo 13328 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 25 339 35 13329 , srcInfoPoints = [] 13330 } 13331 (TyCon 13332 SrcSpanInfo 13333 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 25 339 30 13334 , srcInfoPoints = [] 13335 } 13336 (UnQual 13337 SrcSpanInfo 13338 { srcInfoSpan = 13339 SrcSpan "tests/examples/RealGHC.lhs" 339 25 339 30 13340 , srcInfoPoints = [] 13341 } 13342 (Ident 13343 SrcSpanInfo 13344 { srcInfoSpan = 13345 SrcSpan "tests/examples/RealGHC.lhs" 339 25 339 30 13346 , srcInfoPoints = [] 13347 } 13348 "Maybe"))) 13349 (TyCon 13350 SrcSpanInfo 13351 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 339 31 339 35 13352 , srcInfoPoints = [] 13353 } 13354 (UnQual 13355 SrcSpanInfo 13356 { srcInfoSpan = 13357 SrcSpan "tests/examples/RealGHC.lhs" 339 31 339 35 13358 , srcInfoPoints = [] 13359 } 13360 (Ident 13361 SrcSpanInfo 13362 { srcInfoSpan = 13363 SrcSpan "tests/examples/RealGHC.lhs" 339 31 339 35 13364 , srcInfoPoints = [] 13365 } 13366 "Name"))))) 13367 (TyFun 13368 SrcSpanInfo 13369 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 340 10 340 36 13370 , srcInfoPoints = 13371 [ SrcSpan "tests/examples/RealGHC.lhs" 340 19 340 21 ] 13372 } 13373 (TyCon 13374 SrcSpanInfo 13375 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 340 10 340 18 13376 , srcInfoPoints = [] 13377 } 13378 (UnQual 13379 SrcSpanInfo 13380 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 340 10 340 18 13381 , srcInfoPoints = [] 13382 } 13383 (Ident 13384 SrcSpanInfo 13385 { srcInfoSpan = 13386 SrcSpan "tests/examples/RealGHC.lhs" 340 10 340 18 13387 , srcInfoPoints = [] 13388 } 13389 "CoreRule"))) 13390 (TyApp 13391 SrcSpanInfo 13392 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 340 22 340 36 13393 , srcInfoPoints = [] 13394 } 13395 (TyCon 13396 SrcSpanInfo 13397 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 340 22 340 27 13398 , srcInfoPoints = [] 13399 } 13400 (UnQual 13401 SrcSpanInfo 13402 { srcInfoSpan = 13403 SrcSpan "tests/examples/RealGHC.lhs" 340 22 340 27 13404 , srcInfoPoints = [] 13405 } 13406 (Ident 13407 SrcSpanInfo 13408 { srcInfoSpan = 13409 SrcSpan "tests/examples/RealGHC.lhs" 340 22 340 27 13410 , srcInfoPoints = [] 13411 } 13412 "Maybe"))) 13413 (TyCon 13414 SrcSpanInfo 13415 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 340 28 340 36 13416 , srcInfoPoints = [] 13417 } 13418 (UnQual 13419 SrcSpanInfo 13420 { srcInfoSpan = 13421 SrcSpan "tests/examples/RealGHC.lhs" 340 28 340 36 13422 , srcInfoPoints = [] 13423 } 13424 (Ident 13425 SrcSpanInfo 13426 { srcInfoSpan = 13427 SrcSpan "tests/examples/RealGHC.lhs" 340 28 340 36 13428 , srcInfoPoints = [] 13429 } 13430 "CoreExpr"))))))))) 13431 , FunBind 13432 SrcSpanInfo 13433 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 1 382 53 13434 , srcInfoPoints = [] 13435 } 13436 [ Match 13437 SrcSpanInfo 13438 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 1 368 25 13439 , srcInfoPoints = [] 13440 } 13441 (Ident 13442 SrcSpanInfo 13443 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 1 364 10 13444 , srcInfoPoints = [] 13445 } 13446 "matchRule") 13447 [ PVar 13448 SrcSpanInfo 13449 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 11 364 20 13450 , srcInfoPoints = [] 13451 } 13452 (Ident 13453 SrcSpanInfo 13454 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 11 364 20 13455 , srcInfoPoints = [] 13456 } 13457 "is_active") 13458 , PVar 13459 SrcSpanInfo 13460 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 21 364 29 13461 , srcInfoPoints = [] 13462 } 13463 (Ident 13464 SrcSpanInfo 13465 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 21 364 29 13466 , srcInfoPoints = [] 13467 } 13468 "in_scope") 13469 , PVar 13470 SrcSpanInfo 13471 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 30 364 34 13472 , srcInfoPoints = [] 13473 } 13474 (Ident 13475 SrcSpanInfo 13476 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 30 364 34 13477 , srcInfoPoints = [] 13478 } 13479 "args") 13480 , PVar 13481 SrcSpanInfo 13482 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 35 364 45 13483 , srcInfoPoints = [] 13484 } 13485 (Ident 13486 SrcSpanInfo 13487 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 364 35 364 45 13488 , srcInfoPoints = [] 13489 } 13490 "rough_args") 13491 , PParen 13492 SrcSpanInfo 13493 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 7 365 58 13494 , srcInfoPoints = 13495 [ SrcSpan "tests/examples/RealGHC.lhs" 365 7 365 8 13496 , SrcSpan "tests/examples/RealGHC.lhs" 365 57 365 58 13497 ] 13498 } 13499 (PRec 13500 SrcSpanInfo 13501 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 8 365 57 13502 , srcInfoPoints = 13503 [ SrcSpan "tests/examples/RealGHC.lhs" 365 20 365 21 13504 , SrcSpan "tests/examples/RealGHC.lhs" 365 36 365 37 13505 , SrcSpan "tests/examples/RealGHC.lhs" 365 56 365 57 13506 ] 13507 } 13508 (UnQual 13509 SrcSpanInfo 13510 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 8 365 19 13511 , srcInfoPoints = [] 13512 } 13513 (Ident 13514 SrcSpanInfo 13515 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 8 365 19 13516 , srcInfoPoints = [] 13517 } 13518 "BuiltinRule")) 13519 [ PFieldPat 13520 SrcSpanInfo 13521 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 22 365 36 13522 , srcInfoPoints = 13523 [ SrcSpan "tests/examples/RealGHC.lhs" 365 30 365 31 ] 13524 } 13525 (UnQual 13526 SrcSpanInfo 13527 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 22 365 29 13528 , srcInfoPoints = [] 13529 } 13530 (Ident 13531 SrcSpanInfo 13532 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 22 365 29 13533 , srcInfoPoints = [] 13534 } 13535 "ru_name")) 13536 (PVar 13537 SrcSpanInfo 13538 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 32 365 36 13539 , srcInfoPoints = [] 13540 } 13541 (Ident 13542 SrcSpanInfo 13543 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 32 365 36 13544 , srcInfoPoints = [] 13545 } 13546 "name")) 13547 , PFieldPat 13548 SrcSpanInfo 13549 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 38 365 55 13550 , srcInfoPoints = 13551 [ SrcSpan "tests/examples/RealGHC.lhs" 365 45 365 46 ] 13552 } 13553 (UnQual 13554 SrcSpanInfo 13555 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 38 365 44 13556 , srcInfoPoints = [] 13557 } 13558 (Ident 13559 SrcSpanInfo 13560 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 38 365 44 13561 , srcInfoPoints = [] 13562 } 13563 "ru_try")) 13564 (PVar 13565 SrcSpanInfo 13566 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 47 365 55 13567 , srcInfoPoints = [] 13568 } 13569 (Ident 13570 SrcSpanInfo 13571 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 365 47 365 55 13572 , srcInfoPoints = [] 13573 } 13574 "match_fn")) 13575 ]) 13576 ] 13577 (UnGuardedRhs 13578 SrcSpanInfo 13579 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 3 368 25 13580 , srcInfoPoints = 13581 [ SrcSpan "tests/examples/RealGHC.lhs" 366 3 366 4 ] 13582 } 13583 (Case 13584 SrcSpanInfo 13585 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 5 368 25 13586 , srcInfoPoints = 13587 [ SrcSpan "tests/examples/RealGHC.lhs" 366 5 366 9 13588 , SrcSpan "tests/examples/RealGHC.lhs" 366 24 366 26 13589 , SrcSpan "tests/examples/RealGHC.lhs" 367 5 367 5 13590 , SrcSpan "tests/examples/RealGHC.lhs" 368 5 368 5 13591 , SrcSpan "tests/examples/RealGHC.lhs" 370 1 370 0 13592 ] 13593 } 13594 (App 13595 SrcSpanInfo 13596 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 10 366 23 13597 , srcInfoPoints = [] 13598 } 13599 (Var 13600 SrcSpanInfo 13601 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 10 366 18 13602 , srcInfoPoints = [] 13603 } 13604 (UnQual 13605 SrcSpanInfo 13606 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 10 366 18 13607 , srcInfoPoints = [] 13608 } 13609 (Ident 13610 SrcSpanInfo 13611 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 10 366 18 13612 , srcInfoPoints = [] 13613 } 13614 "match_fn"))) 13615 (Var 13616 SrcSpanInfo 13617 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 19 366 23 13618 , srcInfoPoints = [] 13619 } 13620 (UnQual 13621 SrcSpanInfo 13622 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 19 366 23 13623 , srcInfoPoints = [] 13624 } 13625 (Ident 13626 SrcSpanInfo 13627 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 366 19 366 23 13628 , srcInfoPoints = [] 13629 } 13630 "args")))) 13631 [ Alt 13632 SrcSpanInfo 13633 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 5 367 27 13634 , srcInfoPoints = [] 13635 } 13636 (PApp 13637 SrcSpanInfo 13638 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 5 367 14 13639 , srcInfoPoints = [] 13640 } 13641 (UnQual 13642 SrcSpanInfo 13643 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 5 367 9 13644 , srcInfoPoints = [] 13645 } 13646 (Ident 13647 SrcSpanInfo 13648 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 5 367 9 13649 , srcInfoPoints = [] 13650 } 13651 "Just")) 13652 [ PVar 13653 SrcSpanInfo 13654 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 10 367 14 13655 , srcInfoPoints = [] 13656 } 13657 (Ident 13658 SrcSpanInfo 13659 { srcInfoSpan = 13660 SrcSpan "tests/examples/RealGHC.lhs" 367 10 367 14 13661 , srcInfoPoints = [] 13662 } 13663 "expr") 13664 ]) 13665 (UnGuardedRhs 13666 SrcSpanInfo 13667 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 15 367 27 13668 , srcInfoPoints = 13669 [ SrcSpan "tests/examples/RealGHC.lhs" 367 15 367 17 ] 13670 } 13671 (App 13672 SrcSpanInfo 13673 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 367 18 367 27 13674 , srcInfoPoints = [] 13675 } 13676 (Con 13677 SrcSpanInfo 13678 { srcInfoSpan = 13679 SrcSpan "tests/examples/RealGHC.lhs" 367 18 367 22 13680 , srcInfoPoints = [] 13681 } 13682 (UnQual 13683 SrcSpanInfo 13684 { srcInfoSpan = 13685 SrcSpan "tests/examples/RealGHC.lhs" 367 18 367 22 13686 , srcInfoPoints = [] 13687 } 13688 (Ident 13689 SrcSpanInfo 13690 { srcInfoSpan = 13691 SrcSpan "tests/examples/RealGHC.lhs" 367 18 367 22 13692 , srcInfoPoints = [] 13693 } 13694 "Just"))) 13695 (Var 13696 SrcSpanInfo 13697 { srcInfoSpan = 13698 SrcSpan "tests/examples/RealGHC.lhs" 367 23 367 27 13699 , srcInfoPoints = [] 13700 } 13701 (UnQual 13702 SrcSpanInfo 13703 { srcInfoSpan = 13704 SrcSpan "tests/examples/RealGHC.lhs" 367 23 367 27 13705 , srcInfoPoints = [] 13706 } 13707 (Ident 13708 SrcSpanInfo 13709 { srcInfoSpan = 13710 SrcSpan "tests/examples/RealGHC.lhs" 367 23 367 27 13711 , srcInfoPoints = [] 13712 } 13713 "expr"))))) 13714 Nothing 13715 , Alt 13716 SrcSpanInfo 13717 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 368 5 368 25 13718 , srcInfoPoints = [] 13719 } 13720 (PApp 13721 SrcSpanInfo 13722 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 368 5 368 12 13723 , srcInfoPoints = [] 13724 } 13725 (UnQual 13726 SrcSpanInfo 13727 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 368 5 368 12 13728 , srcInfoPoints = [] 13729 } 13730 (Ident 13731 SrcSpanInfo 13732 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 368 5 368 12 13733 , srcInfoPoints = [] 13734 } 13735 "Nothing")) 13736 []) 13737 (UnGuardedRhs 13738 SrcSpanInfo 13739 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 368 15 368 25 13740 , srcInfoPoints = 13741 [ SrcSpan "tests/examples/RealGHC.lhs" 368 15 368 17 ] 13742 } 13743 (Con 13744 SrcSpanInfo 13745 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 368 18 368 25 13746 , srcInfoPoints = [] 13747 } 13748 (UnQual 13749 SrcSpanInfo 13750 { srcInfoSpan = 13751 SrcSpan "tests/examples/RealGHC.lhs" 368 18 368 25 13752 , srcInfoPoints = [] 13753 } 13754 (Ident 13755 SrcSpanInfo 13756 { srcInfoSpan = 13757 SrcSpan "tests/examples/RealGHC.lhs" 368 18 368 25 13758 , srcInfoPoints = [] 13759 } 13760 "Nothing")))) 13761 Nothing 13762 ])) 13763 Nothing 13764 , Match 13765 SrcSpanInfo 13766 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 1 382 53 13767 , srcInfoPoints = 13768 [ SrcSpan "tests/examples/RealGHC.lhs" 381 3 381 8 ] 13769 } 13770 (Ident 13771 SrcSpanInfo 13772 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 1 370 10 13773 , srcInfoPoints = [] 13774 } 13775 "matchRule") 13776 [ PVar 13777 SrcSpanInfo 13778 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 11 370 20 13779 , srcInfoPoints = [] 13780 } 13781 (Ident 13782 SrcSpanInfo 13783 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 11 370 20 13784 , srcInfoPoints = [] 13785 } 13786 "is_active") 13787 , PVar 13788 SrcSpanInfo 13789 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 21 370 29 13790 , srcInfoPoints = [] 13791 } 13792 (Ident 13793 SrcSpanInfo 13794 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 21 370 29 13795 , srcInfoPoints = [] 13796 } 13797 "in_scope") 13798 , PVar 13799 SrcSpanInfo 13800 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 30 370 34 13801 , srcInfoPoints = [] 13802 } 13803 (Ident 13804 SrcSpanInfo 13805 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 30 370 34 13806 , srcInfoPoints = [] 13807 } 13808 "args") 13809 , PVar 13810 SrcSpanInfo 13811 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 35 370 45 13812 , srcInfoPoints = [] 13813 } 13814 (Ident 13815 SrcSpanInfo 13816 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 370 35 370 45 13817 , srcInfoPoints = [] 13818 } 13819 "rough_args") 13820 , PParen 13821 SrcSpanInfo 13822 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 11 373 26 13823 , srcInfoPoints = 13824 [ SrcSpan "tests/examples/RealGHC.lhs" 371 11 371 12 13825 , SrcSpan "tests/examples/RealGHC.lhs" 373 25 373 26 13826 ] 13827 } 13828 (PRec 13829 SrcSpanInfo 13830 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 12 373 25 13831 , srcInfoPoints = 13832 [ SrcSpan "tests/examples/RealGHC.lhs" 371 17 371 18 13833 , SrcSpan "tests/examples/RealGHC.lhs" 371 31 371 32 13834 , SrcSpan "tests/examples/RealGHC.lhs" 371 45 371 46 13835 , SrcSpan "tests/examples/RealGHC.lhs" 371 66 371 67 13836 , SrcSpan "tests/examples/RealGHC.lhs" 372 30 372 31 13837 , SrcSpan "tests/examples/RealGHC.lhs" 372 50 372 51 13838 , SrcSpan "tests/examples/RealGHC.lhs" 373 24 373 25 13839 ] 13840 } 13841 (UnQual 13842 SrcSpanInfo 13843 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 12 371 16 13844 , srcInfoPoints = [] 13845 } 13846 (Ident 13847 SrcSpanInfo 13848 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 12 371 16 13849 , srcInfoPoints = [] 13850 } 13851 "Rule")) 13852 [ PFieldPat 13853 SrcSpanInfo 13854 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 19 371 31 13855 , srcInfoPoints = 13856 [ SrcSpan "tests/examples/RealGHC.lhs" 371 27 371 28 ] 13857 } 13858 (UnQual 13859 SrcSpanInfo 13860 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 19 371 26 13861 , srcInfoPoints = [] 13862 } 13863 (Ident 13864 SrcSpanInfo 13865 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 19 371 26 13866 , srcInfoPoints = [] 13867 } 13868 "ru_name")) 13869 (PVar 13870 SrcSpanInfo 13871 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 29 371 31 13872 , srcInfoPoints = [] 13873 } 13874 (Ident 13875 SrcSpanInfo 13876 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 29 371 31 13877 , srcInfoPoints = [] 13878 } 13879 "rn")) 13880 , PFieldPat 13881 SrcSpanInfo 13882 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 33 371 45 13883 , srcInfoPoints = 13884 [ SrcSpan "tests/examples/RealGHC.lhs" 371 40 371 41 ] 13885 } 13886 (UnQual 13887 SrcSpanInfo 13888 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 33 371 39 13889 , srcInfoPoints = [] 13890 } 13891 (Ident 13892 SrcSpanInfo 13893 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 33 371 39 13894 , srcInfoPoints = [] 13895 } 13896 "ru_act")) 13897 (PVar 13898 SrcSpanInfo 13899 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 42 371 45 13900 , srcInfoPoints = [] 13901 } 13902 (Ident 13903 SrcSpanInfo 13904 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 42 371 45 13905 , srcInfoPoints = [] 13906 } 13907 "act")) 13908 , PFieldPat 13909 SrcSpanInfo 13910 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 47 371 66 13911 , srcInfoPoints = 13912 [ SrcSpan "tests/examples/RealGHC.lhs" 371 56 371 57 ] 13913 } 13914 (UnQual 13915 SrcSpanInfo 13916 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 47 371 55 13917 , srcInfoPoints = [] 13918 } 13919 (Ident 13920 SrcSpanInfo 13921 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 47 371 55 13922 , srcInfoPoints = [] 13923 } 13924 "ru_rough")) 13925 (PVar 13926 SrcSpanInfo 13927 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 58 371 66 13928 , srcInfoPoints = [] 13929 } 13930 (Ident 13931 SrcSpanInfo 13932 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 371 58 371 66 13933 , srcInfoPoints = [] 13934 } 13935 "tpl_tops")) 13936 , PFieldPat 13937 SrcSpanInfo 13938 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 11 372 30 13939 , srcInfoPoints = 13940 [ SrcSpan "tests/examples/RealGHC.lhs" 372 20 372 21 ] 13941 } 13942 (UnQual 13943 SrcSpanInfo 13944 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 11 372 19 13945 , srcInfoPoints = [] 13946 } 13947 (Ident 13948 SrcSpanInfo 13949 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 11 372 19 13950 , srcInfoPoints = [] 13951 } 13952 "ru_bndrs")) 13953 (PVar 13954 SrcSpanInfo 13955 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 22 372 30 13956 , srcInfoPoints = [] 13957 } 13958 (Ident 13959 SrcSpanInfo 13960 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 22 372 30 13961 , srcInfoPoints = [] 13962 } 13963 "tpl_vars")) 13964 , PFieldPat 13965 SrcSpanInfo 13966 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 32 372 50 13967 , srcInfoPoints = 13968 [ SrcSpan "tests/examples/RealGHC.lhs" 372 40 372 41 ] 13969 } 13970 (UnQual 13971 SrcSpanInfo 13972 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 32 372 39 13973 , srcInfoPoints = [] 13974 } 13975 (Ident 13976 SrcSpanInfo 13977 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 32 372 39 13978 , srcInfoPoints = [] 13979 } 13980 "ru_args")) 13981 (PVar 13982 SrcSpanInfo 13983 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 42 372 50 13984 , srcInfoPoints = [] 13985 } 13986 (Ident 13987 SrcSpanInfo 13988 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 372 42 372 50 13989 , srcInfoPoints = [] 13990 } 13991 "tpl_args")) 13992 , PFieldPat 13993 SrcSpanInfo 13994 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 373 11 373 23 13995 , srcInfoPoints = 13996 [ SrcSpan "tests/examples/RealGHC.lhs" 373 18 373 19 ] 13997 } 13998 (UnQual 13999 SrcSpanInfo 14000 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 373 11 373 17 14001 , srcInfoPoints = [] 14002 } 14003 (Ident 14004 SrcSpanInfo 14005 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 373 11 373 17 14006 , srcInfoPoints = [] 14007 } 14008 "ru_rhs")) 14009 (PVar 14010 SrcSpanInfo 14011 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 373 20 373 23 14012 , srcInfoPoints = [] 14013 } 14014 (Ident 14015 SrcSpanInfo 14016 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 373 20 373 23 14017 , srcInfoPoints = [] 14018 } 14019 "rhs")) 14020 ]) 14021 ] 14022 (GuardedRhss 14023 SrcSpanInfo 14024 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 3 380 47 14025 , srcInfoPoints = [] 14026 } 14027 [ GuardedRhs 14028 SrcSpanInfo 14029 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 3 374 44 14030 , srcInfoPoints = 14031 [ SrcSpan "tests/examples/RealGHC.lhs" 374 3 374 4 14032 , SrcSpan "tests/examples/RealGHC.lhs" 374 35 374 36 14033 ] 14034 } 14035 [ Qualifier 14036 SrcSpanInfo 14037 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 5 374 24 14038 , srcInfoPoints = [] 14039 } 14040 (App 14041 SrcSpanInfo 14042 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 5 374 24 14043 , srcInfoPoints = [] 14044 } 14045 (Var 14046 SrcSpanInfo 14047 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 5 374 8 14048 , srcInfoPoints = [] 14049 } 14050 (UnQual 14051 SrcSpanInfo 14052 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 5 374 8 14053 , srcInfoPoints = [] 14054 } 14055 (Ident 14056 SrcSpanInfo 14057 { srcInfoSpan = 14058 SrcSpan "tests/examples/RealGHC.lhs" 374 5 374 8 14059 , srcInfoPoints = [] 14060 } 14061 "not"))) 14062 (Paren 14063 SrcSpanInfo 14064 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 9 374 24 14065 , srcInfoPoints = 14066 [ SrcSpan "tests/examples/RealGHC.lhs" 374 9 374 10 14067 , SrcSpan "tests/examples/RealGHC.lhs" 374 23 374 24 14068 ] 14069 } 14070 (App 14071 SrcSpanInfo 14072 { srcInfoSpan = 14073 SrcSpan "tests/examples/RealGHC.lhs" 374 10 374 23 14074 , srcInfoPoints = [] 14075 } 14076 (Var 14077 SrcSpanInfo 14078 { srcInfoSpan = 14079 SrcSpan "tests/examples/RealGHC.lhs" 374 10 374 19 14080 , srcInfoPoints = [] 14081 } 14082 (UnQual 14083 SrcSpanInfo 14084 { srcInfoSpan = 14085 SrcSpan "tests/examples/RealGHC.lhs" 374 10 374 19 14086 , srcInfoPoints = [] 14087 } 14088 (Ident 14089 SrcSpanInfo 14090 { srcInfoSpan = 14091 SrcSpan "tests/examples/RealGHC.lhs" 374 10 374 19 14092 , srcInfoPoints = [] 14093 } 14094 "is_active"))) 14095 (Var 14096 SrcSpanInfo 14097 { srcInfoSpan = 14098 SrcSpan "tests/examples/RealGHC.lhs" 374 20 374 23 14099 , srcInfoPoints = [] 14100 } 14101 (UnQual 14102 SrcSpanInfo 14103 { srcInfoSpan = 14104 SrcSpan "tests/examples/RealGHC.lhs" 374 20 374 23 14105 , srcInfoPoints = [] 14106 } 14107 (Ident 14108 SrcSpanInfo 14109 { srcInfoSpan = 14110 SrcSpan "tests/examples/RealGHC.lhs" 374 20 374 23 14111 , srcInfoPoints = [] 14112 } 14113 "act")))))) 14114 ] 14115 (Con 14116 SrcSpanInfo 14117 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 37 374 44 14118 , srcInfoPoints = [] 14119 } 14120 (UnQual 14121 SrcSpanInfo 14122 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 37 374 44 14123 , srcInfoPoints = [] 14124 } 14125 (Ident 14126 SrcSpanInfo 14127 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 374 37 374 44 14128 , srcInfoPoints = [] 14129 } 14130 "Nothing"))) 14131 , GuardedRhs 14132 SrcSpanInfo 14133 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 3 375 48 14134 , srcInfoPoints = 14135 [ SrcSpan "tests/examples/RealGHC.lhs" 375 3 375 4 14136 , SrcSpan "tests/examples/RealGHC.lhs" 375 39 375 40 14137 ] 14138 } 14139 [ Qualifier 14140 SrcSpanInfo 14141 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 5 375 38 14142 , srcInfoPoints = [] 14143 } 14144 (App 14145 SrcSpanInfo 14146 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 5 375 38 14147 , srcInfoPoints = [] 14148 } 14149 (App 14150 SrcSpanInfo 14151 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 5 375 27 14152 , srcInfoPoints = [] 14153 } 14154 (Var 14155 SrcSpanInfo 14156 { srcInfoSpan = 14157 SrcSpan "tests/examples/RealGHC.lhs" 375 5 375 18 14158 , srcInfoPoints = [] 14159 } 14160 (UnQual 14161 SrcSpanInfo 14162 { srcInfoSpan = 14163 SrcSpan "tests/examples/RealGHC.lhs" 375 5 375 18 14164 , srcInfoPoints = [] 14165 } 14166 (Ident 14167 SrcSpanInfo 14168 { srcInfoSpan = 14169 SrcSpan "tests/examples/RealGHC.lhs" 375 5 375 18 14170 , srcInfoPoints = [] 14171 } 14172 "ruleCantMatch"))) 14173 (Var 14174 SrcSpanInfo 14175 { srcInfoSpan = 14176 SrcSpan "tests/examples/RealGHC.lhs" 375 19 375 27 14177 , srcInfoPoints = [] 14178 } 14179 (UnQual 14180 SrcSpanInfo 14181 { srcInfoSpan = 14182 SrcSpan "tests/examples/RealGHC.lhs" 375 19 375 27 14183 , srcInfoPoints = [] 14184 } 14185 (Ident 14186 SrcSpanInfo 14187 { srcInfoSpan = 14188 SrcSpan "tests/examples/RealGHC.lhs" 375 19 375 27 14189 , srcInfoPoints = [] 14190 } 14191 "tpl_tops")))) 14192 (Var 14193 SrcSpanInfo 14194 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 28 375 38 14195 , srcInfoPoints = [] 14196 } 14197 (UnQual 14198 SrcSpanInfo 14199 { srcInfoSpan = 14200 SrcSpan "tests/examples/RealGHC.lhs" 375 28 375 38 14201 , srcInfoPoints = [] 14202 } 14203 (Ident 14204 SrcSpanInfo 14205 { srcInfoSpan = 14206 SrcSpan "tests/examples/RealGHC.lhs" 375 28 375 38 14207 , srcInfoPoints = [] 14208 } 14209 "rough_args")))) 14210 ] 14211 (Con 14212 SrcSpanInfo 14213 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 41 375 48 14214 , srcInfoPoints = [] 14215 } 14216 (UnQual 14217 SrcSpanInfo 14218 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 41 375 48 14219 , srcInfoPoints = [] 14220 } 14221 (Ident 14222 SrcSpanInfo 14223 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 375 41 375 48 14224 , srcInfoPoints = [] 14225 } 14226 "Nothing"))) 14227 , GuardedRhs 14228 SrcSpanInfo 14229 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 376 3 380 47 14230 , srcInfoPoints = 14231 [ SrcSpan "tests/examples/RealGHC.lhs" 376 3 376 4 14232 , SrcSpan "tests/examples/RealGHC.lhs" 377 3 377 4 14233 ] 14234 } 14235 [ Qualifier 14236 SrcSpanInfo 14237 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 376 5 376 14 14238 , srcInfoPoints = [] 14239 } 14240 (Var 14241 SrcSpanInfo 14242 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 376 5 376 14 14243 , srcInfoPoints = [] 14244 } 14245 (UnQual 14246 SrcSpanInfo 14247 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 376 5 376 14 14248 , srcInfoPoints = [] 14249 } 14250 (Ident 14251 SrcSpanInfo 14252 { srcInfoSpan = 14253 SrcSpan "tests/examples/RealGHC.lhs" 376 5 376 14 14254 , srcInfoPoints = [] 14255 } 14256 "otherwise"))) 14257 ] 14258 (Case 14259 SrcSpanInfo 14260 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 5 380 47 14261 , srcInfoPoints = 14262 [ SrcSpan "tests/examples/RealGHC.lhs" 377 5 377 9 14263 , SrcSpan "tests/examples/RealGHC.lhs" 377 49 377 51 14264 , SrcSpan "tests/examples/RealGHC.lhs" 378 5 378 5 14265 , SrcSpan "tests/examples/RealGHC.lhs" 379 5 379 5 14266 , SrcSpan "tests/examples/RealGHC.lhs" 381 3 381 0 14267 ] 14268 } 14269 (App 14270 SrcSpanInfo 14271 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 10 377 48 14272 , srcInfoPoints = [] 14273 } 14274 (App 14275 SrcSpanInfo 14276 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 10 377 43 14277 , srcInfoPoints = [] 14278 } 14279 (App 14280 SrcSpanInfo 14281 { srcInfoSpan = 14282 SrcSpan "tests/examples/RealGHC.lhs" 377 10 377 34 14283 , srcInfoPoints = [] 14284 } 14285 (App 14286 SrcSpanInfo 14287 { srcInfoSpan = 14288 SrcSpan "tests/examples/RealGHC.lhs" 377 10 377 25 14289 , srcInfoPoints = [] 14290 } 14291 (Var 14292 SrcSpanInfo 14293 { srcInfoSpan = 14294 SrcSpan "tests/examples/RealGHC.lhs" 377 10 377 16 14295 , srcInfoPoints = [] 14296 } 14297 (UnQual 14298 SrcSpanInfo 14299 { srcInfoSpan = 14300 SrcSpan "tests/examples/RealGHC.lhs" 377 10 377 16 14301 , srcInfoPoints = [] 14302 } 14303 (Ident 14304 SrcSpanInfo 14305 { srcInfoSpan = 14306 SrcSpan 14307 "tests/examples/RealGHC.lhs" 377 10 377 16 14308 , srcInfoPoints = [] 14309 } 14310 "matchN"))) 14311 (Var 14312 SrcSpanInfo 14313 { srcInfoSpan = 14314 SrcSpan "tests/examples/RealGHC.lhs" 377 17 377 25 14315 , srcInfoPoints = [] 14316 } 14317 (UnQual 14318 SrcSpanInfo 14319 { srcInfoSpan = 14320 SrcSpan "tests/examples/RealGHC.lhs" 377 17 377 25 14321 , srcInfoPoints = [] 14322 } 14323 (Ident 14324 SrcSpanInfo 14325 { srcInfoSpan = 14326 SrcSpan 14327 "tests/examples/RealGHC.lhs" 377 17 377 25 14328 , srcInfoPoints = [] 14329 } 14330 "in_scope")))) 14331 (Var 14332 SrcSpanInfo 14333 { srcInfoSpan = 14334 SrcSpan "tests/examples/RealGHC.lhs" 377 26 377 34 14335 , srcInfoPoints = [] 14336 } 14337 (UnQual 14338 SrcSpanInfo 14339 { srcInfoSpan = 14340 SrcSpan "tests/examples/RealGHC.lhs" 377 26 377 34 14341 , srcInfoPoints = [] 14342 } 14343 (Ident 14344 SrcSpanInfo 14345 { srcInfoSpan = 14346 SrcSpan "tests/examples/RealGHC.lhs" 377 26 377 34 14347 , srcInfoPoints = [] 14348 } 14349 "tpl_vars")))) 14350 (Var 14351 SrcSpanInfo 14352 { srcInfoSpan = 14353 SrcSpan "tests/examples/RealGHC.lhs" 377 35 377 43 14354 , srcInfoPoints = [] 14355 } 14356 (UnQual 14357 SrcSpanInfo 14358 { srcInfoSpan = 14359 SrcSpan "tests/examples/RealGHC.lhs" 377 35 377 43 14360 , srcInfoPoints = [] 14361 } 14362 (Ident 14363 SrcSpanInfo 14364 { srcInfoSpan = 14365 SrcSpan "tests/examples/RealGHC.lhs" 377 35 377 43 14366 , srcInfoPoints = [] 14367 } 14368 "tpl_args")))) 14369 (Var 14370 SrcSpanInfo 14371 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 377 44 377 48 14372 , srcInfoPoints = [] 14373 } 14374 (UnQual 14375 SrcSpanInfo 14376 { srcInfoSpan = 14377 SrcSpan "tests/examples/RealGHC.lhs" 377 44 377 48 14378 , srcInfoPoints = [] 14379 } 14380 (Ident 14381 SrcSpanInfo 14382 { srcInfoSpan = 14383 SrcSpan "tests/examples/RealGHC.lhs" 377 44 377 48 14384 , srcInfoPoints = [] 14385 } 14386 "args")))) 14387 [ Alt 14388 SrcSpanInfo 14389 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 378 5 378 34 14390 , srcInfoPoints = [] 14391 } 14392 (PApp 14393 SrcSpanInfo 14394 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 378 5 378 12 14395 , srcInfoPoints = [] 14396 } 14397 (UnQual 14398 SrcSpanInfo 14399 { srcInfoSpan = 14400 SrcSpan "tests/examples/RealGHC.lhs" 378 5 378 12 14401 , srcInfoPoints = [] 14402 } 14403 (Ident 14404 SrcSpanInfo 14405 { srcInfoSpan = 14406 SrcSpan "tests/examples/RealGHC.lhs" 378 5 378 12 14407 , srcInfoPoints = [] 14408 } 14409 "Nothing")) 14410 []) 14411 (UnGuardedRhs 14412 SrcSpanInfo 14413 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 378 24 378 34 14414 , srcInfoPoints = 14415 [ SrcSpan "tests/examples/RealGHC.lhs" 378 24 378 26 ] 14416 } 14417 (Con 14418 SrcSpanInfo 14419 { srcInfoSpan = 14420 SrcSpan "tests/examples/RealGHC.lhs" 378 27 378 34 14421 , srcInfoPoints = [] 14422 } 14423 (UnQual 14424 SrcSpanInfo 14425 { srcInfoSpan = 14426 SrcSpan "tests/examples/RealGHC.lhs" 378 27 378 34 14427 , srcInfoPoints = [] 14428 } 14429 (Ident 14430 SrcSpanInfo 14431 { srcInfoSpan = 14432 SrcSpan "tests/examples/RealGHC.lhs" 378 27 378 34 14433 , srcInfoPoints = [] 14434 } 14435 "Nothing")))) 14436 Nothing 14437 , Alt 14438 SrcSpanInfo 14439 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 5 380 47 14440 , srcInfoPoints = [] 14441 } 14442 (PApp 14443 SrcSpanInfo 14444 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 5 379 27 14445 , srcInfoPoints = [] 14446 } 14447 (UnQual 14448 SrcSpanInfo 14449 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 5 379 9 14450 , srcInfoPoints = [] 14451 } 14452 (Ident 14453 SrcSpanInfo 14454 { srcInfoSpan = 14455 SrcSpan "tests/examples/RealGHC.lhs" 379 5 379 9 14456 , srcInfoPoints = [] 14457 } 14458 "Just")) 14459 [ PTuple 14460 SrcSpanInfo 14461 { srcInfoSpan = 14462 SrcSpan "tests/examples/RealGHC.lhs" 379 10 379 27 14463 , srcInfoPoints = 14464 [ SrcSpan "tests/examples/RealGHC.lhs" 379 10 379 11 14465 , SrcSpan "tests/examples/RealGHC.lhs" 379 16 379 17 14466 , SrcSpan "tests/examples/RealGHC.lhs" 379 26 379 27 14467 ] 14468 } 14469 Boxed 14470 [ PVar 14471 SrcSpanInfo 14472 { srcInfoSpan = 14473 SrcSpan "tests/examples/RealGHC.lhs" 379 11 379 16 14474 , srcInfoPoints = [] 14475 } 14476 (Ident 14477 SrcSpanInfo 14478 { srcInfoSpan = 14479 SrcSpan "tests/examples/RealGHC.lhs" 379 11 379 16 14480 , srcInfoPoints = [] 14481 } 14482 "binds") 14483 , PVar 14484 SrcSpanInfo 14485 { srcInfoSpan = 14486 SrcSpan "tests/examples/RealGHC.lhs" 379 18 379 26 14487 , srcInfoPoints = [] 14488 } 14489 (Ident 14490 SrcSpanInfo 14491 { srcInfoSpan = 14492 SrcSpan "tests/examples/RealGHC.lhs" 379 18 379 26 14493 , srcInfoPoints = [] 14494 } 14495 "tpl_vals") 14496 ] 14497 ]) 14498 (UnGuardedRhs 14499 SrcSpanInfo 14500 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 379 28 380 47 14501 , srcInfoPoints = 14502 [ SrcSpan "tests/examples/RealGHC.lhs" 379 28 379 30 ] 14503 } 14504 (App 14505 SrcSpanInfo 14506 { srcInfoSpan = 14507 SrcSpan "tests/examples/RealGHC.lhs" 379 31 380 47 14508 , srcInfoPoints = [] 14509 } 14510 (Con 14511 SrcSpanInfo 14512 { srcInfoSpan = 14513 SrcSpan "tests/examples/RealGHC.lhs" 379 31 379 35 14514 , srcInfoPoints = [] 14515 } 14516 (UnQual 14517 SrcSpanInfo 14518 { srcInfoSpan = 14519 SrcSpan "tests/examples/RealGHC.lhs" 379 31 379 35 14520 , srcInfoPoints = [] 14521 } 14522 (Ident 14523 SrcSpanInfo 14524 { srcInfoSpan = 14525 SrcSpan "tests/examples/RealGHC.lhs" 379 31 379 35 14526 , srcInfoPoints = [] 14527 } 14528 "Just"))) 14529 (Paren 14530 SrcSpanInfo 14531 { srcInfoSpan = 14532 SrcSpan "tests/examples/RealGHC.lhs" 379 36 380 47 14533 , srcInfoPoints = 14534 [ SrcSpan "tests/examples/RealGHC.lhs" 379 36 379 37 14535 , SrcSpan "tests/examples/RealGHC.lhs" 380 46 380 47 14536 ] 14537 } 14538 (InfixApp 14539 SrcSpanInfo 14540 { srcInfoSpan = 14541 SrcSpan "tests/examples/RealGHC.lhs" 379 37 380 46 14542 , srcInfoPoints = [] 14543 } 14544 (App 14545 SrcSpanInfo 14546 { srcInfoSpan = 14547 SrcSpan "tests/examples/RealGHC.lhs" 379 37 379 49 14548 , srcInfoPoints = [] 14549 } 14550 (Var 14551 SrcSpanInfo 14552 { srcInfoSpan = 14553 SrcSpan 14554 "tests/examples/RealGHC.lhs" 379 37 379 43 14555 , srcInfoPoints = [] 14556 } 14557 (UnQual 14558 SrcSpanInfo 14559 { srcInfoSpan = 14560 SrcSpan 14561 "tests/examples/RealGHC.lhs" 379 37 379 43 14562 , srcInfoPoints = [] 14563 } 14564 (Ident 14565 SrcSpanInfo 14566 { srcInfoSpan = 14567 SrcSpan 14568 "tests/examples/RealGHC.lhs" 14569 379 14570 37 14571 379 14572 43 14573 , srcInfoPoints = [] 14574 } 14575 "mkLets"))) 14576 (Var 14577 SrcSpanInfo 14578 { srcInfoSpan = 14579 SrcSpan 14580 "tests/examples/RealGHC.lhs" 379 44 379 49 14581 , srcInfoPoints = [] 14582 } 14583 (UnQual 14584 SrcSpanInfo 14585 { srcInfoSpan = 14586 SrcSpan 14587 "tests/examples/RealGHC.lhs" 379 44 379 49 14588 , srcInfoPoints = [] 14589 } 14590 (Ident 14591 SrcSpanInfo 14592 { srcInfoSpan = 14593 SrcSpan 14594 "tests/examples/RealGHC.lhs" 14595 379 14596 44 14597 379 14598 49 14599 , srcInfoPoints = [] 14600 } 14601 "binds")))) 14602 (QVarOp 14603 SrcSpanInfo 14604 { srcInfoSpan = 14605 SrcSpan "tests/examples/RealGHC.lhs" 379 50 379 51 14606 , srcInfoPoints = [] 14607 } 14608 (UnQual 14609 SrcSpanInfo 14610 { srcInfoSpan = 14611 SrcSpan 14612 "tests/examples/RealGHC.lhs" 379 50 379 51 14613 , srcInfoPoints = [] 14614 } 14615 (Symbol 14616 SrcSpanInfo 14617 { srcInfoSpan = 14618 SrcSpan 14619 "tests/examples/RealGHC.lhs" 379 50 379 51 14620 , srcInfoPoints = [] 14621 } 14622 "$"))) 14623 (InfixApp 14624 SrcSpanInfo 14625 { srcInfoSpan = 14626 SrcSpan "tests/examples/RealGHC.lhs" 380 21 380 46 14627 , srcInfoPoints = [] 14628 } 14629 (Var 14630 SrcSpanInfo 14631 { srcInfoSpan = 14632 SrcSpan 14633 "tests/examples/RealGHC.lhs" 380 21 380 28 14634 , srcInfoPoints = [] 14635 } 14636 (UnQual 14637 SrcSpanInfo 14638 { srcInfoSpan = 14639 SrcSpan 14640 "tests/examples/RealGHC.lhs" 380 21 380 28 14641 , srcInfoPoints = [] 14642 } 14643 (Ident 14644 SrcSpanInfo 14645 { srcInfoSpan = 14646 SrcSpan 14647 "tests/examples/RealGHC.lhs" 14648 380 14649 21 14650 380 14651 28 14652 , srcInfoPoints = [] 14653 } 14654 "rule_fn"))) 14655 (QVarOp 14656 SrcSpanInfo 14657 { srcInfoSpan = 14658 SrcSpan 14659 "tests/examples/RealGHC.lhs" 380 29 380 37 14660 , srcInfoPoints = 14661 [ SrcSpan 14662 "tests/examples/RealGHC.lhs" 380 29 380 30 14663 , SrcSpan 14664 "tests/examples/RealGHC.lhs" 380 30 380 36 14665 , SrcSpan 14666 "tests/examples/RealGHC.lhs" 380 36 380 37 14667 ] 14668 } 14669 (UnQual 14670 SrcSpanInfo 14671 { srcInfoSpan = 14672 SrcSpan 14673 "tests/examples/RealGHC.lhs" 380 29 380 37 14674 , srcInfoPoints = 14675 [ SrcSpan 14676 "tests/examples/RealGHC.lhs" 14677 380 14678 29 14679 380 14680 30 14681 , SrcSpan 14682 "tests/examples/RealGHC.lhs" 14683 380 14684 30 14685 380 14686 36 14687 , SrcSpan 14688 "tests/examples/RealGHC.lhs" 14689 380 14690 36 14691 380 14692 37 14693 ] 14694 } 14695 (Ident 14696 SrcSpanInfo 14697 { srcInfoSpan = 14698 SrcSpan 14699 "tests/examples/RealGHC.lhs" 14700 380 14701 30 14702 380 14703 36 14704 , srcInfoPoints = [] 14705 } 14706 "mkApps"))) 14707 (Var 14708 SrcSpanInfo 14709 { srcInfoSpan = 14710 SrcSpan 14711 "tests/examples/RealGHC.lhs" 380 38 380 46 14712 , srcInfoPoints = [] 14713 } 14714 (UnQual 14715 SrcSpanInfo 14716 { srcInfoSpan = 14717 SrcSpan 14718 "tests/examples/RealGHC.lhs" 380 38 380 46 14719 , srcInfoPoints = [] 14720 } 14721 (Ident 14722 SrcSpanInfo 14723 { srcInfoSpan = 14724 SrcSpan 14725 "tests/examples/RealGHC.lhs" 14726 380 14727 38 14728 380 14729 46 14730 , srcInfoPoints = [] 14731 } 14732 "tpl_vals")))))))) 14733 Nothing 14734 ]) 14735 ]) 14736 (Just 14737 (BDecls 14738 SrcSpanInfo 14739 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 5 382 53 14740 , srcInfoPoints = 14741 [ SrcSpan "tests/examples/RealGHC.lhs" 382 5 382 5 14742 , SrcSpan "tests/examples/RealGHC.lhs" 390 1 390 0 14743 ] 14744 } 14745 [ PatBind 14746 SrcSpanInfo 14747 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 5 382 53 14748 , srcInfoPoints = [] 14749 } 14750 (PVar 14751 SrcSpanInfo 14752 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 5 382 12 14753 , srcInfoPoints = [] 14754 } 14755 (Ident 14756 SrcSpanInfo 14757 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 5 382 12 14758 , srcInfoPoints = [] 14759 } 14760 "rule_fn")) 14761 (UnGuardedRhs 14762 SrcSpanInfo 14763 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 13 382 53 14764 , srcInfoPoints = 14765 [ SrcSpan "tests/examples/RealGHC.lhs" 382 13 382 14 ] 14766 } 14767 (App 14768 SrcSpanInfo 14769 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 382 15 382 53 14770 , srcInfoPoints = [] 14771 } 14772 (Var 14773 SrcSpanInfo 14774 { srcInfoSpan = 14775 SrcSpan "tests/examples/RealGHC.lhs" 382 15 382 31 14776 , srcInfoPoints = [] 14777 } 14778 (UnQual 14779 SrcSpanInfo 14780 { srcInfoSpan = 14781 SrcSpan "tests/examples/RealGHC.lhs" 382 15 382 31 14782 , srcInfoPoints = [] 14783 } 14784 (Ident 14785 SrcSpanInfo 14786 { srcInfoSpan = 14787 SrcSpan "tests/examples/RealGHC.lhs" 382 15 382 31 14788 , srcInfoPoints = [] 14789 } 14790 "occurAnalyseExpr"))) 14791 (Paren 14792 SrcSpanInfo 14793 { srcInfoSpan = 14794 SrcSpan "tests/examples/RealGHC.lhs" 382 32 382 53 14795 , srcInfoPoints = 14796 [ SrcSpan "tests/examples/RealGHC.lhs" 382 32 382 33 14797 , SrcSpan "tests/examples/RealGHC.lhs" 382 52 382 53 14798 ] 14799 } 14800 (App 14801 SrcSpanInfo 14802 { srcInfoSpan = 14803 SrcSpan "tests/examples/RealGHC.lhs" 382 33 382 52 14804 , srcInfoPoints = [] 14805 } 14806 (App 14807 SrcSpanInfo 14808 { srcInfoSpan = 14809 SrcSpan "tests/examples/RealGHC.lhs" 382 33 382 48 14810 , srcInfoPoints = [] 14811 } 14812 (Var 14813 SrcSpanInfo 14814 { srcInfoSpan = 14815 SrcSpan "tests/examples/RealGHC.lhs" 382 33 382 39 14816 , srcInfoPoints = [] 14817 } 14818 (UnQual 14819 SrcSpanInfo 14820 { srcInfoSpan = 14821 SrcSpan 14822 "tests/examples/RealGHC.lhs" 382 33 382 39 14823 , srcInfoPoints = [] 14824 } 14825 (Ident 14826 SrcSpanInfo 14827 { srcInfoSpan = 14828 SrcSpan 14829 "tests/examples/RealGHC.lhs" 382 33 382 39 14830 , srcInfoPoints = [] 14831 } 14832 "mkLams"))) 14833 (Var 14834 SrcSpanInfo 14835 { srcInfoSpan = 14836 SrcSpan "tests/examples/RealGHC.lhs" 382 40 382 48 14837 , srcInfoPoints = [] 14838 } 14839 (UnQual 14840 SrcSpanInfo 14841 { srcInfoSpan = 14842 SrcSpan 14843 "tests/examples/RealGHC.lhs" 382 40 382 48 14844 , srcInfoPoints = [] 14845 } 14846 (Ident 14847 SrcSpanInfo 14848 { srcInfoSpan = 14849 SrcSpan 14850 "tests/examples/RealGHC.lhs" 382 40 382 48 14851 , srcInfoPoints = [] 14852 } 14853 "tpl_vars")))) 14854 (Var 14855 SrcSpanInfo 14856 { srcInfoSpan = 14857 SrcSpan "tests/examples/RealGHC.lhs" 382 49 382 52 14858 , srcInfoPoints = [] 14859 } 14860 (UnQual 14861 SrcSpanInfo 14862 { srcInfoSpan = 14863 SrcSpan "tests/examples/RealGHC.lhs" 382 49 382 52 14864 , srcInfoPoints = [] 14865 } 14866 (Ident 14867 SrcSpanInfo 14868 { srcInfoSpan = 14869 SrcSpan 14870 "tests/examples/RealGHC.lhs" 382 49 382 52 14871 , srcInfoPoints = [] 14872 } 14873 "rhs"))))))) 14874 Nothing 14875 ])) 14876 ] 14877 , TypeSig 14878 SrcSpanInfo 14879 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 390 1 395 22 14880 , srcInfoPoints = 14881 [ SrcSpan "tests/examples/RealGHC.lhs" 390 9 390 11 ] 14882 } 14883 [ Ident 14884 SrcSpanInfo 14885 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 390 1 390 7 14886 , srcInfoPoints = [] 14887 } 14888 "matchN" 14889 ] 14890 (TyFun 14891 SrcSpanInfo 14892 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 390 12 395 22 14893 , srcInfoPoints = 14894 [ SrcSpan "tests/examples/RealGHC.lhs" 391 5 391 7 ] 14895 } 14896 (TyCon 14897 SrcSpanInfo 14898 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 390 12 390 22 14899 , srcInfoPoints = [] 14900 } 14901 (UnQual 14902 SrcSpanInfo 14903 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 390 12 390 22 14904 , srcInfoPoints = [] 14905 } 14906 (Ident 14907 SrcSpanInfo 14908 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 390 12 390 22 14909 , srcInfoPoints = [] 14910 } 14911 "InScopeSet"))) 14912 (TyFun 14913 SrcSpanInfo 14914 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 391 8 395 22 14915 , srcInfoPoints = 14916 [ SrcSpan "tests/examples/RealGHC.lhs" 392 5 392 7 ] 14917 } 14918 (TyList 14919 SrcSpanInfo 14920 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 391 8 391 13 14921 , srcInfoPoints = 14922 [ SrcSpan "tests/examples/RealGHC.lhs" 391 8 391 9 14923 , SrcSpan "tests/examples/RealGHC.lhs" 391 12 391 13 14924 ] 14925 } 14926 (TyCon 14927 SrcSpanInfo 14928 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 391 9 391 12 14929 , srcInfoPoints = [] 14930 } 14931 (UnQual 14932 SrcSpanInfo 14933 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 391 9 391 12 14934 , srcInfoPoints = [] 14935 } 14936 (Ident 14937 SrcSpanInfo 14938 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 391 9 391 12 14939 , srcInfoPoints = [] 14940 } 14941 "Var")))) 14942 (TyFun 14943 SrcSpanInfo 14944 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 392 8 395 22 14945 , srcInfoPoints = 14946 [ SrcSpan "tests/examples/RealGHC.lhs" 393 5 393 7 ] 14947 } 14948 (TyList 14949 SrcSpanInfo 14950 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 392 8 392 18 14951 , srcInfoPoints = 14952 [ SrcSpan "tests/examples/RealGHC.lhs" 392 8 392 9 14953 , SrcSpan "tests/examples/RealGHC.lhs" 392 17 392 18 14954 ] 14955 } 14956 (TyCon 14957 SrcSpanInfo 14958 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 392 9 392 17 14959 , srcInfoPoints = [] 14960 } 14961 (UnQual 14962 SrcSpanInfo 14963 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 392 9 392 17 14964 , srcInfoPoints = [] 14965 } 14966 (Ident 14967 SrcSpanInfo 14968 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 392 9 392 17 14969 , srcInfoPoints = [] 14970 } 14971 "CoreExpr")))) 14972 (TyFun 14973 SrcSpanInfo 14974 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 393 8 395 22 14975 , srcInfoPoints = 14976 [ SrcSpan "tests/examples/RealGHC.lhs" 394 5 394 7 ] 14977 } 14978 (TyList 14979 SrcSpanInfo 14980 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 393 8 393 18 14981 , srcInfoPoints = 14982 [ SrcSpan "tests/examples/RealGHC.lhs" 393 8 393 9 14983 , SrcSpan "tests/examples/RealGHC.lhs" 393 17 393 18 14984 ] 14985 } 14986 (TyCon 14987 SrcSpanInfo 14988 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 393 9 393 17 14989 , srcInfoPoints = [] 14990 } 14991 (UnQual 14992 SrcSpanInfo 14993 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 393 9 393 17 14994 , srcInfoPoints = [] 14995 } 14996 (Ident 14997 SrcSpanInfo 14998 { srcInfoSpan = 14999 SrcSpan "tests/examples/RealGHC.lhs" 393 9 393 17 15000 , srcInfoPoints = [] 15001 } 15002 "CoreExpr")))) 15003 (TyApp 15004 SrcSpanInfo 15005 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 394 8 395 22 15006 , srcInfoPoints = [] 15007 } 15008 (TyCon 15009 SrcSpanInfo 15010 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 394 8 394 13 15011 , srcInfoPoints = [] 15012 } 15013 (UnQual 15014 SrcSpanInfo 15015 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 394 8 394 13 15016 , srcInfoPoints = [] 15017 } 15018 (Ident 15019 SrcSpanInfo 15020 { srcInfoSpan = 15021 SrcSpan "tests/examples/RealGHC.lhs" 394 8 394 13 15022 , srcInfoPoints = [] 15023 } 15024 "Maybe"))) 15025 (TyTuple 15026 SrcSpanInfo 15027 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 394 14 395 22 15028 , srcInfoPoints = 15029 [ SrcSpan "tests/examples/RealGHC.lhs" 394 14 394 15 15030 , SrcSpan "tests/examples/RealGHC.lhs" 394 25 394 26 15031 , SrcSpan "tests/examples/RealGHC.lhs" 395 21 395 22 15032 ] 15033 } 15034 Boxed 15035 [ TyList 15036 SrcSpanInfo 15037 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 394 15 394 25 15038 , srcInfoPoints = 15039 [ SrcSpan "tests/examples/RealGHC.lhs" 394 15 394 16 15040 , SrcSpan "tests/examples/RealGHC.lhs" 394 24 394 25 15041 ] 15042 } 15043 (TyCon 15044 SrcSpanInfo 15045 { srcInfoSpan = 15046 SrcSpan "tests/examples/RealGHC.lhs" 394 16 394 24 15047 , srcInfoPoints = [] 15048 } 15049 (UnQual 15050 SrcSpanInfo 15051 { srcInfoSpan = 15052 SrcSpan "tests/examples/RealGHC.lhs" 394 16 394 24 15053 , srcInfoPoints = [] 15054 } 15055 (Ident 15056 SrcSpanInfo 15057 { srcInfoSpan = 15058 SrcSpan "tests/examples/RealGHC.lhs" 394 16 394 24 15059 , srcInfoPoints = [] 15060 } 15061 "CoreBind"))) 15062 , TyList 15063 SrcSpanInfo 15064 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 395 11 395 21 15065 , srcInfoPoints = 15066 [ SrcSpan "tests/examples/RealGHC.lhs" 395 11 395 12 15067 , SrcSpan "tests/examples/RealGHC.lhs" 395 20 395 21 15068 ] 15069 } 15070 (TyCon 15071 SrcSpanInfo 15072 { srcInfoSpan = 15073 SrcSpan "tests/examples/RealGHC.lhs" 395 12 395 20 15074 , srcInfoPoints = [] 15075 } 15076 (UnQual 15077 SrcSpanInfo 15078 { srcInfoSpan = 15079 SrcSpan "tests/examples/RealGHC.lhs" 395 12 395 20 15080 , srcInfoPoints = [] 15081 } 15082 (Ident 15083 SrcSpanInfo 15084 { srcInfoSpan = 15085 SrcSpan "tests/examples/RealGHC.lhs" 395 12 395 20 15086 , srcInfoPoints = [] 15087 } 15088 "CoreExpr"))) 15089 ])))))) 15090 , FunBind 15091 SrcSpanInfo 15092 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 1 423 89 15093 , srcInfoPoints = 15094 [ SrcSpan "tests/examples/RealGHC.lhs" 402 3 402 8 ] 15095 } 15096 [ Match 15097 SrcSpanInfo 15098 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 1 423 89 15099 , srcInfoPoints = 15100 [ SrcSpan "tests/examples/RealGHC.lhs" 402 3 402 8 ] 15101 } 15102 (Ident 15103 SrcSpanInfo 15104 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 1 397 7 15105 , srcInfoPoints = [] 15106 } 15107 "matchN") 15108 [ PVar 15109 SrcSpanInfo 15110 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 8 397 16 15111 , srcInfoPoints = [] 15112 } 15113 (Ident 15114 SrcSpanInfo 15115 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 8 397 16 15116 , srcInfoPoints = [] 15117 } 15118 "in_scope") 15119 , PVar 15120 SrcSpanInfo 15121 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 17 397 26 15122 , srcInfoPoints = [] 15123 } 15124 (Ident 15125 SrcSpanInfo 15126 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 17 397 26 15127 , srcInfoPoints = [] 15128 } 15129 "tmpl_vars") 15130 , PVar 15131 SrcSpanInfo 15132 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 27 397 34 15133 , srcInfoPoints = [] 15134 } 15135 (Ident 15136 SrcSpanInfo 15137 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 27 397 34 15138 , srcInfoPoints = [] 15139 } 15140 "tmpl_es") 15141 , PVar 15142 SrcSpanInfo 15143 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 35 397 44 15144 , srcInfoPoints = [] 15145 } 15146 (Ident 15147 SrcSpanInfo 15148 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 397 35 397 44 15149 , srcInfoPoints = [] 15150 } 15151 "target_es") 15152 ] 15153 (UnGuardedRhs 15154 SrcSpanInfo 15155 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 398 3 401 60 15156 , srcInfoPoints = 15157 [ SrcSpan "tests/examples/RealGHC.lhs" 398 3 398 4 ] 15158 } 15159 (Do 15160 SrcSpanInfo 15161 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 398 5 401 60 15162 , srcInfoPoints = 15163 [ SrcSpan "tests/examples/RealGHC.lhs" 398 5 398 7 15164 , SrcSpan "tests/examples/RealGHC.lhs" 398 9 398 10 15165 , SrcSpan "tests/examples/RealGHC.lhs" 400 5 400 6 15166 , SrcSpan "tests/examples/RealGHC.lhs" 401 59 401 60 15167 ] 15168 } 15169 [ Generator 15170 SrcSpanInfo 15171 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 398 11 399 56 15172 , srcInfoPoints = 15173 [ SrcSpan "tests/examples/RealGHC.lhs" 399 9 399 11 ] 15174 } 15175 (PTuple 15176 SrcSpanInfo 15177 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 398 11 398 38 15178 , srcInfoPoints = 15179 [ SrcSpan "tests/examples/RealGHC.lhs" 398 11 398 12 15180 , SrcSpan "tests/examples/RealGHC.lhs" 398 20 398 21 15181 , SrcSpan "tests/examples/RealGHC.lhs" 398 30 398 31 15182 , SrcSpan "tests/examples/RealGHC.lhs" 398 37 398 38 15183 ] 15184 } 15185 Boxed 15186 [ PVar 15187 SrcSpanInfo 15188 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 398 12 398 20 15189 , srcInfoPoints = [] 15190 } 15191 (Ident 15192 SrcSpanInfo 15193 { srcInfoSpan = 15194 SrcSpan "tests/examples/RealGHC.lhs" 398 12 398 20 15195 , srcInfoPoints = [] 15196 } 15197 "tv_subst") 15198 , PVar 15199 SrcSpanInfo 15200 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 398 22 398 30 15201 , srcInfoPoints = [] 15202 } 15203 (Ident 15204 SrcSpanInfo 15205 { srcInfoSpan = 15206 SrcSpan "tests/examples/RealGHC.lhs" 398 22 398 30 15207 , srcInfoPoints = [] 15208 } 15209 "id_subst") 15210 , PVar 15211 SrcSpanInfo 15212 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 398 32 398 37 15213 , srcInfoPoints = [] 15214 } 15215 (Ident 15216 SrcSpanInfo 15217 { srcInfoSpan = 15218 SrcSpan "tests/examples/RealGHC.lhs" 398 32 398 37 15219 , srcInfoPoints = [] 15220 } 15221 "binds") 15222 ]) 15223 (App 15224 SrcSpanInfo 15225 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 12 399 56 15226 , srcInfoPoints = [] 15227 } 15228 (App 15229 SrcSpanInfo 15230 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 12 399 46 15231 , srcInfoPoints = [] 15232 } 15233 (App 15234 SrcSpanInfo 15235 { srcInfoSpan = 15236 SrcSpan "tests/examples/RealGHC.lhs" 399 12 399 38 15237 , srcInfoPoints = [] 15238 } 15239 (App 15240 SrcSpanInfo 15241 { srcInfoSpan = 15242 SrcSpan "tests/examples/RealGHC.lhs" 399 12 399 24 15243 , srcInfoPoints = [] 15244 } 15245 (Var 15246 SrcSpanInfo 15247 { srcInfoSpan = 15248 SrcSpan "tests/examples/RealGHC.lhs" 399 12 399 14 15249 , srcInfoPoints = [] 15250 } 15251 (UnQual 15252 SrcSpanInfo 15253 { srcInfoSpan = 15254 SrcSpan "tests/examples/RealGHC.lhs" 399 12 399 14 15255 , srcInfoPoints = [] 15256 } 15257 (Ident 15258 SrcSpanInfo 15259 { srcInfoSpan = 15260 SrcSpan 15261 "tests/examples/RealGHC.lhs" 399 12 399 14 15262 , srcInfoPoints = [] 15263 } 15264 "go"))) 15265 (Var 15266 SrcSpanInfo 15267 { srcInfoSpan = 15268 SrcSpan "tests/examples/RealGHC.lhs" 399 15 399 24 15269 , srcInfoPoints = [] 15270 } 15271 (UnQual 15272 SrcSpanInfo 15273 { srcInfoSpan = 15274 SrcSpan "tests/examples/RealGHC.lhs" 399 15 399 24 15275 , srcInfoPoints = [] 15276 } 15277 (Ident 15278 SrcSpanInfo 15279 { srcInfoSpan = 15280 SrcSpan 15281 "tests/examples/RealGHC.lhs" 399 15 399 24 15282 , srcInfoPoints = [] 15283 } 15284 "init_menv")))) 15285 (Var 15286 SrcSpanInfo 15287 { srcInfoSpan = 15288 SrcSpan "tests/examples/RealGHC.lhs" 399 25 399 38 15289 , srcInfoPoints = [] 15290 } 15291 (UnQual 15292 SrcSpanInfo 15293 { srcInfoSpan = 15294 SrcSpan "tests/examples/RealGHC.lhs" 399 25 399 38 15295 , srcInfoPoints = [] 15296 } 15297 (Ident 15298 SrcSpanInfo 15299 { srcInfoSpan = 15300 SrcSpan "tests/examples/RealGHC.lhs" 399 25 399 38 15301 , srcInfoPoints = [] 15302 } 15303 "emptySubstEnv")))) 15304 (Var 15305 SrcSpanInfo 15306 { srcInfoSpan = 15307 SrcSpan "tests/examples/RealGHC.lhs" 399 39 399 46 15308 , srcInfoPoints = [] 15309 } 15310 (UnQual 15311 SrcSpanInfo 15312 { srcInfoSpan = 15313 SrcSpan "tests/examples/RealGHC.lhs" 399 39 399 46 15314 , srcInfoPoints = [] 15315 } 15316 (Ident 15317 SrcSpanInfo 15318 { srcInfoSpan = 15319 SrcSpan "tests/examples/RealGHC.lhs" 399 39 399 46 15320 , srcInfoPoints = [] 15321 } 15322 "tmpl_es")))) 15323 (Var 15324 SrcSpanInfo 15325 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 399 47 399 56 15326 , srcInfoPoints = [] 15327 } 15328 (UnQual 15329 SrcSpanInfo 15330 { srcInfoSpan = 15331 SrcSpan "tests/examples/RealGHC.lhs" 399 47 399 56 15332 , srcInfoPoints = [] 15333 } 15334 (Ident 15335 SrcSpanInfo 15336 { srcInfoSpan = 15337 SrcSpan "tests/examples/RealGHC.lhs" 399 47 399 56 15338 , srcInfoPoints = [] 15339 } 15340 "target_es")))) 15341 , Qualifier 15342 SrcSpanInfo 15343 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 7 401 58 15344 , srcInfoPoints = [] 15345 } 15346 (App 15347 SrcSpanInfo 15348 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 7 401 58 15349 , srcInfoPoints = [] 15350 } 15351 (Var 15352 SrcSpanInfo 15353 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 7 400 13 15354 , srcInfoPoints = [] 15355 } 15356 (UnQual 15357 SrcSpanInfo 15358 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 7 400 13 15359 , srcInfoPoints = [] 15360 } 15361 (Ident 15362 SrcSpanInfo 15363 { srcInfoSpan = 15364 SrcSpan "tests/examples/RealGHC.lhs" 400 7 400 13 15365 , srcInfoPoints = [] 15366 } 15367 "return"))) 15368 (Tuple 15369 SrcSpanInfo 15370 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 400 14 401 58 15371 , srcInfoPoints = 15372 [ SrcSpan "tests/examples/RealGHC.lhs" 400 14 400 15 15373 , SrcSpan "tests/examples/RealGHC.lhs" 400 27 400 28 15374 , SrcSpan "tests/examples/RealGHC.lhs" 401 57 401 58 15375 ] 15376 } 15377 Boxed 15378 [ App 15379 SrcSpanInfo 15380 { srcInfoSpan = 15381 SrcSpan "tests/examples/RealGHC.lhs" 400 15 400 27 15382 , srcInfoPoints = [] 15383 } 15384 (Var 15385 SrcSpanInfo 15386 { srcInfoSpan = 15387 SrcSpan "tests/examples/RealGHC.lhs" 400 15 400 21 15388 , srcInfoPoints = [] 15389 } 15390 (UnQual 15391 SrcSpanInfo 15392 { srcInfoSpan = 15393 SrcSpan "tests/examples/RealGHC.lhs" 400 15 400 21 15394 , srcInfoPoints = [] 15395 } 15396 (Ident 15397 SrcSpanInfo 15398 { srcInfoSpan = 15399 SrcSpan "tests/examples/RealGHC.lhs" 400 15 400 21 15400 , srcInfoPoints = [] 15401 } 15402 "fromOL"))) 15403 (Var 15404 SrcSpanInfo 15405 { srcInfoSpan = 15406 SrcSpan "tests/examples/RealGHC.lhs" 400 22 400 27 15407 , srcInfoPoints = [] 15408 } 15409 (UnQual 15410 SrcSpanInfo 15411 { srcInfoSpan = 15412 SrcSpan "tests/examples/RealGHC.lhs" 400 22 400 27 15413 , srcInfoPoints = [] 15414 } 15415 (Ident 15416 SrcSpanInfo 15417 { srcInfoSpan = 15418 SrcSpan "tests/examples/RealGHC.lhs" 400 22 400 27 15419 , srcInfoPoints = [] 15420 } 15421 "binds"))) 15422 , App 15423 SrcSpanInfo 15424 { srcInfoSpan = 15425 SrcSpan "tests/examples/RealGHC.lhs" 401 11 401 57 15426 , srcInfoPoints = [] 15427 } 15428 (App 15429 SrcSpanInfo 15430 { srcInfoSpan = 15431 SrcSpan "tests/examples/RealGHC.lhs" 401 11 401 46 15432 , srcInfoPoints = [] 15433 } 15434 (Var 15435 SrcSpanInfo 15436 { srcInfoSpan = 15437 SrcSpan "tests/examples/RealGHC.lhs" 401 11 401 14 15438 , srcInfoPoints = [] 15439 } 15440 (UnQual 15441 SrcSpanInfo 15442 { srcInfoSpan = 15443 SrcSpan "tests/examples/RealGHC.lhs" 401 11 401 14 15444 , srcInfoPoints = [] 15445 } 15446 (Ident 15447 SrcSpanInfo 15448 { srcInfoSpan = 15449 SrcSpan 15450 "tests/examples/RealGHC.lhs" 401 11 401 14 15451 , srcInfoPoints = [] 15452 } 15453 "map"))) 15454 (Paren 15455 SrcSpanInfo 15456 { srcInfoSpan = 15457 SrcSpan "tests/examples/RealGHC.lhs" 401 15 401 46 15458 , srcInfoPoints = 15459 [ SrcSpan "tests/examples/RealGHC.lhs" 401 15 401 16 15460 , SrcSpan "tests/examples/RealGHC.lhs" 401 45 401 46 15461 ] 15462 } 15463 (App 15464 SrcSpanInfo 15465 { srcInfoSpan = 15466 SrcSpan "tests/examples/RealGHC.lhs" 401 16 401 45 15467 , srcInfoPoints = [] 15468 } 15469 (App 15470 SrcSpanInfo 15471 { srcInfoSpan = 15472 SrcSpan 15473 "tests/examples/RealGHC.lhs" 401 16 401 36 15474 , srcInfoPoints = [] 15475 } 15476 (Var 15477 SrcSpanInfo 15478 { srcInfoSpan = 15479 SrcSpan 15480 "tests/examples/RealGHC.lhs" 401 16 401 27 15481 , srcInfoPoints = [] 15482 } 15483 (UnQual 15484 SrcSpanInfo 15485 { srcInfoSpan = 15486 SrcSpan 15487 "tests/examples/RealGHC.lhs" 15488 401 15489 16 15490 401 15491 27 15492 , srcInfoPoints = [] 15493 } 15494 (Ident 15495 SrcSpanInfo 15496 { srcInfoSpan = 15497 SrcSpan 15498 "tests/examples/RealGHC.lhs" 15499 401 15500 16 15501 401 15502 27 15503 , srcInfoPoints = [] 15504 } 15505 "lookup_tmpl"))) 15506 (Var 15507 SrcSpanInfo 15508 { srcInfoSpan = 15509 SrcSpan 15510 "tests/examples/RealGHC.lhs" 401 28 401 36 15511 , srcInfoPoints = [] 15512 } 15513 (UnQual 15514 SrcSpanInfo 15515 { srcInfoSpan = 15516 SrcSpan 15517 "tests/examples/RealGHC.lhs" 15518 401 15519 28 15520 401 15521 36 15522 , srcInfoPoints = [] 15523 } 15524 (Ident 15525 SrcSpanInfo 15526 { srcInfoSpan = 15527 SrcSpan 15528 "tests/examples/RealGHC.lhs" 15529 401 15530 28 15531 401 15532 36 15533 , srcInfoPoints = [] 15534 } 15535 "tv_subst")))) 15536 (Var 15537 SrcSpanInfo 15538 { srcInfoSpan = 15539 SrcSpan 15540 "tests/examples/RealGHC.lhs" 401 37 401 45 15541 , srcInfoPoints = [] 15542 } 15543 (UnQual 15544 SrcSpanInfo 15545 { srcInfoSpan = 15546 SrcSpan 15547 "tests/examples/RealGHC.lhs" 401 37 401 45 15548 , srcInfoPoints = [] 15549 } 15550 (Ident 15551 SrcSpanInfo 15552 { srcInfoSpan = 15553 SrcSpan 15554 "tests/examples/RealGHC.lhs" 15555 401 15556 37 15557 401 15558 45 15559 , srcInfoPoints = [] 15560 } 15561 "id_subst")))))) 15562 (Var 15563 SrcSpanInfo 15564 { srcInfoSpan = 15565 SrcSpan "tests/examples/RealGHC.lhs" 401 47 401 57 15566 , srcInfoPoints = [] 15567 } 15568 (UnQual 15569 SrcSpanInfo 15570 { srcInfoSpan = 15571 SrcSpan "tests/examples/RealGHC.lhs" 401 47 401 57 15572 , srcInfoPoints = [] 15573 } 15574 (Ident 15575 SrcSpanInfo 15576 { srcInfoSpan = 15577 SrcSpan "tests/examples/RealGHC.lhs" 401 47 401 57 15578 , srcInfoPoints = [] 15579 } 15580 "tmpl_vars'"))) 15581 ])) 15582 ])) 15583 (Just 15584 (BDecls 15585 SrcSpanInfo 15586 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 5 423 89 15587 , srcInfoPoints = 15588 [ SrcSpan "tests/examples/RealGHC.lhs" 403 5 403 5 15589 , SrcSpan "tests/examples/RealGHC.lhs" 406 5 406 5 15590 , SrcSpan "tests/examples/RealGHC.lhs" 408 5 408 5 15591 , SrcSpan "tests/examples/RealGHC.lhs" 409 5 409 5 15592 , SrcSpan "tests/examples/RealGHC.lhs" 410 5 410 5 15593 , SrcSpan "tests/examples/RealGHC.lhs" 413 5 413 5 15594 , SrcSpan "tests/examples/RealGHC.lhs" 414 5 414 5 15595 , SrcSpan "tests/examples/RealGHC.lhs" 422 5 422 5 15596 , SrcSpan "tests/examples/RealGHC.lhs" 457 1 457 0 15597 ] 15598 } 15599 [ PatBind 15600 SrcSpanInfo 15601 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 5 403 80 15602 , srcInfoPoints = [] 15603 } 15604 (PTuple 15605 SrcSpanInfo 15606 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 5 403 30 15607 , srcInfoPoints = 15608 [ SrcSpan "tests/examples/RealGHC.lhs" 403 5 403 6 15609 , SrcSpan "tests/examples/RealGHC.lhs" 403 17 403 18 15610 , SrcSpan "tests/examples/RealGHC.lhs" 403 29 403 30 15611 ] 15612 } 15613 Boxed 15614 [ PVar 15615 SrcSpanInfo 15616 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 6 403 17 15617 , srcInfoPoints = [] 15618 } 15619 (Ident 15620 SrcSpanInfo 15621 { srcInfoSpan = 15622 SrcSpan "tests/examples/RealGHC.lhs" 403 6 403 17 15623 , srcInfoPoints = [] 15624 } 15625 "init_rn_env") 15626 , PVar 15627 SrcSpanInfo 15628 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 19 403 29 15629 , srcInfoPoints = [] 15630 } 15631 (Ident 15632 SrcSpanInfo 15633 { srcInfoSpan = 15634 SrcSpan "tests/examples/RealGHC.lhs" 403 19 403 29 15635 , srcInfoPoints = [] 15636 } 15637 "tmpl_vars'") 15638 ]) 15639 (UnGuardedRhs 15640 SrcSpanInfo 15641 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 31 403 80 15642 , srcInfoPoints = 15643 [ SrcSpan "tests/examples/RealGHC.lhs" 403 31 403 32 ] 15644 } 15645 (App 15646 SrcSpanInfo 15647 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 403 33 403 80 15648 , srcInfoPoints = [] 15649 } 15650 (App 15651 SrcSpanInfo 15652 { srcInfoSpan = 15653 SrcSpan "tests/examples/RealGHC.lhs" 403 33 403 70 15654 , srcInfoPoints = [] 15655 } 15656 (App 15657 SrcSpanInfo 15658 { srcInfoSpan = 15659 SrcSpan "tests/examples/RealGHC.lhs" 403 33 403 50 15660 , srcInfoPoints = [] 15661 } 15662 (Var 15663 SrcSpanInfo 15664 { srcInfoSpan = 15665 SrcSpan "tests/examples/RealGHC.lhs" 403 33 403 42 15666 , srcInfoPoints = [] 15667 } 15668 (UnQual 15669 SrcSpanInfo 15670 { srcInfoSpan = 15671 SrcSpan "tests/examples/RealGHC.lhs" 403 33 403 42 15672 , srcInfoPoints = [] 15673 } 15674 (Ident 15675 SrcSpanInfo 15676 { srcInfoSpan = 15677 SrcSpan 15678 "tests/examples/RealGHC.lhs" 403 33 403 42 15679 , srcInfoPoints = [] 15680 } 15681 "mapAccumL"))) 15682 (Var 15683 SrcSpanInfo 15684 { srcInfoSpan = 15685 SrcSpan "tests/examples/RealGHC.lhs" 403 43 403 50 15686 , srcInfoPoints = [] 15687 } 15688 (UnQual 15689 SrcSpanInfo 15690 { srcInfoSpan = 15691 SrcSpan "tests/examples/RealGHC.lhs" 403 43 403 50 15692 , srcInfoPoints = [] 15693 } 15694 (Ident 15695 SrcSpanInfo 15696 { srcInfoSpan = 15697 SrcSpan 15698 "tests/examples/RealGHC.lhs" 403 43 403 50 15699 , srcInfoPoints = [] 15700 } 15701 "rnBndrL")))) 15702 (Paren 15703 SrcSpanInfo 15704 { srcInfoSpan = 15705 SrcSpan "tests/examples/RealGHC.lhs" 403 51 403 70 15706 , srcInfoPoints = 15707 [ SrcSpan "tests/examples/RealGHC.lhs" 403 51 403 52 15708 , SrcSpan "tests/examples/RealGHC.lhs" 403 69 403 70 15709 ] 15710 } 15711 (App 15712 SrcSpanInfo 15713 { srcInfoSpan = 15714 SrcSpan "tests/examples/RealGHC.lhs" 403 52 403 69 15715 , srcInfoPoints = [] 15716 } 15717 (Var 15718 SrcSpanInfo 15719 { srcInfoSpan = 15720 SrcSpan "tests/examples/RealGHC.lhs" 403 52 403 60 15721 , srcInfoPoints = [] 15722 } 15723 (UnQual 15724 SrcSpanInfo 15725 { srcInfoSpan = 15726 SrcSpan 15727 "tests/examples/RealGHC.lhs" 403 52 403 60 15728 , srcInfoPoints = [] 15729 } 15730 (Ident 15731 SrcSpanInfo 15732 { srcInfoSpan = 15733 SrcSpan 15734 "tests/examples/RealGHC.lhs" 403 52 403 60 15735 , srcInfoPoints = [] 15736 } 15737 "mkRnEnv2"))) 15738 (Var 15739 SrcSpanInfo 15740 { srcInfoSpan = 15741 SrcSpan "tests/examples/RealGHC.lhs" 403 61 403 69 15742 , srcInfoPoints = [] 15743 } 15744 (UnQual 15745 SrcSpanInfo 15746 { srcInfoSpan = 15747 SrcSpan 15748 "tests/examples/RealGHC.lhs" 403 61 403 69 15749 , srcInfoPoints = [] 15750 } 15751 (Ident 15752 SrcSpanInfo 15753 { srcInfoSpan = 15754 SrcSpan 15755 "tests/examples/RealGHC.lhs" 403 61 403 69 15756 , srcInfoPoints = [] 15757 } 15758 "in_scope")))))) 15759 (Var 15760 SrcSpanInfo 15761 { srcInfoSpan = 15762 SrcSpan "tests/examples/RealGHC.lhs" 403 71 403 80 15763 , srcInfoPoints = [] 15764 } 15765 (UnQual 15766 SrcSpanInfo 15767 { srcInfoSpan = 15768 SrcSpan "tests/examples/RealGHC.lhs" 403 71 403 80 15769 , srcInfoPoints = [] 15770 } 15771 (Ident 15772 SrcSpanInfo 15773 { srcInfoSpan = 15774 SrcSpan "tests/examples/RealGHC.lhs" 403 71 403 80 15775 , srcInfoPoints = [] 15776 } 15777 "tmpl_vars"))))) 15778 Nothing 15779 , PatBind 15780 SrcSpanInfo 15781 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 5 406 76 15782 , srcInfoPoints = [] 15783 } 15784 (PVar 15785 SrcSpanInfo 15786 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 5 406 14 15787 , srcInfoPoints = [] 15788 } 15789 (Ident 15790 SrcSpanInfo 15791 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 5 406 14 15792 , srcInfoPoints = [] 15793 } 15794 "init_menv")) 15795 (UnGuardedRhs 15796 SrcSpanInfo 15797 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 15 406 76 15798 , srcInfoPoints = 15799 [ SrcSpan "tests/examples/RealGHC.lhs" 406 15 406 16 ] 15800 } 15801 (RecConstr 15802 SrcSpanInfo 15803 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 406 17 406 76 15804 , srcInfoPoints = 15805 [ SrcSpan "tests/examples/RealGHC.lhs" 406 20 406 21 15806 , SrcSpan "tests/examples/RealGHC.lhs" 406 52 406 53 15807 , SrcSpan "tests/examples/RealGHC.lhs" 406 75 406 76 15808 ] 15809 } 15810 (UnQual 15811 SrcSpanInfo 15812 { srcInfoSpan = 15813 SrcSpan "tests/examples/RealGHC.lhs" 406 17 406 19 15814 , srcInfoPoints = [] 15815 } 15816 (Ident 15817 SrcSpanInfo 15818 { srcInfoSpan = 15819 SrcSpan "tests/examples/RealGHC.lhs" 406 17 406 19 15820 , srcInfoPoints = [] 15821 } 15822 "ME")) 15823 [ FieldUpdate 15824 SrcSpanInfo 15825 { srcInfoSpan = 15826 SrcSpan "tests/examples/RealGHC.lhs" 406 22 406 52 15827 , srcInfoPoints = 15828 [ SrcSpan "tests/examples/RealGHC.lhs" 406 31 406 32 ] 15829 } 15830 (UnQual 15831 SrcSpanInfo 15832 { srcInfoSpan = 15833 SrcSpan "tests/examples/RealGHC.lhs" 406 22 406 30 15834 , srcInfoPoints = [] 15835 } 15836 (Ident 15837 SrcSpanInfo 15838 { srcInfoSpan = 15839 SrcSpan "tests/examples/RealGHC.lhs" 406 22 406 30 15840 , srcInfoPoints = [] 15841 } 15842 "me_tmpls")) 15843 (App 15844 SrcSpanInfo 15845 { srcInfoSpan = 15846 SrcSpan "tests/examples/RealGHC.lhs" 406 33 406 52 15847 , srcInfoPoints = [] 15848 } 15849 (Var 15850 SrcSpanInfo 15851 { srcInfoSpan = 15852 SrcSpan "tests/examples/RealGHC.lhs" 406 33 406 41 15853 , srcInfoPoints = [] 15854 } 15855 (UnQual 15856 SrcSpanInfo 15857 { srcInfoSpan = 15858 SrcSpan "tests/examples/RealGHC.lhs" 406 33 406 41 15859 , srcInfoPoints = [] 15860 } 15861 (Ident 15862 SrcSpanInfo 15863 { srcInfoSpan = 15864 SrcSpan 15865 "tests/examples/RealGHC.lhs" 406 33 406 41 15866 , srcInfoPoints = [] 15867 } 15868 "mkVarSet"))) 15869 (Var 15870 SrcSpanInfo 15871 { srcInfoSpan = 15872 SrcSpan "tests/examples/RealGHC.lhs" 406 42 406 52 15873 , srcInfoPoints = [] 15874 } 15875 (UnQual 15876 SrcSpanInfo 15877 { srcInfoSpan = 15878 SrcSpan "tests/examples/RealGHC.lhs" 406 42 406 52 15879 , srcInfoPoints = [] 15880 } 15881 (Ident 15882 SrcSpanInfo 15883 { srcInfoSpan = 15884 SrcSpan 15885 "tests/examples/RealGHC.lhs" 406 42 406 52 15886 , srcInfoPoints = [] 15887 } 15888 "tmpl_vars'")))) 15889 , FieldUpdate 15890 SrcSpanInfo 15891 { srcInfoSpan = 15892 SrcSpan "tests/examples/RealGHC.lhs" 406 54 406 74 15893 , srcInfoPoints = 15894 [ SrcSpan "tests/examples/RealGHC.lhs" 406 61 406 62 ] 15895 } 15896 (UnQual 15897 SrcSpanInfo 15898 { srcInfoSpan = 15899 SrcSpan "tests/examples/RealGHC.lhs" 406 54 406 60 15900 , srcInfoPoints = [] 15901 } 15902 (Ident 15903 SrcSpanInfo 15904 { srcInfoSpan = 15905 SrcSpan "tests/examples/RealGHC.lhs" 406 54 406 60 15906 , srcInfoPoints = [] 15907 } 15908 "me_env")) 15909 (Var 15910 SrcSpanInfo 15911 { srcInfoSpan = 15912 SrcSpan "tests/examples/RealGHC.lhs" 406 63 406 74 15913 , srcInfoPoints = [] 15914 } 15915 (UnQual 15916 SrcSpanInfo 15917 { srcInfoSpan = 15918 SrcSpan "tests/examples/RealGHC.lhs" 406 63 406 74 15919 , srcInfoPoints = [] 15920 } 15921 (Ident 15922 SrcSpanInfo 15923 { srcInfoSpan = 15924 SrcSpan "tests/examples/RealGHC.lhs" 406 63 406 74 15925 , srcInfoPoints = [] 15926 } 15927 "init_rn_env"))) 15928 ])) 15929 Nothing 15930 , FunBind 15931 SrcSpanInfo 15932 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 5 411 46 15933 , srcInfoPoints = [] 15934 } 15935 [ Match 15936 SrcSpanInfo 15937 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 5 408 45 15938 , srcInfoPoints = [] 15939 } 15940 (Ident 15941 SrcSpanInfo 15942 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 5 408 7 15943 , srcInfoPoints = [] 15944 } 15945 "go") 15946 [ PVar 15947 SrcSpanInfo 15948 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 8 408 12 15949 , srcInfoPoints = [] 15950 } 15951 (Ident 15952 SrcSpanInfo 15953 { srcInfoSpan = 15954 SrcSpan "tests/examples/RealGHC.lhs" 408 8 408 12 15955 , srcInfoPoints = [] 15956 } 15957 "menv") 15958 , PVar 15959 SrcSpanInfo 15960 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 13 408 18 15961 , srcInfoPoints = [] 15962 } 15963 (Ident 15964 SrcSpanInfo 15965 { srcInfoSpan = 15966 SrcSpan "tests/examples/RealGHC.lhs" 408 13 408 18 15967 , srcInfoPoints = [] 15968 } 15969 "subst") 15970 , PList 15971 SrcSpanInfo 15972 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 19 408 21 15973 , srcInfoPoints = 15974 [ SrcSpan "tests/examples/RealGHC.lhs" 408 19 408 20 15975 , SrcSpan "tests/examples/RealGHC.lhs" 408 20 408 21 15976 ] 15977 } 15978 [] 15979 , PVar 15980 SrcSpanInfo 15981 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 26 408 28 15982 , srcInfoPoints = [] 15983 } 15984 (Ident 15985 SrcSpanInfo 15986 { srcInfoSpan = 15987 SrcSpan "tests/examples/RealGHC.lhs" 408 26 408 28 15988 , srcInfoPoints = [] 15989 } 15990 "es") 15991 ] 15992 (UnGuardedRhs 15993 SrcSpanInfo 15994 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 408 33 408 45 15995 , srcInfoPoints = 15996 [ SrcSpan "tests/examples/RealGHC.lhs" 408 33 408 34 ] 15997 } 15998 (App 15999 SrcSpanInfo 16000 { srcInfoSpan = 16001 SrcSpan "tests/examples/RealGHC.lhs" 408 35 408 45 16002 , srcInfoPoints = [] 16003 } 16004 (Con 16005 SrcSpanInfo 16006 { srcInfoSpan = 16007 SrcSpan "tests/examples/RealGHC.lhs" 408 35 408 39 16008 , srcInfoPoints = [] 16009 } 16010 (UnQual 16011 SrcSpanInfo 16012 { srcInfoSpan = 16013 SrcSpan "tests/examples/RealGHC.lhs" 408 35 408 39 16014 , srcInfoPoints = [] 16015 } 16016 (Ident 16017 SrcSpanInfo 16018 { srcInfoSpan = 16019 SrcSpan "tests/examples/RealGHC.lhs" 408 35 408 39 16020 , srcInfoPoints = [] 16021 } 16022 "Just"))) 16023 (Var 16024 SrcSpanInfo 16025 { srcInfoSpan = 16026 SrcSpan "tests/examples/RealGHC.lhs" 408 40 408 45 16027 , srcInfoPoints = [] 16028 } 16029 (UnQual 16030 SrcSpanInfo 16031 { srcInfoSpan = 16032 SrcSpan "tests/examples/RealGHC.lhs" 408 40 408 45 16033 , srcInfoPoints = [] 16034 } 16035 (Ident 16036 SrcSpanInfo 16037 { srcInfoSpan = 16038 SrcSpan "tests/examples/RealGHC.lhs" 408 40 408 45 16039 , srcInfoPoints = [] 16040 } 16041 "subst"))))) 16042 Nothing 16043 , Match 16044 SrcSpanInfo 16045 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 5 409 42 16046 , srcInfoPoints = [] 16047 } 16048 (Ident 16049 SrcSpanInfo 16050 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 5 409 7 16051 , srcInfoPoints = [] 16052 } 16053 "go") 16054 [ PVar 16055 SrcSpanInfo 16056 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 8 409 12 16057 , srcInfoPoints = [] 16058 } 16059 (Ident 16060 SrcSpanInfo 16061 { srcInfoSpan = 16062 SrcSpan "tests/examples/RealGHC.lhs" 409 8 409 12 16063 , srcInfoPoints = [] 16064 } 16065 "menv") 16066 , PVar 16067 SrcSpanInfo 16068 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 13 409 18 16069 , srcInfoPoints = [] 16070 } 16071 (Ident 16072 SrcSpanInfo 16073 { srcInfoSpan = 16074 SrcSpan "tests/examples/RealGHC.lhs" 409 13 409 18 16075 , srcInfoPoints = [] 16076 } 16077 "subst") 16078 , PVar 16079 SrcSpanInfo 16080 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 19 409 21 16081 , srcInfoPoints = [] 16082 } 16083 (Ident 16084 SrcSpanInfo 16085 { srcInfoSpan = 16086 SrcSpan "tests/examples/RealGHC.lhs" 409 19 409 21 16087 , srcInfoPoints = [] 16088 } 16089 "ts") 16090 , PList 16091 SrcSpanInfo 16092 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 26 409 28 16093 , srcInfoPoints = 16094 [ SrcSpan "tests/examples/RealGHC.lhs" 409 26 409 27 16095 , SrcSpan "tests/examples/RealGHC.lhs" 409 27 409 28 16096 ] 16097 } 16098 [] 16099 ] 16100 (UnGuardedRhs 16101 SrcSpanInfo 16102 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 409 33 409 42 16103 , srcInfoPoints = 16104 [ SrcSpan "tests/examples/RealGHC.lhs" 409 33 409 34 ] 16105 } 16106 (Con 16107 SrcSpanInfo 16108 { srcInfoSpan = 16109 SrcSpan "tests/examples/RealGHC.lhs" 409 35 409 42 16110 , srcInfoPoints = [] 16111 } 16112 (UnQual 16113 SrcSpanInfo 16114 { srcInfoSpan = 16115 SrcSpan "tests/examples/RealGHC.lhs" 409 35 409 42 16116 , srcInfoPoints = [] 16117 } 16118 (Ident 16119 SrcSpanInfo 16120 { srcInfoSpan = 16121 SrcSpan "tests/examples/RealGHC.lhs" 409 35 409 42 16122 , srcInfoPoints = [] 16123 } 16124 "Nothing")))) 16125 Nothing 16126 , Match 16127 SrcSpanInfo 16128 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 5 411 46 16129 , srcInfoPoints = [] 16130 } 16131 (Ident 16132 SrcSpanInfo 16133 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 5 410 7 16134 , srcInfoPoints = [] 16135 } 16136 "go") 16137 [ PVar 16138 SrcSpanInfo 16139 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 8 410 12 16140 , srcInfoPoints = [] 16141 } 16142 (Ident 16143 SrcSpanInfo 16144 { srcInfoSpan = 16145 SrcSpan "tests/examples/RealGHC.lhs" 410 8 410 12 16146 , srcInfoPoints = [] 16147 } 16148 "menv") 16149 , PVar 16150 SrcSpanInfo 16151 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 13 410 18 16152 , srcInfoPoints = [] 16153 } 16154 (Ident 16155 SrcSpanInfo 16156 { srcInfoSpan = 16157 SrcSpan "tests/examples/RealGHC.lhs" 410 13 410 18 16158 , srcInfoPoints = [] 16159 } 16160 "subst") 16161 , PParen 16162 SrcSpanInfo 16163 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 19 410 25 16164 , srcInfoPoints = 16165 [ SrcSpan "tests/examples/RealGHC.lhs" 410 19 410 20 16166 , SrcSpan "tests/examples/RealGHC.lhs" 410 24 410 25 16167 ] 16168 } 16169 (PInfixApp 16170 SrcSpanInfo 16171 { srcInfoSpan = 16172 SrcSpan "tests/examples/RealGHC.lhs" 410 20 410 24 16173 , srcInfoPoints = [] 16174 } 16175 (PVar 16176 SrcSpanInfo 16177 { srcInfoSpan = 16178 SrcSpan "tests/examples/RealGHC.lhs" 410 20 410 21 16179 , srcInfoPoints = [] 16180 } 16181 (Ident 16182 SrcSpanInfo 16183 { srcInfoSpan = 16184 SrcSpan "tests/examples/RealGHC.lhs" 410 20 410 21 16185 , srcInfoPoints = [] 16186 } 16187 "t")) 16188 (Special 16189 SrcSpanInfo 16190 { srcInfoSpan = 16191 SrcSpan "tests/examples/RealGHC.lhs" 410 21 410 22 16192 , srcInfoPoints = [] 16193 } 16194 (Cons 16195 SrcSpanInfo 16196 { srcInfoSpan = 16197 SrcSpan "tests/examples/RealGHC.lhs" 410 21 410 22 16198 , srcInfoPoints = [] 16199 })) 16200 (PVar 16201 SrcSpanInfo 16202 { srcInfoSpan = 16203 SrcSpan "tests/examples/RealGHC.lhs" 410 22 410 24 16204 , srcInfoPoints = [] 16205 } 16206 (Ident 16207 SrcSpanInfo 16208 { srcInfoSpan = 16209 SrcSpan "tests/examples/RealGHC.lhs" 410 22 410 24 16210 , srcInfoPoints = [] 16211 } 16212 "ts"))) 16213 , PParen 16214 SrcSpanInfo 16215 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 26 410 32 16216 , srcInfoPoints = 16217 [ SrcSpan "tests/examples/RealGHC.lhs" 410 26 410 27 16218 , SrcSpan "tests/examples/RealGHC.lhs" 410 31 410 32 16219 ] 16220 } 16221 (PInfixApp 16222 SrcSpanInfo 16223 { srcInfoSpan = 16224 SrcSpan "tests/examples/RealGHC.lhs" 410 27 410 31 16225 , srcInfoPoints = [] 16226 } 16227 (PVar 16228 SrcSpanInfo 16229 { srcInfoSpan = 16230 SrcSpan "tests/examples/RealGHC.lhs" 410 27 410 28 16231 , srcInfoPoints = [] 16232 } 16233 (Ident 16234 SrcSpanInfo 16235 { srcInfoSpan = 16236 SrcSpan "tests/examples/RealGHC.lhs" 410 27 410 28 16237 , srcInfoPoints = [] 16238 } 16239 "e")) 16240 (Special 16241 SrcSpanInfo 16242 { srcInfoSpan = 16243 SrcSpan "tests/examples/RealGHC.lhs" 410 28 410 29 16244 , srcInfoPoints = [] 16245 } 16246 (Cons 16247 SrcSpanInfo 16248 { srcInfoSpan = 16249 SrcSpan "tests/examples/RealGHC.lhs" 410 28 410 29 16250 , srcInfoPoints = [] 16251 })) 16252 (PVar 16253 SrcSpanInfo 16254 { srcInfoSpan = 16255 SrcSpan "tests/examples/RealGHC.lhs" 410 29 410 31 16256 , srcInfoPoints = [] 16257 } 16258 (Ident 16259 SrcSpanInfo 16260 { srcInfoSpan = 16261 SrcSpan "tests/examples/RealGHC.lhs" 410 29 410 31 16262 , srcInfoPoints = [] 16263 } 16264 "es"))) 16265 ] 16266 (UnGuardedRhs 16267 SrcSpanInfo 16268 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 410 33 411 46 16269 , srcInfoPoints = 16270 [ SrcSpan "tests/examples/RealGHC.lhs" 410 33 410 34 ] 16271 } 16272 (Do 16273 SrcSpanInfo 16274 { srcInfoSpan = 16275 SrcSpan "tests/examples/RealGHC.lhs" 410 35 411 46 16276 , srcInfoPoints = 16277 [ SrcSpan "tests/examples/RealGHC.lhs" 410 35 410 37 16278 , SrcSpan "tests/examples/RealGHC.lhs" 410 38 410 39 16279 , SrcSpan "tests/examples/RealGHC.lhs" 411 22 411 23 16280 , SrcSpan "tests/examples/RealGHC.lhs" 411 45 411 46 16281 ] 16282 } 16283 [ Generator 16284 SrcSpanInfo 16285 { srcInfoSpan = 16286 SrcSpan "tests/examples/RealGHC.lhs" 410 40 410 70 16287 , srcInfoPoints = 16288 [ SrcSpan "tests/examples/RealGHC.lhs" 410 47 410 49 ] 16289 } 16290 (PVar 16291 SrcSpanInfo 16292 { srcInfoSpan = 16293 SrcSpan "tests/examples/RealGHC.lhs" 410 40 410 46 16294 , srcInfoPoints = [] 16295 } 16296 (Ident 16297 SrcSpanInfo 16298 { srcInfoSpan = 16299 SrcSpan "tests/examples/RealGHC.lhs" 410 40 410 46 16300 , srcInfoPoints = [] 16301 } 16302 "subst1")) 16303 (App 16304 SrcSpanInfo 16305 { srcInfoSpan = 16306 SrcSpan "tests/examples/RealGHC.lhs" 410 50 410 70 16307 , srcInfoPoints = [] 16308 } 16309 (App 16310 SrcSpanInfo 16311 { srcInfoSpan = 16312 SrcSpan "tests/examples/RealGHC.lhs" 410 50 410 68 16313 , srcInfoPoints = [] 16314 } 16315 (App 16316 SrcSpanInfo 16317 { srcInfoSpan = 16318 SrcSpan 16319 "tests/examples/RealGHC.lhs" 410 50 410 66 16320 , srcInfoPoints = [] 16321 } 16322 (App 16323 SrcSpanInfo 16324 { srcInfoSpan = 16325 SrcSpan 16326 "tests/examples/RealGHC.lhs" 410 50 410 60 16327 , srcInfoPoints = [] 16328 } 16329 (Var 16330 SrcSpanInfo 16331 { srcInfoSpan = 16332 SrcSpan 16333 "tests/examples/RealGHC.lhs" 16334 410 16335 50 16336 410 16337 55 16338 , srcInfoPoints = [] 16339 } 16340 (UnQual 16341 SrcSpanInfo 16342 { srcInfoSpan = 16343 SrcSpan 16344 "tests/examples/RealGHC.lhs" 16345 410 16346 50 16347 410 16348 55 16349 , srcInfoPoints = [] 16350 } 16351 (Ident 16352 SrcSpanInfo 16353 { srcInfoSpan = 16354 SrcSpan 16355 "tests/examples/RealGHC.lhs" 16356 410 16357 50 16358 410 16359 55 16360 , srcInfoPoints = [] 16361 } 16362 "match"))) 16363 (Var 16364 SrcSpanInfo 16365 { srcInfoSpan = 16366 SrcSpan 16367 "tests/examples/RealGHC.lhs" 16368 410 16369 56 16370 410 16371 60 16372 , srcInfoPoints = [] 16373 } 16374 (UnQual 16375 SrcSpanInfo 16376 { srcInfoSpan = 16377 SrcSpan 16378 "tests/examples/RealGHC.lhs" 16379 410 16380 56 16381 410 16382 60 16383 , srcInfoPoints = [] 16384 } 16385 (Ident 16386 SrcSpanInfo 16387 { srcInfoSpan = 16388 SrcSpan 16389 "tests/examples/RealGHC.lhs" 16390 410 16391 56 16392 410 16393 60 16394 , srcInfoPoints = [] 16395 } 16396 "menv")))) 16397 (Var 16398 SrcSpanInfo 16399 { srcInfoSpan = 16400 SrcSpan 16401 "tests/examples/RealGHC.lhs" 410 61 410 66 16402 , srcInfoPoints = [] 16403 } 16404 (UnQual 16405 SrcSpanInfo 16406 { srcInfoSpan = 16407 SrcSpan 16408 "tests/examples/RealGHC.lhs" 16409 410 16410 61 16411 410 16412 66 16413 , srcInfoPoints = [] 16414 } 16415 (Ident 16416 SrcSpanInfo 16417 { srcInfoSpan = 16418 SrcSpan 16419 "tests/examples/RealGHC.lhs" 16420 410 16421 61 16422 410 16423 66 16424 , srcInfoPoints = [] 16425 } 16426 "subst")))) 16427 (Var 16428 SrcSpanInfo 16429 { srcInfoSpan = 16430 SrcSpan 16431 "tests/examples/RealGHC.lhs" 410 67 410 68 16432 , srcInfoPoints = [] 16433 } 16434 (UnQual 16435 SrcSpanInfo 16436 { srcInfoSpan = 16437 SrcSpan 16438 "tests/examples/RealGHC.lhs" 410 67 410 68 16439 , srcInfoPoints = [] 16440 } 16441 (Ident 16442 SrcSpanInfo 16443 { srcInfoSpan = 16444 SrcSpan 16445 "tests/examples/RealGHC.lhs" 16446 410 16447 67 16448 410 16449 68 16450 , srcInfoPoints = [] 16451 } 16452 "t")))) 16453 (Var 16454 SrcSpanInfo 16455 { srcInfoSpan = 16456 SrcSpan "tests/examples/RealGHC.lhs" 410 69 410 70 16457 , srcInfoPoints = [] 16458 } 16459 (UnQual 16460 SrcSpanInfo 16461 { srcInfoSpan = 16462 SrcSpan 16463 "tests/examples/RealGHC.lhs" 410 69 410 70 16464 , srcInfoPoints = [] 16465 } 16466 (Ident 16467 SrcSpanInfo 16468 { srcInfoSpan = 16469 SrcSpan 16470 "tests/examples/RealGHC.lhs" 410 69 410 70 16471 , srcInfoPoints = [] 16472 } 16473 "e")))) 16474 , Qualifier 16475 SrcSpanInfo 16476 { srcInfoSpan = 16477 SrcSpan "tests/examples/RealGHC.lhs" 411 24 411 44 16478 , srcInfoPoints = [] 16479 } 16480 (App 16481 SrcSpanInfo 16482 { srcInfoSpan = 16483 SrcSpan "tests/examples/RealGHC.lhs" 411 24 411 44 16484 , srcInfoPoints = [] 16485 } 16486 (App 16487 SrcSpanInfo 16488 { srcInfoSpan = 16489 SrcSpan "tests/examples/RealGHC.lhs" 411 24 411 41 16490 , srcInfoPoints = [] 16491 } 16492 (App 16493 SrcSpanInfo 16494 { srcInfoSpan = 16495 SrcSpan 16496 "tests/examples/RealGHC.lhs" 411 24 411 38 16497 , srcInfoPoints = [] 16498 } 16499 (App 16500 SrcSpanInfo 16501 { srcInfoSpan = 16502 SrcSpan 16503 "tests/examples/RealGHC.lhs" 411 24 411 31 16504 , srcInfoPoints = [] 16505 } 16506 (Var 16507 SrcSpanInfo 16508 { srcInfoSpan = 16509 SrcSpan 16510 "tests/examples/RealGHC.lhs" 16511 411 16512 24 16513 411 16514 26 16515 , srcInfoPoints = [] 16516 } 16517 (UnQual 16518 SrcSpanInfo 16519 { srcInfoSpan = 16520 SrcSpan 16521 "tests/examples/RealGHC.lhs" 16522 411 16523 24 16524 411 16525 26 16526 , srcInfoPoints = [] 16527 } 16528 (Ident 16529 SrcSpanInfo 16530 { srcInfoSpan = 16531 SrcSpan 16532 "tests/examples/RealGHC.lhs" 16533 411 16534 24 16535 411 16536 26 16537 , srcInfoPoints = [] 16538 } 16539 "go"))) 16540 (Var 16541 SrcSpanInfo 16542 { srcInfoSpan = 16543 SrcSpan 16544 "tests/examples/RealGHC.lhs" 16545 411 16546 27 16547 411 16548 31 16549 , srcInfoPoints = [] 16550 } 16551 (UnQual 16552 SrcSpanInfo 16553 { srcInfoSpan = 16554 SrcSpan 16555 "tests/examples/RealGHC.lhs" 16556 411 16557 27 16558 411 16559 31 16560 , srcInfoPoints = [] 16561 } 16562 (Ident 16563 SrcSpanInfo 16564 { srcInfoSpan = 16565 SrcSpan 16566 "tests/examples/RealGHC.lhs" 16567 411 16568 27 16569 411 16570 31 16571 , srcInfoPoints = [] 16572 } 16573 "menv")))) 16574 (Var 16575 SrcSpanInfo 16576 { srcInfoSpan = 16577 SrcSpan 16578 "tests/examples/RealGHC.lhs" 411 32 411 38 16579 , srcInfoPoints = [] 16580 } 16581 (UnQual 16582 SrcSpanInfo 16583 { srcInfoSpan = 16584 SrcSpan 16585 "tests/examples/RealGHC.lhs" 16586 411 16587 32 16588 411 16589 38 16590 , srcInfoPoints = [] 16591 } 16592 (Ident 16593 SrcSpanInfo 16594 { srcInfoSpan = 16595 SrcSpan 16596 "tests/examples/RealGHC.lhs" 16597 411 16598 32 16599 411 16600 38 16601 , srcInfoPoints = [] 16602 } 16603 "subst1")))) 16604 (Var 16605 SrcSpanInfo 16606 { srcInfoSpan = 16607 SrcSpan 16608 "tests/examples/RealGHC.lhs" 411 39 411 41 16609 , srcInfoPoints = [] 16610 } 16611 (UnQual 16612 SrcSpanInfo 16613 { srcInfoSpan = 16614 SrcSpan 16615 "tests/examples/RealGHC.lhs" 411 39 411 41 16616 , srcInfoPoints = [] 16617 } 16618 (Ident 16619 SrcSpanInfo 16620 { srcInfoSpan = 16621 SrcSpan 16622 "tests/examples/RealGHC.lhs" 16623 411 16624 39 16625 411 16626 41 16627 , srcInfoPoints = [] 16628 } 16629 "ts")))) 16630 (Var 16631 SrcSpanInfo 16632 { srcInfoSpan = 16633 SrcSpan "tests/examples/RealGHC.lhs" 411 42 411 44 16634 , srcInfoPoints = [] 16635 } 16636 (UnQual 16637 SrcSpanInfo 16638 { srcInfoSpan = 16639 SrcSpan 16640 "tests/examples/RealGHC.lhs" 411 42 411 44 16641 , srcInfoPoints = [] 16642 } 16643 (Ident 16644 SrcSpanInfo 16645 { srcInfoSpan = 16646 SrcSpan 16647 "tests/examples/RealGHC.lhs" 411 42 411 44 16648 , srcInfoPoints = [] 16649 } 16650 "es")))) 16651 ])) 16652 Nothing 16653 ] 16654 , TypeSig 16655 SrcSpanInfo 16656 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 5 413 63 16657 , srcInfoPoints = 16658 [ SrcSpan "tests/examples/RealGHC.lhs" 413 17 413 19 ] 16659 } 16660 [ Ident 16661 SrcSpanInfo 16662 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 5 413 16 16663 , srcInfoPoints = [] 16664 } 16665 "lookup_tmpl" 16666 ] 16667 (TyFun 16668 SrcSpanInfo 16669 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 20 413 63 16670 , srcInfoPoints = 16671 [ SrcSpan "tests/examples/RealGHC.lhs" 413 31 413 33 ] 16672 } 16673 (TyCon 16674 SrcSpanInfo 16675 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 20 413 30 16676 , srcInfoPoints = [] 16677 } 16678 (UnQual 16679 SrcSpanInfo 16680 { srcInfoSpan = 16681 SrcSpan "tests/examples/RealGHC.lhs" 413 20 413 30 16682 , srcInfoPoints = [] 16683 } 16684 (Ident 16685 SrcSpanInfo 16686 { srcInfoSpan = 16687 SrcSpan "tests/examples/RealGHC.lhs" 413 20 413 30 16688 , srcInfoPoints = [] 16689 } 16690 "TvSubstEnv"))) 16691 (TyFun 16692 SrcSpanInfo 16693 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 413 34 413 63 16694 , srcInfoPoints = 16695 [ SrcSpan "tests/examples/RealGHC.lhs" 413 45 413 47 ] 16696 } 16697 (TyCon 16698 SrcSpanInfo 16699 { srcInfoSpan = 16700 SrcSpan "tests/examples/RealGHC.lhs" 413 34 413 44 16701 , srcInfoPoints = [] 16702 } 16703 (UnQual 16704 SrcSpanInfo 16705 { srcInfoSpan = 16706 SrcSpan "tests/examples/RealGHC.lhs" 413 34 413 44 16707 , srcInfoPoints = [] 16708 } 16709 (Ident 16710 SrcSpanInfo 16711 { srcInfoSpan = 16712 SrcSpan "tests/examples/RealGHC.lhs" 413 34 413 44 16713 , srcInfoPoints = [] 16714 } 16715 "IdSubstEnv"))) 16716 (TyFun 16717 SrcSpanInfo 16718 { srcInfoSpan = 16719 SrcSpan "tests/examples/RealGHC.lhs" 413 48 413 63 16720 , srcInfoPoints = 16721 [ SrcSpan "tests/examples/RealGHC.lhs" 413 52 413 54 ] 16722 } 16723 (TyCon 16724 SrcSpanInfo 16725 { srcInfoSpan = 16726 SrcSpan "tests/examples/RealGHC.lhs" 413 48 413 51 16727 , srcInfoPoints = [] 16728 } 16729 (UnQual 16730 SrcSpanInfo 16731 { srcInfoSpan = 16732 SrcSpan "tests/examples/RealGHC.lhs" 413 48 413 51 16733 , srcInfoPoints = [] 16734 } 16735 (Ident 16736 SrcSpanInfo 16737 { srcInfoSpan = 16738 SrcSpan "tests/examples/RealGHC.lhs" 413 48 413 51 16739 , srcInfoPoints = [] 16740 } 16741 "Var"))) 16742 (TyCon 16743 SrcSpanInfo 16744 { srcInfoSpan = 16745 SrcSpan "tests/examples/RealGHC.lhs" 413 55 413 63 16746 , srcInfoPoints = [] 16747 } 16748 (UnQual 16749 SrcSpanInfo 16750 { srcInfoSpan = 16751 SrcSpan "tests/examples/RealGHC.lhs" 413 55 413 63 16752 , srcInfoPoints = [] 16753 } 16754 (Ident 16755 SrcSpanInfo 16756 { srcInfoSpan = 16757 SrcSpan "tests/examples/RealGHC.lhs" 413 55 413 63 16758 , srcInfoPoints = [] 16759 } 16760 "CoreExpr")))))) 16761 , FunBind 16762 SrcSpanInfo 16763 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 414 5 420 44 16764 , srcInfoPoints = [] 16765 } 16766 [ Match 16767 SrcSpanInfo 16768 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 414 5 420 44 16769 , srcInfoPoints = [] 16770 } 16771 (Ident 16772 SrcSpanInfo 16773 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 414 5 414 16 16774 , srcInfoPoints = [] 16775 } 16776 "lookup_tmpl") 16777 [ PVar 16778 SrcSpanInfo 16779 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 414 17 414 25 16780 , srcInfoPoints = [] 16781 } 16782 (Ident 16783 SrcSpanInfo 16784 { srcInfoSpan = 16785 SrcSpan "tests/examples/RealGHC.lhs" 414 17 414 25 16786 , srcInfoPoints = [] 16787 } 16788 "tv_subst") 16789 , PVar 16790 SrcSpanInfo 16791 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 414 26 414 34 16792 , srcInfoPoints = [] 16793 } 16794 (Ident 16795 SrcSpanInfo 16796 { srcInfoSpan = 16797 SrcSpan "tests/examples/RealGHC.lhs" 414 26 414 34 16798 , srcInfoPoints = [] 16799 } 16800 "id_subst") 16801 , PVar 16802 SrcSpanInfo 16803 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 414 35 414 44 16804 , srcInfoPoints = [] 16805 } 16806 (Ident 16807 SrcSpanInfo 16808 { srcInfoSpan = 16809 SrcSpan "tests/examples/RealGHC.lhs" 414 35 414 44 16810 , srcInfoPoints = [] 16811 } 16812 "tmpl_var'") 16813 ] 16814 (GuardedRhss 16815 SrcSpanInfo 16816 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 415 9 420 44 16817 , srcInfoPoints = [] 16818 } 16819 [ GuardedRhs 16820 SrcSpanInfo 16821 { srcInfoSpan = 16822 SrcSpan "tests/examples/RealGHC.lhs" 415 9 417 49 16823 , srcInfoPoints = 16824 [ SrcSpan "tests/examples/RealGHC.lhs" 415 9 415 10 16825 , SrcSpan "tests/examples/RealGHC.lhs" 415 29 415 30 16826 ] 16827 } 16828 [ Qualifier 16829 SrcSpanInfo 16830 { srcInfoSpan = 16831 SrcSpan "tests/examples/RealGHC.lhs" 415 11 415 28 16832 , srcInfoPoints = [] 16833 } 16834 (App 16835 SrcSpanInfo 16836 { srcInfoSpan = 16837 SrcSpan "tests/examples/RealGHC.lhs" 415 11 415 28 16838 , srcInfoPoints = [] 16839 } 16840 (Var 16841 SrcSpanInfo 16842 { srcInfoSpan = 16843 SrcSpan 16844 "tests/examples/RealGHC.lhs" 415 11 415 18 16845 , srcInfoPoints = [] 16846 } 16847 (UnQual 16848 SrcSpanInfo 16849 { srcInfoSpan = 16850 SrcSpan 16851 "tests/examples/RealGHC.lhs" 415 11 415 18 16852 , srcInfoPoints = [] 16853 } 16854 (Ident 16855 SrcSpanInfo 16856 { srcInfoSpan = 16857 SrcSpan 16858 "tests/examples/RealGHC.lhs" 16859 415 16860 11 16861 415 16862 18 16863 , srcInfoPoints = [] 16864 } 16865 "isTyVar"))) 16866 (Var 16867 SrcSpanInfo 16868 { srcInfoSpan = 16869 SrcSpan 16870 "tests/examples/RealGHC.lhs" 415 19 415 28 16871 , srcInfoPoints = [] 16872 } 16873 (UnQual 16874 SrcSpanInfo 16875 { srcInfoSpan = 16876 SrcSpan 16877 "tests/examples/RealGHC.lhs" 415 19 415 28 16878 , srcInfoPoints = [] 16879 } 16880 (Ident 16881 SrcSpanInfo 16882 { srcInfoSpan = 16883 SrcSpan 16884 "tests/examples/RealGHC.lhs" 16885 415 16886 19 16887 415 16888 28 16889 , srcInfoPoints = [] 16890 } 16891 "tmpl_var'")))) 16892 ] 16893 (Case 16894 SrcSpanInfo 16895 { srcInfoSpan = 16896 SrcSpan "tests/examples/RealGHC.lhs" 415 31 417 49 16897 , srcInfoPoints = 16898 [ SrcSpan "tests/examples/RealGHC.lhs" 415 31 415 35 16899 , SrcSpan "tests/examples/RealGHC.lhs" 415 68 415 70 16900 , SrcSpan "tests/examples/RealGHC.lhs" 416 17 416 17 16901 , SrcSpan "tests/examples/RealGHC.lhs" 417 17 417 17 16902 , SrcSpan "tests/examples/RealGHC.lhs" 418 9 418 0 16903 ] 16904 } 16905 (App 16906 SrcSpanInfo 16907 { srcInfoSpan = 16908 SrcSpan "tests/examples/RealGHC.lhs" 415 36 415 67 16909 , srcInfoPoints = [] 16910 } 16911 (App 16912 SrcSpanInfo 16913 { srcInfoSpan = 16914 SrcSpan "tests/examples/RealGHC.lhs" 415 36 415 57 16915 , srcInfoPoints = [] 16916 } 16917 (Var 16918 SrcSpanInfo 16919 { srcInfoSpan = 16920 SrcSpan 16921 "tests/examples/RealGHC.lhs" 415 36 415 48 16922 , srcInfoPoints = [] 16923 } 16924 (UnQual 16925 SrcSpanInfo 16926 { srcInfoSpan = 16927 SrcSpan 16928 "tests/examples/RealGHC.lhs" 415 36 415 48 16929 , srcInfoPoints = [] 16930 } 16931 (Ident 16932 SrcSpanInfo 16933 { srcInfoSpan = 16934 SrcSpan 16935 "tests/examples/RealGHC.lhs" 16936 415 16937 36 16938 415 16939 48 16940 , srcInfoPoints = [] 16941 } 16942 "lookupVarEnv"))) 16943 (Var 16944 SrcSpanInfo 16945 { srcInfoSpan = 16946 SrcSpan 16947 "tests/examples/RealGHC.lhs" 415 49 415 57 16948 , srcInfoPoints = [] 16949 } 16950 (UnQual 16951 SrcSpanInfo 16952 { srcInfoSpan = 16953 SrcSpan 16954 "tests/examples/RealGHC.lhs" 415 49 415 57 16955 , srcInfoPoints = [] 16956 } 16957 (Ident 16958 SrcSpanInfo 16959 { srcInfoSpan = 16960 SrcSpan 16961 "tests/examples/RealGHC.lhs" 16962 415 16963 49 16964 415 16965 57 16966 , srcInfoPoints = [] 16967 } 16968 "tv_subst")))) 16969 (Var 16970 SrcSpanInfo 16971 { srcInfoSpan = 16972 SrcSpan "tests/examples/RealGHC.lhs" 415 58 415 67 16973 , srcInfoPoints = [] 16974 } 16975 (UnQual 16976 SrcSpanInfo 16977 { srcInfoSpan = 16978 SrcSpan 16979 "tests/examples/RealGHC.lhs" 415 58 415 67 16980 , srcInfoPoints = [] 16981 } 16982 (Ident 16983 SrcSpanInfo 16984 { srcInfoSpan = 16985 SrcSpan 16986 "tests/examples/RealGHC.lhs" 415 58 415 67 16987 , srcInfoPoints = [] 16988 } 16989 "tmpl_var'")))) 16990 [ Alt 16991 SrcSpanInfo 16992 { srcInfoSpan = 16993 SrcSpan "tests/examples/RealGHC.lhs" 416 17 416 39 16994 , srcInfoPoints = [] 16995 } 16996 (PApp 16997 SrcSpanInfo 16998 { srcInfoSpan = 16999 SrcSpan 17000 "tests/examples/RealGHC.lhs" 416 17 416 24 17001 , srcInfoPoints = [] 17002 } 17003 (UnQual 17004 SrcSpanInfo 17005 { srcInfoSpan = 17006 SrcSpan 17007 "tests/examples/RealGHC.lhs" 416 17 416 21 17008 , srcInfoPoints = [] 17009 } 17010 (Ident 17011 SrcSpanInfo 17012 { srcInfoSpan = 17013 SrcSpan 17014 "tests/examples/RealGHC.lhs" 17015 416 17016 17 17017 416 17018 21 17019 , srcInfoPoints = [] 17020 } 17021 "Just")) 17022 [ PVar 17023 SrcSpanInfo 17024 { srcInfoSpan = 17025 SrcSpan 17026 "tests/examples/RealGHC.lhs" 416 22 416 24 17027 , srcInfoPoints = [] 17028 } 17029 (Ident 17030 SrcSpanInfo 17031 { srcInfoSpan = 17032 SrcSpan 17033 "tests/examples/RealGHC.lhs" 17034 416 17035 22 17036 416 17037 24 17038 , srcInfoPoints = [] 17039 } 17040 "ty") 17041 ]) 17042 (UnGuardedRhs 17043 SrcSpanInfo 17044 { srcInfoSpan = 17045 SrcSpan 17046 "tests/examples/RealGHC.lhs" 416 29 416 39 17047 , srcInfoPoints = 17048 [ SrcSpan 17049 "tests/examples/RealGHC.lhs" 416 29 416 31 17050 ] 17051 } 17052 (App 17053 SrcSpanInfo 17054 { srcInfoSpan = 17055 SrcSpan 17056 "tests/examples/RealGHC.lhs" 416 32 416 39 17057 , srcInfoPoints = [] 17058 } 17059 (Con 17060 SrcSpanInfo 17061 { srcInfoSpan = 17062 SrcSpan 17063 "tests/examples/RealGHC.lhs" 17064 416 17065 32 17066 416 17067 36 17068 , srcInfoPoints = [] 17069 } 17070 (UnQual 17071 SrcSpanInfo 17072 { srcInfoSpan = 17073 SrcSpan 17074 "tests/examples/RealGHC.lhs" 17075 416 17076 32 17077 416 17078 36 17079 , srcInfoPoints = [] 17080 } 17081 (Ident 17082 SrcSpanInfo 17083 { srcInfoSpan = 17084 SrcSpan 17085 "tests/examples/RealGHC.lhs" 17086 416 17087 32 17088 416 17089 36 17090 , srcInfoPoints = [] 17091 } 17092 "Type"))) 17093 (Var 17094 SrcSpanInfo 17095 { srcInfoSpan = 17096 SrcSpan 17097 "tests/examples/RealGHC.lhs" 17098 416 17099 37 17100 416 17101 39 17102 , srcInfoPoints = [] 17103 } 17104 (UnQual 17105 SrcSpanInfo 17106 { srcInfoSpan = 17107 SrcSpan 17108 "tests/examples/RealGHC.lhs" 17109 416 17110 37 17111 416 17112 39 17113 , srcInfoPoints = [] 17114 } 17115 (Ident 17116 SrcSpanInfo 17117 { srcInfoSpan = 17118 SrcSpan 17119 "tests/examples/RealGHC.lhs" 17120 416 17121 37 17122 416 17123 39 17124 , srcInfoPoints = [] 17125 } 17126 "ty"))))) 17127 Nothing 17128 , Alt 17129 SrcSpanInfo 17130 { srcInfoSpan = 17131 SrcSpan "tests/examples/RealGHC.lhs" 417 17 417 49 17132 , srcInfoPoints = [] 17133 } 17134 (PApp 17135 SrcSpanInfo 17136 { srcInfoSpan = 17137 SrcSpan 17138 "tests/examples/RealGHC.lhs" 417 17 417 24 17139 , srcInfoPoints = [] 17140 } 17141 (UnQual 17142 SrcSpanInfo 17143 { srcInfoSpan = 17144 SrcSpan 17145 "tests/examples/RealGHC.lhs" 417 17 417 24 17146 , srcInfoPoints = [] 17147 } 17148 (Ident 17149 SrcSpanInfo 17150 { srcInfoSpan = 17151 SrcSpan 17152 "tests/examples/RealGHC.lhs" 17153 417 17154 17 17155 417 17156 24 17157 , srcInfoPoints = [] 17158 } 17159 "Nothing")) 17160 []) 17161 (UnGuardedRhs 17162 SrcSpanInfo 17163 { srcInfoSpan = 17164 SrcSpan 17165 "tests/examples/RealGHC.lhs" 417 29 417 49 17166 , srcInfoPoints = 17167 [ SrcSpan 17168 "tests/examples/RealGHC.lhs" 417 29 417 31 17169 ] 17170 } 17171 (App 17172 SrcSpanInfo 17173 { srcInfoSpan = 17174 SrcSpan 17175 "tests/examples/RealGHC.lhs" 417 32 417 49 17176 , srcInfoPoints = [] 17177 } 17178 (Var 17179 SrcSpanInfo 17180 { srcInfoSpan = 17181 SrcSpan 17182 "tests/examples/RealGHC.lhs" 17183 417 17184 32 17185 417 17186 39 17187 , srcInfoPoints = [] 17188 } 17189 (UnQual 17190 SrcSpanInfo 17191 { srcInfoSpan = 17192 SrcSpan 17193 "tests/examples/RealGHC.lhs" 17194 417 17195 32 17196 417 17197 39 17198 , srcInfoPoints = [] 17199 } 17200 (Ident 17201 SrcSpanInfo 17202 { srcInfoSpan = 17203 SrcSpan 17204 "tests/examples/RealGHC.lhs" 17205 417 17206 32 17207 417 17208 39 17209 , srcInfoPoints = [] 17210 } 17211 "unbound"))) 17212 (Var 17213 SrcSpanInfo 17214 { srcInfoSpan = 17215 SrcSpan 17216 "tests/examples/RealGHC.lhs" 17217 417 17218 40 17219 417 17220 49 17221 , srcInfoPoints = [] 17222 } 17223 (UnQual 17224 SrcSpanInfo 17225 { srcInfoSpan = 17226 SrcSpan 17227 "tests/examples/RealGHC.lhs" 17228 417 17229 40 17230 417 17231 49 17232 , srcInfoPoints = [] 17233 } 17234 (Ident 17235 SrcSpanInfo 17236 { srcInfoSpan = 17237 SrcSpan 17238 "tests/examples/RealGHC.lhs" 17239 417 17240 40 17241 417 17242 49 17243 , srcInfoPoints = [] 17244 } 17245 "tmpl_var'"))))) 17246 Nothing 17247 ]) 17248 , GuardedRhs 17249 SrcSpanInfo 17250 { srcInfoSpan = 17251 SrcSpan "tests/examples/RealGHC.lhs" 418 9 420 44 17252 , srcInfoPoints = 17253 [ SrcSpan "tests/examples/RealGHC.lhs" 418 9 418 10 17254 , SrcSpan "tests/examples/RealGHC.lhs" 418 25 418 26 17255 ] 17256 } 17257 [ Qualifier 17258 SrcSpanInfo 17259 { srcInfoSpan = 17260 SrcSpan "tests/examples/RealGHC.lhs" 418 11 418 20 17261 , srcInfoPoints = [] 17262 } 17263 (Var 17264 SrcSpanInfo 17265 { srcInfoSpan = 17266 SrcSpan "tests/examples/RealGHC.lhs" 418 11 418 20 17267 , srcInfoPoints = [] 17268 } 17269 (UnQual 17270 SrcSpanInfo 17271 { srcInfoSpan = 17272 SrcSpan 17273 "tests/examples/RealGHC.lhs" 418 11 418 20 17274 , srcInfoPoints = [] 17275 } 17276 (Ident 17277 SrcSpanInfo 17278 { srcInfoSpan = 17279 SrcSpan 17280 "tests/examples/RealGHC.lhs" 418 11 418 20 17281 , srcInfoPoints = [] 17282 } 17283 "otherwise"))) 17284 ] 17285 (Case 17286 SrcSpanInfo 17287 { srcInfoSpan = 17288 SrcSpan "tests/examples/RealGHC.lhs" 418 27 420 44 17289 , srcInfoPoints = 17290 [ SrcSpan "tests/examples/RealGHC.lhs" 418 27 418 31 17291 , SrcSpan "tests/examples/RealGHC.lhs" 418 64 418 66 17292 , SrcSpan "tests/examples/RealGHC.lhs" 419 17 419 17 17293 , SrcSpan "tests/examples/RealGHC.lhs" 420 17 420 17 17294 , SrcSpan "tests/examples/RealGHC.lhs" 422 5 422 0 17295 ] 17296 } 17297 (App 17298 SrcSpanInfo 17299 { srcInfoSpan = 17300 SrcSpan "tests/examples/RealGHC.lhs" 418 32 418 63 17301 , srcInfoPoints = [] 17302 } 17303 (App 17304 SrcSpanInfo 17305 { srcInfoSpan = 17306 SrcSpan "tests/examples/RealGHC.lhs" 418 32 418 53 17307 , srcInfoPoints = [] 17308 } 17309 (Var 17310 SrcSpanInfo 17311 { srcInfoSpan = 17312 SrcSpan 17313 "tests/examples/RealGHC.lhs" 418 32 418 44 17314 , srcInfoPoints = [] 17315 } 17316 (UnQual 17317 SrcSpanInfo 17318 { srcInfoSpan = 17319 SrcSpan 17320 "tests/examples/RealGHC.lhs" 418 32 418 44 17321 , srcInfoPoints = [] 17322 } 17323 (Ident 17324 SrcSpanInfo 17325 { srcInfoSpan = 17326 SrcSpan 17327 "tests/examples/RealGHC.lhs" 17328 418 17329 32 17330 418 17331 44 17332 , srcInfoPoints = [] 17333 } 17334 "lookupVarEnv"))) 17335 (Var 17336 SrcSpanInfo 17337 { srcInfoSpan = 17338 SrcSpan 17339 "tests/examples/RealGHC.lhs" 418 45 418 53 17340 , srcInfoPoints = [] 17341 } 17342 (UnQual 17343 SrcSpanInfo 17344 { srcInfoSpan = 17345 SrcSpan 17346 "tests/examples/RealGHC.lhs" 418 45 418 53 17347 , srcInfoPoints = [] 17348 } 17349 (Ident 17350 SrcSpanInfo 17351 { srcInfoSpan = 17352 SrcSpan 17353 "tests/examples/RealGHC.lhs" 17354 418 17355 45 17356 418 17357 53 17358 , srcInfoPoints = [] 17359 } 17360 "id_subst")))) 17361 (Var 17362 SrcSpanInfo 17363 { srcInfoSpan = 17364 SrcSpan "tests/examples/RealGHC.lhs" 418 54 418 63 17365 , srcInfoPoints = [] 17366 } 17367 (UnQual 17368 SrcSpanInfo 17369 { srcInfoSpan = 17370 SrcSpan 17371 "tests/examples/RealGHC.lhs" 418 54 418 63 17372 , srcInfoPoints = [] 17373 } 17374 (Ident 17375 SrcSpanInfo 17376 { srcInfoSpan = 17377 SrcSpan 17378 "tests/examples/RealGHC.lhs" 418 54 418 63 17379 , srcInfoPoints = [] 17380 } 17381 "tmpl_var'")))) 17382 [ Alt 17383 SrcSpanInfo 17384 { srcInfoSpan = 17385 SrcSpan "tests/examples/RealGHC.lhs" 419 17 419 28 17386 , srcInfoPoints = [] 17387 } 17388 (PApp 17389 SrcSpanInfo 17390 { srcInfoSpan = 17391 SrcSpan 17392 "tests/examples/RealGHC.lhs" 419 17 419 23 17393 , srcInfoPoints = [] 17394 } 17395 (UnQual 17396 SrcSpanInfo 17397 { srcInfoSpan = 17398 SrcSpan 17399 "tests/examples/RealGHC.lhs" 419 17 419 21 17400 , srcInfoPoints = [] 17401 } 17402 (Ident 17403 SrcSpanInfo 17404 { srcInfoSpan = 17405 SrcSpan 17406 "tests/examples/RealGHC.lhs" 17407 419 17408 17 17409 419 17410 21 17411 , srcInfoPoints = [] 17412 } 17413 "Just")) 17414 [ PVar 17415 SrcSpanInfo 17416 { srcInfoSpan = 17417 SrcSpan 17418 "tests/examples/RealGHC.lhs" 419 22 419 23 17419 , srcInfoPoints = [] 17420 } 17421 (Ident 17422 SrcSpanInfo 17423 { srcInfoSpan = 17424 SrcSpan 17425 "tests/examples/RealGHC.lhs" 17426 419 17427 22 17428 419 17429 23 17430 , srcInfoPoints = [] 17431 } 17432 "e") 17433 ]) 17434 (UnGuardedRhs 17435 SrcSpanInfo 17436 { srcInfoSpan = 17437 SrcSpan 17438 "tests/examples/RealGHC.lhs" 419 24 419 28 17439 , srcInfoPoints = 17440 [ SrcSpan 17441 "tests/examples/RealGHC.lhs" 419 24 419 26 17442 ] 17443 } 17444 (Var 17445 SrcSpanInfo 17446 { srcInfoSpan = 17447 SrcSpan 17448 "tests/examples/RealGHC.lhs" 419 27 419 28 17449 , srcInfoPoints = [] 17450 } 17451 (UnQual 17452 SrcSpanInfo 17453 { srcInfoSpan = 17454 SrcSpan 17455 "tests/examples/RealGHC.lhs" 17456 419 17457 27 17458 419 17459 28 17460 , srcInfoPoints = [] 17461 } 17462 (Ident 17463 SrcSpanInfo 17464 { srcInfoSpan = 17465 SrcSpan 17466 "tests/examples/RealGHC.lhs" 17467 419 17468 27 17469 419 17470 28 17471 , srcInfoPoints = [] 17472 } 17473 "e")))) 17474 Nothing 17475 , Alt 17476 SrcSpanInfo 17477 { srcInfoSpan = 17478 SrcSpan "tests/examples/RealGHC.lhs" 420 17 420 44 17479 , srcInfoPoints = [] 17480 } 17481 (PVar 17482 SrcSpanInfo 17483 { srcInfoSpan = 17484 SrcSpan 17485 "tests/examples/RealGHC.lhs" 420 17 420 22 17486 , srcInfoPoints = [] 17487 } 17488 (Ident 17489 SrcSpanInfo 17490 { srcInfoSpan = 17491 SrcSpan 17492 "tests/examples/RealGHC.lhs" 420 17 420 22 17493 , srcInfoPoints = [] 17494 } 17495 "other")) 17496 (UnGuardedRhs 17497 SrcSpanInfo 17498 { srcInfoSpan = 17499 SrcSpan 17500 "tests/examples/RealGHC.lhs" 420 24 420 44 17501 , srcInfoPoints = 17502 [ SrcSpan 17503 "tests/examples/RealGHC.lhs" 420 24 420 26 17504 ] 17505 } 17506 (App 17507 SrcSpanInfo 17508 { srcInfoSpan = 17509 SrcSpan 17510 "tests/examples/RealGHC.lhs" 420 27 420 44 17511 , srcInfoPoints = [] 17512 } 17513 (Var 17514 SrcSpanInfo 17515 { srcInfoSpan = 17516 SrcSpan 17517 "tests/examples/RealGHC.lhs" 17518 420 17519 27 17520 420 17521 34 17522 , srcInfoPoints = [] 17523 } 17524 (UnQual 17525 SrcSpanInfo 17526 { srcInfoSpan = 17527 SrcSpan 17528 "tests/examples/RealGHC.lhs" 17529 420 17530 27 17531 420 17532 34 17533 , srcInfoPoints = [] 17534 } 17535 (Ident 17536 SrcSpanInfo 17537 { srcInfoSpan = 17538 SrcSpan 17539 "tests/examples/RealGHC.lhs" 17540 420 17541 27 17542 420 17543 34 17544 , srcInfoPoints = [] 17545 } 17546 "unbound"))) 17547 (Var 17548 SrcSpanInfo 17549 { srcInfoSpan = 17550 SrcSpan 17551 "tests/examples/RealGHC.lhs" 17552 420 17553 35 17554 420 17555 44 17556 , srcInfoPoints = [] 17557 } 17558 (UnQual 17559 SrcSpanInfo 17560 { srcInfoSpan = 17561 SrcSpan 17562 "tests/examples/RealGHC.lhs" 17563 420 17564 35 17565 420 17566 44 17567 , srcInfoPoints = [] 17568 } 17569 (Ident 17570 SrcSpanInfo 17571 { srcInfoSpan = 17572 SrcSpan 17573 "tests/examples/RealGHC.lhs" 17574 420 17575 35 17576 420 17577 44 17578 , srcInfoPoints = [] 17579 } 17580 "tmpl_var'"))))) 17581 Nothing 17582 ]) 17583 ]) 17584 Nothing 17585 ] 17586 , FunBind 17587 SrcSpanInfo 17588 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 5 423 89 17589 , srcInfoPoints = [] 17590 } 17591 [ Match 17592 SrcSpanInfo 17593 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 5 423 89 17594 , srcInfoPoints = [] 17595 } 17596 (Ident 17597 SrcSpanInfo 17598 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 5 422 12 17599 , srcInfoPoints = [] 17600 } 17601 "unbound") 17602 [ PVar 17603 SrcSpanInfo 17604 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 13 422 16 17605 , srcInfoPoints = [] 17606 } 17607 (Ident 17608 SrcSpanInfo 17609 { srcInfoSpan = 17610 SrcSpan "tests/examples/RealGHC.lhs" 422 13 422 16 17611 , srcInfoPoints = [] 17612 } 17613 "var") 17614 ] 17615 (UnGuardedRhs 17616 SrcSpanInfo 17617 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 422 17 423 89 17618 , srcInfoPoints = 17619 [ SrcSpan "tests/examples/RealGHC.lhs" 422 17 422 18 ] 17620 } 17621 (App 17622 SrcSpanInfo 17623 { srcInfoSpan = 17624 SrcSpan "tests/examples/RealGHC.lhs" 422 19 423 89 17625 , srcInfoPoints = [] 17626 } 17627 (App 17628 SrcSpanInfo 17629 { srcInfoSpan = 17630 SrcSpan "tests/examples/RealGHC.lhs" 422 19 422 71 17631 , srcInfoPoints = [] 17632 } 17633 (Var 17634 SrcSpanInfo 17635 { srcInfoSpan = 17636 SrcSpan "tests/examples/RealGHC.lhs" 422 19 422 27 17637 , srcInfoPoints = [] 17638 } 17639 (UnQual 17640 SrcSpanInfo 17641 { srcInfoSpan = 17642 SrcSpan "tests/examples/RealGHC.lhs" 422 19 422 27 17643 , srcInfoPoints = [] 17644 } 17645 (Ident 17646 SrcSpanInfo 17647 { srcInfoSpan = 17648 SrcSpan 17649 "tests/examples/RealGHC.lhs" 422 19 422 27 17650 , srcInfoPoints = [] 17651 } 17652 "pprPanic"))) 17653 (Lit 17654 SrcSpanInfo 17655 { srcInfoSpan = 17656 SrcSpan "tests/examples/RealGHC.lhs" 422 28 422 71 17657 , srcInfoPoints = [] 17658 } 17659 (String 17660 SrcSpanInfo 17661 { srcInfoSpan = 17662 SrcSpan "tests/examples/RealGHC.lhs" 422 28 422 71 17663 , srcInfoPoints = [] 17664 } 17665 "Template variable unbound in rewrite rule" 17666 "Template variable unbound in rewrite rule"))) 17667 (Paren 17668 SrcSpanInfo 17669 { srcInfoSpan = 17670 SrcSpan "tests/examples/RealGHC.lhs" 423 13 423 89 17671 , srcInfoPoints = 17672 [ SrcSpan "tests/examples/RealGHC.lhs" 423 13 423 14 17673 , SrcSpan "tests/examples/RealGHC.lhs" 423 88 423 89 17674 ] 17675 } 17676 (InfixApp 17677 SrcSpanInfo 17678 { srcInfoSpan = 17679 SrcSpan "tests/examples/RealGHC.lhs" 423 14 423 88 17680 , srcInfoPoints = [] 17681 } 17682 (InfixApp 17683 SrcSpanInfo 17684 { srcInfoSpan = 17685 SrcSpan "tests/examples/RealGHC.lhs" 423 14 423 71 17686 , srcInfoPoints = [] 17687 } 17688 (InfixApp 17689 SrcSpanInfo 17690 { srcInfoSpan = 17691 SrcSpan 17692 "tests/examples/RealGHC.lhs" 423 14 423 56 17693 , srcInfoPoints = [] 17694 } 17695 (InfixApp 17696 SrcSpanInfo 17697 { srcInfoSpan = 17698 SrcSpan 17699 "tests/examples/RealGHC.lhs" 423 14 423 38 17700 , srcInfoPoints = [] 17701 } 17702 (App 17703 SrcSpanInfo 17704 { srcInfoSpan = 17705 SrcSpan 17706 "tests/examples/RealGHC.lhs" 17707 423 17708 14 17709 423 17710 21 17711 , srcInfoPoints = [] 17712 } 17713 (Var 17714 SrcSpanInfo 17715 { srcInfoSpan = 17716 SrcSpan 17717 "tests/examples/RealGHC.lhs" 17718 423 17719 14 17720 423 17721 17 17722 , srcInfoPoints = [] 17723 } 17724 (UnQual 17725 SrcSpanInfo 17726 { srcInfoSpan = 17727 SrcSpan 17728 "tests/examples/RealGHC.lhs" 17729 423 17730 14 17731 423 17732 17 17733 , srcInfoPoints = [] 17734 } 17735 (Ident 17736 SrcSpanInfo 17737 { srcInfoSpan = 17738 SrcSpan 17739 "tests/examples/RealGHC.lhs" 17740 423 17741 14 17742 423 17743 17 17744 , srcInfoPoints = [] 17745 } 17746 "ppr"))) 17747 (Var 17748 SrcSpanInfo 17749 { srcInfoSpan = 17750 SrcSpan 17751 "tests/examples/RealGHC.lhs" 17752 423 17753 18 17754 423 17755 21 17756 , srcInfoPoints = [] 17757 } 17758 (UnQual 17759 SrcSpanInfo 17760 { srcInfoSpan = 17761 SrcSpan 17762 "tests/examples/RealGHC.lhs" 17763 423 17764 18 17765 423 17766 21 17767 , srcInfoPoints = [] 17768 } 17769 (Ident 17770 SrcSpanInfo 17771 { srcInfoSpan = 17772 SrcSpan 17773 "tests/examples/RealGHC.lhs" 17774 423 17775 18 17776 423 17777 21 17778 , srcInfoPoints = [] 17779 } 17780 "var")))) 17781 (QVarOp 17782 SrcSpanInfo 17783 { srcInfoSpan = 17784 SrcSpan 17785 "tests/examples/RealGHC.lhs" 17786 423 17787 22 17788 423 17789 24 17790 , srcInfoPoints = [] 17791 } 17792 (UnQual 17793 SrcSpanInfo 17794 { srcInfoSpan = 17795 SrcSpan 17796 "tests/examples/RealGHC.lhs" 17797 423 17798 22 17799 423 17800 24 17801 , srcInfoPoints = [] 17802 } 17803 (Symbol 17804 SrcSpanInfo 17805 { srcInfoSpan = 17806 SrcSpan 17807 "tests/examples/RealGHC.lhs" 17808 423 17809 22 17810 423 17811 24 17812 , srcInfoPoints = [] 17813 } 17814 "$$"))) 17815 (App 17816 SrcSpanInfo 17817 { srcInfoSpan = 17818 SrcSpan 17819 "tests/examples/RealGHC.lhs" 17820 423 17821 25 17822 423 17823 38 17824 , srcInfoPoints = [] 17825 } 17826 (Var 17827 SrcSpanInfo 17828 { srcInfoSpan = 17829 SrcSpan 17830 "tests/examples/RealGHC.lhs" 17831 423 17832 25 17833 423 17834 28 17835 , srcInfoPoints = [] 17836 } 17837 (UnQual 17838 SrcSpanInfo 17839 { srcInfoSpan = 17840 SrcSpan 17841 "tests/examples/RealGHC.lhs" 17842 423 17843 25 17844 423 17845 28 17846 , srcInfoPoints = [] 17847 } 17848 (Ident 17849 SrcSpanInfo 17850 { srcInfoSpan = 17851 SrcSpan 17852 "tests/examples/RealGHC.lhs" 17853 423 17854 25 17855 423 17856 28 17857 , srcInfoPoints = [] 17858 } 17859 "ppr"))) 17860 (Var 17861 SrcSpanInfo 17862 { srcInfoSpan = 17863 SrcSpan 17864 "tests/examples/RealGHC.lhs" 17865 423 17866 29 17867 423 17868 38 17869 , srcInfoPoints = [] 17870 } 17871 (UnQual 17872 SrcSpanInfo 17873 { srcInfoSpan = 17874 SrcSpan 17875 "tests/examples/RealGHC.lhs" 17876 423 17877 29 17878 423 17879 38 17880 , srcInfoPoints = [] 17881 } 17882 (Ident 17883 SrcSpanInfo 17884 { srcInfoSpan = 17885 SrcSpan 17886 "tests/examples/RealGHC.lhs" 17887 423 17888 29 17889 423 17890 38 17891 , srcInfoPoints = [] 17892 } 17893 "tmpl_vars"))))) 17894 (QVarOp 17895 SrcSpanInfo 17896 { srcInfoSpan = 17897 SrcSpan 17898 "tests/examples/RealGHC.lhs" 423 39 423 41 17899 , srcInfoPoints = [] 17900 } 17901 (UnQual 17902 SrcSpanInfo 17903 { srcInfoSpan = 17904 SrcSpan 17905 "tests/examples/RealGHC.lhs" 17906 423 17907 39 17908 423 17909 41 17910 , srcInfoPoints = [] 17911 } 17912 (Symbol 17913 SrcSpanInfo 17914 { srcInfoSpan = 17915 SrcSpan 17916 "tests/examples/RealGHC.lhs" 17917 423 17918 39 17919 423 17920 41 17921 , srcInfoPoints = [] 17922 } 17923 "$$"))) 17924 (App 17925 SrcSpanInfo 17926 { srcInfoSpan = 17927 SrcSpan 17928 "tests/examples/RealGHC.lhs" 423 42 423 56 17929 , srcInfoPoints = [] 17930 } 17931 (Var 17932 SrcSpanInfo 17933 { srcInfoSpan = 17934 SrcSpan 17935 "tests/examples/RealGHC.lhs" 17936 423 17937 42 17938 423 17939 45 17940 , srcInfoPoints = [] 17941 } 17942 (UnQual 17943 SrcSpanInfo 17944 { srcInfoSpan = 17945 SrcSpan 17946 "tests/examples/RealGHC.lhs" 17947 423 17948 42 17949 423 17950 45 17951 , srcInfoPoints = [] 17952 } 17953 (Ident 17954 SrcSpanInfo 17955 { srcInfoSpan = 17956 SrcSpan 17957 "tests/examples/RealGHC.lhs" 17958 423 17959 42 17960 423 17961 45 17962 , srcInfoPoints = [] 17963 } 17964 "ppr"))) 17965 (Var 17966 SrcSpanInfo 17967 { srcInfoSpan = 17968 SrcSpan 17969 "tests/examples/RealGHC.lhs" 17970 423 17971 46 17972 423 17973 56 17974 , srcInfoPoints = [] 17975 } 17976 (UnQual 17977 SrcSpanInfo 17978 { srcInfoSpan = 17979 SrcSpan 17980 "tests/examples/RealGHC.lhs" 17981 423 17982 46 17983 423 17984 56 17985 , srcInfoPoints = [] 17986 } 17987 (Ident 17988 SrcSpanInfo 17989 { srcInfoSpan = 17990 SrcSpan 17991 "tests/examples/RealGHC.lhs" 17992 423 17993 46 17994 423 17995 56 17996 , srcInfoPoints = [] 17997 } 17998 "tmpl_vars'"))))) 17999 (QVarOp 18000 SrcSpanInfo 18001 { srcInfoSpan = 18002 SrcSpan 18003 "tests/examples/RealGHC.lhs" 423 57 423 59 18004 , srcInfoPoints = [] 18005 } 18006 (UnQual 18007 SrcSpanInfo 18008 { srcInfoSpan = 18009 SrcSpan 18010 "tests/examples/RealGHC.lhs" 423 57 423 59 18011 , srcInfoPoints = [] 18012 } 18013 (Symbol 18014 SrcSpanInfo 18015 { srcInfoSpan = 18016 SrcSpan 18017 "tests/examples/RealGHC.lhs" 18018 423 18019 57 18020 423 18021 59 18022 , srcInfoPoints = [] 18023 } 18024 "$$"))) 18025 (App 18026 SrcSpanInfo 18027 { srcInfoSpan = 18028 SrcSpan 18029 "tests/examples/RealGHC.lhs" 423 60 423 71 18030 , srcInfoPoints = [] 18031 } 18032 (Var 18033 SrcSpanInfo 18034 { srcInfoSpan = 18035 SrcSpan 18036 "tests/examples/RealGHC.lhs" 423 60 423 63 18037 , srcInfoPoints = [] 18038 } 18039 (UnQual 18040 SrcSpanInfo 18041 { srcInfoSpan = 18042 SrcSpan 18043 "tests/examples/RealGHC.lhs" 18044 423 18045 60 18046 423 18047 63 18048 , srcInfoPoints = [] 18049 } 18050 (Ident 18051 SrcSpanInfo 18052 { srcInfoSpan = 18053 SrcSpan 18054 "tests/examples/RealGHC.lhs" 18055 423 18056 60 18057 423 18058 63 18059 , srcInfoPoints = [] 18060 } 18061 "ppr"))) 18062 (Var 18063 SrcSpanInfo 18064 { srcInfoSpan = 18065 SrcSpan 18066 "tests/examples/RealGHC.lhs" 423 64 423 71 18067 , srcInfoPoints = [] 18068 } 18069 (UnQual 18070 SrcSpanInfo 18071 { srcInfoSpan = 18072 SrcSpan 18073 "tests/examples/RealGHC.lhs" 18074 423 18075 64 18076 423 18077 71 18078 , srcInfoPoints = [] 18079 } 18080 (Ident 18081 SrcSpanInfo 18082 { srcInfoSpan = 18083 SrcSpan 18084 "tests/examples/RealGHC.lhs" 18085 423 18086 64 18087 423 18088 71 18089 , srcInfoPoints = [] 18090 } 18091 "tmpl_es"))))) 18092 (QVarOp 18093 SrcSpanInfo 18094 { srcInfoSpan = 18095 SrcSpan "tests/examples/RealGHC.lhs" 423 72 423 74 18096 , srcInfoPoints = [] 18097 } 18098 (UnQual 18099 SrcSpanInfo 18100 { srcInfoSpan = 18101 SrcSpan 18102 "tests/examples/RealGHC.lhs" 423 72 423 74 18103 , srcInfoPoints = [] 18104 } 18105 (Symbol 18106 SrcSpanInfo 18107 { srcInfoSpan = 18108 SrcSpan 18109 "tests/examples/RealGHC.lhs" 423 72 423 74 18110 , srcInfoPoints = [] 18111 } 18112 "$$"))) 18113 (App 18114 SrcSpanInfo 18115 { srcInfoSpan = 18116 SrcSpan "tests/examples/RealGHC.lhs" 423 75 423 88 18117 , srcInfoPoints = [] 18118 } 18119 (Var 18120 SrcSpanInfo 18121 { srcInfoSpan = 18122 SrcSpan 18123 "tests/examples/RealGHC.lhs" 423 75 423 78 18124 , srcInfoPoints = [] 18125 } 18126 (UnQual 18127 SrcSpanInfo 18128 { srcInfoSpan = 18129 SrcSpan 18130 "tests/examples/RealGHC.lhs" 423 75 423 78 18131 , srcInfoPoints = [] 18132 } 18133 (Ident 18134 SrcSpanInfo 18135 { srcInfoSpan = 18136 SrcSpan 18137 "tests/examples/RealGHC.lhs" 18138 423 18139 75 18140 423 18141 78 18142 , srcInfoPoints = [] 18143 } 18144 "ppr"))) 18145 (Var 18146 SrcSpanInfo 18147 { srcInfoSpan = 18148 SrcSpan 18149 "tests/examples/RealGHC.lhs" 423 79 423 88 18150 , srcInfoPoints = [] 18151 } 18152 (UnQual 18153 SrcSpanInfo 18154 { srcInfoSpan = 18155 SrcSpan 18156 "tests/examples/RealGHC.lhs" 423 79 423 88 18157 , srcInfoPoints = [] 18158 } 18159 (Ident 18160 SrcSpanInfo 18161 { srcInfoSpan = 18162 SrcSpan 18163 "tests/examples/RealGHC.lhs" 18164 423 18165 79 18166 423 18167 88 18168 , srcInfoPoints = [] 18169 } 18170 "target_es")))))))) 18171 Nothing 18172 ] 18173 ])) 18174 ] 18175 , TypeDecl 18176 SrcSpanInfo 18177 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 1 457 61 18178 , srcInfoPoints = 18179 [ SrcSpan "tests/examples/RealGHC.lhs" 457 1 457 5 18180 , SrcSpan "tests/examples/RealGHC.lhs" 457 17 457 18 18181 ] 18182 } 18183 (DHead 18184 SrcSpanInfo 18185 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 6 457 14 18186 , srcInfoPoints = [] 18187 } 18188 (Ident 18189 SrcSpanInfo 18190 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 6 457 14 18191 , srcInfoPoints = [] 18192 } 18193 "SubstEnv")) 18194 (TyTuple 18195 SrcSpanInfo 18196 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 19 457 61 18197 , srcInfoPoints = 18198 [ SrcSpan "tests/examples/RealGHC.lhs" 457 19 457 20 18199 , SrcSpan "tests/examples/RealGHC.lhs" 457 30 457 31 18200 , SrcSpan "tests/examples/RealGHC.lhs" 457 42 457 43 18201 , SrcSpan "tests/examples/RealGHC.lhs" 457 60 457 61 18202 ] 18203 } 18204 Boxed 18205 [ TyCon 18206 SrcSpanInfo 18207 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 20 457 30 18208 , srcInfoPoints = [] 18209 } 18210 (UnQual 18211 SrcSpanInfo 18212 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 20 457 30 18213 , srcInfoPoints = [] 18214 } 18215 (Ident 18216 SrcSpanInfo 18217 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 20 457 30 18218 , srcInfoPoints = [] 18219 } 18220 "TvSubstEnv")) 18221 , TyCon 18222 SrcSpanInfo 18223 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 32 457 42 18224 , srcInfoPoints = [] 18225 } 18226 (UnQual 18227 SrcSpanInfo 18228 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 32 457 42 18229 , srcInfoPoints = [] 18230 } 18231 (Ident 18232 SrcSpanInfo 18233 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 32 457 42 18234 , srcInfoPoints = [] 18235 } 18236 "IdSubstEnv")) 18237 , TyApp 18238 SrcSpanInfo 18239 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 44 457 60 18240 , srcInfoPoints = [] 18241 } 18242 (TyCon 18243 SrcSpanInfo 18244 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 44 457 51 18245 , srcInfoPoints = [] 18246 } 18247 (UnQual 18248 SrcSpanInfo 18249 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 44 457 51 18250 , srcInfoPoints = [] 18251 } 18252 (Ident 18253 SrcSpanInfo 18254 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 44 457 51 18255 , srcInfoPoints = [] 18256 } 18257 "OrdList"))) 18258 (TyCon 18259 SrcSpanInfo 18260 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 52 457 60 18261 , srcInfoPoints = [] 18262 } 18263 (UnQual 18264 SrcSpanInfo 18265 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 52 457 60 18266 , srcInfoPoints = [] 18267 } 18268 (Ident 18269 SrcSpanInfo 18270 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 457 52 457 60 18271 , srcInfoPoints = [] 18272 } 18273 "CoreBind"))) 18274 ]) 18275 , TypeDecl 18276 SrcSpanInfo 18277 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 1 458 33 18278 , srcInfoPoints = 18279 [ SrcSpan "tests/examples/RealGHC.lhs" 458 1 458 5 18280 , SrcSpan "tests/examples/RealGHC.lhs" 458 17 458 18 18281 ] 18282 } 18283 (DHead 18284 SrcSpanInfo 18285 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 6 458 16 18286 , srcInfoPoints = [] 18287 } 18288 (Ident 18289 SrcSpanInfo 18290 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 6 458 16 18291 , srcInfoPoints = [] 18292 } 18293 "IdSubstEnv")) 18294 (TyApp 18295 SrcSpanInfo 18296 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 19 458 33 18297 , srcInfoPoints = [] 18298 } 18299 (TyCon 18300 SrcSpanInfo 18301 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 19 458 24 18302 , srcInfoPoints = [] 18303 } 18304 (UnQual 18305 SrcSpanInfo 18306 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 19 458 24 18307 , srcInfoPoints = [] 18308 } 18309 (Ident 18310 SrcSpanInfo 18311 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 19 458 24 18312 , srcInfoPoints = [] 18313 } 18314 "IdEnv"))) 18315 (TyCon 18316 SrcSpanInfo 18317 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 25 458 33 18318 , srcInfoPoints = [] 18319 } 18320 (UnQual 18321 SrcSpanInfo 18322 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 25 458 33 18323 , srcInfoPoints = [] 18324 } 18325 (Ident 18326 SrcSpanInfo 18327 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 458 25 458 33 18328 , srcInfoPoints = [] 18329 } 18330 "CoreExpr")))) 18331 , TypeSig 18332 SrcSpanInfo 18333 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 460 1 460 26 18334 , srcInfoPoints = 18335 [ SrcSpan "tests/examples/RealGHC.lhs" 460 15 460 17 ] 18336 } 18337 [ Ident 18338 SrcSpanInfo 18339 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 460 1 460 14 18340 , srcInfoPoints = [] 18341 } 18342 "emptySubstEnv" 18343 ] 18344 (TyCon 18345 SrcSpanInfo 18346 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 460 18 460 26 18347 , srcInfoPoints = [] 18348 } 18349 (UnQual 18350 SrcSpanInfo 18351 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 460 18 460 26 18352 , srcInfoPoints = [] 18353 } 18354 (Ident 18355 SrcSpanInfo 18356 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 460 18 460 26 18357 , srcInfoPoints = [] 18358 } 18359 "SubstEnv"))) 18360 , PatBind 18361 SrcSpanInfo 18362 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 1 461 50 18363 , srcInfoPoints = [] 18364 } 18365 (PVar 18366 SrcSpanInfo 18367 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 1 461 14 18368 , srcInfoPoints = [] 18369 } 18370 (Ident 18371 SrcSpanInfo 18372 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 1 461 14 18373 , srcInfoPoints = [] 18374 } 18375 "emptySubstEnv")) 18376 (UnGuardedRhs 18377 SrcSpanInfo 18378 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 15 461 50 18379 , srcInfoPoints = 18380 [ SrcSpan "tests/examples/RealGHC.lhs" 461 15 461 16 ] 18381 } 18382 (Tuple 18383 SrcSpanInfo 18384 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 17 461 50 18385 , srcInfoPoints = 18386 [ SrcSpan "tests/examples/RealGHC.lhs" 461 17 461 18 18387 , SrcSpan "tests/examples/RealGHC.lhs" 461 29 461 30 18388 , SrcSpan "tests/examples/RealGHC.lhs" 461 42 461 43 18389 , SrcSpan "tests/examples/RealGHC.lhs" 461 49 461 50 18390 ] 18391 } 18392 Boxed 18393 [ Var 18394 SrcSpanInfo 18395 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 18 461 29 18396 , srcInfoPoints = [] 18397 } 18398 (UnQual 18399 SrcSpanInfo 18400 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 18 461 29 18401 , srcInfoPoints = [] 18402 } 18403 (Ident 18404 SrcSpanInfo 18405 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 18 461 29 18406 , srcInfoPoints = [] 18407 } 18408 "emptyVarEnv")) 18409 , Var 18410 SrcSpanInfo 18411 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 31 461 42 18412 , srcInfoPoints = [] 18413 } 18414 (UnQual 18415 SrcSpanInfo 18416 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 31 461 42 18417 , srcInfoPoints = [] 18418 } 18419 (Ident 18420 SrcSpanInfo 18421 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 31 461 42 18422 , srcInfoPoints = [] 18423 } 18424 "emptyVarEnv")) 18425 , Var 18426 SrcSpanInfo 18427 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 44 461 49 18428 , srcInfoPoints = [] 18429 } 18430 (UnQual 18431 SrcSpanInfo 18432 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 44 461 49 18433 , srcInfoPoints = [] 18434 } 18435 (Ident 18436 SrcSpanInfo 18437 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 461 44 461 49 18438 , srcInfoPoints = [] 18439 } 18440 "nilOL")) 18441 ])) 18442 Nothing 18443 , TypeSig 18444 SrcSpanInfo 18445 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 473 1 477 24 18446 , srcInfoPoints = 18447 [ SrcSpan "tests/examples/RealGHC.lhs" 473 7 473 9 ] 18448 } 18449 [ Ident 18450 SrcSpanInfo 18451 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 473 1 473 6 18452 , srcInfoPoints = [] 18453 } 18454 "match" 18455 ] 18456 (TyFun 18457 SrcSpanInfo 18458 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 473 10 477 24 18459 , srcInfoPoints = 18460 [ SrcSpan "tests/examples/RealGHC.lhs" 474 7 474 9 ] 18461 } 18462 (TyCon 18463 SrcSpanInfo 18464 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 473 10 473 18 18465 , srcInfoPoints = [] 18466 } 18467 (UnQual 18468 SrcSpanInfo 18469 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 473 10 473 18 18470 , srcInfoPoints = [] 18471 } 18472 (Ident 18473 SrcSpanInfo 18474 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 473 10 473 18 18475 , srcInfoPoints = [] 18476 } 18477 "MatchEnv"))) 18478 (TyFun 18479 SrcSpanInfo 18480 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 474 10 477 24 18481 , srcInfoPoints = 18482 [ SrcSpan "tests/examples/RealGHC.lhs" 475 7 475 9 ] 18483 } 18484 (TyCon 18485 SrcSpanInfo 18486 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 474 10 474 18 18487 , srcInfoPoints = [] 18488 } 18489 (UnQual 18490 SrcSpanInfo 18491 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 474 10 474 18 18492 , srcInfoPoints = [] 18493 } 18494 (Ident 18495 SrcSpanInfo 18496 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 474 10 474 18 18497 , srcInfoPoints = [] 18498 } 18499 "SubstEnv"))) 18500 (TyFun 18501 SrcSpanInfo 18502 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 475 10 477 24 18503 , srcInfoPoints = 18504 [ SrcSpan "tests/examples/RealGHC.lhs" 476 7 476 9 ] 18505 } 18506 (TyCon 18507 SrcSpanInfo 18508 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 475 10 475 18 18509 , srcInfoPoints = [] 18510 } 18511 (UnQual 18512 SrcSpanInfo 18513 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 475 10 475 18 18514 , srcInfoPoints = [] 18515 } 18516 (Ident 18517 SrcSpanInfo 18518 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 475 10 475 18 18519 , srcInfoPoints = [] 18520 } 18521 "CoreExpr"))) 18522 (TyFun 18523 SrcSpanInfo 18524 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 476 10 477 24 18525 , srcInfoPoints = 18526 [ SrcSpan "tests/examples/RealGHC.lhs" 477 7 477 9 ] 18527 } 18528 (TyCon 18529 SrcSpanInfo 18530 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 476 10 476 18 18531 , srcInfoPoints = [] 18532 } 18533 (UnQual 18534 SrcSpanInfo 18535 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 476 10 476 18 18536 , srcInfoPoints = [] 18537 } 18538 (Ident 18539 SrcSpanInfo 18540 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 476 10 476 18 18541 , srcInfoPoints = [] 18542 } 18543 "CoreExpr"))) 18544 (TyApp 18545 SrcSpanInfo 18546 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 477 10 477 24 18547 , srcInfoPoints = [] 18548 } 18549 (TyCon 18550 SrcSpanInfo 18551 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 477 10 477 15 18552 , srcInfoPoints = [] 18553 } 18554 (UnQual 18555 SrcSpanInfo 18556 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 477 10 477 15 18557 , srcInfoPoints = [] 18558 } 18559 (Ident 18560 SrcSpanInfo 18561 { srcInfoSpan = 18562 SrcSpan "tests/examples/RealGHC.lhs" 477 10 477 15 18563 , srcInfoPoints = [] 18564 } 18565 "Maybe"))) 18566 (TyCon 18567 SrcSpanInfo 18568 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 477 16 477 24 18569 , srcInfoPoints = [] 18570 } 18571 (UnQual 18572 SrcSpanInfo 18573 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 477 16 477 24 18574 , srcInfoPoints = [] 18575 } 18576 (Ident 18577 SrcSpanInfo 18578 { srcInfoSpan = 18579 SrcSpan "tests/examples/RealGHC.lhs" 477 16 477 24 18580 , srcInfoPoints = [] 18581 } 18582 "SubstEnv")))))))) 18583 , FunBind 18584 SrcSpanInfo 18585 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 1 671 21 18586 , srcInfoPoints = [] 18587 } 18588 [ Match 18589 SrcSpanInfo 18590 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 1 497 15 18591 , srcInfoPoints = [] 18592 } 18593 (Ident 18594 SrcSpanInfo 18595 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 1 495 6 18596 , srcInfoPoints = [] 18597 } 18598 "match") 18599 [ PVar 18600 SrcSpanInfo 18601 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 7 495 11 18602 , srcInfoPoints = [] 18603 } 18604 (Ident 18605 SrcSpanInfo 18606 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 7 495 11 18607 , srcInfoPoints = [] 18608 } 18609 "menv") 18610 , PVar 18611 SrcSpanInfo 18612 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 12 495 17 18613 , srcInfoPoints = [] 18614 } 18615 (Ident 18616 SrcSpanInfo 18617 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 12 495 17 18618 , srcInfoPoints = [] 18619 } 18620 "subst") 18621 , PParen 18622 SrcSpanInfo 18623 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 18 495 26 18624 , srcInfoPoints = 18625 [ SrcSpan "tests/examples/RealGHC.lhs" 495 18 495 19 18626 , SrcSpan "tests/examples/RealGHC.lhs" 495 25 495 26 18627 ] 18628 } 18629 (PApp 18630 SrcSpanInfo 18631 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 19 495 25 18632 , srcInfoPoints = [] 18633 } 18634 (UnQual 18635 SrcSpanInfo 18636 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 19 495 22 18637 , srcInfoPoints = [] 18638 } 18639 (Ident 18640 SrcSpanInfo 18641 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 19 495 22 18642 , srcInfoPoints = [] 18643 } 18644 "Var")) 18645 [ PVar 18646 SrcSpanInfo 18647 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 23 495 25 18648 , srcInfoPoints = [] 18649 } 18650 (Ident 18651 SrcSpanInfo 18652 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 23 495 25 18653 , srcInfoPoints = [] 18654 } 18655 "v1") 18656 ]) 18657 , PVar 18658 SrcSpanInfo 18659 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 27 495 29 18660 , srcInfoPoints = [] 18661 } 18662 (Ident 18663 SrcSpanInfo 18664 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 495 27 495 29 18665 , srcInfoPoints = [] 18666 } 18667 "e2") 18668 ] 18669 (GuardedRhss 18670 SrcSpanInfo 18671 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 3 497 15 18672 , srcInfoPoints = 18673 [ SrcSpan "tests/examples/RealGHC.lhs" 496 3 496 4 18674 , SrcSpan "tests/examples/RealGHC.lhs" 497 3 497 4 18675 ] 18676 } 18677 [ GuardedRhs 18678 SrcSpanInfo 18679 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 3 497 15 18680 , srcInfoPoints = 18681 [ SrcSpan "tests/examples/RealGHC.lhs" 496 3 496 4 18682 , SrcSpan "tests/examples/RealGHC.lhs" 497 3 497 4 18683 ] 18684 } 18685 [ Generator 18686 SrcSpanInfo 18687 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 5 496 45 18688 , srcInfoPoints = 18689 [ SrcSpan "tests/examples/RealGHC.lhs" 496 16 496 18 ] 18690 } 18691 (PApp 18692 SrcSpanInfo 18693 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 5 496 15 18694 , srcInfoPoints = [] 18695 } 18696 (UnQual 18697 SrcSpanInfo 18698 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 5 496 9 18699 , srcInfoPoints = [] 18700 } 18701 (Ident 18702 SrcSpanInfo 18703 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 5 496 9 18704 , srcInfoPoints = [] 18705 } 18706 "Just")) 18707 [ PVar 18708 SrcSpanInfo 18709 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 10 496 15 18710 , srcInfoPoints = [] 18711 } 18712 (Ident 18713 SrcSpanInfo 18714 { srcInfoSpan = 18715 SrcSpan "tests/examples/RealGHC.lhs" 496 10 496 15 18716 , srcInfoPoints = [] 18717 } 18718 "subst") 18719 ]) 18720 (App 18721 SrcSpanInfo 18722 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 19 496 45 18723 , srcInfoPoints = [] 18724 } 18725 (App 18726 SrcSpanInfo 18727 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 19 496 42 18728 , srcInfoPoints = [] 18729 } 18730 (App 18731 SrcSpanInfo 18732 { srcInfoSpan = 18733 SrcSpan "tests/examples/RealGHC.lhs" 496 19 496 39 18734 , srcInfoPoints = [] 18735 } 18736 (App 18737 SrcSpanInfo 18738 { srcInfoSpan = 18739 SrcSpan "tests/examples/RealGHC.lhs" 496 19 496 33 18740 , srcInfoPoints = [] 18741 } 18742 (Var 18743 SrcSpanInfo 18744 { srcInfoSpan = 18745 SrcSpan "tests/examples/RealGHC.lhs" 496 19 496 28 18746 , srcInfoPoints = [] 18747 } 18748 (UnQual 18749 SrcSpanInfo 18750 { srcInfoSpan = 18751 SrcSpan "tests/examples/RealGHC.lhs" 496 19 496 28 18752 , srcInfoPoints = [] 18753 } 18754 (Ident 18755 SrcSpanInfo 18756 { srcInfoSpan = 18757 SrcSpan 18758 "tests/examples/RealGHC.lhs" 496 19 496 28 18759 , srcInfoPoints = [] 18760 } 18761 "match_var"))) 18762 (Var 18763 SrcSpanInfo 18764 { srcInfoSpan = 18765 SrcSpan "tests/examples/RealGHC.lhs" 496 29 496 33 18766 , srcInfoPoints = [] 18767 } 18768 (UnQual 18769 SrcSpanInfo 18770 { srcInfoSpan = 18771 SrcSpan "tests/examples/RealGHC.lhs" 496 29 496 33 18772 , srcInfoPoints = [] 18773 } 18774 (Ident 18775 SrcSpanInfo 18776 { srcInfoSpan = 18777 SrcSpan 18778 "tests/examples/RealGHC.lhs" 496 29 496 33 18779 , srcInfoPoints = [] 18780 } 18781 "menv")))) 18782 (Var 18783 SrcSpanInfo 18784 { srcInfoSpan = 18785 SrcSpan "tests/examples/RealGHC.lhs" 496 34 496 39 18786 , srcInfoPoints = [] 18787 } 18788 (UnQual 18789 SrcSpanInfo 18790 { srcInfoSpan = 18791 SrcSpan "tests/examples/RealGHC.lhs" 496 34 496 39 18792 , srcInfoPoints = [] 18793 } 18794 (Ident 18795 SrcSpanInfo 18796 { srcInfoSpan = 18797 SrcSpan "tests/examples/RealGHC.lhs" 496 34 496 39 18798 , srcInfoPoints = [] 18799 } 18800 "subst")))) 18801 (Var 18802 SrcSpanInfo 18803 { srcInfoSpan = 18804 SrcSpan "tests/examples/RealGHC.lhs" 496 40 496 42 18805 , srcInfoPoints = [] 18806 } 18807 (UnQual 18808 SrcSpanInfo 18809 { srcInfoSpan = 18810 SrcSpan "tests/examples/RealGHC.lhs" 496 40 496 42 18811 , srcInfoPoints = [] 18812 } 18813 (Ident 18814 SrcSpanInfo 18815 { srcInfoSpan = 18816 SrcSpan "tests/examples/RealGHC.lhs" 496 40 496 42 18817 , srcInfoPoints = [] 18818 } 18819 "v1")))) 18820 (Var 18821 SrcSpanInfo 18822 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 496 43 496 45 18823 , srcInfoPoints = [] 18824 } 18825 (UnQual 18826 SrcSpanInfo 18827 { srcInfoSpan = 18828 SrcSpan "tests/examples/RealGHC.lhs" 496 43 496 45 18829 , srcInfoPoints = [] 18830 } 18831 (Ident 18832 SrcSpanInfo 18833 { srcInfoSpan = 18834 SrcSpan "tests/examples/RealGHC.lhs" 496 43 496 45 18835 , srcInfoPoints = [] 18836 } 18837 "e2")))) 18838 ] 18839 (App 18840 SrcSpanInfo 18841 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 497 5 497 15 18842 , srcInfoPoints = [] 18843 } 18844 (Con 18845 SrcSpanInfo 18846 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 497 5 497 9 18847 , srcInfoPoints = [] 18848 } 18849 (UnQual 18850 SrcSpanInfo 18851 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 497 5 497 9 18852 , srcInfoPoints = [] 18853 } 18854 (Ident 18855 SrcSpanInfo 18856 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 497 5 497 9 18857 , srcInfoPoints = [] 18858 } 18859 "Just"))) 18860 (Var 18861 SrcSpanInfo 18862 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 497 10 497 15 18863 , srcInfoPoints = [] 18864 } 18865 (UnQual 18866 SrcSpanInfo 18867 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 497 10 497 15 18868 , srcInfoPoints = [] 18869 } 18870 (Ident 18871 SrcSpanInfo 18872 { srcInfoSpan = 18873 SrcSpan "tests/examples/RealGHC.lhs" 497 10 497 15 18874 , srcInfoPoints = [] 18875 } 18876 "subst")))) 18877 ]) 18878 Nothing 18879 , Match 18880 SrcSpanInfo 18881 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 1 500 27 18882 , srcInfoPoints = [] 18883 } 18884 (Ident 18885 SrcSpanInfo 18886 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 1 499 6 18887 , srcInfoPoints = [] 18888 } 18889 "match") 18890 [ PVar 18891 SrcSpanInfo 18892 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 7 499 11 18893 , srcInfoPoints = [] 18894 } 18895 (Ident 18896 SrcSpanInfo 18897 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 7 499 11 18898 , srcInfoPoints = [] 18899 } 18900 "menv") 18901 , PVar 18902 SrcSpanInfo 18903 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 12 499 17 18904 , srcInfoPoints = [] 18905 } 18906 (Ident 18907 SrcSpanInfo 18908 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 12 499 17 18909 , srcInfoPoints = [] 18910 } 18911 "subst") 18912 , PVar 18913 SrcSpanInfo 18914 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 18 499 20 18915 , srcInfoPoints = [] 18916 } 18917 (Ident 18918 SrcSpanInfo 18919 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 18 499 20 18920 , srcInfoPoints = [] 18921 } 18922 "e1") 18923 , PParen 18924 SrcSpanInfo 18925 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 21 499 32 18926 , srcInfoPoints = 18927 [ SrcSpan "tests/examples/RealGHC.lhs" 499 21 499 22 18928 , SrcSpan "tests/examples/RealGHC.lhs" 499 31 499 32 18929 ] 18930 } 18931 (PApp 18932 SrcSpanInfo 18933 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 22 499 31 18934 , srcInfoPoints = [] 18935 } 18936 (UnQual 18937 SrcSpanInfo 18938 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 22 499 26 18939 , srcInfoPoints = [] 18940 } 18941 (Ident 18942 SrcSpanInfo 18943 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 22 499 26 18944 , srcInfoPoints = [] 18945 } 18946 "Note")) 18947 [ PVar 18948 SrcSpanInfo 18949 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 27 499 28 18950 , srcInfoPoints = [] 18951 } 18952 (Ident 18953 SrcSpanInfo 18954 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 27 499 28 18955 , srcInfoPoints = [] 18956 } 18957 "n") 18958 , PVar 18959 SrcSpanInfo 18960 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 29 499 31 18961 , srcInfoPoints = [] 18962 } 18963 (Ident 18964 SrcSpanInfo 18965 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 499 29 499 31 18966 , srcInfoPoints = [] 18967 } 18968 "e2") 18969 ]) 18970 ] 18971 (UnGuardedRhs 18972 SrcSpanInfo 18973 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 3 500 27 18974 , srcInfoPoints = 18975 [ SrcSpan "tests/examples/RealGHC.lhs" 500 3 500 4 ] 18976 } 18977 (App 18978 SrcSpanInfo 18979 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 5 500 27 18980 , srcInfoPoints = [] 18981 } 18982 (App 18983 SrcSpanInfo 18984 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 5 500 24 18985 , srcInfoPoints = [] 18986 } 18987 (App 18988 SrcSpanInfo 18989 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 5 500 21 18990 , srcInfoPoints = [] 18991 } 18992 (App 18993 SrcSpanInfo 18994 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 5 500 15 18995 , srcInfoPoints = [] 18996 } 18997 (Var 18998 SrcSpanInfo 18999 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 5 500 10 19000 , srcInfoPoints = [] 19001 } 19002 (UnQual 19003 SrcSpanInfo 19004 { srcInfoSpan = 19005 SrcSpan "tests/examples/RealGHC.lhs" 500 5 500 10 19006 , srcInfoPoints = [] 19007 } 19008 (Ident 19009 SrcSpanInfo 19010 { srcInfoSpan = 19011 SrcSpan "tests/examples/RealGHC.lhs" 500 5 500 10 19012 , srcInfoPoints = [] 19013 } 19014 "match"))) 19015 (Var 19016 SrcSpanInfo 19017 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 11 500 15 19018 , srcInfoPoints = [] 19019 } 19020 (UnQual 19021 SrcSpanInfo 19022 { srcInfoSpan = 19023 SrcSpan "tests/examples/RealGHC.lhs" 500 11 500 15 19024 , srcInfoPoints = [] 19025 } 19026 (Ident 19027 SrcSpanInfo 19028 { srcInfoSpan = 19029 SrcSpan "tests/examples/RealGHC.lhs" 500 11 500 15 19030 , srcInfoPoints = [] 19031 } 19032 "menv")))) 19033 (Var 19034 SrcSpanInfo 19035 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 16 500 21 19036 , srcInfoPoints = [] 19037 } 19038 (UnQual 19039 SrcSpanInfo 19040 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 16 500 21 19041 , srcInfoPoints = [] 19042 } 19043 (Ident 19044 SrcSpanInfo 19045 { srcInfoSpan = 19046 SrcSpan "tests/examples/RealGHC.lhs" 500 16 500 21 19047 , srcInfoPoints = [] 19048 } 19049 "subst")))) 19050 (Var 19051 SrcSpanInfo 19052 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 22 500 24 19053 , srcInfoPoints = [] 19054 } 19055 (UnQual 19056 SrcSpanInfo 19057 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 22 500 24 19058 , srcInfoPoints = [] 19059 } 19060 (Ident 19061 SrcSpanInfo 19062 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 22 500 24 19063 , srcInfoPoints = [] 19064 } 19065 "e1")))) 19066 (Var 19067 SrcSpanInfo 19068 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 25 500 27 19069 , srcInfoPoints = [] 19070 } 19071 (UnQual 19072 SrcSpanInfo 19073 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 25 500 27 19074 , srcInfoPoints = [] 19075 } 19076 (Ident 19077 SrcSpanInfo 19078 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 500 25 500 27 19079 , srcInfoPoints = [] 19080 } 19081 "e2"))))) 19082 Nothing 19083 , Match 19084 SrcSpanInfo 19085 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 1 518 72 19086 , srcInfoPoints = 19087 [ SrcSpan "tests/examples/RealGHC.lhs" 516 3 516 8 ] 19088 } 19089 (Ident 19090 SrcSpanInfo 19091 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 1 513 6 19092 , srcInfoPoints = [] 19093 } 19094 "match") 19095 [ PVar 19096 SrcSpanInfo 19097 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 7 513 11 19098 , srcInfoPoints = [] 19099 } 19100 (Ident 19101 SrcSpanInfo 19102 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 7 513 11 19103 , srcInfoPoints = [] 19104 } 19105 "menv") 19106 , PVar 19107 SrcSpanInfo 19108 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 12 513 17 19109 , srcInfoPoints = [] 19110 } 19111 (Ident 19112 SrcSpanInfo 19113 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 12 513 17 19114 , srcInfoPoints = [] 19115 } 19116 "subst") 19117 , PVar 19118 SrcSpanInfo 19119 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 18 513 20 19120 , srcInfoPoints = [] 19121 } 19122 (Ident 19123 SrcSpanInfo 19124 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 18 513 20 19125 , srcInfoPoints = [] 19126 } 19127 "e1") 19128 , PParen 19129 SrcSpanInfo 19130 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 21 513 29 19131 , srcInfoPoints = 19132 [ SrcSpan "tests/examples/RealGHC.lhs" 513 21 513 22 19133 , SrcSpan "tests/examples/RealGHC.lhs" 513 28 513 29 19134 ] 19135 } 19136 (PApp 19137 SrcSpanInfo 19138 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 22 513 28 19139 , srcInfoPoints = [] 19140 } 19141 (UnQual 19142 SrcSpanInfo 19143 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 22 513 25 19144 , srcInfoPoints = [] 19145 } 19146 (Ident 19147 SrcSpanInfo 19148 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 22 513 25 19149 , srcInfoPoints = [] 19150 } 19151 "Var")) 19152 [ PVar 19153 SrcSpanInfo 19154 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 26 513 28 19155 , srcInfoPoints = [] 19156 } 19157 (Ident 19158 SrcSpanInfo 19159 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 513 26 513 28 19160 , srcInfoPoints = [] 19161 } 19162 "v2") 19163 ]) 19164 ] 19165 (GuardedRhss 19166 SrcSpanInfo 19167 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 514 3 515 54 19168 , srcInfoPoints = 19169 [ SrcSpan "tests/examples/RealGHC.lhs" 514 3 514 4 19170 , SrcSpan "tests/examples/RealGHC.lhs" 515 3 515 4 19171 ] 19172 } 19173 [ GuardedRhs 19174 SrcSpanInfo 19175 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 514 3 515 54 19176 , srcInfoPoints = 19177 [ SrcSpan "tests/examples/RealGHC.lhs" 514 3 514 4 19178 , SrcSpan "tests/examples/RealGHC.lhs" 515 3 515 4 19179 ] 19180 } 19181 [ Qualifier 19182 SrcSpanInfo 19183 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 514 5 514 31 19184 , srcInfoPoints = [] 19185 } 19186 (App 19187 SrcSpanInfo 19188 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 514 5 514 31 19189 , srcInfoPoints = [] 19190 } 19191 (Var 19192 SrcSpanInfo 19193 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 514 5 514 21 19194 , srcInfoPoints = [] 19195 } 19196 (UnQual 19197 SrcSpanInfo 19198 { srcInfoSpan = 19199 SrcSpan "tests/examples/RealGHC.lhs" 514 5 514 21 19200 , srcInfoPoints = [] 19201 } 19202 (Ident 19203 SrcSpanInfo 19204 { srcInfoSpan = 19205 SrcSpan "tests/examples/RealGHC.lhs" 514 5 514 21 19206 , srcInfoPoints = [] 19207 } 19208 "isCheapUnfolding"))) 19209 (Var 19210 SrcSpanInfo 19211 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 514 22 514 31 19212 , srcInfoPoints = [] 19213 } 19214 (UnQual 19215 SrcSpanInfo 19216 { srcInfoSpan = 19217 SrcSpan "tests/examples/RealGHC.lhs" 514 22 514 31 19218 , srcInfoPoints = [] 19219 } 19220 (Ident 19221 SrcSpanInfo 19222 { srcInfoSpan = 19223 SrcSpan "tests/examples/RealGHC.lhs" 514 22 514 31 19224 , srcInfoPoints = [] 19225 } 19226 "unfolding")))) 19227 ] 19228 (App 19229 SrcSpanInfo 19230 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 5 515 54 19231 , srcInfoPoints = [] 19232 } 19233 (App 19234 SrcSpanInfo 19235 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 5 515 24 19236 , srcInfoPoints = [] 19237 } 19238 (App 19239 SrcSpanInfo 19240 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 5 515 21 19241 , srcInfoPoints = [] 19242 } 19243 (App 19244 SrcSpanInfo 19245 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 5 515 15 19246 , srcInfoPoints = [] 19247 } 19248 (Var 19249 SrcSpanInfo 19250 { srcInfoSpan = 19251 SrcSpan "tests/examples/RealGHC.lhs" 515 5 515 10 19252 , srcInfoPoints = [] 19253 } 19254 (UnQual 19255 SrcSpanInfo 19256 { srcInfoSpan = 19257 SrcSpan "tests/examples/RealGHC.lhs" 515 5 515 10 19258 , srcInfoPoints = [] 19259 } 19260 (Ident 19261 SrcSpanInfo 19262 { srcInfoSpan = 19263 SrcSpan "tests/examples/RealGHC.lhs" 515 5 515 10 19264 , srcInfoPoints = [] 19265 } 19266 "match"))) 19267 (Var 19268 SrcSpanInfo 19269 { srcInfoSpan = 19270 SrcSpan "tests/examples/RealGHC.lhs" 515 11 515 15 19271 , srcInfoPoints = [] 19272 } 19273 (UnQual 19274 SrcSpanInfo 19275 { srcInfoSpan = 19276 SrcSpan "tests/examples/RealGHC.lhs" 515 11 515 15 19277 , srcInfoPoints = [] 19278 } 19279 (Ident 19280 SrcSpanInfo 19281 { srcInfoSpan = 19282 SrcSpan "tests/examples/RealGHC.lhs" 515 11 515 15 19283 , srcInfoPoints = [] 19284 } 19285 "menv")))) 19286 (Var 19287 SrcSpanInfo 19288 { srcInfoSpan = 19289 SrcSpan "tests/examples/RealGHC.lhs" 515 16 515 21 19290 , srcInfoPoints = [] 19291 } 19292 (UnQual 19293 SrcSpanInfo 19294 { srcInfoSpan = 19295 SrcSpan "tests/examples/RealGHC.lhs" 515 16 515 21 19296 , srcInfoPoints = [] 19297 } 19298 (Ident 19299 SrcSpanInfo 19300 { srcInfoSpan = 19301 SrcSpan "tests/examples/RealGHC.lhs" 515 16 515 21 19302 , srcInfoPoints = [] 19303 } 19304 "subst")))) 19305 (Var 19306 SrcSpanInfo 19307 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 22 515 24 19308 , srcInfoPoints = [] 19309 } 19310 (UnQual 19311 SrcSpanInfo 19312 { srcInfoSpan = 19313 SrcSpan "tests/examples/RealGHC.lhs" 515 22 515 24 19314 , srcInfoPoints = [] 19315 } 19316 (Ident 19317 SrcSpanInfo 19318 { srcInfoSpan = 19319 SrcSpan "tests/examples/RealGHC.lhs" 515 22 515 24 19320 , srcInfoPoints = [] 19321 } 19322 "e1")))) 19323 (Paren 19324 SrcSpanInfo 19325 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 25 515 54 19326 , srcInfoPoints = 19327 [ SrcSpan "tests/examples/RealGHC.lhs" 515 25 515 26 19328 , SrcSpan "tests/examples/RealGHC.lhs" 515 53 515 54 19329 ] 19330 } 19331 (App 19332 SrcSpanInfo 19333 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 515 26 515 53 19334 , srcInfoPoints = [] 19335 } 19336 (Var 19337 SrcSpanInfo 19338 { srcInfoSpan = 19339 SrcSpan "tests/examples/RealGHC.lhs" 515 26 515 43 19340 , srcInfoPoints = [] 19341 } 19342 (UnQual 19343 SrcSpanInfo 19344 { srcInfoSpan = 19345 SrcSpan "tests/examples/RealGHC.lhs" 515 26 515 43 19346 , srcInfoPoints = [] 19347 } 19348 (Ident 19349 SrcSpanInfo 19350 { srcInfoSpan = 19351 SrcSpan "tests/examples/RealGHC.lhs" 515 26 515 43 19352 , srcInfoPoints = [] 19353 } 19354 "unfoldingTemplate"))) 19355 (Var 19356 SrcSpanInfo 19357 { srcInfoSpan = 19358 SrcSpan "tests/examples/RealGHC.lhs" 515 44 515 53 19359 , srcInfoPoints = [] 19360 } 19361 (UnQual 19362 SrcSpanInfo 19363 { srcInfoSpan = 19364 SrcSpan "tests/examples/RealGHC.lhs" 515 44 515 53 19365 , srcInfoPoints = [] 19366 } 19367 (Ident 19368 SrcSpanInfo 19369 { srcInfoSpan = 19370 SrcSpan "tests/examples/RealGHC.lhs" 515 44 515 53 19371 , srcInfoPoints = [] 19372 } 19373 "unfolding")))))) 19374 ]) 19375 (Just 19376 (BDecls 19377 SrcSpanInfo 19378 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 5 518 72 19379 , srcInfoPoints = 19380 [ SrcSpan "tests/examples/RealGHC.lhs" 517 5 517 5 19381 , SrcSpan "tests/examples/RealGHC.lhs" 518 5 518 5 19382 , SrcSpan "tests/examples/RealGHC.lhs" 571 1 571 0 19383 ] 19384 } 19385 [ PatBind 19386 SrcSpanInfo 19387 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 5 517 28 19388 , srcInfoPoints = [] 19389 } 19390 (PVar 19391 SrcSpanInfo 19392 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 5 517 11 19393 , srcInfoPoints = [] 19394 } 19395 (Ident 19396 SrcSpanInfo 19397 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 5 517 11 19398 , srcInfoPoints = [] 19399 } 19400 "rn_env")) 19401 (UnGuardedRhs 19402 SrcSpanInfo 19403 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 15 517 28 19404 , srcInfoPoints = 19405 [ SrcSpan "tests/examples/RealGHC.lhs" 517 15 517 16 ] 19406 } 19407 (App 19408 SrcSpanInfo 19409 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 517 17 517 28 19410 , srcInfoPoints = [] 19411 } 19412 (Var 19413 SrcSpanInfo 19414 { srcInfoSpan = 19415 SrcSpan "tests/examples/RealGHC.lhs" 517 17 517 23 19416 , srcInfoPoints = [] 19417 } 19418 (UnQual 19419 SrcSpanInfo 19420 { srcInfoSpan = 19421 SrcSpan "tests/examples/RealGHC.lhs" 517 17 517 23 19422 , srcInfoPoints = [] 19423 } 19424 (Ident 19425 SrcSpanInfo 19426 { srcInfoSpan = 19427 SrcSpan "tests/examples/RealGHC.lhs" 517 17 517 23 19428 , srcInfoPoints = [] 19429 } 19430 "me_env"))) 19431 (Var 19432 SrcSpanInfo 19433 { srcInfoSpan = 19434 SrcSpan "tests/examples/RealGHC.lhs" 517 24 517 28 19435 , srcInfoPoints = [] 19436 } 19437 (UnQual 19438 SrcSpanInfo 19439 { srcInfoSpan = 19440 SrcSpan "tests/examples/RealGHC.lhs" 517 24 517 28 19441 , srcInfoPoints = [] 19442 } 19443 (Ident 19444 SrcSpanInfo 19445 { srcInfoSpan = 19446 SrcSpan "tests/examples/RealGHC.lhs" 517 24 517 28 19447 , srcInfoPoints = [] 19448 } 19449 "menv"))))) 19450 Nothing 19451 , PatBind 19452 SrcSpanInfo 19453 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 5 518 72 19454 , srcInfoPoints = [] 19455 } 19456 (PVar 19457 SrcSpanInfo 19458 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 5 518 14 19459 , srcInfoPoints = [] 19460 } 19461 (Ident 19462 SrcSpanInfo 19463 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 5 518 14 19464 , srcInfoPoints = [] 19465 } 19466 "unfolding")) 19467 (UnGuardedRhs 19468 SrcSpanInfo 19469 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 15 518 72 19470 , srcInfoPoints = 19471 [ SrcSpan "tests/examples/RealGHC.lhs" 518 15 518 16 ] 19472 } 19473 (App 19474 SrcSpanInfo 19475 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 518 17 518 72 19476 , srcInfoPoints = [] 19477 } 19478 (Var 19479 SrcSpanInfo 19480 { srcInfoSpan = 19481 SrcSpan "tests/examples/RealGHC.lhs" 518 17 518 28 19482 , srcInfoPoints = [] 19483 } 19484 (UnQual 19485 SrcSpanInfo 19486 { srcInfoSpan = 19487 SrcSpan "tests/examples/RealGHC.lhs" 518 17 518 28 19488 , srcInfoPoints = [] 19489 } 19490 (Ident 19491 SrcSpanInfo 19492 { srcInfoSpan = 19493 SrcSpan "tests/examples/RealGHC.lhs" 518 17 518 28 19494 , srcInfoPoints = [] 19495 } 19496 "idUnfolding"))) 19497 (Paren 19498 SrcSpanInfo 19499 { srcInfoSpan = 19500 SrcSpan "tests/examples/RealGHC.lhs" 518 29 518 72 19501 , srcInfoPoints = 19502 [ SrcSpan "tests/examples/RealGHC.lhs" 518 29 518 30 19503 , SrcSpan "tests/examples/RealGHC.lhs" 518 71 518 72 19504 ] 19505 } 19506 (App 19507 SrcSpanInfo 19508 { srcInfoSpan = 19509 SrcSpan "tests/examples/RealGHC.lhs" 518 30 518 71 19510 , srcInfoPoints = [] 19511 } 19512 (App 19513 SrcSpanInfo 19514 { srcInfoSpan = 19515 SrcSpan "tests/examples/RealGHC.lhs" 518 30 518 52 19516 , srcInfoPoints = [] 19517 } 19518 (Var 19519 SrcSpanInfo 19520 { srcInfoSpan = 19521 SrcSpan "tests/examples/RealGHC.lhs" 518 30 518 45 19522 , srcInfoPoints = [] 19523 } 19524 (UnQual 19525 SrcSpanInfo 19526 { srcInfoSpan = 19527 SrcSpan 19528 "tests/examples/RealGHC.lhs" 518 30 518 45 19529 , srcInfoPoints = [] 19530 } 19531 (Ident 19532 SrcSpanInfo 19533 { srcInfoSpan = 19534 SrcSpan 19535 "tests/examples/RealGHC.lhs" 518 30 518 45 19536 , srcInfoPoints = [] 19537 } 19538 "lookupRnInScope"))) 19539 (Var 19540 SrcSpanInfo 19541 { srcInfoSpan = 19542 SrcSpan "tests/examples/RealGHC.lhs" 518 46 518 52 19543 , srcInfoPoints = [] 19544 } 19545 (UnQual 19546 SrcSpanInfo 19547 { srcInfoSpan = 19548 SrcSpan 19549 "tests/examples/RealGHC.lhs" 518 46 518 52 19550 , srcInfoPoints = [] 19551 } 19552 (Ident 19553 SrcSpanInfo 19554 { srcInfoSpan = 19555 SrcSpan 19556 "tests/examples/RealGHC.lhs" 518 46 518 52 19557 , srcInfoPoints = [] 19558 } 19559 "rn_env")))) 19560 (Paren 19561 SrcSpanInfo 19562 { srcInfoSpan = 19563 SrcSpan "tests/examples/RealGHC.lhs" 518 53 518 71 19564 , srcInfoPoints = 19565 [ SrcSpan "tests/examples/RealGHC.lhs" 518 53 518 54 19566 , SrcSpan "tests/examples/RealGHC.lhs" 518 70 518 71 19567 ] 19568 } 19569 (App 19570 SrcSpanInfo 19571 { srcInfoSpan = 19572 SrcSpan "tests/examples/RealGHC.lhs" 518 54 518 70 19573 , srcInfoPoints = [] 19574 } 19575 (App 19576 SrcSpanInfo 19577 { srcInfoSpan = 19578 SrcSpan 19579 "tests/examples/RealGHC.lhs" 518 54 518 67 19580 , srcInfoPoints = [] 19581 } 19582 (Var 19583 SrcSpanInfo 19584 { srcInfoSpan = 19585 SrcSpan 19586 "tests/examples/RealGHC.lhs" 518 54 518 60 19587 , srcInfoPoints = [] 19588 } 19589 (UnQual 19590 SrcSpanInfo 19591 { srcInfoSpan = 19592 SrcSpan 19593 "tests/examples/RealGHC.lhs" 19594 518 19595 54 19596 518 19597 60 19598 , srcInfoPoints = [] 19599 } 19600 (Ident 19601 SrcSpanInfo 19602 { srcInfoSpan = 19603 SrcSpan 19604 "tests/examples/RealGHC.lhs" 19605 518 19606 54 19607 518 19608 60 19609 , srcInfoPoints = [] 19610 } 19611 "rnOccR"))) 19612 (Var 19613 SrcSpanInfo 19614 { srcInfoSpan = 19615 SrcSpan 19616 "tests/examples/RealGHC.lhs" 518 61 518 67 19617 , srcInfoPoints = [] 19618 } 19619 (UnQual 19620 SrcSpanInfo 19621 { srcInfoSpan = 19622 SrcSpan 19623 "tests/examples/RealGHC.lhs" 19624 518 19625 61 19626 518 19627 67 19628 , srcInfoPoints = [] 19629 } 19630 (Ident 19631 SrcSpanInfo 19632 { srcInfoSpan = 19633 SrcSpan 19634 "tests/examples/RealGHC.lhs" 19635 518 19636 61 19637 518 19638 67 19639 , srcInfoPoints = [] 19640 } 19641 "rn_env")))) 19642 (Var 19643 SrcSpanInfo 19644 { srcInfoSpan = 19645 SrcSpan 19646 "tests/examples/RealGHC.lhs" 518 68 518 70 19647 , srcInfoPoints = [] 19648 } 19649 (UnQual 19650 SrcSpanInfo 19651 { srcInfoSpan = 19652 SrcSpan 19653 "tests/examples/RealGHC.lhs" 518 68 518 70 19654 , srcInfoPoints = [] 19655 } 19656 (Ident 19657 SrcSpanInfo 19658 { srcInfoSpan = 19659 SrcSpan 19660 "tests/examples/RealGHC.lhs" 19661 518 19662 68 19663 518 19664 70 19665 , srcInfoPoints = [] 19666 } 19667 "v2"))))))))) 19668 Nothing 19669 ])) 19670 , Match 19671 SrcSpanInfo 19672 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 1 585 47 19673 , srcInfoPoints = 19674 [ SrcSpan "tests/examples/RealGHC.lhs" 577 3 577 8 ] 19675 } 19676 (Ident 19677 SrcSpanInfo 19678 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 1 571 6 19679 , srcInfoPoints = [] 19680 } 19681 "match") 19682 [ PVar 19683 SrcSpanInfo 19684 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 7 571 11 19685 , srcInfoPoints = [] 19686 } 19687 (Ident 19688 SrcSpanInfo 19689 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 7 571 11 19690 , srcInfoPoints = [] 19691 } 19692 "menv") 19693 , PAsPat 19694 SrcSpanInfo 19695 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 12 571 45 19696 , srcInfoPoints = 19697 [ SrcSpan "tests/examples/RealGHC.lhs" 571 17 571 18 ] 19698 } 19699 (Ident 19700 SrcSpanInfo 19701 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 12 571 17 19702 , srcInfoPoints = [] 19703 } 19704 "subst") 19705 (PTuple 19706 SrcSpanInfo 19707 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 18 571 45 19708 , srcInfoPoints = 19709 [ SrcSpan "tests/examples/RealGHC.lhs" 571 18 571 19 19710 , SrcSpan "tests/examples/RealGHC.lhs" 571 27 571 28 19711 , SrcSpan "tests/examples/RealGHC.lhs" 571 37 571 38 19712 , SrcSpan "tests/examples/RealGHC.lhs" 571 44 571 45 19713 ] 19714 } 19715 Boxed 19716 [ PVar 19717 SrcSpanInfo 19718 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 19 571 27 19719 , srcInfoPoints = [] 19720 } 19721 (Ident 19722 SrcSpanInfo 19723 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 19 571 27 19724 , srcInfoPoints = [] 19725 } 19726 "tv_subst") 19727 , PVar 19728 SrcSpanInfo 19729 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 29 571 37 19730 , srcInfoPoints = [] 19731 } 19732 (Ident 19733 SrcSpanInfo 19734 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 29 571 37 19735 , srcInfoPoints = [] 19736 } 19737 "id_subst") 19738 , PVar 19739 SrcSpanInfo 19740 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 39 571 44 19741 , srcInfoPoints = [] 19742 } 19743 (Ident 19744 SrcSpanInfo 19745 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 39 571 44 19746 , srcInfoPoints = [] 19747 } 19748 "binds") 19749 ]) 19750 , PVar 19751 SrcSpanInfo 19752 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 46 571 48 19753 , srcInfoPoints = [] 19754 } 19755 (Ident 19756 SrcSpanInfo 19757 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 46 571 48 19758 , srcInfoPoints = [] 19759 } 19760 "e1") 19761 , PParen 19762 SrcSpanInfo 19763 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 49 571 62 19764 , srcInfoPoints = 19765 [ SrcSpan "tests/examples/RealGHC.lhs" 571 49 571 50 19766 , SrcSpan "tests/examples/RealGHC.lhs" 571 61 571 62 19767 ] 19768 } 19769 (PApp 19770 SrcSpanInfo 19771 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 50 571 61 19772 , srcInfoPoints = [] 19773 } 19774 (UnQual 19775 SrcSpanInfo 19776 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 50 571 53 19777 , srcInfoPoints = [] 19778 } 19779 (Ident 19780 SrcSpanInfo 19781 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 50 571 53 19782 , srcInfoPoints = [] 19783 } 19784 "Let")) 19785 [ PVar 19786 SrcSpanInfo 19787 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 54 571 58 19788 , srcInfoPoints = [] 19789 } 19790 (Ident 19791 SrcSpanInfo 19792 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 54 571 58 19793 , srcInfoPoints = [] 19794 } 19795 "bind") 19796 , PVar 19797 SrcSpanInfo 19798 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 59 571 61 19799 , srcInfoPoints = [] 19800 } 19801 (Ident 19802 SrcSpanInfo 19803 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 571 59 571 61 19804 , srcInfoPoints = [] 19805 } 19806 "e2") 19807 ]) 19808 ] 19809 (GuardedRhss 19810 SrcSpanInfo 19811 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 3 576 13 19812 , srcInfoPoints = 19813 [ SrcSpan "tests/examples/RealGHC.lhs" 572 3 572 4 19814 , SrcSpan "tests/examples/RealGHC.lhs" 572 28 572 29 19815 , SrcSpan "tests/examples/RealGHC.lhs" 574 3 574 4 19816 ] 19817 } 19818 [ GuardedRhs 19819 SrcSpanInfo 19820 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 3 576 13 19821 , srcInfoPoints = 19822 [ SrcSpan "tests/examples/RealGHC.lhs" 572 3 572 4 19823 , SrcSpan "tests/examples/RealGHC.lhs" 572 28 572 29 19824 , SrcSpan "tests/examples/RealGHC.lhs" 574 3 574 4 19825 ] 19826 } 19827 [ Qualifier 19828 SrcSpanInfo 19829 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 5 572 28 19830 , srcInfoPoints = [] 19831 } 19832 (App 19833 SrcSpanInfo 19834 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 5 572 28 19835 , srcInfoPoints = [] 19836 } 19837 (App 19838 SrcSpanInfo 19839 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 5 572 22 19840 , srcInfoPoints = [] 19841 } 19842 (Var 19843 SrcSpanInfo 19844 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 5 572 8 19845 , srcInfoPoints = [] 19846 } 19847 (UnQual 19848 SrcSpanInfo 19849 { srcInfoSpan = 19850 SrcSpan "tests/examples/RealGHC.lhs" 572 5 572 8 19851 , srcInfoPoints = [] 19852 } 19853 (Ident 19854 SrcSpanInfo 19855 { srcInfoSpan = 19856 SrcSpan "tests/examples/RealGHC.lhs" 572 5 572 8 19857 , srcInfoPoints = [] 19858 } 19859 "all"))) 19860 (Var 19861 SrcSpanInfo 19862 { srcInfoSpan = 19863 SrcSpan "tests/examples/RealGHC.lhs" 572 9 572 22 19864 , srcInfoPoints = [] 19865 } 19866 (UnQual 19867 SrcSpanInfo 19868 { srcInfoSpan = 19869 SrcSpan "tests/examples/RealGHC.lhs" 572 9 572 22 19870 , srcInfoPoints = [] 19871 } 19872 (Ident 19873 SrcSpanInfo 19874 { srcInfoSpan = 19875 SrcSpan "tests/examples/RealGHC.lhs" 572 9 572 22 19876 , srcInfoPoints = [] 19877 } 19878 "freshly_bound")))) 19879 (Var 19880 SrcSpanInfo 19881 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 572 23 572 28 19882 , srcInfoPoints = [] 19883 } 19884 (UnQual 19885 SrcSpanInfo 19886 { srcInfoSpan = 19887 SrcSpan "tests/examples/RealGHC.lhs" 572 23 572 28 19888 , srcInfoPoints = [] 19889 } 19890 (Ident 19891 SrcSpanInfo 19892 { srcInfoSpan = 19893 SrcSpan "tests/examples/RealGHC.lhs" 572 23 572 28 19894 , srcInfoPoints = [] 19895 } 19896 "bndrs")))) 19897 , Qualifier 19898 SrcSpanInfo 19899 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 5 573 37 19900 , srcInfoPoints = [] 19901 } 19902 (App 19903 SrcSpanInfo 19904 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 5 573 37 19905 , srcInfoPoints = [] 19906 } 19907 (Var 19908 SrcSpanInfo 19909 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 5 573 8 19910 , srcInfoPoints = [] 19911 } 19912 (UnQual 19913 SrcSpanInfo 19914 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 5 573 8 19915 , srcInfoPoints = [] 19916 } 19917 (Ident 19918 SrcSpanInfo 19919 { srcInfoSpan = 19920 SrcSpan "tests/examples/RealGHC.lhs" 573 5 573 8 19921 , srcInfoPoints = [] 19922 } 19923 "not"))) 19924 (Paren 19925 SrcSpanInfo 19926 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 573 9 573 37 19927 , srcInfoPoints = 19928 [ SrcSpan "tests/examples/RealGHC.lhs" 573 9 573 10 19929 , SrcSpan "tests/examples/RealGHC.lhs" 573 36 573 37 19930 ] 19931 } 19932 (App 19933 SrcSpanInfo 19934 { srcInfoSpan = 19935 SrcSpan "tests/examples/RealGHC.lhs" 573 10 573 36 19936 , srcInfoPoints = [] 19937 } 19938 (App 19939 SrcSpanInfo 19940 { srcInfoSpan = 19941 SrcSpan "tests/examples/RealGHC.lhs" 573 10 573 27 19942 , srcInfoPoints = [] 19943 } 19944 (Var 19945 SrcSpanInfo 19946 { srcInfoSpan = 19947 SrcSpan "tests/examples/RealGHC.lhs" 573 10 573 13 19948 , srcInfoPoints = [] 19949 } 19950 (UnQual 19951 SrcSpanInfo 19952 { srcInfoSpan = 19953 SrcSpan "tests/examples/RealGHC.lhs" 573 10 573 13 19954 , srcInfoPoints = [] 19955 } 19956 (Ident 19957 SrcSpanInfo 19958 { srcInfoSpan = 19959 SrcSpan 19960 "tests/examples/RealGHC.lhs" 573 10 573 13 19961 , srcInfoPoints = [] 19962 } 19963 "any"))) 19964 (Var 19965 SrcSpanInfo 19966 { srcInfoSpan = 19967 SrcSpan "tests/examples/RealGHC.lhs" 573 14 573 27 19968 , srcInfoPoints = [] 19969 } 19970 (UnQual 19971 SrcSpanInfo 19972 { srcInfoSpan = 19973 SrcSpan "tests/examples/RealGHC.lhs" 573 14 573 27 19974 , srcInfoPoints = [] 19975 } 19976 (Ident 19977 SrcSpanInfo 19978 { srcInfoSpan = 19979 SrcSpan 19980 "tests/examples/RealGHC.lhs" 573 14 573 27 19981 , srcInfoPoints = [] 19982 } 19983 "locally_bound")))) 19984 (Var 19985 SrcSpanInfo 19986 { srcInfoSpan = 19987 SrcSpan "tests/examples/RealGHC.lhs" 573 28 573 36 19988 , srcInfoPoints = [] 19989 } 19990 (UnQual 19991 SrcSpanInfo 19992 { srcInfoSpan = 19993 SrcSpan "tests/examples/RealGHC.lhs" 573 28 573 36 19994 , srcInfoPoints = [] 19995 } 19996 (Ident 19997 SrcSpanInfo 19998 { srcInfoSpan = 19999 SrcSpan "tests/examples/RealGHC.lhs" 573 28 573 36 20000 , srcInfoPoints = [] 20001 } 20002 "bind_fvs")))))) 20003 ] 20004 (App 20005 SrcSpanInfo 20006 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 5 576 13 20007 , srcInfoPoints = [] 20008 } 20009 (App 20010 SrcSpanInfo 20011 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 5 576 9 20012 , srcInfoPoints = [] 20013 } 20014 (App 20015 SrcSpanInfo 20016 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 5 575 49 20017 , srcInfoPoints = [] 20018 } 20019 (App 20020 SrcSpanInfo 20021 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 574 5 574 38 20022 , srcInfoPoints = [] 20023 } 20024 (Var 20025 SrcSpanInfo 20026 { srcInfoSpan = 20027 SrcSpan "tests/examples/RealGHC.lhs" 574 5 574 10 20028 , srcInfoPoints = [] 20029 } 20030 (UnQual 20031 SrcSpanInfo 20032 { srcInfoSpan = 20033 SrcSpan "tests/examples/RealGHC.lhs" 574 5 574 10 20034 , srcInfoPoints = [] 20035 } 20036 (Ident 20037 SrcSpanInfo 20038 { srcInfoSpan = 20039 SrcSpan "tests/examples/RealGHC.lhs" 574 5 574 10 20040 , srcInfoPoints = [] 20041 } 20042 "match"))) 20043 (Paren 20044 SrcSpanInfo 20045 { srcInfoSpan = 20046 SrcSpan "tests/examples/RealGHC.lhs" 574 11 574 38 20047 , srcInfoPoints = 20048 [ SrcSpan "tests/examples/RealGHC.lhs" 574 11 574 12 20049 , SrcSpan "tests/examples/RealGHC.lhs" 574 37 574 38 20050 ] 20051 } 20052 (RecUpdate 20053 SrcSpanInfo 20054 { srcInfoSpan = 20055 SrcSpan "tests/examples/RealGHC.lhs" 574 12 574 37 20056 , srcInfoPoints = 20057 [ SrcSpan "tests/examples/RealGHC.lhs" 574 17 574 18 20058 , SrcSpan "tests/examples/RealGHC.lhs" 574 36 574 37 20059 ] 20060 } 20061 (Var 20062 SrcSpanInfo 20063 { srcInfoSpan = 20064 SrcSpan "tests/examples/RealGHC.lhs" 574 12 574 16 20065 , srcInfoPoints = [] 20066 } 20067 (UnQual 20068 SrcSpanInfo 20069 { srcInfoSpan = 20070 SrcSpan 20071 "tests/examples/RealGHC.lhs" 574 12 574 16 20072 , srcInfoPoints = [] 20073 } 20074 (Ident 20075 SrcSpanInfo 20076 { srcInfoSpan = 20077 SrcSpan 20078 "tests/examples/RealGHC.lhs" 574 12 574 16 20079 , srcInfoPoints = [] 20080 } 20081 "menv"))) 20082 [ FieldUpdate 20083 SrcSpanInfo 20084 { srcInfoSpan = 20085 SrcSpan "tests/examples/RealGHC.lhs" 574 19 574 35 20086 , srcInfoPoints = 20087 [ SrcSpan 20088 "tests/examples/RealGHC.lhs" 574 26 574 27 20089 ] 20090 } 20091 (UnQual 20092 SrcSpanInfo 20093 { srcInfoSpan = 20094 SrcSpan 20095 "tests/examples/RealGHC.lhs" 574 19 574 25 20096 , srcInfoPoints = [] 20097 } 20098 (Ident 20099 SrcSpanInfo 20100 { srcInfoSpan = 20101 SrcSpan 20102 "tests/examples/RealGHC.lhs" 574 19 574 25 20103 , srcInfoPoints = [] 20104 } 20105 "me_env")) 20106 (Var 20107 SrcSpanInfo 20108 { srcInfoSpan = 20109 SrcSpan 20110 "tests/examples/RealGHC.lhs" 574 28 574 35 20111 , srcInfoPoints = [] 20112 } 20113 (UnQual 20114 SrcSpanInfo 20115 { srcInfoSpan = 20116 SrcSpan 20117 "tests/examples/RealGHC.lhs" 574 28 574 35 20118 , srcInfoPoints = [] 20119 } 20120 (Ident 20121 SrcSpanInfo 20122 { srcInfoSpan = 20123 SrcSpan 20124 "tests/examples/RealGHC.lhs" 20125 574 20126 28 20127 574 20128 35 20129 , srcInfoPoints = [] 20130 } 20131 "rn_env'"))) 20132 ]))) 20133 (Tuple 20134 SrcSpanInfo 20135 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 575 7 575 49 20136 , srcInfoPoints = 20137 [ SrcSpan "tests/examples/RealGHC.lhs" 575 7 575 8 20138 , SrcSpan "tests/examples/RealGHC.lhs" 575 16 575 17 20139 , SrcSpan "tests/examples/RealGHC.lhs" 575 26 575 27 20140 , SrcSpan "tests/examples/RealGHC.lhs" 575 48 575 49 20141 ] 20142 } 20143 Boxed 20144 [ Var 20145 SrcSpanInfo 20146 { srcInfoSpan = 20147 SrcSpan "tests/examples/RealGHC.lhs" 575 8 575 16 20148 , srcInfoPoints = [] 20149 } 20150 (UnQual 20151 SrcSpanInfo 20152 { srcInfoSpan = 20153 SrcSpan "tests/examples/RealGHC.lhs" 575 8 575 16 20154 , srcInfoPoints = [] 20155 } 20156 (Ident 20157 SrcSpanInfo 20158 { srcInfoSpan = 20159 SrcSpan "tests/examples/RealGHC.lhs" 575 8 575 16 20160 , srcInfoPoints = [] 20161 } 20162 "tv_subst")) 20163 , Var 20164 SrcSpanInfo 20165 { srcInfoSpan = 20166 SrcSpan "tests/examples/RealGHC.lhs" 575 18 575 26 20167 , srcInfoPoints = [] 20168 } 20169 (UnQual 20170 SrcSpanInfo 20171 { srcInfoSpan = 20172 SrcSpan "tests/examples/RealGHC.lhs" 575 18 575 26 20173 , srcInfoPoints = [] 20174 } 20175 (Ident 20176 SrcSpanInfo 20177 { srcInfoSpan = 20178 SrcSpan "tests/examples/RealGHC.lhs" 575 18 575 26 20179 , srcInfoPoints = [] 20180 } 20181 "id_subst")) 20182 , InfixApp 20183 SrcSpanInfo 20184 { srcInfoSpan = 20185 SrcSpan "tests/examples/RealGHC.lhs" 575 28 575 48 20186 , srcInfoPoints = [] 20187 } 20188 (Var 20189 SrcSpanInfo 20190 { srcInfoSpan = 20191 SrcSpan "tests/examples/RealGHC.lhs" 575 28 575 33 20192 , srcInfoPoints = [] 20193 } 20194 (UnQual 20195 SrcSpanInfo 20196 { srcInfoSpan = 20197 SrcSpan "tests/examples/RealGHC.lhs" 575 28 575 33 20198 , srcInfoPoints = [] 20199 } 20200 (Ident 20201 SrcSpanInfo 20202 { srcInfoSpan = 20203 SrcSpan 20204 "tests/examples/RealGHC.lhs" 575 28 575 33 20205 , srcInfoPoints = [] 20206 } 20207 "binds"))) 20208 (QVarOp 20209 SrcSpanInfo 20210 { srcInfoSpan = 20211 SrcSpan "tests/examples/RealGHC.lhs" 575 34 575 42 20212 , srcInfoPoints = 20213 [ SrcSpan "tests/examples/RealGHC.lhs" 575 34 575 35 20214 , SrcSpan "tests/examples/RealGHC.lhs" 575 35 575 41 20215 , SrcSpan "tests/examples/RealGHC.lhs" 575 41 575 42 20216 ] 20217 } 20218 (UnQual 20219 SrcSpanInfo 20220 { srcInfoSpan = 20221 SrcSpan "tests/examples/RealGHC.lhs" 575 34 575 42 20222 , srcInfoPoints = 20223 [ SrcSpan 20224 "tests/examples/RealGHC.lhs" 575 34 575 35 20225 , SrcSpan 20226 "tests/examples/RealGHC.lhs" 575 35 575 41 20227 , SrcSpan 20228 "tests/examples/RealGHC.lhs" 575 41 575 42 20229 ] 20230 } 20231 (Ident 20232 SrcSpanInfo 20233 { srcInfoSpan = 20234 SrcSpan 20235 "tests/examples/RealGHC.lhs" 575 35 575 41 20236 , srcInfoPoints = [] 20237 } 20238 "snocOL"))) 20239 (Var 20240 SrcSpanInfo 20241 { srcInfoSpan = 20242 SrcSpan "tests/examples/RealGHC.lhs" 575 43 575 48 20243 , srcInfoPoints = [] 20244 } 20245 (UnQual 20246 SrcSpanInfo 20247 { srcInfoSpan = 20248 SrcSpan "tests/examples/RealGHC.lhs" 575 43 575 48 20249 , srcInfoPoints = [] 20250 } 20251 (Ident 20252 SrcSpanInfo 20253 { srcInfoSpan = 20254 SrcSpan 20255 "tests/examples/RealGHC.lhs" 575 43 575 48 20256 , srcInfoPoints = [] 20257 } 20258 "bind'"))) 20259 ])) 20260 (Var 20261 SrcSpanInfo 20262 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 576 7 576 9 20263 , srcInfoPoints = [] 20264 } 20265 (UnQual 20266 SrcSpanInfo 20267 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 576 7 576 9 20268 , srcInfoPoints = [] 20269 } 20270 (Ident 20271 SrcSpanInfo 20272 { srcInfoSpan = 20273 SrcSpan "tests/examples/RealGHC.lhs" 576 7 576 9 20274 , srcInfoPoints = [] 20275 } 20276 "e1")))) 20277 (Var 20278 SrcSpanInfo 20279 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 576 10 576 13 20280 , srcInfoPoints = [] 20281 } 20282 (UnQual 20283 SrcSpanInfo 20284 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 576 10 576 13 20285 , srcInfoPoints = [] 20286 } 20287 (Ident 20288 SrcSpanInfo 20289 { srcInfoSpan = 20290 SrcSpan "tests/examples/RealGHC.lhs" 576 10 576 13 20291 , srcInfoPoints = [] 20292 } 20293 "e2'")))) 20294 ]) 20295 (Just 20296 (BDecls 20297 SrcSpanInfo 20298 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 5 585 47 20299 , srcInfoPoints = 20300 [ SrcSpan "tests/examples/RealGHC.lhs" 578 5 578 5 20301 , SrcSpan "tests/examples/RealGHC.lhs" 579 5 579 5 20302 , SrcSpan "tests/examples/RealGHC.lhs" 580 5 580 5 20303 , SrcSpan "tests/examples/RealGHC.lhs" 581 5 581 5 20304 , SrcSpan "tests/examples/RealGHC.lhs" 582 5 582 5 20305 , SrcSpan "tests/examples/RealGHC.lhs" 583 5 583 5 20306 , SrcSpan "tests/examples/RealGHC.lhs" 584 5 584 5 20307 , SrcSpan "tests/examples/RealGHC.lhs" 585 5 585 5 20308 , SrcSpan "tests/examples/RealGHC.lhs" 597 1 597 0 20309 ] 20310 } 20311 [ PatBind 20312 SrcSpanInfo 20313 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 5 578 27 20314 , srcInfoPoints = [] 20315 } 20316 (PVar 20317 SrcSpanInfo 20318 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 5 578 11 20319 , srcInfoPoints = [] 20320 } 20321 (Ident 20322 SrcSpanInfo 20323 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 5 578 11 20324 , srcInfoPoints = [] 20325 } 20326 "rn_env")) 20327 (UnGuardedRhs 20328 SrcSpanInfo 20329 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 14 578 27 20330 , srcInfoPoints = 20331 [ SrcSpan "tests/examples/RealGHC.lhs" 578 14 578 15 ] 20332 } 20333 (App 20334 SrcSpanInfo 20335 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 578 16 578 27 20336 , srcInfoPoints = [] 20337 } 20338 (Var 20339 SrcSpanInfo 20340 { srcInfoSpan = 20341 SrcSpan "tests/examples/RealGHC.lhs" 578 16 578 22 20342 , srcInfoPoints = [] 20343 } 20344 (UnQual 20345 SrcSpanInfo 20346 { srcInfoSpan = 20347 SrcSpan "tests/examples/RealGHC.lhs" 578 16 578 22 20348 , srcInfoPoints = [] 20349 } 20350 (Ident 20351 SrcSpanInfo 20352 { srcInfoSpan = 20353 SrcSpan "tests/examples/RealGHC.lhs" 578 16 578 22 20354 , srcInfoPoints = [] 20355 } 20356 "me_env"))) 20357 (Var 20358 SrcSpanInfo 20359 { srcInfoSpan = 20360 SrcSpan "tests/examples/RealGHC.lhs" 578 23 578 27 20361 , srcInfoPoints = [] 20362 } 20363 (UnQual 20364 SrcSpanInfo 20365 { srcInfoSpan = 20366 SrcSpan "tests/examples/RealGHC.lhs" 578 23 578 27 20367 , srcInfoPoints = [] 20368 } 20369 (Ident 20370 SrcSpanInfo 20371 { srcInfoSpan = 20372 SrcSpan "tests/examples/RealGHC.lhs" 578 23 578 27 20373 , srcInfoPoints = [] 20374 } 20375 "menv"))))) 20376 Nothing 20377 , PatBind 20378 SrcSpanInfo 20379 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 579 5 579 31 20380 , srcInfoPoints = [] 20381 } 20382 (PVar 20383 SrcSpanInfo 20384 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 579 5 579 10 20385 , srcInfoPoints = [] 20386 } 20387 (Ident 20388 SrcSpanInfo 20389 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 579 5 579 10 20390 , srcInfoPoints = [] 20391 } 20392 "bndrs")) 20393 (UnGuardedRhs 20394 SrcSpanInfo 20395 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 579 14 579 31 20396 , srcInfoPoints = 20397 [ SrcSpan "tests/examples/RealGHC.lhs" 579 14 579 15 ] 20398 } 20399 (App 20400 SrcSpanInfo 20401 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 579 16 579 31 20402 , srcInfoPoints = [] 20403 } 20404 (Var 20405 SrcSpanInfo 20406 { srcInfoSpan = 20407 SrcSpan "tests/examples/RealGHC.lhs" 579 16 579 25 20408 , srcInfoPoints = [] 20409 } 20410 (UnQual 20411 SrcSpanInfo 20412 { srcInfoSpan = 20413 SrcSpan "tests/examples/RealGHC.lhs" 579 16 579 25 20414 , srcInfoPoints = [] 20415 } 20416 (Ident 20417 SrcSpanInfo 20418 { srcInfoSpan = 20419 SrcSpan "tests/examples/RealGHC.lhs" 579 16 579 25 20420 , srcInfoPoints = [] 20421 } 20422 "bindersOf"))) 20423 (Var 20424 SrcSpanInfo 20425 { srcInfoSpan = 20426 SrcSpan "tests/examples/RealGHC.lhs" 579 27 579 31 20427 , srcInfoPoints = [] 20428 } 20429 (UnQual 20430 SrcSpanInfo 20431 { srcInfoSpan = 20432 SrcSpan "tests/examples/RealGHC.lhs" 579 27 579 31 20433 , srcInfoPoints = [] 20434 } 20435 (Ident 20436 SrcSpanInfo 20437 { srcInfoSpan = 20438 SrcSpan "tests/examples/RealGHC.lhs" 579 27 579 31 20439 , srcInfoPoints = [] 20440 } 20441 "bind"))))) 20442 Nothing 20443 , PatBind 20444 SrcSpanInfo 20445 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 5 580 47 20446 , srcInfoPoints = [] 20447 } 20448 (PVar 20449 SrcSpanInfo 20450 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 5 580 13 20451 , srcInfoPoints = [] 20452 } 20453 (Ident 20454 SrcSpanInfo 20455 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 5 580 13 20456 , srcInfoPoints = [] 20457 } 20458 "bind_fvs")) 20459 (UnGuardedRhs 20460 SrcSpanInfo 20461 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 14 580 47 20462 , srcInfoPoints = 20463 [ SrcSpan "tests/examples/RealGHC.lhs" 580 14 580 15 ] 20464 } 20465 (App 20466 SrcSpanInfo 20467 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 580 16 580 47 20468 , srcInfoPoints = [] 20469 } 20470 (Var 20471 SrcSpanInfo 20472 { srcInfoSpan = 20473 SrcSpan "tests/examples/RealGHC.lhs" 580 16 580 27 20474 , srcInfoPoints = [] 20475 } 20476 (UnQual 20477 SrcSpanInfo 20478 { srcInfoSpan = 20479 SrcSpan "tests/examples/RealGHC.lhs" 580 16 580 27 20480 , srcInfoPoints = [] 20481 } 20482 (Ident 20483 SrcSpanInfo 20484 { srcInfoSpan = 20485 SrcSpan "tests/examples/RealGHC.lhs" 580 16 580 27 20486 , srcInfoPoints = [] 20487 } 20488 "varSetElems"))) 20489 (Paren 20490 SrcSpanInfo 20491 { srcInfoSpan = 20492 SrcSpan "tests/examples/RealGHC.lhs" 580 28 580 47 20493 , srcInfoPoints = 20494 [ SrcSpan "tests/examples/RealGHC.lhs" 580 28 580 29 20495 , SrcSpan "tests/examples/RealGHC.lhs" 580 46 580 47 20496 ] 20497 } 20498 (App 20499 SrcSpanInfo 20500 { srcInfoSpan = 20501 SrcSpan "tests/examples/RealGHC.lhs" 580 29 580 46 20502 , srcInfoPoints = [] 20503 } 20504 (Var 20505 SrcSpanInfo 20506 { srcInfoSpan = 20507 SrcSpan "tests/examples/RealGHC.lhs" 580 29 580 41 20508 , srcInfoPoints = [] 20509 } 20510 (UnQual 20511 SrcSpanInfo 20512 { srcInfoSpan = 20513 SrcSpan "tests/examples/RealGHC.lhs" 580 29 580 41 20514 , srcInfoPoints = [] 20515 } 20516 (Ident 20517 SrcSpanInfo 20518 { srcInfoSpan = 20519 SrcSpan 20520 "tests/examples/RealGHC.lhs" 580 29 580 41 20521 , srcInfoPoints = [] 20522 } 20523 "bindFreeVars"))) 20524 (Var 20525 SrcSpanInfo 20526 { srcInfoSpan = 20527 SrcSpan "tests/examples/RealGHC.lhs" 580 42 580 46 20528 , srcInfoPoints = [] 20529 } 20530 (UnQual 20531 SrcSpanInfo 20532 { srcInfoSpan = 20533 SrcSpan "tests/examples/RealGHC.lhs" 580 42 580 46 20534 , srcInfoPoints = [] 20535 } 20536 (Ident 20537 SrcSpanInfo 20538 { srcInfoSpan = 20539 SrcSpan 20540 "tests/examples/RealGHC.lhs" 580 42 580 46 20541 , srcInfoPoints = [] 20542 } 20543 "bind"))))))) 20544 Nothing 20545 , FunBind 20546 SrcSpanInfo 20547 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 5 581 42 20548 , srcInfoPoints = [] 20549 } 20550 [ Match 20551 SrcSpanInfo 20552 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 5 581 42 20553 , srcInfoPoints = [] 20554 } 20555 (Ident 20556 SrcSpanInfo 20557 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 5 581 18 20558 , srcInfoPoints = [] 20559 } 20560 "locally_bound") 20561 [ PVar 20562 SrcSpanInfo 20563 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 19 581 20 20564 , srcInfoPoints = [] 20565 } 20566 (Ident 20567 SrcSpanInfo 20568 { srcInfoSpan = 20569 SrcSpan "tests/examples/RealGHC.lhs" 581 19 581 20 20570 , srcInfoPoints = [] 20571 } 20572 "x") 20573 ] 20574 (UnGuardedRhs 20575 SrcSpanInfo 20576 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 581 23 581 42 20577 , srcInfoPoints = 20578 [ SrcSpan "tests/examples/RealGHC.lhs" 581 23 581 24 ] 20579 } 20580 (App 20581 SrcSpanInfo 20582 { srcInfoSpan = 20583 SrcSpan "tests/examples/RealGHC.lhs" 581 25 581 42 20584 , srcInfoPoints = [] 20585 } 20586 (App 20587 SrcSpanInfo 20588 { srcInfoSpan = 20589 SrcSpan "tests/examples/RealGHC.lhs" 581 25 581 40 20590 , srcInfoPoints = [] 20591 } 20592 (Var 20593 SrcSpanInfo 20594 { srcInfoSpan = 20595 SrcSpan "tests/examples/RealGHC.lhs" 581 25 581 33 20596 , srcInfoPoints = [] 20597 } 20598 (UnQual 20599 SrcSpanInfo 20600 { srcInfoSpan = 20601 SrcSpan "tests/examples/RealGHC.lhs" 581 25 581 33 20602 , srcInfoPoints = [] 20603 } 20604 (Ident 20605 SrcSpanInfo 20606 { srcInfoSpan = 20607 SrcSpan 20608 "tests/examples/RealGHC.lhs" 581 25 581 33 20609 , srcInfoPoints = [] 20610 } 20611 "inRnEnvR"))) 20612 (Var 20613 SrcSpanInfo 20614 { srcInfoSpan = 20615 SrcSpan "tests/examples/RealGHC.lhs" 581 34 581 40 20616 , srcInfoPoints = [] 20617 } 20618 (UnQual 20619 SrcSpanInfo 20620 { srcInfoSpan = 20621 SrcSpan "tests/examples/RealGHC.lhs" 581 34 581 40 20622 , srcInfoPoints = [] 20623 } 20624 (Ident 20625 SrcSpanInfo 20626 { srcInfoSpan = 20627 SrcSpan 20628 "tests/examples/RealGHC.lhs" 581 34 581 40 20629 , srcInfoPoints = [] 20630 } 20631 "rn_env")))) 20632 (Var 20633 SrcSpanInfo 20634 { srcInfoSpan = 20635 SrcSpan "tests/examples/RealGHC.lhs" 581 41 581 42 20636 , srcInfoPoints = [] 20637 } 20638 (UnQual 20639 SrcSpanInfo 20640 { srcInfoSpan = 20641 SrcSpan "tests/examples/RealGHC.lhs" 581 41 581 42 20642 , srcInfoPoints = [] 20643 } 20644 (Ident 20645 SrcSpanInfo 20646 { srcInfoSpan = 20647 SrcSpan "tests/examples/RealGHC.lhs" 581 41 581 42 20648 , srcInfoPoints = [] 20649 } 20650 "x"))))) 20651 Nothing 20652 ] 20653 , FunBind 20654 SrcSpanInfo 20655 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 5 582 49 20656 , srcInfoPoints = [] 20657 } 20658 [ Match 20659 SrcSpanInfo 20660 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 5 582 49 20661 , srcInfoPoints = [] 20662 } 20663 (Ident 20664 SrcSpanInfo 20665 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 5 582 18 20666 , srcInfoPoints = [] 20667 } 20668 "freshly_bound") 20669 [ PVar 20670 SrcSpanInfo 20671 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 19 582 20 20672 , srcInfoPoints = [] 20673 } 20674 (Ident 20675 SrcSpanInfo 20676 { srcInfoSpan = 20677 SrcSpan "tests/examples/RealGHC.lhs" 582 19 582 20 20678 , srcInfoPoints = [] 20679 } 20680 "x") 20681 ] 20682 (UnGuardedRhs 20683 SrcSpanInfo 20684 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 582 21 582 49 20685 , srcInfoPoints = 20686 [ SrcSpan "tests/examples/RealGHC.lhs" 582 21 582 22 ] 20687 } 20688 (App 20689 SrcSpanInfo 20690 { srcInfoSpan = 20691 SrcSpan "tests/examples/RealGHC.lhs" 582 23 582 49 20692 , srcInfoPoints = [] 20693 } 20694 (Var 20695 SrcSpanInfo 20696 { srcInfoSpan = 20697 SrcSpan "tests/examples/RealGHC.lhs" 582 23 582 26 20698 , srcInfoPoints = [] 20699 } 20700 (UnQual 20701 SrcSpanInfo 20702 { srcInfoSpan = 20703 SrcSpan "tests/examples/RealGHC.lhs" 582 23 582 26 20704 , srcInfoPoints = [] 20705 } 20706 (Ident 20707 SrcSpanInfo 20708 { srcInfoSpan = 20709 SrcSpan "tests/examples/RealGHC.lhs" 582 23 582 26 20710 , srcInfoPoints = [] 20711 } 20712 "not"))) 20713 (Paren 20714 SrcSpanInfo 20715 { srcInfoSpan = 20716 SrcSpan "tests/examples/RealGHC.lhs" 582 27 582 49 20717 , srcInfoPoints = 20718 [ SrcSpan "tests/examples/RealGHC.lhs" 582 27 582 28 20719 , SrcSpan "tests/examples/RealGHC.lhs" 582 48 582 49 20720 ] 20721 } 20722 (InfixApp 20723 SrcSpanInfo 20724 { srcInfoSpan = 20725 SrcSpan "tests/examples/RealGHC.lhs" 582 28 582 48 20726 , srcInfoPoints = [] 20727 } 20728 (Var 20729 SrcSpanInfo 20730 { srcInfoSpan = 20731 SrcSpan "tests/examples/RealGHC.lhs" 582 28 582 29 20732 , srcInfoPoints = [] 20733 } 20734 (UnQual 20735 SrcSpanInfo 20736 { srcInfoSpan = 20737 SrcSpan 20738 "tests/examples/RealGHC.lhs" 582 28 582 29 20739 , srcInfoPoints = [] 20740 } 20741 (Ident 20742 SrcSpanInfo 20743 { srcInfoSpan = 20744 SrcSpan 20745 "tests/examples/RealGHC.lhs" 582 28 582 29 20746 , srcInfoPoints = [] 20747 } 20748 "x"))) 20749 (QVarOp 20750 SrcSpanInfo 20751 { srcInfoSpan = 20752 SrcSpan "tests/examples/RealGHC.lhs" 582 30 582 41 20753 , srcInfoPoints = 20754 [ SrcSpan 20755 "tests/examples/RealGHC.lhs" 582 30 582 31 20756 , SrcSpan 20757 "tests/examples/RealGHC.lhs" 582 31 582 40 20758 , SrcSpan 20759 "tests/examples/RealGHC.lhs" 582 40 582 41 20760 ] 20761 } 20762 (UnQual 20763 SrcSpanInfo 20764 { srcInfoSpan = 20765 SrcSpan 20766 "tests/examples/RealGHC.lhs" 582 30 582 41 20767 , srcInfoPoints = 20768 [ SrcSpan 20769 "tests/examples/RealGHC.lhs" 582 30 582 31 20770 , SrcSpan 20771 "tests/examples/RealGHC.lhs" 582 31 582 40 20772 , SrcSpan 20773 "tests/examples/RealGHC.lhs" 582 40 582 41 20774 ] 20775 } 20776 (Ident 20777 SrcSpanInfo 20778 { srcInfoSpan = 20779 SrcSpan 20780 "tests/examples/RealGHC.lhs" 582 31 582 40 20781 , srcInfoPoints = [] 20782 } 20783 "rnInScope"))) 20784 (Var 20785 SrcSpanInfo 20786 { srcInfoSpan = 20787 SrcSpan "tests/examples/RealGHC.lhs" 582 42 582 48 20788 , srcInfoPoints = [] 20789 } 20790 (UnQual 20791 SrcSpanInfo 20792 { srcInfoSpan = 20793 SrcSpan 20794 "tests/examples/RealGHC.lhs" 582 42 582 48 20795 , srcInfoPoints = [] 20796 } 20797 (Ident 20798 SrcSpanInfo 20799 { srcInfoSpan = 20800 SrcSpan 20801 "tests/examples/RealGHC.lhs" 582 42 582 48 20802 , srcInfoPoints = [] 20803 } 20804 "rn_env"))))))) 20805 Nothing 20806 ] 20807 , PatBind 20808 SrcSpanInfo 20809 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 583 5 583 17 20810 , srcInfoPoints = [] 20811 } 20812 (PVar 20813 SrcSpanInfo 20814 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 583 5 583 10 20815 , srcInfoPoints = [] 20816 } 20817 (Ident 20818 SrcSpanInfo 20819 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 583 5 583 10 20820 , srcInfoPoints = [] 20821 } 20822 "bind'")) 20823 (UnGuardedRhs 20824 SrcSpanInfo 20825 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 583 11 583 17 20826 , srcInfoPoints = 20827 [ SrcSpan "tests/examples/RealGHC.lhs" 583 11 583 12 ] 20828 } 20829 (Var 20830 SrcSpanInfo 20831 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 583 13 583 17 20832 , srcInfoPoints = [] 20833 } 20834 (UnQual 20835 SrcSpanInfo 20836 { srcInfoSpan = 20837 SrcSpan "tests/examples/RealGHC.lhs" 583 13 583 17 20838 , srcInfoPoints = [] 20839 } 20840 (Ident 20841 SrcSpanInfo 20842 { srcInfoSpan = 20843 SrcSpan "tests/examples/RealGHC.lhs" 583 13 583 17 20844 , srcInfoPoints = [] 20845 } 20846 "bind")))) 20847 Nothing 20848 , PatBind 20849 SrcSpanInfo 20850 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 584 5 584 15 20851 , srcInfoPoints = [] 20852 } 20853 (PVar 20854 SrcSpanInfo 20855 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 584 5 584 8 20856 , srcInfoPoints = [] 20857 } 20858 (Ident 20859 SrcSpanInfo 20860 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 584 5 584 8 20861 , srcInfoPoints = [] 20862 } 20863 "e2'")) 20864 (UnGuardedRhs 20865 SrcSpanInfo 20866 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 584 11 584 15 20867 , srcInfoPoints = 20868 [ SrcSpan "tests/examples/RealGHC.lhs" 584 11 584 12 ] 20869 } 20870 (Var 20871 SrcSpanInfo 20872 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 584 13 584 15 20873 , srcInfoPoints = [] 20874 } 20875 (UnQual 20876 SrcSpanInfo 20877 { srcInfoSpan = 20878 SrcSpan "tests/examples/RealGHC.lhs" 584 13 584 15 20879 , srcInfoPoints = [] 20880 } 20881 (Ident 20882 SrcSpanInfo 20883 { srcInfoSpan = 20884 SrcSpan "tests/examples/RealGHC.lhs" 584 13 584 15 20885 , srcInfoPoints = [] 20886 } 20887 "e2")))) 20888 Nothing 20889 , PatBind 20890 SrcSpanInfo 20891 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 5 585 47 20892 , srcInfoPoints = [] 20893 } 20894 (PVar 20895 SrcSpanInfo 20896 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 5 585 12 20897 , srcInfoPoints = [] 20898 } 20899 (Ident 20900 SrcSpanInfo 20901 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 5 585 12 20902 , srcInfoPoints = [] 20903 } 20904 "rn_env'")) 20905 (UnGuardedRhs 20906 SrcSpanInfo 20907 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 13 585 47 20908 , srcInfoPoints = 20909 [ SrcSpan "tests/examples/RealGHC.lhs" 585 13 585 14 ] 20910 } 20911 (App 20912 SrcSpanInfo 20913 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 585 15 585 47 20914 , srcInfoPoints = [] 20915 } 20916 (App 20917 SrcSpanInfo 20918 { srcInfoSpan = 20919 SrcSpan "tests/examples/RealGHC.lhs" 585 15 585 41 20920 , srcInfoPoints = [] 20921 } 20922 (Var 20923 SrcSpanInfo 20924 { srcInfoSpan = 20925 SrcSpan "tests/examples/RealGHC.lhs" 585 15 585 34 20926 , srcInfoPoints = [] 20927 } 20928 (UnQual 20929 SrcSpanInfo 20930 { srcInfoSpan = 20931 SrcSpan "tests/examples/RealGHC.lhs" 585 15 585 34 20932 , srcInfoPoints = [] 20933 } 20934 (Ident 20935 SrcSpanInfo 20936 { srcInfoSpan = 20937 SrcSpan "tests/examples/RealGHC.lhs" 585 15 585 34 20938 , srcInfoPoints = [] 20939 } 20940 "extendRnInScopeList"))) 20941 (Var 20942 SrcSpanInfo 20943 { srcInfoSpan = 20944 SrcSpan "tests/examples/RealGHC.lhs" 585 35 585 41 20945 , srcInfoPoints = [] 20946 } 20947 (UnQual 20948 SrcSpanInfo 20949 { srcInfoSpan = 20950 SrcSpan "tests/examples/RealGHC.lhs" 585 35 585 41 20951 , srcInfoPoints = [] 20952 } 20953 (Ident 20954 SrcSpanInfo 20955 { srcInfoSpan = 20956 SrcSpan "tests/examples/RealGHC.lhs" 585 35 585 41 20957 , srcInfoPoints = [] 20958 } 20959 "rn_env")))) 20960 (Var 20961 SrcSpanInfo 20962 { srcInfoSpan = 20963 SrcSpan "tests/examples/RealGHC.lhs" 585 42 585 47 20964 , srcInfoPoints = [] 20965 } 20966 (UnQual 20967 SrcSpanInfo 20968 { srcInfoSpan = 20969 SrcSpan "tests/examples/RealGHC.lhs" 585 42 585 47 20970 , srcInfoPoints = [] 20971 } 20972 (Ident 20973 SrcSpanInfo 20974 { srcInfoSpan = 20975 SrcSpan "tests/examples/RealGHC.lhs" 585 42 585 47 20976 , srcInfoPoints = [] 20977 } 20978 "bndrs"))))) 20979 Nothing 20980 ])) 20981 , Match 20982 SrcSpanInfo 20983 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 1 599 15 20984 , srcInfoPoints = [] 20985 } 20986 (Ident 20987 SrcSpanInfo 20988 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 1 597 6 20989 , srcInfoPoints = [] 20990 } 20991 "match") 20992 [ PVar 20993 SrcSpanInfo 20994 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 7 597 11 20995 , srcInfoPoints = [] 20996 } 20997 (Ident 20998 SrcSpanInfo 20999 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 7 597 11 21000 , srcInfoPoints = [] 21001 } 21002 "menv") 21003 , PVar 21004 SrcSpanInfo 21005 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 12 597 17 21006 , srcInfoPoints = [] 21007 } 21008 (Ident 21009 SrcSpanInfo 21010 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 12 597 17 21011 , srcInfoPoints = [] 21012 } 21013 "subst") 21014 , PParen 21015 SrcSpanInfo 21016 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 18 597 28 21017 , srcInfoPoints = 21018 [ SrcSpan "tests/examples/RealGHC.lhs" 597 18 597 19 21019 , SrcSpan "tests/examples/RealGHC.lhs" 597 27 597 28 21020 ] 21021 } 21022 (PApp 21023 SrcSpanInfo 21024 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 19 597 27 21025 , srcInfoPoints = [] 21026 } 21027 (UnQual 21028 SrcSpanInfo 21029 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 19 597 22 21030 , srcInfoPoints = [] 21031 } 21032 (Ident 21033 SrcSpanInfo 21034 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 19 597 22 21035 , srcInfoPoints = [] 21036 } 21037 "Lit")) 21038 [ PVar 21039 SrcSpanInfo 21040 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 23 597 27 21041 , srcInfoPoints = [] 21042 } 21043 (Ident 21044 SrcSpanInfo 21045 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 23 597 27 21046 , srcInfoPoints = [] 21047 } 21048 "lit1") 21049 ]) 21050 , PParen 21051 SrcSpanInfo 21052 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 29 597 39 21053 , srcInfoPoints = 21054 [ SrcSpan "tests/examples/RealGHC.lhs" 597 29 597 30 21055 , SrcSpan "tests/examples/RealGHC.lhs" 597 38 597 39 21056 ] 21057 } 21058 (PApp 21059 SrcSpanInfo 21060 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 30 597 38 21061 , srcInfoPoints = [] 21062 } 21063 (UnQual 21064 SrcSpanInfo 21065 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 30 597 33 21066 , srcInfoPoints = [] 21067 } 21068 (Ident 21069 SrcSpanInfo 21070 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 30 597 33 21071 , srcInfoPoints = [] 21072 } 21073 "Lit")) 21074 [ PVar 21075 SrcSpanInfo 21076 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 34 597 38 21077 , srcInfoPoints = [] 21078 } 21079 (Ident 21080 SrcSpanInfo 21081 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 597 34 597 38 21082 , srcInfoPoints = [] 21083 } 21084 "lit2") 21085 ]) 21086 ] 21087 (GuardedRhss 21088 SrcSpanInfo 21089 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 3 599 15 21090 , srcInfoPoints = 21091 [ SrcSpan "tests/examples/RealGHC.lhs" 598 3 598 4 21092 , SrcSpan "tests/examples/RealGHC.lhs" 599 3 599 4 21093 ] 21094 } 21095 [ GuardedRhs 21096 SrcSpanInfo 21097 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 3 599 15 21098 , srcInfoPoints = 21099 [ SrcSpan "tests/examples/RealGHC.lhs" 598 3 598 4 21100 , SrcSpan "tests/examples/RealGHC.lhs" 599 3 599 4 21101 ] 21102 } 21103 [ Qualifier 21104 SrcSpanInfo 21105 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 5 598 17 21106 , srcInfoPoints = [] 21107 } 21108 (InfixApp 21109 SrcSpanInfo 21110 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 5 598 17 21111 , srcInfoPoints = [] 21112 } 21113 (Var 21114 SrcSpanInfo 21115 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 5 598 9 21116 , srcInfoPoints = [] 21117 } 21118 (UnQual 21119 SrcSpanInfo 21120 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 5 598 9 21121 , srcInfoPoints = [] 21122 } 21123 (Ident 21124 SrcSpanInfo 21125 { srcInfoSpan = 21126 SrcSpan "tests/examples/RealGHC.lhs" 598 5 598 9 21127 , srcInfoPoints = [] 21128 } 21129 "lit1"))) 21130 (QVarOp 21131 SrcSpanInfo 21132 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 10 598 12 21133 , srcInfoPoints = [] 21134 } 21135 (UnQual 21136 SrcSpanInfo 21137 { srcInfoSpan = 21138 SrcSpan "tests/examples/RealGHC.lhs" 598 10 598 12 21139 , srcInfoPoints = [] 21140 } 21141 (Symbol 21142 SrcSpanInfo 21143 { srcInfoSpan = 21144 SrcSpan "tests/examples/RealGHC.lhs" 598 10 598 12 21145 , srcInfoPoints = [] 21146 } 21147 "=="))) 21148 (Var 21149 SrcSpanInfo 21150 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 598 13 598 17 21151 , srcInfoPoints = [] 21152 } 21153 (UnQual 21154 SrcSpanInfo 21155 { srcInfoSpan = 21156 SrcSpan "tests/examples/RealGHC.lhs" 598 13 598 17 21157 , srcInfoPoints = [] 21158 } 21159 (Ident 21160 SrcSpanInfo 21161 { srcInfoSpan = 21162 SrcSpan "tests/examples/RealGHC.lhs" 598 13 598 17 21163 , srcInfoPoints = [] 21164 } 21165 "lit2")))) 21166 ] 21167 (App 21168 SrcSpanInfo 21169 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 599 5 599 15 21170 , srcInfoPoints = [] 21171 } 21172 (Con 21173 SrcSpanInfo 21174 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 599 5 599 9 21175 , srcInfoPoints = [] 21176 } 21177 (UnQual 21178 SrcSpanInfo 21179 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 599 5 599 9 21180 , srcInfoPoints = [] 21181 } 21182 (Ident 21183 SrcSpanInfo 21184 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 599 5 599 9 21185 , srcInfoPoints = [] 21186 } 21187 "Just"))) 21188 (Var 21189 SrcSpanInfo 21190 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 599 10 599 15 21191 , srcInfoPoints = [] 21192 } 21193 (UnQual 21194 SrcSpanInfo 21195 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 599 10 599 15 21196 , srcInfoPoints = [] 21197 } 21198 (Ident 21199 SrcSpanInfo 21200 { srcInfoSpan = 21201 SrcSpan "tests/examples/RealGHC.lhs" 599 10 599 15 21202 , srcInfoPoints = [] 21203 } 21204 "subst")))) 21205 ]) 21206 Nothing 21207 , Match 21208 SrcSpanInfo 21209 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 1 603 32 21210 , srcInfoPoints = [] 21211 } 21212 (Ident 21213 SrcSpanInfo 21214 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 1 601 6 21215 , srcInfoPoints = [] 21216 } 21217 "match") 21218 [ PVar 21219 SrcSpanInfo 21220 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 7 601 11 21221 , srcInfoPoints = [] 21222 } 21223 (Ident 21224 SrcSpanInfo 21225 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 7 601 11 21226 , srcInfoPoints = [] 21227 } 21228 "menv") 21229 , PVar 21230 SrcSpanInfo 21231 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 12 601 17 21232 , srcInfoPoints = [] 21233 } 21234 (Ident 21235 SrcSpanInfo 21236 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 12 601 17 21237 , srcInfoPoints = [] 21238 } 21239 "subst") 21240 , PParen 21241 SrcSpanInfo 21242 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 18 601 29 21243 , srcInfoPoints = 21244 [ SrcSpan "tests/examples/RealGHC.lhs" 601 18 601 19 21245 , SrcSpan "tests/examples/RealGHC.lhs" 601 28 601 29 21246 ] 21247 } 21248 (PApp 21249 SrcSpanInfo 21250 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 19 601 28 21251 , srcInfoPoints = [] 21252 } 21253 (UnQual 21254 SrcSpanInfo 21255 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 19 601 22 21256 , srcInfoPoints = [] 21257 } 21258 (Ident 21259 SrcSpanInfo 21260 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 19 601 22 21261 , srcInfoPoints = [] 21262 } 21263 "App")) 21264 [ PVar 21265 SrcSpanInfo 21266 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 23 601 25 21267 , srcInfoPoints = [] 21268 } 21269 (Ident 21270 SrcSpanInfo 21271 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 23 601 25 21272 , srcInfoPoints = [] 21273 } 21274 "f1") 21275 , PVar 21276 SrcSpanInfo 21277 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 26 601 28 21278 , srcInfoPoints = [] 21279 } 21280 (Ident 21281 SrcSpanInfo 21282 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 26 601 28 21283 , srcInfoPoints = [] 21284 } 21285 "a1") 21286 ]) 21287 , PParen 21288 SrcSpanInfo 21289 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 30 601 41 21290 , srcInfoPoints = 21291 [ SrcSpan "tests/examples/RealGHC.lhs" 601 30 601 31 21292 , SrcSpan "tests/examples/RealGHC.lhs" 601 40 601 41 21293 ] 21294 } 21295 (PApp 21296 SrcSpanInfo 21297 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 31 601 40 21298 , srcInfoPoints = [] 21299 } 21300 (UnQual 21301 SrcSpanInfo 21302 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 31 601 34 21303 , srcInfoPoints = [] 21304 } 21305 (Ident 21306 SrcSpanInfo 21307 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 31 601 34 21308 , srcInfoPoints = [] 21309 } 21310 "App")) 21311 [ PVar 21312 SrcSpanInfo 21313 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 35 601 37 21314 , srcInfoPoints = [] 21315 } 21316 (Ident 21317 SrcSpanInfo 21318 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 35 601 37 21319 , srcInfoPoints = [] 21320 } 21321 "f2") 21322 , PVar 21323 SrcSpanInfo 21324 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 38 601 40 21325 , srcInfoPoints = [] 21326 } 21327 (Ident 21328 SrcSpanInfo 21329 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 601 38 601 40 21330 , srcInfoPoints = [] 21331 } 21332 "a2") 21333 ]) 21334 ] 21335 (UnGuardedRhs 21336 SrcSpanInfo 21337 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 3 603 32 21338 , srcInfoPoints = 21339 [ SrcSpan "tests/examples/RealGHC.lhs" 602 3 602 4 ] 21340 } 21341 (Do 21342 SrcSpanInfo 21343 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 5 603 32 21344 , srcInfoPoints = 21345 [ SrcSpan "tests/examples/RealGHC.lhs" 602 5 602 7 21346 , SrcSpan "tests/examples/RealGHC.lhs" 602 9 602 10 21347 , SrcSpan "tests/examples/RealGHC.lhs" 603 5 603 6 21348 , SrcSpan "tests/examples/RealGHC.lhs" 603 31 603 32 21349 ] 21350 } 21351 [ Generator 21352 SrcSpanInfo 21353 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 11 602 43 21354 , srcInfoPoints = 21355 [ SrcSpan "tests/examples/RealGHC.lhs" 602 18 602 20 ] 21356 } 21357 (PVar 21358 SrcSpanInfo 21359 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 11 602 17 21360 , srcInfoPoints = [] 21361 } 21362 (Ident 21363 SrcSpanInfo 21364 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 11 602 17 21365 , srcInfoPoints = [] 21366 } 21367 "subst'")) 21368 (App 21369 SrcSpanInfo 21370 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 21 602 43 21371 , srcInfoPoints = [] 21372 } 21373 (App 21374 SrcSpanInfo 21375 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 21 602 40 21376 , srcInfoPoints = [] 21377 } 21378 (App 21379 SrcSpanInfo 21380 { srcInfoSpan = 21381 SrcSpan "tests/examples/RealGHC.lhs" 602 21 602 37 21382 , srcInfoPoints = [] 21383 } 21384 (App 21385 SrcSpanInfo 21386 { srcInfoSpan = 21387 SrcSpan "tests/examples/RealGHC.lhs" 602 21 602 31 21388 , srcInfoPoints = [] 21389 } 21390 (Var 21391 SrcSpanInfo 21392 { srcInfoSpan = 21393 SrcSpan "tests/examples/RealGHC.lhs" 602 21 602 26 21394 , srcInfoPoints = [] 21395 } 21396 (UnQual 21397 SrcSpanInfo 21398 { srcInfoSpan = 21399 SrcSpan "tests/examples/RealGHC.lhs" 602 21 602 26 21400 , srcInfoPoints = [] 21401 } 21402 (Ident 21403 SrcSpanInfo 21404 { srcInfoSpan = 21405 SrcSpan 21406 "tests/examples/RealGHC.lhs" 602 21 602 26 21407 , srcInfoPoints = [] 21408 } 21409 "match"))) 21410 (Var 21411 SrcSpanInfo 21412 { srcInfoSpan = 21413 SrcSpan "tests/examples/RealGHC.lhs" 602 27 602 31 21414 , srcInfoPoints = [] 21415 } 21416 (UnQual 21417 SrcSpanInfo 21418 { srcInfoSpan = 21419 SrcSpan "tests/examples/RealGHC.lhs" 602 27 602 31 21420 , srcInfoPoints = [] 21421 } 21422 (Ident 21423 SrcSpanInfo 21424 { srcInfoSpan = 21425 SrcSpan 21426 "tests/examples/RealGHC.lhs" 602 27 602 31 21427 , srcInfoPoints = [] 21428 } 21429 "menv")))) 21430 (Var 21431 SrcSpanInfo 21432 { srcInfoSpan = 21433 SrcSpan "tests/examples/RealGHC.lhs" 602 32 602 37 21434 , srcInfoPoints = [] 21435 } 21436 (UnQual 21437 SrcSpanInfo 21438 { srcInfoSpan = 21439 SrcSpan "tests/examples/RealGHC.lhs" 602 32 602 37 21440 , srcInfoPoints = [] 21441 } 21442 (Ident 21443 SrcSpanInfo 21444 { srcInfoSpan = 21445 SrcSpan "tests/examples/RealGHC.lhs" 602 32 602 37 21446 , srcInfoPoints = [] 21447 } 21448 "subst")))) 21449 (Var 21450 SrcSpanInfo 21451 { srcInfoSpan = 21452 SrcSpan "tests/examples/RealGHC.lhs" 602 38 602 40 21453 , srcInfoPoints = [] 21454 } 21455 (UnQual 21456 SrcSpanInfo 21457 { srcInfoSpan = 21458 SrcSpan "tests/examples/RealGHC.lhs" 602 38 602 40 21459 , srcInfoPoints = [] 21460 } 21461 (Ident 21462 SrcSpanInfo 21463 { srcInfoSpan = 21464 SrcSpan "tests/examples/RealGHC.lhs" 602 38 602 40 21465 , srcInfoPoints = [] 21466 } 21467 "f1")))) 21468 (Var 21469 SrcSpanInfo 21470 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 602 41 602 43 21471 , srcInfoPoints = [] 21472 } 21473 (UnQual 21474 SrcSpanInfo 21475 { srcInfoSpan = 21476 SrcSpan "tests/examples/RealGHC.lhs" 602 41 602 43 21477 , srcInfoPoints = [] 21478 } 21479 (Ident 21480 SrcSpanInfo 21481 { srcInfoSpan = 21482 SrcSpan "tests/examples/RealGHC.lhs" 602 41 602 43 21483 , srcInfoPoints = [] 21484 } 21485 "f2")))) 21486 , Qualifier 21487 SrcSpanInfo 21488 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 7 603 30 21489 , srcInfoPoints = [] 21490 } 21491 (App 21492 SrcSpanInfo 21493 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 7 603 30 21494 , srcInfoPoints = [] 21495 } 21496 (App 21497 SrcSpanInfo 21498 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 7 603 27 21499 , srcInfoPoints = [] 21500 } 21501 (App 21502 SrcSpanInfo 21503 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 7 603 24 21504 , srcInfoPoints = [] 21505 } 21506 (App 21507 SrcSpanInfo 21508 { srcInfoSpan = 21509 SrcSpan "tests/examples/RealGHC.lhs" 603 7 603 17 21510 , srcInfoPoints = [] 21511 } 21512 (Var 21513 SrcSpanInfo 21514 { srcInfoSpan = 21515 SrcSpan "tests/examples/RealGHC.lhs" 603 7 603 12 21516 , srcInfoPoints = [] 21517 } 21518 (UnQual 21519 SrcSpanInfo 21520 { srcInfoSpan = 21521 SrcSpan "tests/examples/RealGHC.lhs" 603 7 603 12 21522 , srcInfoPoints = [] 21523 } 21524 (Ident 21525 SrcSpanInfo 21526 { srcInfoSpan = 21527 SrcSpan "tests/examples/RealGHC.lhs" 603 7 603 12 21528 , srcInfoPoints = [] 21529 } 21530 "match"))) 21531 (Var 21532 SrcSpanInfo 21533 { srcInfoSpan = 21534 SrcSpan "tests/examples/RealGHC.lhs" 603 13 603 17 21535 , srcInfoPoints = [] 21536 } 21537 (UnQual 21538 SrcSpanInfo 21539 { srcInfoSpan = 21540 SrcSpan "tests/examples/RealGHC.lhs" 603 13 603 17 21541 , srcInfoPoints = [] 21542 } 21543 (Ident 21544 SrcSpanInfo 21545 { srcInfoSpan = 21546 SrcSpan 21547 "tests/examples/RealGHC.lhs" 603 13 603 17 21548 , srcInfoPoints = [] 21549 } 21550 "menv")))) 21551 (Var 21552 SrcSpanInfo 21553 { srcInfoSpan = 21554 SrcSpan "tests/examples/RealGHC.lhs" 603 18 603 24 21555 , srcInfoPoints = [] 21556 } 21557 (UnQual 21558 SrcSpanInfo 21559 { srcInfoSpan = 21560 SrcSpan "tests/examples/RealGHC.lhs" 603 18 603 24 21561 , srcInfoPoints = [] 21562 } 21563 (Ident 21564 SrcSpanInfo 21565 { srcInfoSpan = 21566 SrcSpan "tests/examples/RealGHC.lhs" 603 18 603 24 21567 , srcInfoPoints = [] 21568 } 21569 "subst'")))) 21570 (Var 21571 SrcSpanInfo 21572 { srcInfoSpan = 21573 SrcSpan "tests/examples/RealGHC.lhs" 603 25 603 27 21574 , srcInfoPoints = [] 21575 } 21576 (UnQual 21577 SrcSpanInfo 21578 { srcInfoSpan = 21579 SrcSpan "tests/examples/RealGHC.lhs" 603 25 603 27 21580 , srcInfoPoints = [] 21581 } 21582 (Ident 21583 SrcSpanInfo 21584 { srcInfoSpan = 21585 SrcSpan "tests/examples/RealGHC.lhs" 603 25 603 27 21586 , srcInfoPoints = [] 21587 } 21588 "a1")))) 21589 (Var 21590 SrcSpanInfo 21591 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 603 28 603 30 21592 , srcInfoPoints = [] 21593 } 21594 (UnQual 21595 SrcSpanInfo 21596 { srcInfoSpan = 21597 SrcSpan "tests/examples/RealGHC.lhs" 603 28 603 30 21598 , srcInfoPoints = [] 21599 } 21600 (Ident 21601 SrcSpanInfo 21602 { srcInfoSpan = 21603 SrcSpan "tests/examples/RealGHC.lhs" 603 28 603 30 21604 , srcInfoPoints = [] 21605 } 21606 "a2")))) 21607 ])) 21608 Nothing 21609 , Match 21610 SrcSpanInfo 21611 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 1 608 58 21612 , srcInfoPoints = 21613 [ SrcSpan "tests/examples/RealGHC.lhs" 607 3 607 8 ] 21614 } 21615 (Ident 21616 SrcSpanInfo 21617 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 1 605 6 21618 , srcInfoPoints = [] 21619 } 21620 "match") 21621 [ PVar 21622 SrcSpanInfo 21623 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 7 605 11 21624 , srcInfoPoints = [] 21625 } 21626 (Ident 21627 SrcSpanInfo 21628 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 7 605 11 21629 , srcInfoPoints = [] 21630 } 21631 "menv") 21632 , PVar 21633 SrcSpanInfo 21634 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 12 605 17 21635 , srcInfoPoints = [] 21636 } 21637 (Ident 21638 SrcSpanInfo 21639 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 12 605 17 21640 , srcInfoPoints = [] 21641 } 21642 "subst") 21643 , PParen 21644 SrcSpanInfo 21645 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 18 605 29 21646 , srcInfoPoints = 21647 [ SrcSpan "tests/examples/RealGHC.lhs" 605 18 605 19 21648 , SrcSpan "tests/examples/RealGHC.lhs" 605 28 605 29 21649 ] 21650 } 21651 (PApp 21652 SrcSpanInfo 21653 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 19 605 28 21654 , srcInfoPoints = [] 21655 } 21656 (UnQual 21657 SrcSpanInfo 21658 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 19 605 22 21659 , srcInfoPoints = [] 21660 } 21661 (Ident 21662 SrcSpanInfo 21663 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 19 605 22 21664 , srcInfoPoints = [] 21665 } 21666 "Lam")) 21667 [ PVar 21668 SrcSpanInfo 21669 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 23 605 25 21670 , srcInfoPoints = [] 21671 } 21672 (Ident 21673 SrcSpanInfo 21674 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 23 605 25 21675 , srcInfoPoints = [] 21676 } 21677 "x1") 21678 , PVar 21679 SrcSpanInfo 21680 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 26 605 28 21681 , srcInfoPoints = [] 21682 } 21683 (Ident 21684 SrcSpanInfo 21685 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 26 605 28 21686 , srcInfoPoints = [] 21687 } 21688 "e1") 21689 ]) 21690 , PParen 21691 SrcSpanInfo 21692 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 30 605 41 21693 , srcInfoPoints = 21694 [ SrcSpan "tests/examples/RealGHC.lhs" 605 30 605 31 21695 , SrcSpan "tests/examples/RealGHC.lhs" 605 40 605 41 21696 ] 21697 } 21698 (PApp 21699 SrcSpanInfo 21700 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 31 605 40 21701 , srcInfoPoints = [] 21702 } 21703 (UnQual 21704 SrcSpanInfo 21705 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 31 605 34 21706 , srcInfoPoints = [] 21707 } 21708 (Ident 21709 SrcSpanInfo 21710 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 31 605 34 21711 , srcInfoPoints = [] 21712 } 21713 "Lam")) 21714 [ PVar 21715 SrcSpanInfo 21716 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 35 605 37 21717 , srcInfoPoints = [] 21718 } 21719 (Ident 21720 SrcSpanInfo 21721 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 35 605 37 21722 , srcInfoPoints = [] 21723 } 21724 "x2") 21725 , PVar 21726 SrcSpanInfo 21727 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 38 605 40 21728 , srcInfoPoints = [] 21729 } 21730 (Ident 21731 SrcSpanInfo 21732 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 605 38 605 40 21733 , srcInfoPoints = [] 21734 } 21735 "e2") 21736 ]) 21737 ] 21738 (UnGuardedRhs 21739 SrcSpanInfo 21740 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 3 606 28 21741 , srcInfoPoints = 21742 [ SrcSpan "tests/examples/RealGHC.lhs" 606 3 606 4 ] 21743 } 21744 (App 21745 SrcSpanInfo 21746 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 5 606 28 21747 , srcInfoPoints = [] 21748 } 21749 (App 21750 SrcSpanInfo 21751 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 5 606 25 21752 , srcInfoPoints = [] 21753 } 21754 (App 21755 SrcSpanInfo 21756 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 5 606 22 21757 , srcInfoPoints = [] 21758 } 21759 (App 21760 SrcSpanInfo 21761 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 5 606 16 21762 , srcInfoPoints = [] 21763 } 21764 (Var 21765 SrcSpanInfo 21766 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 5 606 10 21767 , srcInfoPoints = [] 21768 } 21769 (UnQual 21770 SrcSpanInfo 21771 { srcInfoSpan = 21772 SrcSpan "tests/examples/RealGHC.lhs" 606 5 606 10 21773 , srcInfoPoints = [] 21774 } 21775 (Ident 21776 SrcSpanInfo 21777 { srcInfoSpan = 21778 SrcSpan "tests/examples/RealGHC.lhs" 606 5 606 10 21779 , srcInfoPoints = [] 21780 } 21781 "match"))) 21782 (Var 21783 SrcSpanInfo 21784 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 11 606 16 21785 , srcInfoPoints = [] 21786 } 21787 (UnQual 21788 SrcSpanInfo 21789 { srcInfoSpan = 21790 SrcSpan "tests/examples/RealGHC.lhs" 606 11 606 16 21791 , srcInfoPoints = [] 21792 } 21793 (Ident 21794 SrcSpanInfo 21795 { srcInfoSpan = 21796 SrcSpan "tests/examples/RealGHC.lhs" 606 11 606 16 21797 , srcInfoPoints = [] 21798 } 21799 "menv'")))) 21800 (Var 21801 SrcSpanInfo 21802 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 17 606 22 21803 , srcInfoPoints = [] 21804 } 21805 (UnQual 21806 SrcSpanInfo 21807 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 17 606 22 21808 , srcInfoPoints = [] 21809 } 21810 (Ident 21811 SrcSpanInfo 21812 { srcInfoSpan = 21813 SrcSpan "tests/examples/RealGHC.lhs" 606 17 606 22 21814 , srcInfoPoints = [] 21815 } 21816 "subst")))) 21817 (Var 21818 SrcSpanInfo 21819 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 23 606 25 21820 , srcInfoPoints = [] 21821 } 21822 (UnQual 21823 SrcSpanInfo 21824 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 23 606 25 21825 , srcInfoPoints = [] 21826 } 21827 (Ident 21828 SrcSpanInfo 21829 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 23 606 25 21830 , srcInfoPoints = [] 21831 } 21832 "e1")))) 21833 (Var 21834 SrcSpanInfo 21835 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 26 606 28 21836 , srcInfoPoints = [] 21837 } 21838 (UnQual 21839 SrcSpanInfo 21840 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 26 606 28 21841 , srcInfoPoints = [] 21842 } 21843 (Ident 21844 SrcSpanInfo 21845 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 606 26 606 28 21846 , srcInfoPoints = [] 21847 } 21848 "e2"))))) 21849 (Just 21850 (BDecls 21851 SrcSpanInfo 21852 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 5 608 58 21853 , srcInfoPoints = 21854 [ SrcSpan "tests/examples/RealGHC.lhs" 608 5 608 5 21855 , SrcSpan "tests/examples/RealGHC.lhs" 615 1 615 0 21856 ] 21857 } 21858 [ PatBind 21859 SrcSpanInfo 21860 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 5 608 58 21861 , srcInfoPoints = [] 21862 } 21863 (PVar 21864 SrcSpanInfo 21865 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 5 608 10 21866 , srcInfoPoints = [] 21867 } 21868 (Ident 21869 SrcSpanInfo 21870 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 5 608 10 21871 , srcInfoPoints = [] 21872 } 21873 "menv'")) 21874 (UnGuardedRhs 21875 SrcSpanInfo 21876 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 11 608 58 21877 , srcInfoPoints = 21878 [ SrcSpan "tests/examples/RealGHC.lhs" 608 11 608 12 ] 21879 } 21880 (RecUpdate 21881 SrcSpanInfo 21882 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 608 13 608 58 21883 , srcInfoPoints = 21884 [ SrcSpan "tests/examples/RealGHC.lhs" 608 18 608 19 21885 , SrcSpan "tests/examples/RealGHC.lhs" 608 57 608 58 21886 ] 21887 } 21888 (Var 21889 SrcSpanInfo 21890 { srcInfoSpan = 21891 SrcSpan "tests/examples/RealGHC.lhs" 608 13 608 17 21892 , srcInfoPoints = [] 21893 } 21894 (UnQual 21895 SrcSpanInfo 21896 { srcInfoSpan = 21897 SrcSpan "tests/examples/RealGHC.lhs" 608 13 608 17 21898 , srcInfoPoints = [] 21899 } 21900 (Ident 21901 SrcSpanInfo 21902 { srcInfoSpan = 21903 SrcSpan "tests/examples/RealGHC.lhs" 608 13 608 17 21904 , srcInfoPoints = [] 21905 } 21906 "menv"))) 21907 [ FieldUpdate 21908 SrcSpanInfo 21909 { srcInfoSpan = 21910 SrcSpan "tests/examples/RealGHC.lhs" 608 20 608 56 21911 , srcInfoPoints = 21912 [ SrcSpan "tests/examples/RealGHC.lhs" 608 27 608 28 ] 21913 } 21914 (UnQual 21915 SrcSpanInfo 21916 { srcInfoSpan = 21917 SrcSpan "tests/examples/RealGHC.lhs" 608 20 608 26 21918 , srcInfoPoints = [] 21919 } 21920 (Ident 21921 SrcSpanInfo 21922 { srcInfoSpan = 21923 SrcSpan "tests/examples/RealGHC.lhs" 608 20 608 26 21924 , srcInfoPoints = [] 21925 } 21926 "me_env")) 21927 (App 21928 SrcSpanInfo 21929 { srcInfoSpan = 21930 SrcSpan "tests/examples/RealGHC.lhs" 608 29 608 56 21931 , srcInfoPoints = [] 21932 } 21933 (App 21934 SrcSpanInfo 21935 { srcInfoSpan = 21936 SrcSpan "tests/examples/RealGHC.lhs" 608 29 608 53 21937 , srcInfoPoints = [] 21938 } 21939 (App 21940 SrcSpanInfo 21941 { srcInfoSpan = 21942 SrcSpan "tests/examples/RealGHC.lhs" 608 29 608 50 21943 , srcInfoPoints = [] 21944 } 21945 (Var 21946 SrcSpanInfo 21947 { srcInfoSpan = 21948 SrcSpan 21949 "tests/examples/RealGHC.lhs" 608 29 608 36 21950 , srcInfoPoints = [] 21951 } 21952 (UnQual 21953 SrcSpanInfo 21954 { srcInfoSpan = 21955 SrcSpan 21956 "tests/examples/RealGHC.lhs" 608 29 608 36 21957 , srcInfoPoints = [] 21958 } 21959 (Ident 21960 SrcSpanInfo 21961 { srcInfoSpan = 21962 SrcSpan 21963 "tests/examples/RealGHC.lhs" 21964 608 21965 29 21966 608 21967 36 21968 , srcInfoPoints = [] 21969 } 21970 "rnBndr2"))) 21971 (Paren 21972 SrcSpanInfo 21973 { srcInfoSpan = 21974 SrcSpan 21975 "tests/examples/RealGHC.lhs" 608 37 608 50 21976 , srcInfoPoints = 21977 [ SrcSpan 21978 "tests/examples/RealGHC.lhs" 608 37 608 38 21979 , SrcSpan 21980 "tests/examples/RealGHC.lhs" 608 49 608 50 21981 ] 21982 } 21983 (App 21984 SrcSpanInfo 21985 { srcInfoSpan = 21986 SrcSpan 21987 "tests/examples/RealGHC.lhs" 608 38 608 49 21988 , srcInfoPoints = [] 21989 } 21990 (Var 21991 SrcSpanInfo 21992 { srcInfoSpan = 21993 SrcSpan 21994 "tests/examples/RealGHC.lhs" 21995 608 21996 38 21997 608 21998 44 21999 , srcInfoPoints = [] 22000 } 22001 (UnQual 22002 SrcSpanInfo 22003 { srcInfoSpan = 22004 SrcSpan 22005 "tests/examples/RealGHC.lhs" 22006 608 22007 38 22008 608 22009 44 22010 , srcInfoPoints = [] 22011 } 22012 (Ident 22013 SrcSpanInfo 22014 { srcInfoSpan = 22015 SrcSpan 22016 "tests/examples/RealGHC.lhs" 22017 608 22018 38 22019 608 22020 44 22021 , srcInfoPoints = [] 22022 } 22023 "me_env"))) 22024 (Var 22025 SrcSpanInfo 22026 { srcInfoSpan = 22027 SrcSpan 22028 "tests/examples/RealGHC.lhs" 22029 608 22030 45 22031 608 22032 49 22033 , srcInfoPoints = [] 22034 } 22035 (UnQual 22036 SrcSpanInfo 22037 { srcInfoSpan = 22038 SrcSpan 22039 "tests/examples/RealGHC.lhs" 22040 608 22041 45 22042 608 22043 49 22044 , srcInfoPoints = [] 22045 } 22046 (Ident 22047 SrcSpanInfo 22048 { srcInfoSpan = 22049 SrcSpan 22050 "tests/examples/RealGHC.lhs" 22051 608 22052 45 22053 608 22054 49 22055 , srcInfoPoints = [] 22056 } 22057 "menv")))))) 22058 (Var 22059 SrcSpanInfo 22060 { srcInfoSpan = 22061 SrcSpan "tests/examples/RealGHC.lhs" 608 51 608 53 22062 , srcInfoPoints = [] 22063 } 22064 (UnQual 22065 SrcSpanInfo 22066 { srcInfoSpan = 22067 SrcSpan 22068 "tests/examples/RealGHC.lhs" 608 51 608 53 22069 , srcInfoPoints = [] 22070 } 22071 (Ident 22072 SrcSpanInfo 22073 { srcInfoSpan = 22074 SrcSpan 22075 "tests/examples/RealGHC.lhs" 608 51 608 53 22076 , srcInfoPoints = [] 22077 } 22078 "x1")))) 22079 (Var 22080 SrcSpanInfo 22081 { srcInfoSpan = 22082 SrcSpan "tests/examples/RealGHC.lhs" 608 54 608 56 22083 , srcInfoPoints = [] 22084 } 22085 (UnQual 22086 SrcSpanInfo 22087 { srcInfoSpan = 22088 SrcSpan "tests/examples/RealGHC.lhs" 608 54 608 56 22089 , srcInfoPoints = [] 22090 } 22091 (Ident 22092 SrcSpanInfo 22093 { srcInfoSpan = 22094 SrcSpan 22095 "tests/examples/RealGHC.lhs" 608 54 608 56 22096 , srcInfoPoints = [] 22097 } 22098 "x2")))) 22099 ])) 22100 Nothing 22101 ])) 22102 , Match 22103 SrcSpanInfo 22104 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 1 619 38 22105 , srcInfoPoints = 22106 [ SrcSpan "tests/examples/RealGHC.lhs" 617 3 617 8 ] 22107 } 22108 (Ident 22109 SrcSpanInfo 22110 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 1 615 6 22111 , srcInfoPoints = [] 22112 } 22113 "match") 22114 [ PVar 22115 SrcSpanInfo 22116 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 7 615 11 22117 , srcInfoPoints = [] 22118 } 22119 (Ident 22120 SrcSpanInfo 22121 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 7 615 11 22122 , srcInfoPoints = [] 22123 } 22124 "menv") 22125 , PVar 22126 SrcSpanInfo 22127 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 12 615 17 22128 , srcInfoPoints = [] 22129 } 22130 (Ident 22131 SrcSpanInfo 22132 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 12 615 17 22133 , srcInfoPoints = [] 22134 } 22135 "subst") 22136 , PParen 22137 SrcSpanInfo 22138 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 18 615 29 22139 , srcInfoPoints = 22140 [ SrcSpan "tests/examples/RealGHC.lhs" 615 18 615 19 22141 , SrcSpan "tests/examples/RealGHC.lhs" 615 28 615 29 22142 ] 22143 } 22144 (PApp 22145 SrcSpanInfo 22146 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 19 615 28 22147 , srcInfoPoints = [] 22148 } 22149 (UnQual 22150 SrcSpanInfo 22151 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 19 615 22 22152 , srcInfoPoints = [] 22153 } 22154 (Ident 22155 SrcSpanInfo 22156 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 19 615 22 22157 , srcInfoPoints = [] 22158 } 22159 "Lam")) 22160 [ PVar 22161 SrcSpanInfo 22162 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 23 615 25 22163 , srcInfoPoints = [] 22164 } 22165 (Ident 22166 SrcSpanInfo 22167 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 23 615 25 22168 , srcInfoPoints = [] 22169 } 22170 "x1") 22171 , PVar 22172 SrcSpanInfo 22173 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 26 615 28 22174 , srcInfoPoints = [] 22175 } 22176 (Ident 22177 SrcSpanInfo 22178 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 26 615 28 22179 , srcInfoPoints = [] 22180 } 22181 "e1") 22182 ]) 22183 , PVar 22184 SrcSpanInfo 22185 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 30 615 32 22186 , srcInfoPoints = [] 22187 } 22188 (Ident 22189 SrcSpanInfo 22190 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 615 30 615 32 22191 , srcInfoPoints = [] 22192 } 22193 "e2") 22194 ] 22195 (UnGuardedRhs 22196 SrcSpanInfo 22197 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 3 616 56 22198 , srcInfoPoints = 22199 [ SrcSpan "tests/examples/RealGHC.lhs" 616 3 616 4 ] 22200 } 22201 (App 22202 SrcSpanInfo 22203 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 5 616 56 22204 , srcInfoPoints = [] 22205 } 22206 (App 22207 SrcSpanInfo 22208 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 5 616 25 22209 , srcInfoPoints = [] 22210 } 22211 (App 22212 SrcSpanInfo 22213 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 5 616 22 22214 , srcInfoPoints = [] 22215 } 22216 (App 22217 SrcSpanInfo 22218 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 5 616 16 22219 , srcInfoPoints = [] 22220 } 22221 (Var 22222 SrcSpanInfo 22223 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 5 616 10 22224 , srcInfoPoints = [] 22225 } 22226 (UnQual 22227 SrcSpanInfo 22228 { srcInfoSpan = 22229 SrcSpan "tests/examples/RealGHC.lhs" 616 5 616 10 22230 , srcInfoPoints = [] 22231 } 22232 (Ident 22233 SrcSpanInfo 22234 { srcInfoSpan = 22235 SrcSpan "tests/examples/RealGHC.lhs" 616 5 616 10 22236 , srcInfoPoints = [] 22237 } 22238 "match"))) 22239 (Var 22240 SrcSpanInfo 22241 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 11 616 16 22242 , srcInfoPoints = [] 22243 } 22244 (UnQual 22245 SrcSpanInfo 22246 { srcInfoSpan = 22247 SrcSpan "tests/examples/RealGHC.lhs" 616 11 616 16 22248 , srcInfoPoints = [] 22249 } 22250 (Ident 22251 SrcSpanInfo 22252 { srcInfoSpan = 22253 SrcSpan "tests/examples/RealGHC.lhs" 616 11 616 16 22254 , srcInfoPoints = [] 22255 } 22256 "menv'")))) 22257 (Var 22258 SrcSpanInfo 22259 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 17 616 22 22260 , srcInfoPoints = [] 22261 } 22262 (UnQual 22263 SrcSpanInfo 22264 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 17 616 22 22265 , srcInfoPoints = [] 22266 } 22267 (Ident 22268 SrcSpanInfo 22269 { srcInfoSpan = 22270 SrcSpan "tests/examples/RealGHC.lhs" 616 17 616 22 22271 , srcInfoPoints = [] 22272 } 22273 "subst")))) 22274 (Var 22275 SrcSpanInfo 22276 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 23 616 25 22277 , srcInfoPoints = [] 22278 } 22279 (UnQual 22280 SrcSpanInfo 22281 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 23 616 25 22282 , srcInfoPoints = [] 22283 } 22284 (Ident 22285 SrcSpanInfo 22286 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 23 616 25 22287 , srcInfoPoints = [] 22288 } 22289 "e1")))) 22290 (Paren 22291 SrcSpanInfo 22292 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 26 616 56 22293 , srcInfoPoints = 22294 [ SrcSpan "tests/examples/RealGHC.lhs" 616 26 616 27 22295 , SrcSpan "tests/examples/RealGHC.lhs" 616 55 616 56 22296 ] 22297 } 22298 (App 22299 SrcSpanInfo 22300 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 27 616 55 22301 , srcInfoPoints = [] 22302 } 22303 (App 22304 SrcSpanInfo 22305 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 27 616 33 22306 , srcInfoPoints = [] 22307 } 22308 (Con 22309 SrcSpanInfo 22310 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 27 616 30 22311 , srcInfoPoints = [] 22312 } 22313 (UnQual 22314 SrcSpanInfo 22315 { srcInfoSpan = 22316 SrcSpan "tests/examples/RealGHC.lhs" 616 27 616 30 22317 , srcInfoPoints = [] 22318 } 22319 (Ident 22320 SrcSpanInfo 22321 { srcInfoSpan = 22322 SrcSpan "tests/examples/RealGHC.lhs" 616 27 616 30 22323 , srcInfoPoints = [] 22324 } 22325 "App"))) 22326 (Var 22327 SrcSpanInfo 22328 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 31 616 33 22329 , srcInfoPoints = [] 22330 } 22331 (UnQual 22332 SrcSpanInfo 22333 { srcInfoSpan = 22334 SrcSpan "tests/examples/RealGHC.lhs" 616 31 616 33 22335 , srcInfoPoints = [] 22336 } 22337 (Ident 22338 SrcSpanInfo 22339 { srcInfoSpan = 22340 SrcSpan "tests/examples/RealGHC.lhs" 616 31 616 33 22341 , srcInfoPoints = [] 22342 } 22343 "e2")))) 22344 (Paren 22345 SrcSpanInfo 22346 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 34 616 55 22347 , srcInfoPoints = 22348 [ SrcSpan "tests/examples/RealGHC.lhs" 616 34 616 35 22349 , SrcSpan "tests/examples/RealGHC.lhs" 616 54 616 55 22350 ] 22351 } 22352 (App 22353 SrcSpanInfo 22354 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 616 35 616 54 22355 , srcInfoPoints = [] 22356 } 22357 (Var 22358 SrcSpanInfo 22359 { srcInfoSpan = 22360 SrcSpan "tests/examples/RealGHC.lhs" 616 35 616 48 22361 , srcInfoPoints = [] 22362 } 22363 (UnQual 22364 SrcSpanInfo 22365 { srcInfoSpan = 22366 SrcSpan "tests/examples/RealGHC.lhs" 616 35 616 48 22367 , srcInfoPoints = [] 22368 } 22369 (Ident 22370 SrcSpanInfo 22371 { srcInfoSpan = 22372 SrcSpan "tests/examples/RealGHC.lhs" 616 35 616 48 22373 , srcInfoPoints = [] 22374 } 22375 "varToCoreExpr"))) 22376 (Var 22377 SrcSpanInfo 22378 { srcInfoSpan = 22379 SrcSpan "tests/examples/RealGHC.lhs" 616 49 616 54 22380 , srcInfoPoints = [] 22381 } 22382 (UnQual 22383 SrcSpanInfo 22384 { srcInfoSpan = 22385 SrcSpan "tests/examples/RealGHC.lhs" 616 49 616 54 22386 , srcInfoPoints = [] 22387 } 22388 (Ident 22389 SrcSpanInfo 22390 { srcInfoSpan = 22391 SrcSpan "tests/examples/RealGHC.lhs" 616 49 616 54 22392 , srcInfoPoints = [] 22393 } 22394 "new_x"))))))))) 22395 (Just 22396 (BDecls 22397 SrcSpanInfo 22398 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 5 619 38 22399 , srcInfoPoints = 22400 [ SrcSpan "tests/examples/RealGHC.lhs" 618 5 618 5 22401 , SrcSpan "tests/examples/RealGHC.lhs" 619 5 619 5 22402 , SrcSpan "tests/examples/RealGHC.lhs" 623 1 623 0 22403 ] 22404 } 22405 [ PatBind 22406 SrcSpanInfo 22407 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 5 618 48 22408 , srcInfoPoints = [] 22409 } 22410 (PTuple 22411 SrcSpanInfo 22412 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 5 618 21 22413 , srcInfoPoints = 22414 [ SrcSpan "tests/examples/RealGHC.lhs" 618 5 618 6 22415 , SrcSpan "tests/examples/RealGHC.lhs" 618 13 618 14 22416 , SrcSpan "tests/examples/RealGHC.lhs" 618 20 618 21 22417 ] 22418 } 22419 Boxed 22420 [ PVar 22421 SrcSpanInfo 22422 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 6 618 13 22423 , srcInfoPoints = [] 22424 } 22425 (Ident 22426 SrcSpanInfo 22427 { srcInfoSpan = 22428 SrcSpan "tests/examples/RealGHC.lhs" 618 6 618 13 22429 , srcInfoPoints = [] 22430 } 22431 "rn_env'") 22432 , PVar 22433 SrcSpanInfo 22434 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 15 618 20 22435 , srcInfoPoints = [] 22436 } 22437 (Ident 22438 SrcSpanInfo 22439 { srcInfoSpan = 22440 SrcSpan "tests/examples/RealGHC.lhs" 618 15 618 20 22441 , srcInfoPoints = [] 22442 } 22443 "new_x") 22444 ]) 22445 (UnGuardedRhs 22446 SrcSpanInfo 22447 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 22 618 48 22448 , srcInfoPoints = 22449 [ SrcSpan "tests/examples/RealGHC.lhs" 618 22 618 23 ] 22450 } 22451 (App 22452 SrcSpanInfo 22453 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 618 24 618 48 22454 , srcInfoPoints = [] 22455 } 22456 (App 22457 SrcSpanInfo 22458 { srcInfoSpan = 22459 SrcSpan "tests/examples/RealGHC.lhs" 618 24 618 45 22460 , srcInfoPoints = [] 22461 } 22462 (Var 22463 SrcSpanInfo 22464 { srcInfoSpan = 22465 SrcSpan "tests/examples/RealGHC.lhs" 618 24 618 31 22466 , srcInfoPoints = [] 22467 } 22468 (UnQual 22469 SrcSpanInfo 22470 { srcInfoSpan = 22471 SrcSpan "tests/examples/RealGHC.lhs" 618 24 618 31 22472 , srcInfoPoints = [] 22473 } 22474 (Ident 22475 SrcSpanInfo 22476 { srcInfoSpan = 22477 SrcSpan "tests/examples/RealGHC.lhs" 618 24 618 31 22478 , srcInfoPoints = [] 22479 } 22480 "rnBndrL"))) 22481 (Paren 22482 SrcSpanInfo 22483 { srcInfoSpan = 22484 SrcSpan "tests/examples/RealGHC.lhs" 618 32 618 45 22485 , srcInfoPoints = 22486 [ SrcSpan "tests/examples/RealGHC.lhs" 618 32 618 33 22487 , SrcSpan "tests/examples/RealGHC.lhs" 618 44 618 45 22488 ] 22489 } 22490 (App 22491 SrcSpanInfo 22492 { srcInfoSpan = 22493 SrcSpan "tests/examples/RealGHC.lhs" 618 33 618 44 22494 , srcInfoPoints = [] 22495 } 22496 (Var 22497 SrcSpanInfo 22498 { srcInfoSpan = 22499 SrcSpan "tests/examples/RealGHC.lhs" 618 33 618 39 22500 , srcInfoPoints = [] 22501 } 22502 (UnQual 22503 SrcSpanInfo 22504 { srcInfoSpan = 22505 SrcSpan 22506 "tests/examples/RealGHC.lhs" 618 33 618 39 22507 , srcInfoPoints = [] 22508 } 22509 (Ident 22510 SrcSpanInfo 22511 { srcInfoSpan = 22512 SrcSpan 22513 "tests/examples/RealGHC.lhs" 618 33 618 39 22514 , srcInfoPoints = [] 22515 } 22516 "me_env"))) 22517 (Var 22518 SrcSpanInfo 22519 { srcInfoSpan = 22520 SrcSpan "tests/examples/RealGHC.lhs" 618 40 618 44 22521 , srcInfoPoints = [] 22522 } 22523 (UnQual 22524 SrcSpanInfo 22525 { srcInfoSpan = 22526 SrcSpan 22527 "tests/examples/RealGHC.lhs" 618 40 618 44 22528 , srcInfoPoints = [] 22529 } 22530 (Ident 22531 SrcSpanInfo 22532 { srcInfoSpan = 22533 SrcSpan 22534 "tests/examples/RealGHC.lhs" 618 40 618 44 22535 , srcInfoPoints = [] 22536 } 22537 "menv")))))) 22538 (Var 22539 SrcSpanInfo 22540 { srcInfoSpan = 22541 SrcSpan "tests/examples/RealGHC.lhs" 618 46 618 48 22542 , srcInfoPoints = [] 22543 } 22544 (UnQual 22545 SrcSpanInfo 22546 { srcInfoSpan = 22547 SrcSpan "tests/examples/RealGHC.lhs" 618 46 618 48 22548 , srcInfoPoints = [] 22549 } 22550 (Ident 22551 SrcSpanInfo 22552 { srcInfoSpan = 22553 SrcSpan "tests/examples/RealGHC.lhs" 618 46 618 48 22554 , srcInfoPoints = [] 22555 } 22556 "x1"))))) 22557 Nothing 22558 , PatBind 22559 SrcSpanInfo 22560 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 5 619 38 22561 , srcInfoPoints = [] 22562 } 22563 (PVar 22564 SrcSpanInfo 22565 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 5 619 10 22566 , srcInfoPoints = [] 22567 } 22568 (Ident 22569 SrcSpanInfo 22570 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 5 619 10 22571 , srcInfoPoints = [] 22572 } 22573 "menv'")) 22574 (UnGuardedRhs 22575 SrcSpanInfo 22576 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 11 619 38 22577 , srcInfoPoints = 22578 [ SrcSpan "tests/examples/RealGHC.lhs" 619 11 619 12 ] 22579 } 22580 (RecUpdate 22581 SrcSpanInfo 22582 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 619 13 619 38 22583 , srcInfoPoints = 22584 [ SrcSpan "tests/examples/RealGHC.lhs" 619 18 619 19 22585 , SrcSpan "tests/examples/RealGHC.lhs" 619 37 619 38 22586 ] 22587 } 22588 (Var 22589 SrcSpanInfo 22590 { srcInfoSpan = 22591 SrcSpan "tests/examples/RealGHC.lhs" 619 13 619 17 22592 , srcInfoPoints = [] 22593 } 22594 (UnQual 22595 SrcSpanInfo 22596 { srcInfoSpan = 22597 SrcSpan "tests/examples/RealGHC.lhs" 619 13 619 17 22598 , srcInfoPoints = [] 22599 } 22600 (Ident 22601 SrcSpanInfo 22602 { srcInfoSpan = 22603 SrcSpan "tests/examples/RealGHC.lhs" 619 13 619 17 22604 , srcInfoPoints = [] 22605 } 22606 "menv"))) 22607 [ FieldUpdate 22608 SrcSpanInfo 22609 { srcInfoSpan = 22610 SrcSpan "tests/examples/RealGHC.lhs" 619 20 619 36 22611 , srcInfoPoints = 22612 [ SrcSpan "tests/examples/RealGHC.lhs" 619 27 619 28 ] 22613 } 22614 (UnQual 22615 SrcSpanInfo 22616 { srcInfoSpan = 22617 SrcSpan "tests/examples/RealGHC.lhs" 619 20 619 26 22618 , srcInfoPoints = [] 22619 } 22620 (Ident 22621 SrcSpanInfo 22622 { srcInfoSpan = 22623 SrcSpan "tests/examples/RealGHC.lhs" 619 20 619 26 22624 , srcInfoPoints = [] 22625 } 22626 "me_env")) 22627 (Var 22628 SrcSpanInfo 22629 { srcInfoSpan = 22630 SrcSpan "tests/examples/RealGHC.lhs" 619 29 619 36 22631 , srcInfoPoints = [] 22632 } 22633 (UnQual 22634 SrcSpanInfo 22635 { srcInfoSpan = 22636 SrcSpan "tests/examples/RealGHC.lhs" 619 29 619 36 22637 , srcInfoPoints = [] 22638 } 22639 (Ident 22640 SrcSpanInfo 22641 { srcInfoSpan = 22642 SrcSpan "tests/examples/RealGHC.lhs" 619 29 619 36 22643 , srcInfoPoints = [] 22644 } 22645 "rn_env'"))) 22646 ])) 22647 Nothing 22648 ])) 22649 , Match 22650 SrcSpanInfo 22651 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 1 627 38 22652 , srcInfoPoints = 22653 [ SrcSpan "tests/examples/RealGHC.lhs" 625 3 625 8 ] 22654 } 22655 (Ident 22656 SrcSpanInfo 22657 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 1 623 6 22658 , srcInfoPoints = [] 22659 } 22660 "match") 22661 [ PVar 22662 SrcSpanInfo 22663 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 7 623 11 22664 , srcInfoPoints = [] 22665 } 22666 (Ident 22667 SrcSpanInfo 22668 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 7 623 11 22669 , srcInfoPoints = [] 22670 } 22671 "menv") 22672 , PVar 22673 SrcSpanInfo 22674 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 12 623 17 22675 , srcInfoPoints = [] 22676 } 22677 (Ident 22678 SrcSpanInfo 22679 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 12 623 17 22680 , srcInfoPoints = [] 22681 } 22682 "subst") 22683 , PVar 22684 SrcSpanInfo 22685 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 18 623 20 22686 , srcInfoPoints = [] 22687 } 22688 (Ident 22689 SrcSpanInfo 22690 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 18 623 20 22691 , srcInfoPoints = [] 22692 } 22693 "e1") 22694 , PParen 22695 SrcSpanInfo 22696 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 21 623 32 22697 , srcInfoPoints = 22698 [ SrcSpan "tests/examples/RealGHC.lhs" 623 21 623 22 22699 , SrcSpan "tests/examples/RealGHC.lhs" 623 31 623 32 22700 ] 22701 } 22702 (PApp 22703 SrcSpanInfo 22704 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 22 623 31 22705 , srcInfoPoints = [] 22706 } 22707 (UnQual 22708 SrcSpanInfo 22709 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 22 623 25 22710 , srcInfoPoints = [] 22711 } 22712 (Ident 22713 SrcSpanInfo 22714 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 22 623 25 22715 , srcInfoPoints = [] 22716 } 22717 "Lam")) 22718 [ PVar 22719 SrcSpanInfo 22720 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 26 623 28 22721 , srcInfoPoints = [] 22722 } 22723 (Ident 22724 SrcSpanInfo 22725 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 26 623 28 22726 , srcInfoPoints = [] 22727 } 22728 "x2") 22729 , PVar 22730 SrcSpanInfo 22731 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 29 623 31 22732 , srcInfoPoints = [] 22733 } 22734 (Ident 22735 SrcSpanInfo 22736 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 623 29 623 31 22737 , srcInfoPoints = [] 22738 } 22739 "e2") 22740 ]) 22741 ] 22742 (UnGuardedRhs 22743 SrcSpanInfo 22744 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 3 624 56 22745 , srcInfoPoints = 22746 [ SrcSpan "tests/examples/RealGHC.lhs" 624 3 624 4 ] 22747 } 22748 (App 22749 SrcSpanInfo 22750 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 5 624 56 22751 , srcInfoPoints = [] 22752 } 22753 (App 22754 SrcSpanInfo 22755 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 5 624 53 22756 , srcInfoPoints = [] 22757 } 22758 (App 22759 SrcSpanInfo 22760 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 5 624 22 22761 , srcInfoPoints = [] 22762 } 22763 (App 22764 SrcSpanInfo 22765 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 5 624 16 22766 , srcInfoPoints = [] 22767 } 22768 (Var 22769 SrcSpanInfo 22770 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 5 624 10 22771 , srcInfoPoints = [] 22772 } 22773 (UnQual 22774 SrcSpanInfo 22775 { srcInfoSpan = 22776 SrcSpan "tests/examples/RealGHC.lhs" 624 5 624 10 22777 , srcInfoPoints = [] 22778 } 22779 (Ident 22780 SrcSpanInfo 22781 { srcInfoSpan = 22782 SrcSpan "tests/examples/RealGHC.lhs" 624 5 624 10 22783 , srcInfoPoints = [] 22784 } 22785 "match"))) 22786 (Var 22787 SrcSpanInfo 22788 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 11 624 16 22789 , srcInfoPoints = [] 22790 } 22791 (UnQual 22792 SrcSpanInfo 22793 { srcInfoSpan = 22794 SrcSpan "tests/examples/RealGHC.lhs" 624 11 624 16 22795 , srcInfoPoints = [] 22796 } 22797 (Ident 22798 SrcSpanInfo 22799 { srcInfoSpan = 22800 SrcSpan "tests/examples/RealGHC.lhs" 624 11 624 16 22801 , srcInfoPoints = [] 22802 } 22803 "menv'")))) 22804 (Var 22805 SrcSpanInfo 22806 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 17 624 22 22807 , srcInfoPoints = [] 22808 } 22809 (UnQual 22810 SrcSpanInfo 22811 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 17 624 22 22812 , srcInfoPoints = [] 22813 } 22814 (Ident 22815 SrcSpanInfo 22816 { srcInfoSpan = 22817 SrcSpan "tests/examples/RealGHC.lhs" 624 17 624 22 22818 , srcInfoPoints = [] 22819 } 22820 "subst")))) 22821 (Paren 22822 SrcSpanInfo 22823 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 23 624 53 22824 , srcInfoPoints = 22825 [ SrcSpan "tests/examples/RealGHC.lhs" 624 23 624 24 22826 , SrcSpan "tests/examples/RealGHC.lhs" 624 52 624 53 22827 ] 22828 } 22829 (App 22830 SrcSpanInfo 22831 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 24 624 52 22832 , srcInfoPoints = [] 22833 } 22834 (App 22835 SrcSpanInfo 22836 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 24 624 30 22837 , srcInfoPoints = [] 22838 } 22839 (Con 22840 SrcSpanInfo 22841 { srcInfoSpan = 22842 SrcSpan "tests/examples/RealGHC.lhs" 624 24 624 27 22843 , srcInfoPoints = [] 22844 } 22845 (UnQual 22846 SrcSpanInfo 22847 { srcInfoSpan = 22848 SrcSpan "tests/examples/RealGHC.lhs" 624 24 624 27 22849 , srcInfoPoints = [] 22850 } 22851 (Ident 22852 SrcSpanInfo 22853 { srcInfoSpan = 22854 SrcSpan "tests/examples/RealGHC.lhs" 624 24 624 27 22855 , srcInfoPoints = [] 22856 } 22857 "App"))) 22858 (Var 22859 SrcSpanInfo 22860 { srcInfoSpan = 22861 SrcSpan "tests/examples/RealGHC.lhs" 624 28 624 30 22862 , srcInfoPoints = [] 22863 } 22864 (UnQual 22865 SrcSpanInfo 22866 { srcInfoSpan = 22867 SrcSpan "tests/examples/RealGHC.lhs" 624 28 624 30 22868 , srcInfoPoints = [] 22869 } 22870 (Ident 22871 SrcSpanInfo 22872 { srcInfoSpan = 22873 SrcSpan "tests/examples/RealGHC.lhs" 624 28 624 30 22874 , srcInfoPoints = [] 22875 } 22876 "e1")))) 22877 (Paren 22878 SrcSpanInfo 22879 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 31 624 52 22880 , srcInfoPoints = 22881 [ SrcSpan "tests/examples/RealGHC.lhs" 624 31 624 32 22882 , SrcSpan "tests/examples/RealGHC.lhs" 624 51 624 52 22883 ] 22884 } 22885 (App 22886 SrcSpanInfo 22887 { srcInfoSpan = 22888 SrcSpan "tests/examples/RealGHC.lhs" 624 32 624 51 22889 , srcInfoPoints = [] 22890 } 22891 (Var 22892 SrcSpanInfo 22893 { srcInfoSpan = 22894 SrcSpan "tests/examples/RealGHC.lhs" 624 32 624 45 22895 , srcInfoPoints = [] 22896 } 22897 (UnQual 22898 SrcSpanInfo 22899 { srcInfoSpan = 22900 SrcSpan "tests/examples/RealGHC.lhs" 624 32 624 45 22901 , srcInfoPoints = [] 22902 } 22903 (Ident 22904 SrcSpanInfo 22905 { srcInfoSpan = 22906 SrcSpan "tests/examples/RealGHC.lhs" 624 32 624 45 22907 , srcInfoPoints = [] 22908 } 22909 "varToCoreExpr"))) 22910 (Var 22911 SrcSpanInfo 22912 { srcInfoSpan = 22913 SrcSpan "tests/examples/RealGHC.lhs" 624 46 624 51 22914 , srcInfoPoints = [] 22915 } 22916 (UnQual 22917 SrcSpanInfo 22918 { srcInfoSpan = 22919 SrcSpan "tests/examples/RealGHC.lhs" 624 46 624 51 22920 , srcInfoPoints = [] 22921 } 22922 (Ident 22923 SrcSpanInfo 22924 { srcInfoSpan = 22925 SrcSpan "tests/examples/RealGHC.lhs" 624 46 624 51 22926 , srcInfoPoints = [] 22927 } 22928 "new_x")))))))) 22929 (Var 22930 SrcSpanInfo 22931 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 54 624 56 22932 , srcInfoPoints = [] 22933 } 22934 (UnQual 22935 SrcSpanInfo 22936 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 54 624 56 22937 , srcInfoPoints = [] 22938 } 22939 (Ident 22940 SrcSpanInfo 22941 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 624 54 624 56 22942 , srcInfoPoints = [] 22943 } 22944 "e2"))))) 22945 (Just 22946 (BDecls 22947 SrcSpanInfo 22948 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 5 627 38 22949 , srcInfoPoints = 22950 [ SrcSpan "tests/examples/RealGHC.lhs" 626 5 626 5 22951 , SrcSpan "tests/examples/RealGHC.lhs" 627 5 627 5 22952 , SrcSpan "tests/examples/RealGHC.lhs" 629 1 629 0 22953 ] 22954 } 22955 [ PatBind 22956 SrcSpanInfo 22957 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 5 626 48 22958 , srcInfoPoints = [] 22959 } 22960 (PTuple 22961 SrcSpanInfo 22962 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 5 626 21 22963 , srcInfoPoints = 22964 [ SrcSpan "tests/examples/RealGHC.lhs" 626 5 626 6 22965 , SrcSpan "tests/examples/RealGHC.lhs" 626 13 626 14 22966 , SrcSpan "tests/examples/RealGHC.lhs" 626 20 626 21 22967 ] 22968 } 22969 Boxed 22970 [ PVar 22971 SrcSpanInfo 22972 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 6 626 13 22973 , srcInfoPoints = [] 22974 } 22975 (Ident 22976 SrcSpanInfo 22977 { srcInfoSpan = 22978 SrcSpan "tests/examples/RealGHC.lhs" 626 6 626 13 22979 , srcInfoPoints = [] 22980 } 22981 "rn_env'") 22982 , PVar 22983 SrcSpanInfo 22984 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 15 626 20 22985 , srcInfoPoints = [] 22986 } 22987 (Ident 22988 SrcSpanInfo 22989 { srcInfoSpan = 22990 SrcSpan "tests/examples/RealGHC.lhs" 626 15 626 20 22991 , srcInfoPoints = [] 22992 } 22993 "new_x") 22994 ]) 22995 (UnGuardedRhs 22996 SrcSpanInfo 22997 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 22 626 48 22998 , srcInfoPoints = 22999 [ SrcSpan "tests/examples/RealGHC.lhs" 626 22 626 23 ] 23000 } 23001 (App 23002 SrcSpanInfo 23003 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 626 24 626 48 23004 , srcInfoPoints = [] 23005 } 23006 (App 23007 SrcSpanInfo 23008 { srcInfoSpan = 23009 SrcSpan "tests/examples/RealGHC.lhs" 626 24 626 45 23010 , srcInfoPoints = [] 23011 } 23012 (Var 23013 SrcSpanInfo 23014 { srcInfoSpan = 23015 SrcSpan "tests/examples/RealGHC.lhs" 626 24 626 31 23016 , srcInfoPoints = [] 23017 } 23018 (UnQual 23019 SrcSpanInfo 23020 { srcInfoSpan = 23021 SrcSpan "tests/examples/RealGHC.lhs" 626 24 626 31 23022 , srcInfoPoints = [] 23023 } 23024 (Ident 23025 SrcSpanInfo 23026 { srcInfoSpan = 23027 SrcSpan "tests/examples/RealGHC.lhs" 626 24 626 31 23028 , srcInfoPoints = [] 23029 } 23030 "rnBndrR"))) 23031 (Paren 23032 SrcSpanInfo 23033 { srcInfoSpan = 23034 SrcSpan "tests/examples/RealGHC.lhs" 626 32 626 45 23035 , srcInfoPoints = 23036 [ SrcSpan "tests/examples/RealGHC.lhs" 626 32 626 33 23037 , SrcSpan "tests/examples/RealGHC.lhs" 626 44 626 45 23038 ] 23039 } 23040 (App 23041 SrcSpanInfo 23042 { srcInfoSpan = 23043 SrcSpan "tests/examples/RealGHC.lhs" 626 33 626 44 23044 , srcInfoPoints = [] 23045 } 23046 (Var 23047 SrcSpanInfo 23048 { srcInfoSpan = 23049 SrcSpan "tests/examples/RealGHC.lhs" 626 33 626 39 23050 , srcInfoPoints = [] 23051 } 23052 (UnQual 23053 SrcSpanInfo 23054 { srcInfoSpan = 23055 SrcSpan 23056 "tests/examples/RealGHC.lhs" 626 33 626 39 23057 , srcInfoPoints = [] 23058 } 23059 (Ident 23060 SrcSpanInfo 23061 { srcInfoSpan = 23062 SrcSpan 23063 "tests/examples/RealGHC.lhs" 626 33 626 39 23064 , srcInfoPoints = [] 23065 } 23066 "me_env"))) 23067 (Var 23068 SrcSpanInfo 23069 { srcInfoSpan = 23070 SrcSpan "tests/examples/RealGHC.lhs" 626 40 626 44 23071 , srcInfoPoints = [] 23072 } 23073 (UnQual 23074 SrcSpanInfo 23075 { srcInfoSpan = 23076 SrcSpan 23077 "tests/examples/RealGHC.lhs" 626 40 626 44 23078 , srcInfoPoints = [] 23079 } 23080 (Ident 23081 SrcSpanInfo 23082 { srcInfoSpan = 23083 SrcSpan 23084 "tests/examples/RealGHC.lhs" 626 40 626 44 23085 , srcInfoPoints = [] 23086 } 23087 "menv")))))) 23088 (Var 23089 SrcSpanInfo 23090 { srcInfoSpan = 23091 SrcSpan "tests/examples/RealGHC.lhs" 626 46 626 48 23092 , srcInfoPoints = [] 23093 } 23094 (UnQual 23095 SrcSpanInfo 23096 { srcInfoSpan = 23097 SrcSpan "tests/examples/RealGHC.lhs" 626 46 626 48 23098 , srcInfoPoints = [] 23099 } 23100 (Ident 23101 SrcSpanInfo 23102 { srcInfoSpan = 23103 SrcSpan "tests/examples/RealGHC.lhs" 626 46 626 48 23104 , srcInfoPoints = [] 23105 } 23106 "x2"))))) 23107 Nothing 23108 , PatBind 23109 SrcSpanInfo 23110 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 5 627 38 23111 , srcInfoPoints = [] 23112 } 23113 (PVar 23114 SrcSpanInfo 23115 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 5 627 10 23116 , srcInfoPoints = [] 23117 } 23118 (Ident 23119 SrcSpanInfo 23120 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 5 627 10 23121 , srcInfoPoints = [] 23122 } 23123 "menv'")) 23124 (UnGuardedRhs 23125 SrcSpanInfo 23126 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 11 627 38 23127 , srcInfoPoints = 23128 [ SrcSpan "tests/examples/RealGHC.lhs" 627 11 627 12 ] 23129 } 23130 (RecUpdate 23131 SrcSpanInfo 23132 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 627 13 627 38 23133 , srcInfoPoints = 23134 [ SrcSpan "tests/examples/RealGHC.lhs" 627 18 627 19 23135 , SrcSpan "tests/examples/RealGHC.lhs" 627 37 627 38 23136 ] 23137 } 23138 (Var 23139 SrcSpanInfo 23140 { srcInfoSpan = 23141 SrcSpan "tests/examples/RealGHC.lhs" 627 13 627 17 23142 , srcInfoPoints = [] 23143 } 23144 (UnQual 23145 SrcSpanInfo 23146 { srcInfoSpan = 23147 SrcSpan "tests/examples/RealGHC.lhs" 627 13 627 17 23148 , srcInfoPoints = [] 23149 } 23150 (Ident 23151 SrcSpanInfo 23152 { srcInfoSpan = 23153 SrcSpan "tests/examples/RealGHC.lhs" 627 13 627 17 23154 , srcInfoPoints = [] 23155 } 23156 "menv"))) 23157 [ FieldUpdate 23158 SrcSpanInfo 23159 { srcInfoSpan = 23160 SrcSpan "tests/examples/RealGHC.lhs" 627 20 627 36 23161 , srcInfoPoints = 23162 [ SrcSpan "tests/examples/RealGHC.lhs" 627 27 627 28 ] 23163 } 23164 (UnQual 23165 SrcSpanInfo 23166 { srcInfoSpan = 23167 SrcSpan "tests/examples/RealGHC.lhs" 627 20 627 26 23168 , srcInfoPoints = [] 23169 } 23170 (Ident 23171 SrcSpanInfo 23172 { srcInfoSpan = 23173 SrcSpan "tests/examples/RealGHC.lhs" 627 20 627 26 23174 , srcInfoPoints = [] 23175 } 23176 "me_env")) 23177 (Var 23178 SrcSpanInfo 23179 { srcInfoSpan = 23180 SrcSpan "tests/examples/RealGHC.lhs" 627 29 627 36 23181 , srcInfoPoints = [] 23182 } 23183 (UnQual 23184 SrcSpanInfo 23185 { srcInfoSpan = 23186 SrcSpan "tests/examples/RealGHC.lhs" 627 29 627 36 23187 , srcInfoPoints = [] 23188 } 23189 (Ident 23190 SrcSpanInfo 23191 { srcInfoSpan = 23192 SrcSpan "tests/examples/RealGHC.lhs" 627 29 627 36 23193 , srcInfoPoints = [] 23194 } 23195 "rn_env'"))) 23196 ])) 23197 Nothing 23198 ])) 23199 , Match 23200 SrcSpanInfo 23201 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 1 634 6 23202 , srcInfoPoints = [] 23203 } 23204 (Ident 23205 SrcSpanInfo 23206 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 1 629 6 23207 , srcInfoPoints = [] 23208 } 23209 "match") 23210 [ PVar 23211 SrcSpanInfo 23212 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 7 629 11 23213 , srcInfoPoints = [] 23214 } 23215 (Ident 23216 SrcSpanInfo 23217 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 7 629 11 23218 , srcInfoPoints = [] 23219 } 23220 "menv") 23221 , PVar 23222 SrcSpanInfo 23223 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 12 629 17 23224 , srcInfoPoints = [] 23225 } 23226 (Ident 23227 SrcSpanInfo 23228 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 12 629 17 23229 , srcInfoPoints = [] 23230 } 23231 "subst") 23232 , PParen 23233 SrcSpanInfo 23234 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 18 629 40 23235 , srcInfoPoints = 23236 [ SrcSpan "tests/examples/RealGHC.lhs" 629 18 629 19 23237 , SrcSpan "tests/examples/RealGHC.lhs" 629 39 629 40 23238 ] 23239 } 23240 (PApp 23241 SrcSpanInfo 23242 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 19 629 39 23243 , srcInfoPoints = [] 23244 } 23245 (UnQual 23246 SrcSpanInfo 23247 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 19 629 23 23248 , srcInfoPoints = [] 23249 } 23250 (Ident 23251 SrcSpanInfo 23252 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 19 629 23 23253 , srcInfoPoints = [] 23254 } 23255 "Case")) 23256 [ PVar 23257 SrcSpanInfo 23258 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 24 629 26 23259 , srcInfoPoints = [] 23260 } 23261 (Ident 23262 SrcSpanInfo 23263 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 24 629 26 23264 , srcInfoPoints = [] 23265 } 23266 "e1") 23267 , PVar 23268 SrcSpanInfo 23269 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 27 629 29 23270 , srcInfoPoints = [] 23271 } 23272 (Ident 23273 SrcSpanInfo 23274 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 27 629 29 23275 , srcInfoPoints = [] 23276 } 23277 "x1") 23278 , PVar 23279 SrcSpanInfo 23280 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 30 629 33 23281 , srcInfoPoints = [] 23282 } 23283 (Ident 23284 SrcSpanInfo 23285 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 30 629 33 23286 , srcInfoPoints = [] 23287 } 23288 "ty1") 23289 , PVar 23290 SrcSpanInfo 23291 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 34 629 39 23292 , srcInfoPoints = [] 23293 } 23294 (Ident 23295 SrcSpanInfo 23296 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 34 629 39 23297 , srcInfoPoints = [] 23298 } 23299 "alts1") 23300 ]) 23301 , PParen 23302 SrcSpanInfo 23303 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 41 629 63 23304 , srcInfoPoints = 23305 [ SrcSpan "tests/examples/RealGHC.lhs" 629 41 629 42 23306 , SrcSpan "tests/examples/RealGHC.lhs" 629 62 629 63 23307 ] 23308 } 23309 (PApp 23310 SrcSpanInfo 23311 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 42 629 62 23312 , srcInfoPoints = [] 23313 } 23314 (UnQual 23315 SrcSpanInfo 23316 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 42 629 46 23317 , srcInfoPoints = [] 23318 } 23319 (Ident 23320 SrcSpanInfo 23321 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 42 629 46 23322 , srcInfoPoints = [] 23323 } 23324 "Case")) 23325 [ PVar 23326 SrcSpanInfo 23327 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 47 629 49 23328 , srcInfoPoints = [] 23329 } 23330 (Ident 23331 SrcSpanInfo 23332 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 47 629 49 23333 , srcInfoPoints = [] 23334 } 23335 "e2") 23336 , PVar 23337 SrcSpanInfo 23338 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 50 629 52 23339 , srcInfoPoints = [] 23340 } 23341 (Ident 23342 SrcSpanInfo 23343 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 50 629 52 23344 , srcInfoPoints = [] 23345 } 23346 "x2") 23347 , PVar 23348 SrcSpanInfo 23349 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 53 629 56 23350 , srcInfoPoints = [] 23351 } 23352 (Ident 23353 SrcSpanInfo 23354 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 53 629 56 23355 , srcInfoPoints = [] 23356 } 23357 "ty2") 23358 , PVar 23359 SrcSpanInfo 23360 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 57 629 62 23361 , srcInfoPoints = [] 23362 } 23363 (Ident 23364 SrcSpanInfo 23365 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 629 57 629 62 23366 , srcInfoPoints = [] 23367 } 23368 "alts2") 23369 ]) 23370 ] 23371 (UnGuardedRhs 23372 SrcSpanInfo 23373 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 3 634 6 23374 , srcInfoPoints = 23375 [ SrcSpan "tests/examples/RealGHC.lhs" 630 3 630 4 ] 23376 } 23377 (Do 23378 SrcSpanInfo 23379 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 5 634 6 23380 , srcInfoPoints = 23381 [ SrcSpan "tests/examples/RealGHC.lhs" 630 5 630 7 23382 , SrcSpan "tests/examples/RealGHC.lhs" 630 9 630 10 23383 , SrcSpan "tests/examples/RealGHC.lhs" 631 5 631 6 23384 , SrcSpan "tests/examples/RealGHC.lhs" 632 5 632 6 23385 , SrcSpan "tests/examples/RealGHC.lhs" 633 5 633 6 23386 , SrcSpan "tests/examples/RealGHC.lhs" 634 5 634 6 23387 ] 23388 } 23389 [ Generator 23390 SrcSpanInfo 23391 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 11 630 48 23392 , srcInfoPoints = 23393 [ SrcSpan "tests/examples/RealGHC.lhs" 630 18 630 20 ] 23394 } 23395 (PVar 23396 SrcSpanInfo 23397 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 11 630 17 23398 , srcInfoPoints = [] 23399 } 23400 (Ident 23401 SrcSpanInfo 23402 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 11 630 17 23403 , srcInfoPoints = [] 23404 } 23405 "subst1")) 23406 (App 23407 SrcSpanInfo 23408 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 21 630 48 23409 , srcInfoPoints = [] 23410 } 23411 (App 23412 SrcSpanInfo 23413 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 21 630 44 23414 , srcInfoPoints = [] 23415 } 23416 (App 23417 SrcSpanInfo 23418 { srcInfoSpan = 23419 SrcSpan "tests/examples/RealGHC.lhs" 630 21 630 40 23420 , srcInfoPoints = [] 23421 } 23422 (App 23423 SrcSpanInfo 23424 { srcInfoSpan = 23425 SrcSpan "tests/examples/RealGHC.lhs" 630 21 630 34 23426 , srcInfoPoints = [] 23427 } 23428 (Var 23429 SrcSpanInfo 23430 { srcInfoSpan = 23431 SrcSpan "tests/examples/RealGHC.lhs" 630 21 630 29 23432 , srcInfoPoints = [] 23433 } 23434 (UnQual 23435 SrcSpanInfo 23436 { srcInfoSpan = 23437 SrcSpan "tests/examples/RealGHC.lhs" 630 21 630 29 23438 , srcInfoPoints = [] 23439 } 23440 (Ident 23441 SrcSpanInfo 23442 { srcInfoSpan = 23443 SrcSpan 23444 "tests/examples/RealGHC.lhs" 630 21 630 29 23445 , srcInfoPoints = [] 23446 } 23447 "match_ty"))) 23448 (Var 23449 SrcSpanInfo 23450 { srcInfoSpan = 23451 SrcSpan "tests/examples/RealGHC.lhs" 630 30 630 34 23452 , srcInfoPoints = [] 23453 } 23454 (UnQual 23455 SrcSpanInfo 23456 { srcInfoSpan = 23457 SrcSpan "tests/examples/RealGHC.lhs" 630 30 630 34 23458 , srcInfoPoints = [] 23459 } 23460 (Ident 23461 SrcSpanInfo 23462 { srcInfoSpan = 23463 SrcSpan 23464 "tests/examples/RealGHC.lhs" 630 30 630 34 23465 , srcInfoPoints = [] 23466 } 23467 "menv")))) 23468 (Var 23469 SrcSpanInfo 23470 { srcInfoSpan = 23471 SrcSpan "tests/examples/RealGHC.lhs" 630 35 630 40 23472 , srcInfoPoints = [] 23473 } 23474 (UnQual 23475 SrcSpanInfo 23476 { srcInfoSpan = 23477 SrcSpan "tests/examples/RealGHC.lhs" 630 35 630 40 23478 , srcInfoPoints = [] 23479 } 23480 (Ident 23481 SrcSpanInfo 23482 { srcInfoSpan = 23483 SrcSpan "tests/examples/RealGHC.lhs" 630 35 630 40 23484 , srcInfoPoints = [] 23485 } 23486 "subst")))) 23487 (Var 23488 SrcSpanInfo 23489 { srcInfoSpan = 23490 SrcSpan "tests/examples/RealGHC.lhs" 630 41 630 44 23491 , srcInfoPoints = [] 23492 } 23493 (UnQual 23494 SrcSpanInfo 23495 { srcInfoSpan = 23496 SrcSpan "tests/examples/RealGHC.lhs" 630 41 630 44 23497 , srcInfoPoints = [] 23498 } 23499 (Ident 23500 SrcSpanInfo 23501 { srcInfoSpan = 23502 SrcSpan "tests/examples/RealGHC.lhs" 630 41 630 44 23503 , srcInfoPoints = [] 23504 } 23505 "ty1")))) 23506 (Var 23507 SrcSpanInfo 23508 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 630 45 630 48 23509 , srcInfoPoints = [] 23510 } 23511 (UnQual 23512 SrcSpanInfo 23513 { srcInfoSpan = 23514 SrcSpan "tests/examples/RealGHC.lhs" 630 45 630 48 23515 , srcInfoPoints = [] 23516 } 23517 (Ident 23518 SrcSpanInfo 23519 { srcInfoSpan = 23520 SrcSpan "tests/examples/RealGHC.lhs" 630 45 630 48 23521 , srcInfoPoints = [] 23522 } 23523 "ty2")))) 23524 , Generator 23525 SrcSpanInfo 23526 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 7 631 40 23527 , srcInfoPoints = 23528 [ SrcSpan "tests/examples/RealGHC.lhs" 631 14 631 16 ] 23529 } 23530 (PVar 23531 SrcSpanInfo 23532 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 7 631 13 23533 , srcInfoPoints = [] 23534 } 23535 (Ident 23536 SrcSpanInfo 23537 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 7 631 13 23538 , srcInfoPoints = [] 23539 } 23540 "subst2")) 23541 (App 23542 SrcSpanInfo 23543 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 17 631 40 23544 , srcInfoPoints = [] 23545 } 23546 (App 23547 SrcSpanInfo 23548 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 17 631 37 23549 , srcInfoPoints = [] 23550 } 23551 (App 23552 SrcSpanInfo 23553 { srcInfoSpan = 23554 SrcSpan "tests/examples/RealGHC.lhs" 631 17 631 34 23555 , srcInfoPoints = [] 23556 } 23557 (App 23558 SrcSpanInfo 23559 { srcInfoSpan = 23560 SrcSpan "tests/examples/RealGHC.lhs" 631 17 631 27 23561 , srcInfoPoints = [] 23562 } 23563 (Var 23564 SrcSpanInfo 23565 { srcInfoSpan = 23566 SrcSpan "tests/examples/RealGHC.lhs" 631 17 631 22 23567 , srcInfoPoints = [] 23568 } 23569 (UnQual 23570 SrcSpanInfo 23571 { srcInfoSpan = 23572 SrcSpan "tests/examples/RealGHC.lhs" 631 17 631 22 23573 , srcInfoPoints = [] 23574 } 23575 (Ident 23576 SrcSpanInfo 23577 { srcInfoSpan = 23578 SrcSpan 23579 "tests/examples/RealGHC.lhs" 631 17 631 22 23580 , srcInfoPoints = [] 23581 } 23582 "match"))) 23583 (Var 23584 SrcSpanInfo 23585 { srcInfoSpan = 23586 SrcSpan "tests/examples/RealGHC.lhs" 631 23 631 27 23587 , srcInfoPoints = [] 23588 } 23589 (UnQual 23590 SrcSpanInfo 23591 { srcInfoSpan = 23592 SrcSpan "tests/examples/RealGHC.lhs" 631 23 631 27 23593 , srcInfoPoints = [] 23594 } 23595 (Ident 23596 SrcSpanInfo 23597 { srcInfoSpan = 23598 SrcSpan 23599 "tests/examples/RealGHC.lhs" 631 23 631 27 23600 , srcInfoPoints = [] 23601 } 23602 "menv")))) 23603 (Var 23604 SrcSpanInfo 23605 { srcInfoSpan = 23606 SrcSpan "tests/examples/RealGHC.lhs" 631 28 631 34 23607 , srcInfoPoints = [] 23608 } 23609 (UnQual 23610 SrcSpanInfo 23611 { srcInfoSpan = 23612 SrcSpan "tests/examples/RealGHC.lhs" 631 28 631 34 23613 , srcInfoPoints = [] 23614 } 23615 (Ident 23616 SrcSpanInfo 23617 { srcInfoSpan = 23618 SrcSpan "tests/examples/RealGHC.lhs" 631 28 631 34 23619 , srcInfoPoints = [] 23620 } 23621 "subst1")))) 23622 (Var 23623 SrcSpanInfo 23624 { srcInfoSpan = 23625 SrcSpan "tests/examples/RealGHC.lhs" 631 35 631 37 23626 , srcInfoPoints = [] 23627 } 23628 (UnQual 23629 SrcSpanInfo 23630 { srcInfoSpan = 23631 SrcSpan "tests/examples/RealGHC.lhs" 631 35 631 37 23632 , srcInfoPoints = [] 23633 } 23634 (Ident 23635 SrcSpanInfo 23636 { srcInfoSpan = 23637 SrcSpan "tests/examples/RealGHC.lhs" 631 35 631 37 23638 , srcInfoPoints = [] 23639 } 23640 "e1")))) 23641 (Var 23642 SrcSpanInfo 23643 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 631 38 631 40 23644 , srcInfoPoints = [] 23645 } 23646 (UnQual 23647 SrcSpanInfo 23648 { srcInfoSpan = 23649 SrcSpan "tests/examples/RealGHC.lhs" 631 38 631 40 23650 , srcInfoPoints = [] 23651 } 23652 (Ident 23653 SrcSpanInfo 23654 { srcInfoSpan = 23655 SrcSpan "tests/examples/RealGHC.lhs" 631 38 631 40 23656 , srcInfoPoints = [] 23657 } 23658 "e2")))) 23659 , LetStmt 23660 SrcSpanInfo 23661 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 7 632 64 23662 , srcInfoPoints = 23663 [ SrcSpan "tests/examples/RealGHC.lhs" 632 7 632 10 ] 23664 } 23665 (BDecls 23666 SrcSpanInfo 23667 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 11 632 64 23668 , srcInfoPoints = 23669 [ SrcSpan "tests/examples/RealGHC.lhs" 632 11 632 11 23670 , SrcSpan "tests/examples/RealGHC.lhs" 633 5 633 0 23671 ] 23672 } 23673 [ PatBind 23674 SrcSpanInfo 23675 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 632 11 632 64 23676 , srcInfoPoints = [] 23677 } 23678 (PVar 23679 SrcSpanInfo 23680 { srcInfoSpan = 23681 SrcSpan "tests/examples/RealGHC.lhs" 632 11 632 16 23682 , srcInfoPoints = [] 23683 } 23684 (Ident 23685 SrcSpanInfo 23686 { srcInfoSpan = 23687 SrcSpan "tests/examples/RealGHC.lhs" 632 11 632 16 23688 , srcInfoPoints = [] 23689 } 23690 "menv'")) 23691 (UnGuardedRhs 23692 SrcSpanInfo 23693 { srcInfoSpan = 23694 SrcSpan "tests/examples/RealGHC.lhs" 632 17 632 64 23695 , srcInfoPoints = 23696 [ SrcSpan "tests/examples/RealGHC.lhs" 632 17 632 18 ] 23697 } 23698 (RecUpdate 23699 SrcSpanInfo 23700 { srcInfoSpan = 23701 SrcSpan "tests/examples/RealGHC.lhs" 632 19 632 64 23702 , srcInfoPoints = 23703 [ SrcSpan "tests/examples/RealGHC.lhs" 632 24 632 25 23704 , SrcSpan "tests/examples/RealGHC.lhs" 632 63 632 64 23705 ] 23706 } 23707 (Var 23708 SrcSpanInfo 23709 { srcInfoSpan = 23710 SrcSpan "tests/examples/RealGHC.lhs" 632 19 632 23 23711 , srcInfoPoints = [] 23712 } 23713 (UnQual 23714 SrcSpanInfo 23715 { srcInfoSpan = 23716 SrcSpan "tests/examples/RealGHC.lhs" 632 19 632 23 23717 , srcInfoPoints = [] 23718 } 23719 (Ident 23720 SrcSpanInfo 23721 { srcInfoSpan = 23722 SrcSpan 23723 "tests/examples/RealGHC.lhs" 632 19 632 23 23724 , srcInfoPoints = [] 23725 } 23726 "menv"))) 23727 [ FieldUpdate 23728 SrcSpanInfo 23729 { srcInfoSpan = 23730 SrcSpan "tests/examples/RealGHC.lhs" 632 26 632 62 23731 , srcInfoPoints = 23732 [ SrcSpan "tests/examples/RealGHC.lhs" 632 33 632 34 23733 ] 23734 } 23735 (UnQual 23736 SrcSpanInfo 23737 { srcInfoSpan = 23738 SrcSpan "tests/examples/RealGHC.lhs" 632 26 632 32 23739 , srcInfoPoints = [] 23740 } 23741 (Ident 23742 SrcSpanInfo 23743 { srcInfoSpan = 23744 SrcSpan 23745 "tests/examples/RealGHC.lhs" 632 26 632 32 23746 , srcInfoPoints = [] 23747 } 23748 "me_env")) 23749 (App 23750 SrcSpanInfo 23751 { srcInfoSpan = 23752 SrcSpan "tests/examples/RealGHC.lhs" 632 35 632 62 23753 , srcInfoPoints = [] 23754 } 23755 (App 23756 SrcSpanInfo 23757 { srcInfoSpan = 23758 SrcSpan 23759 "tests/examples/RealGHC.lhs" 632 35 632 59 23760 , srcInfoPoints = [] 23761 } 23762 (App 23763 SrcSpanInfo 23764 { srcInfoSpan = 23765 SrcSpan 23766 "tests/examples/RealGHC.lhs" 632 35 632 56 23767 , srcInfoPoints = [] 23768 } 23769 (Var 23770 SrcSpanInfo 23771 { srcInfoSpan = 23772 SrcSpan 23773 "tests/examples/RealGHC.lhs" 23774 632 23775 35 23776 632 23777 42 23778 , srcInfoPoints = [] 23779 } 23780 (UnQual 23781 SrcSpanInfo 23782 { srcInfoSpan = 23783 SrcSpan 23784 "tests/examples/RealGHC.lhs" 23785 632 23786 35 23787 632 23788 42 23789 , srcInfoPoints = [] 23790 } 23791 (Ident 23792 SrcSpanInfo 23793 { srcInfoSpan = 23794 SrcSpan 23795 "tests/examples/RealGHC.lhs" 23796 632 23797 35 23798 632 23799 42 23800 , srcInfoPoints = [] 23801 } 23802 "rnBndr2"))) 23803 (Paren 23804 SrcSpanInfo 23805 { srcInfoSpan = 23806 SrcSpan 23807 "tests/examples/RealGHC.lhs" 23808 632 23809 43 23810 632 23811 56 23812 , srcInfoPoints = 23813 [ SrcSpan 23814 "tests/examples/RealGHC.lhs" 23815 632 23816 43 23817 632 23818 44 23819 , SrcSpan 23820 "tests/examples/RealGHC.lhs" 23821 632 23822 55 23823 632 23824 56 23825 ] 23826 } 23827 (App 23828 SrcSpanInfo 23829 { srcInfoSpan = 23830 SrcSpan 23831 "tests/examples/RealGHC.lhs" 23832 632 23833 44 23834 632 23835 55 23836 , srcInfoPoints = [] 23837 } 23838 (Var 23839 SrcSpanInfo 23840 { srcInfoSpan = 23841 SrcSpan 23842 "tests/examples/RealGHC.lhs" 23843 632 23844 44 23845 632 23846 50 23847 , srcInfoPoints = [] 23848 } 23849 (UnQual 23850 SrcSpanInfo 23851 { srcInfoSpan = 23852 SrcSpan 23853 "tests/examples/RealGHC.lhs" 23854 632 23855 44 23856 632 23857 50 23858 , srcInfoPoints = [] 23859 } 23860 (Ident 23861 SrcSpanInfo 23862 { srcInfoSpan = 23863 SrcSpan 23864 "tests/examples/RealGHC.lhs" 23865 632 23866 44 23867 632 23868 50 23869 , srcInfoPoints = [] 23870 } 23871 "me_env"))) 23872 (Var 23873 SrcSpanInfo 23874 { srcInfoSpan = 23875 SrcSpan 23876 "tests/examples/RealGHC.lhs" 23877 632 23878 51 23879 632 23880 55 23881 , srcInfoPoints = [] 23882 } 23883 (UnQual 23884 SrcSpanInfo 23885 { srcInfoSpan = 23886 SrcSpan 23887 "tests/examples/RealGHC.lhs" 23888 632 23889 51 23890 632 23891 55 23892 , srcInfoPoints = [] 23893 } 23894 (Ident 23895 SrcSpanInfo 23896 { srcInfoSpan = 23897 SrcSpan 23898 "tests/examples/RealGHC.lhs" 23899 632 23900 51 23901 632 23902 55 23903 , srcInfoPoints = [] 23904 } 23905 "menv")))))) 23906 (Var 23907 SrcSpanInfo 23908 { srcInfoSpan = 23909 SrcSpan 23910 "tests/examples/RealGHC.lhs" 632 57 632 59 23911 , srcInfoPoints = [] 23912 } 23913 (UnQual 23914 SrcSpanInfo 23915 { srcInfoSpan = 23916 SrcSpan 23917 "tests/examples/RealGHC.lhs" 23918 632 23919 57 23920 632 23921 59 23922 , srcInfoPoints = [] 23923 } 23924 (Ident 23925 SrcSpanInfo 23926 { srcInfoSpan = 23927 SrcSpan 23928 "tests/examples/RealGHC.lhs" 23929 632 23930 57 23931 632 23932 59 23933 , srcInfoPoints = [] 23934 } 23935 "x1")))) 23936 (Var 23937 SrcSpanInfo 23938 { srcInfoSpan = 23939 SrcSpan 23940 "tests/examples/RealGHC.lhs" 632 60 632 62 23941 , srcInfoPoints = [] 23942 } 23943 (UnQual 23944 SrcSpanInfo 23945 { srcInfoSpan = 23946 SrcSpan 23947 "tests/examples/RealGHC.lhs" 632 60 632 62 23948 , srcInfoPoints = [] 23949 } 23950 (Ident 23951 SrcSpanInfo 23952 { srcInfoSpan = 23953 SrcSpan 23954 "tests/examples/RealGHC.lhs" 23955 632 23956 60 23957 632 23958 62 23959 , srcInfoPoints = [] 23960 } 23961 "x2")))) 23962 ])) 23963 Nothing 23964 ]) 23965 , Qualifier 23966 SrcSpanInfo 23967 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 7 633 42 23968 , srcInfoPoints = [] 23969 } 23970 (App 23971 SrcSpanInfo 23972 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 7 633 42 23973 , srcInfoPoints = [] 23974 } 23975 (App 23976 SrcSpanInfo 23977 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 7 633 36 23978 , srcInfoPoints = [] 23979 } 23980 (App 23981 SrcSpanInfo 23982 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 7 633 30 23983 , srcInfoPoints = [] 23984 } 23985 (App 23986 SrcSpanInfo 23987 { srcInfoSpan = 23988 SrcSpan "tests/examples/RealGHC.lhs" 633 7 633 23 23989 , srcInfoPoints = [] 23990 } 23991 (Var 23992 SrcSpanInfo 23993 { srcInfoSpan = 23994 SrcSpan "tests/examples/RealGHC.lhs" 633 7 633 17 23995 , srcInfoPoints = [] 23996 } 23997 (UnQual 23998 SrcSpanInfo 23999 { srcInfoSpan = 24000 SrcSpan "tests/examples/RealGHC.lhs" 633 7 633 17 24001 , srcInfoPoints = [] 24002 } 24003 (Ident 24004 SrcSpanInfo 24005 { srcInfoSpan = 24006 SrcSpan "tests/examples/RealGHC.lhs" 633 7 633 17 24007 , srcInfoPoints = [] 24008 } 24009 "match_alts"))) 24010 (Var 24011 SrcSpanInfo 24012 { srcInfoSpan = 24013 SrcSpan "tests/examples/RealGHC.lhs" 633 18 633 23 24014 , srcInfoPoints = [] 24015 } 24016 (UnQual 24017 SrcSpanInfo 24018 { srcInfoSpan = 24019 SrcSpan "tests/examples/RealGHC.lhs" 633 18 633 23 24020 , srcInfoPoints = [] 24021 } 24022 (Ident 24023 SrcSpanInfo 24024 { srcInfoSpan = 24025 SrcSpan 24026 "tests/examples/RealGHC.lhs" 633 18 633 23 24027 , srcInfoPoints = [] 24028 } 24029 "menv'")))) 24030 (Var 24031 SrcSpanInfo 24032 { srcInfoSpan = 24033 SrcSpan "tests/examples/RealGHC.lhs" 633 24 633 30 24034 , srcInfoPoints = [] 24035 } 24036 (UnQual 24037 SrcSpanInfo 24038 { srcInfoSpan = 24039 SrcSpan "tests/examples/RealGHC.lhs" 633 24 633 30 24040 , srcInfoPoints = [] 24041 } 24042 (Ident 24043 SrcSpanInfo 24044 { srcInfoSpan = 24045 SrcSpan "tests/examples/RealGHC.lhs" 633 24 633 30 24046 , srcInfoPoints = [] 24047 } 24048 "subst2")))) 24049 (Var 24050 SrcSpanInfo 24051 { srcInfoSpan = 24052 SrcSpan "tests/examples/RealGHC.lhs" 633 31 633 36 24053 , srcInfoPoints = [] 24054 } 24055 (UnQual 24056 SrcSpanInfo 24057 { srcInfoSpan = 24058 SrcSpan "tests/examples/RealGHC.lhs" 633 31 633 36 24059 , srcInfoPoints = [] 24060 } 24061 (Ident 24062 SrcSpanInfo 24063 { srcInfoSpan = 24064 SrcSpan "tests/examples/RealGHC.lhs" 633 31 633 36 24065 , srcInfoPoints = [] 24066 } 24067 "alts1")))) 24068 (Var 24069 SrcSpanInfo 24070 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 633 37 633 42 24071 , srcInfoPoints = [] 24072 } 24073 (UnQual 24074 SrcSpanInfo 24075 { srcInfoSpan = 24076 SrcSpan "tests/examples/RealGHC.lhs" 633 37 633 42 24077 , srcInfoPoints = [] 24078 } 24079 (Ident 24080 SrcSpanInfo 24081 { srcInfoSpan = 24082 SrcSpan "tests/examples/RealGHC.lhs" 633 37 633 42 24083 , srcInfoPoints = [] 24084 } 24085 "alts2")))) 24086 ])) 24087 Nothing 24088 , Match 24089 SrcSpanInfo 24090 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 1 637 32 24091 , srcInfoPoints = [] 24092 } 24093 (Ident 24094 SrcSpanInfo 24095 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 1 636 6 24096 , srcInfoPoints = [] 24097 } 24098 "match") 24099 [ PVar 24100 SrcSpanInfo 24101 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 7 636 11 24102 , srcInfoPoints = [] 24103 } 24104 (Ident 24105 SrcSpanInfo 24106 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 7 636 11 24107 , srcInfoPoints = [] 24108 } 24109 "menv") 24110 , PVar 24111 SrcSpanInfo 24112 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 12 636 17 24113 , srcInfoPoints = [] 24114 } 24115 (Ident 24116 SrcSpanInfo 24117 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 12 636 17 24118 , srcInfoPoints = [] 24119 } 24120 "subst") 24121 , PParen 24122 SrcSpanInfo 24123 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 18 636 28 24124 , srcInfoPoints = 24125 [ SrcSpan "tests/examples/RealGHC.lhs" 636 18 636 19 24126 , SrcSpan "tests/examples/RealGHC.lhs" 636 27 636 28 24127 ] 24128 } 24129 (PApp 24130 SrcSpanInfo 24131 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 19 636 27 24132 , srcInfoPoints = [] 24133 } 24134 (UnQual 24135 SrcSpanInfo 24136 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 19 636 23 24137 , srcInfoPoints = [] 24138 } 24139 (Ident 24140 SrcSpanInfo 24141 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 19 636 23 24142 , srcInfoPoints = [] 24143 } 24144 "Type")) 24145 [ PVar 24146 SrcSpanInfo 24147 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 24 636 27 24148 , srcInfoPoints = [] 24149 } 24150 (Ident 24151 SrcSpanInfo 24152 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 24 636 27 24153 , srcInfoPoints = [] 24154 } 24155 "ty1") 24156 ]) 24157 , PParen 24158 SrcSpanInfo 24159 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 29 636 39 24160 , srcInfoPoints = 24161 [ SrcSpan "tests/examples/RealGHC.lhs" 636 29 636 30 24162 , SrcSpan "tests/examples/RealGHC.lhs" 636 38 636 39 24163 ] 24164 } 24165 (PApp 24166 SrcSpanInfo 24167 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 30 636 38 24168 , srcInfoPoints = [] 24169 } 24170 (UnQual 24171 SrcSpanInfo 24172 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 30 636 34 24173 , srcInfoPoints = [] 24174 } 24175 (Ident 24176 SrcSpanInfo 24177 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 30 636 34 24178 , srcInfoPoints = [] 24179 } 24180 "Type")) 24181 [ PVar 24182 SrcSpanInfo 24183 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 35 636 38 24184 , srcInfoPoints = [] 24185 } 24186 (Ident 24187 SrcSpanInfo 24188 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 636 35 636 38 24189 , srcInfoPoints = [] 24190 } 24191 "ty2") 24192 ]) 24193 ] 24194 (UnGuardedRhs 24195 SrcSpanInfo 24196 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 3 637 32 24197 , srcInfoPoints = 24198 [ SrcSpan "tests/examples/RealGHC.lhs" 637 3 637 4 ] 24199 } 24200 (App 24201 SrcSpanInfo 24202 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 5 637 32 24203 , srcInfoPoints = [] 24204 } 24205 (App 24206 SrcSpanInfo 24207 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 5 637 28 24208 , srcInfoPoints = [] 24209 } 24210 (App 24211 SrcSpanInfo 24212 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 5 637 24 24213 , srcInfoPoints = [] 24214 } 24215 (App 24216 SrcSpanInfo 24217 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 5 637 18 24218 , srcInfoPoints = [] 24219 } 24220 (Var 24221 SrcSpanInfo 24222 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 5 637 13 24223 , srcInfoPoints = [] 24224 } 24225 (UnQual 24226 SrcSpanInfo 24227 { srcInfoSpan = 24228 SrcSpan "tests/examples/RealGHC.lhs" 637 5 637 13 24229 , srcInfoPoints = [] 24230 } 24231 (Ident 24232 SrcSpanInfo 24233 { srcInfoSpan = 24234 SrcSpan "tests/examples/RealGHC.lhs" 637 5 637 13 24235 , srcInfoPoints = [] 24236 } 24237 "match_ty"))) 24238 (Var 24239 SrcSpanInfo 24240 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 14 637 18 24241 , srcInfoPoints = [] 24242 } 24243 (UnQual 24244 SrcSpanInfo 24245 { srcInfoSpan = 24246 SrcSpan "tests/examples/RealGHC.lhs" 637 14 637 18 24247 , srcInfoPoints = [] 24248 } 24249 (Ident 24250 SrcSpanInfo 24251 { srcInfoSpan = 24252 SrcSpan "tests/examples/RealGHC.lhs" 637 14 637 18 24253 , srcInfoPoints = [] 24254 } 24255 "menv")))) 24256 (Var 24257 SrcSpanInfo 24258 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 19 637 24 24259 , srcInfoPoints = [] 24260 } 24261 (UnQual 24262 SrcSpanInfo 24263 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 19 637 24 24264 , srcInfoPoints = [] 24265 } 24266 (Ident 24267 SrcSpanInfo 24268 { srcInfoSpan = 24269 SrcSpan "tests/examples/RealGHC.lhs" 637 19 637 24 24270 , srcInfoPoints = [] 24271 } 24272 "subst")))) 24273 (Var 24274 SrcSpanInfo 24275 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 25 637 28 24276 , srcInfoPoints = [] 24277 } 24278 (UnQual 24279 SrcSpanInfo 24280 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 25 637 28 24281 , srcInfoPoints = [] 24282 } 24283 (Ident 24284 SrcSpanInfo 24285 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 25 637 28 24286 , srcInfoPoints = [] 24287 } 24288 "ty1")))) 24289 (Var 24290 SrcSpanInfo 24291 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 29 637 32 24292 , srcInfoPoints = [] 24293 } 24294 (UnQual 24295 SrcSpanInfo 24296 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 29 637 32 24297 , srcInfoPoints = [] 24298 } 24299 (Ident 24300 SrcSpanInfo 24301 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 637 29 637 32 24302 , srcInfoPoints = [] 24303 } 24304 "ty2"))))) 24305 Nothing 24306 , Match 24307 SrcSpanInfo 24308 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 1 641 32 24309 , srcInfoPoints = [] 24310 } 24311 (Ident 24312 SrcSpanInfo 24313 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 1 639 6 24314 , srcInfoPoints = [] 24315 } 24316 "match") 24317 [ PVar 24318 SrcSpanInfo 24319 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 7 639 11 24320 , srcInfoPoints = [] 24321 } 24322 (Ident 24323 SrcSpanInfo 24324 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 7 639 11 24325 , srcInfoPoints = [] 24326 } 24327 "menv") 24328 , PVar 24329 SrcSpanInfo 24330 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 12 639 17 24331 , srcInfoPoints = [] 24332 } 24333 (Ident 24334 SrcSpanInfo 24335 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 12 639 17 24336 , srcInfoPoints = [] 24337 } 24338 "subst") 24339 , PParen 24340 SrcSpanInfo 24341 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 18 639 31 24342 , srcInfoPoints = 24343 [ SrcSpan "tests/examples/RealGHC.lhs" 639 18 639 19 24344 , SrcSpan "tests/examples/RealGHC.lhs" 639 30 639 31 24345 ] 24346 } 24347 (PApp 24348 SrcSpanInfo 24349 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 19 639 30 24350 , srcInfoPoints = [] 24351 } 24352 (UnQual 24353 SrcSpanInfo 24354 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 19 639 23 24355 , srcInfoPoints = [] 24356 } 24357 (Ident 24358 SrcSpanInfo 24359 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 19 639 23 24360 , srcInfoPoints = [] 24361 } 24362 "Cast")) 24363 [ PVar 24364 SrcSpanInfo 24365 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 24 639 26 24366 , srcInfoPoints = [] 24367 } 24368 (Ident 24369 SrcSpanInfo 24370 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 24 639 26 24371 , srcInfoPoints = [] 24372 } 24373 "e1") 24374 , PVar 24375 SrcSpanInfo 24376 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 27 639 30 24377 , srcInfoPoints = [] 24378 } 24379 (Ident 24380 SrcSpanInfo 24381 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 27 639 30 24382 , srcInfoPoints = [] 24383 } 24384 "co1") 24385 ]) 24386 , PParen 24387 SrcSpanInfo 24388 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 32 639 45 24389 , srcInfoPoints = 24390 [ SrcSpan "tests/examples/RealGHC.lhs" 639 32 639 33 24391 , SrcSpan "tests/examples/RealGHC.lhs" 639 44 639 45 24392 ] 24393 } 24394 (PApp 24395 SrcSpanInfo 24396 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 33 639 44 24397 , srcInfoPoints = [] 24398 } 24399 (UnQual 24400 SrcSpanInfo 24401 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 33 639 37 24402 , srcInfoPoints = [] 24403 } 24404 (Ident 24405 SrcSpanInfo 24406 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 33 639 37 24407 , srcInfoPoints = [] 24408 } 24409 "Cast")) 24410 [ PVar 24411 SrcSpanInfo 24412 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 38 639 40 24413 , srcInfoPoints = [] 24414 } 24415 (Ident 24416 SrcSpanInfo 24417 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 38 639 40 24418 , srcInfoPoints = [] 24419 } 24420 "e2") 24421 , PVar 24422 SrcSpanInfo 24423 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 41 639 44 24424 , srcInfoPoints = [] 24425 } 24426 (Ident 24427 SrcSpanInfo 24428 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 639 41 639 44 24429 , srcInfoPoints = [] 24430 } 24431 "co2") 24432 ]) 24433 ] 24434 (UnGuardedRhs 24435 SrcSpanInfo 24436 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 3 641 32 24437 , srcInfoPoints = 24438 [ SrcSpan "tests/examples/RealGHC.lhs" 640 3 640 4 ] 24439 } 24440 (Do 24441 SrcSpanInfo 24442 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 5 641 32 24443 , srcInfoPoints = 24444 [ SrcSpan "tests/examples/RealGHC.lhs" 640 5 640 7 24445 , SrcSpan "tests/examples/RealGHC.lhs" 640 9 640 10 24446 , SrcSpan "tests/examples/RealGHC.lhs" 641 5 641 6 24447 , SrcSpan "tests/examples/RealGHC.lhs" 641 31 641 32 24448 ] 24449 } 24450 [ Generator 24451 SrcSpanInfo 24452 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 11 640 48 24453 , srcInfoPoints = 24454 [ SrcSpan "tests/examples/RealGHC.lhs" 640 18 640 20 ] 24455 } 24456 (PVar 24457 SrcSpanInfo 24458 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 11 640 17 24459 , srcInfoPoints = [] 24460 } 24461 (Ident 24462 SrcSpanInfo 24463 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 11 640 17 24464 , srcInfoPoints = [] 24465 } 24466 "subst1")) 24467 (App 24468 SrcSpanInfo 24469 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 21 640 48 24470 , srcInfoPoints = [] 24471 } 24472 (App 24473 SrcSpanInfo 24474 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 21 640 44 24475 , srcInfoPoints = [] 24476 } 24477 (App 24478 SrcSpanInfo 24479 { srcInfoSpan = 24480 SrcSpan "tests/examples/RealGHC.lhs" 640 21 640 40 24481 , srcInfoPoints = [] 24482 } 24483 (App 24484 SrcSpanInfo 24485 { srcInfoSpan = 24486 SrcSpan "tests/examples/RealGHC.lhs" 640 21 640 34 24487 , srcInfoPoints = [] 24488 } 24489 (Var 24490 SrcSpanInfo 24491 { srcInfoSpan = 24492 SrcSpan "tests/examples/RealGHC.lhs" 640 21 640 29 24493 , srcInfoPoints = [] 24494 } 24495 (UnQual 24496 SrcSpanInfo 24497 { srcInfoSpan = 24498 SrcSpan "tests/examples/RealGHC.lhs" 640 21 640 29 24499 , srcInfoPoints = [] 24500 } 24501 (Ident 24502 SrcSpanInfo 24503 { srcInfoSpan = 24504 SrcSpan 24505 "tests/examples/RealGHC.lhs" 640 21 640 29 24506 , srcInfoPoints = [] 24507 } 24508 "match_ty"))) 24509 (Var 24510 SrcSpanInfo 24511 { srcInfoSpan = 24512 SrcSpan "tests/examples/RealGHC.lhs" 640 30 640 34 24513 , srcInfoPoints = [] 24514 } 24515 (UnQual 24516 SrcSpanInfo 24517 { srcInfoSpan = 24518 SrcSpan "tests/examples/RealGHC.lhs" 640 30 640 34 24519 , srcInfoPoints = [] 24520 } 24521 (Ident 24522 SrcSpanInfo 24523 { srcInfoSpan = 24524 SrcSpan 24525 "tests/examples/RealGHC.lhs" 640 30 640 34 24526 , srcInfoPoints = [] 24527 } 24528 "menv")))) 24529 (Var 24530 SrcSpanInfo 24531 { srcInfoSpan = 24532 SrcSpan "tests/examples/RealGHC.lhs" 640 35 640 40 24533 , srcInfoPoints = [] 24534 } 24535 (UnQual 24536 SrcSpanInfo 24537 { srcInfoSpan = 24538 SrcSpan "tests/examples/RealGHC.lhs" 640 35 640 40 24539 , srcInfoPoints = [] 24540 } 24541 (Ident 24542 SrcSpanInfo 24543 { srcInfoSpan = 24544 SrcSpan "tests/examples/RealGHC.lhs" 640 35 640 40 24545 , srcInfoPoints = [] 24546 } 24547 "subst")))) 24548 (Var 24549 SrcSpanInfo 24550 { srcInfoSpan = 24551 SrcSpan "tests/examples/RealGHC.lhs" 640 41 640 44 24552 , srcInfoPoints = [] 24553 } 24554 (UnQual 24555 SrcSpanInfo 24556 { srcInfoSpan = 24557 SrcSpan "tests/examples/RealGHC.lhs" 640 41 640 44 24558 , srcInfoPoints = [] 24559 } 24560 (Ident 24561 SrcSpanInfo 24562 { srcInfoSpan = 24563 SrcSpan "tests/examples/RealGHC.lhs" 640 41 640 44 24564 , srcInfoPoints = [] 24565 } 24566 "co1")))) 24567 (Var 24568 SrcSpanInfo 24569 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 640 45 640 48 24570 , srcInfoPoints = [] 24571 } 24572 (UnQual 24573 SrcSpanInfo 24574 { srcInfoSpan = 24575 SrcSpan "tests/examples/RealGHC.lhs" 640 45 640 48 24576 , srcInfoPoints = [] 24577 } 24578 (Ident 24579 SrcSpanInfo 24580 { srcInfoSpan = 24581 SrcSpan "tests/examples/RealGHC.lhs" 640 45 640 48 24582 , srcInfoPoints = [] 24583 } 24584 "co2")))) 24585 , Qualifier 24586 SrcSpanInfo 24587 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 7 641 30 24588 , srcInfoPoints = [] 24589 } 24590 (App 24591 SrcSpanInfo 24592 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 7 641 30 24593 , srcInfoPoints = [] 24594 } 24595 (App 24596 SrcSpanInfo 24597 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 7 641 27 24598 , srcInfoPoints = [] 24599 } 24600 (App 24601 SrcSpanInfo 24602 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 7 641 24 24603 , srcInfoPoints = [] 24604 } 24605 (App 24606 SrcSpanInfo 24607 { srcInfoSpan = 24608 SrcSpan "tests/examples/RealGHC.lhs" 641 7 641 17 24609 , srcInfoPoints = [] 24610 } 24611 (Var 24612 SrcSpanInfo 24613 { srcInfoSpan = 24614 SrcSpan "tests/examples/RealGHC.lhs" 641 7 641 12 24615 , srcInfoPoints = [] 24616 } 24617 (UnQual 24618 SrcSpanInfo 24619 { srcInfoSpan = 24620 SrcSpan "tests/examples/RealGHC.lhs" 641 7 641 12 24621 , srcInfoPoints = [] 24622 } 24623 (Ident 24624 SrcSpanInfo 24625 { srcInfoSpan = 24626 SrcSpan "tests/examples/RealGHC.lhs" 641 7 641 12 24627 , srcInfoPoints = [] 24628 } 24629 "match"))) 24630 (Var 24631 SrcSpanInfo 24632 { srcInfoSpan = 24633 SrcSpan "tests/examples/RealGHC.lhs" 641 13 641 17 24634 , srcInfoPoints = [] 24635 } 24636 (UnQual 24637 SrcSpanInfo 24638 { srcInfoSpan = 24639 SrcSpan "tests/examples/RealGHC.lhs" 641 13 641 17 24640 , srcInfoPoints = [] 24641 } 24642 (Ident 24643 SrcSpanInfo 24644 { srcInfoSpan = 24645 SrcSpan 24646 "tests/examples/RealGHC.lhs" 641 13 641 17 24647 , srcInfoPoints = [] 24648 } 24649 "menv")))) 24650 (Var 24651 SrcSpanInfo 24652 { srcInfoSpan = 24653 SrcSpan "tests/examples/RealGHC.lhs" 641 18 641 24 24654 , srcInfoPoints = [] 24655 } 24656 (UnQual 24657 SrcSpanInfo 24658 { srcInfoSpan = 24659 SrcSpan "tests/examples/RealGHC.lhs" 641 18 641 24 24660 , srcInfoPoints = [] 24661 } 24662 (Ident 24663 SrcSpanInfo 24664 { srcInfoSpan = 24665 SrcSpan "tests/examples/RealGHC.lhs" 641 18 641 24 24666 , srcInfoPoints = [] 24667 } 24668 "subst1")))) 24669 (Var 24670 SrcSpanInfo 24671 { srcInfoSpan = 24672 SrcSpan "tests/examples/RealGHC.lhs" 641 25 641 27 24673 , srcInfoPoints = [] 24674 } 24675 (UnQual 24676 SrcSpanInfo 24677 { srcInfoSpan = 24678 SrcSpan "tests/examples/RealGHC.lhs" 641 25 641 27 24679 , srcInfoPoints = [] 24680 } 24681 (Ident 24682 SrcSpanInfo 24683 { srcInfoSpan = 24684 SrcSpan "tests/examples/RealGHC.lhs" 641 25 641 27 24685 , srcInfoPoints = [] 24686 } 24687 "e1")))) 24688 (Var 24689 SrcSpanInfo 24690 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 641 28 641 30 24691 , srcInfoPoints = [] 24692 } 24693 (UnQual 24694 SrcSpanInfo 24695 { srcInfoSpan = 24696 SrcSpan "tests/examples/RealGHC.lhs" 641 28 641 30 24697 , srcInfoPoints = [] 24698 } 24699 (Ident 24700 SrcSpanInfo 24701 { srcInfoSpan = 24702 SrcSpan "tests/examples/RealGHC.lhs" 641 28 641 30 24703 , srcInfoPoints = [] 24704 } 24705 "e2")))) 24706 ])) 24707 Nothing 24708 , Match 24709 SrcSpanInfo 24710 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 1 671 21 24711 , srcInfoPoints = [] 24712 } 24713 (Ident 24714 SrcSpanInfo 24715 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 1 670 6 24716 , srcInfoPoints = [] 24717 } 24718 "match") 24719 [ PVar 24720 SrcSpanInfo 24721 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 7 670 11 24722 , srcInfoPoints = [] 24723 } 24724 (Ident 24725 SrcSpanInfo 24726 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 7 670 11 24727 , srcInfoPoints = [] 24728 } 24729 "menv") 24730 , PVar 24731 SrcSpanInfo 24732 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 12 670 17 24733 , srcInfoPoints = [] 24734 } 24735 (Ident 24736 SrcSpanInfo 24737 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 12 670 17 24738 , srcInfoPoints = [] 24739 } 24740 "subst") 24741 , PVar 24742 SrcSpanInfo 24743 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 18 670 20 24744 , srcInfoPoints = [] 24745 } 24746 (Ident 24747 SrcSpanInfo 24748 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 18 670 20 24749 , srcInfoPoints = [] 24750 } 24751 "e1") 24752 , PVar 24753 SrcSpanInfo 24754 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 21 670 23 24755 , srcInfoPoints = [] 24756 } 24757 (Ident 24758 SrcSpanInfo 24759 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 21 670 23 24760 , srcInfoPoints = [] 24761 } 24762 "e2") 24763 ] 24764 (UnGuardedRhs 24765 SrcSpanInfo 24766 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 670 24 671 21 24767 , srcInfoPoints = 24768 [ SrcSpan "tests/examples/RealGHC.lhs" 670 24 670 25 ] 24769 } 24770 (Con 24771 SrcSpanInfo 24772 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 671 14 671 21 24773 , srcInfoPoints = [] 24774 } 24775 (UnQual 24776 SrcSpanInfo 24777 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 671 14 671 21 24778 , srcInfoPoints = [] 24779 } 24780 (Ident 24781 SrcSpanInfo 24782 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 671 14 671 21 24783 , srcInfoPoints = [] 24784 } 24785 "Nothing")))) 24786 Nothing 24787 ] 24788 , TypeSig 24789 SrcSpanInfo 24790 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 674 1 678 28 24791 , srcInfoPoints = 24792 [ SrcSpan "tests/examples/RealGHC.lhs" 674 11 674 13 ] 24793 } 24794 [ Ident 24795 SrcSpanInfo 24796 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 674 1 674 10 24797 , srcInfoPoints = [] 24798 } 24799 "match_var" 24800 ] 24801 (TyFun 24802 SrcSpanInfo 24803 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 674 14 678 28 24804 , srcInfoPoints = 24805 [ SrcSpan "tests/examples/RealGHC.lhs" 675 11 675 13 ] 24806 } 24807 (TyCon 24808 SrcSpanInfo 24809 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 674 14 674 22 24810 , srcInfoPoints = [] 24811 } 24812 (UnQual 24813 SrcSpanInfo 24814 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 674 14 674 22 24815 , srcInfoPoints = [] 24816 } 24817 (Ident 24818 SrcSpanInfo 24819 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 674 14 674 22 24820 , srcInfoPoints = [] 24821 } 24822 "MatchEnv"))) 24823 (TyFun 24824 SrcSpanInfo 24825 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 675 14 678 28 24826 , srcInfoPoints = 24827 [ SrcSpan "tests/examples/RealGHC.lhs" 676 11 676 13 ] 24828 } 24829 (TyCon 24830 SrcSpanInfo 24831 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 675 14 675 22 24832 , srcInfoPoints = [] 24833 } 24834 (UnQual 24835 SrcSpanInfo 24836 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 675 14 675 22 24837 , srcInfoPoints = [] 24838 } 24839 (Ident 24840 SrcSpanInfo 24841 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 675 14 675 22 24842 , srcInfoPoints = [] 24843 } 24844 "SubstEnv"))) 24845 (TyFun 24846 SrcSpanInfo 24847 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 676 14 678 28 24848 , srcInfoPoints = 24849 [ SrcSpan "tests/examples/RealGHC.lhs" 677 11 677 13 ] 24850 } 24851 (TyCon 24852 SrcSpanInfo 24853 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 676 14 676 17 24854 , srcInfoPoints = [] 24855 } 24856 (UnQual 24857 SrcSpanInfo 24858 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 676 14 676 17 24859 , srcInfoPoints = [] 24860 } 24861 (Ident 24862 SrcSpanInfo 24863 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 676 14 676 17 24864 , srcInfoPoints = [] 24865 } 24866 "Var"))) 24867 (TyFun 24868 SrcSpanInfo 24869 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 677 14 678 28 24870 , srcInfoPoints = 24871 [ SrcSpan "tests/examples/RealGHC.lhs" 678 11 678 13 ] 24872 } 24873 (TyCon 24874 SrcSpanInfo 24875 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 677 14 677 22 24876 , srcInfoPoints = [] 24877 } 24878 (UnQual 24879 SrcSpanInfo 24880 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 677 14 677 22 24881 , srcInfoPoints = [] 24882 } 24883 (Ident 24884 SrcSpanInfo 24885 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 677 14 677 22 24886 , srcInfoPoints = [] 24887 } 24888 "CoreExpr"))) 24889 (TyApp 24890 SrcSpanInfo 24891 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 678 14 678 28 24892 , srcInfoPoints = [] 24893 } 24894 (TyCon 24895 SrcSpanInfo 24896 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 678 14 678 19 24897 , srcInfoPoints = [] 24898 } 24899 (UnQual 24900 SrcSpanInfo 24901 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 678 14 678 19 24902 , srcInfoPoints = [] 24903 } 24904 (Ident 24905 SrcSpanInfo 24906 { srcInfoSpan = 24907 SrcSpan "tests/examples/RealGHC.lhs" 678 14 678 19 24908 , srcInfoPoints = [] 24909 } 24910 "Maybe"))) 24911 (TyCon 24912 SrcSpanInfo 24913 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 678 20 678 28 24914 , srcInfoPoints = [] 24915 } 24916 (UnQual 24917 SrcSpanInfo 24918 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 678 20 678 28 24919 , srcInfoPoints = [] 24920 } 24921 (Ident 24922 SrcSpanInfo 24923 { srcInfoSpan = 24924 SrcSpan "tests/examples/RealGHC.lhs" 678 20 678 28 24925 , srcInfoPoints = [] 24926 } 24927 "SubstEnv")))))))) 24928 , FunBind 24929 SrcSpanInfo 24930 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 1 715 30 24931 , srcInfoPoints = 24932 [ SrcSpan "tests/examples/RealGHC.lhs" 713 3 713 8 ] 24933 } 24934 [ Match 24935 SrcSpanInfo 24936 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 1 715 30 24937 , srcInfoPoints = 24938 [ SrcSpan "tests/examples/RealGHC.lhs" 713 3 713 8 ] 24939 } 24940 (Ident 24941 SrcSpanInfo 24942 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 1 679 10 24943 , srcInfoPoints = [] 24944 } 24945 "match_var") 24946 [ PVar 24947 SrcSpanInfo 24948 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 11 679 15 24949 , srcInfoPoints = [] 24950 } 24951 (Ident 24952 SrcSpanInfo 24953 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 11 679 15 24954 , srcInfoPoints = [] 24955 } 24956 "menv") 24957 , PAsPat 24958 SrcSpanInfo 24959 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 16 679 49 24960 , srcInfoPoints = 24961 [ SrcSpan "tests/examples/RealGHC.lhs" 679 21 679 22 ] 24962 } 24963 (Ident 24964 SrcSpanInfo 24965 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 16 679 21 24966 , srcInfoPoints = [] 24967 } 24968 "subst") 24969 (PTuple 24970 SrcSpanInfo 24971 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 22 679 49 24972 , srcInfoPoints = 24973 [ SrcSpan "tests/examples/RealGHC.lhs" 679 22 679 23 24974 , SrcSpan "tests/examples/RealGHC.lhs" 679 31 679 32 24975 , SrcSpan "tests/examples/RealGHC.lhs" 679 41 679 42 24976 , SrcSpan "tests/examples/RealGHC.lhs" 679 48 679 49 24977 ] 24978 } 24979 Boxed 24980 [ PVar 24981 SrcSpanInfo 24982 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 23 679 31 24983 , srcInfoPoints = [] 24984 } 24985 (Ident 24986 SrcSpanInfo 24987 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 23 679 31 24988 , srcInfoPoints = [] 24989 } 24990 "tv_subst") 24991 , PVar 24992 SrcSpanInfo 24993 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 33 679 41 24994 , srcInfoPoints = [] 24995 } 24996 (Ident 24997 SrcSpanInfo 24998 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 33 679 41 24999 , srcInfoPoints = [] 25000 } 25001 "id_subst") 25002 , PVar 25003 SrcSpanInfo 25004 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 43 679 48 25005 , srcInfoPoints = [] 25006 } 25007 (Ident 25008 SrcSpanInfo 25009 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 43 679 48 25010 , srcInfoPoints = [] 25011 } 25012 "binds") 25013 ]) 25014 , PVar 25015 SrcSpanInfo 25016 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 50 679 52 25017 , srcInfoPoints = [] 25018 } 25019 (Ident 25020 SrcSpanInfo 25021 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 50 679 52 25022 , srcInfoPoints = [] 25023 } 25024 "v1") 25025 , PVar 25026 SrcSpanInfo 25027 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 53 679 55 25028 , srcInfoPoints = [] 25029 } 25030 (Ident 25031 SrcSpanInfo 25032 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 679 53 679 55 25033 , srcInfoPoints = [] 25034 } 25035 "e2") 25036 ] 25037 (GuardedRhss 25038 SrcSpanInfo 25039 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 3 711 39 25040 , srcInfoPoints = [] 25041 } 25042 [ GuardedRhs 25043 SrcSpanInfo 25044 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 3 706 20 25045 , srcInfoPoints = 25046 [ SrcSpan "tests/examples/RealGHC.lhs" 680 3 680 4 25047 , SrcSpan "tests/examples/RealGHC.lhs" 681 3 681 4 25048 ] 25049 } 25050 [ Qualifier 25051 SrcSpanInfo 25052 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 5 680 35 25053 , srcInfoPoints = [] 25054 } 25055 (InfixApp 25056 SrcSpanInfo 25057 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 5 680 35 25058 , srcInfoPoints = [] 25059 } 25060 (Var 25061 SrcSpanInfo 25062 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 5 680 8 25063 , srcInfoPoints = [] 25064 } 25065 (UnQual 25066 SrcSpanInfo 25067 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 5 680 8 25068 , srcInfoPoints = [] 25069 } 25070 (Ident 25071 SrcSpanInfo 25072 { srcInfoSpan = 25073 SrcSpan "tests/examples/RealGHC.lhs" 680 5 680 8 25074 , srcInfoPoints = [] 25075 } 25076 "v1'"))) 25077 (QVarOp 25078 SrcSpanInfo 25079 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 9 680 21 25080 , srcInfoPoints = 25081 [ SrcSpan "tests/examples/RealGHC.lhs" 680 9 680 10 25082 , SrcSpan "tests/examples/RealGHC.lhs" 680 10 680 20 25083 , SrcSpan "tests/examples/RealGHC.lhs" 680 20 680 21 25084 ] 25085 } 25086 (UnQual 25087 SrcSpanInfo 25088 { srcInfoSpan = 25089 SrcSpan "tests/examples/RealGHC.lhs" 680 9 680 21 25090 , srcInfoPoints = 25091 [ SrcSpan "tests/examples/RealGHC.lhs" 680 9 680 10 25092 , SrcSpan "tests/examples/RealGHC.lhs" 680 10 680 20 25093 , SrcSpan "tests/examples/RealGHC.lhs" 680 20 680 21 25094 ] 25095 } 25096 (Ident 25097 SrcSpanInfo 25098 { srcInfoSpan = 25099 SrcSpan "tests/examples/RealGHC.lhs" 680 10 680 20 25100 , srcInfoPoints = [] 25101 } 25102 "elemVarSet"))) 25103 (App 25104 SrcSpanInfo 25105 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 680 22 680 35 25106 , srcInfoPoints = [] 25107 } 25108 (Var 25109 SrcSpanInfo 25110 { srcInfoSpan = 25111 SrcSpan "tests/examples/RealGHC.lhs" 680 22 680 30 25112 , srcInfoPoints = [] 25113 } 25114 (UnQual 25115 SrcSpanInfo 25116 { srcInfoSpan = 25117 SrcSpan "tests/examples/RealGHC.lhs" 680 22 680 30 25118 , srcInfoPoints = [] 25119 } 25120 (Ident 25121 SrcSpanInfo 25122 { srcInfoSpan = 25123 SrcSpan "tests/examples/RealGHC.lhs" 680 22 680 30 25124 , srcInfoPoints = [] 25125 } 25126 "me_tmpls"))) 25127 (Var 25128 SrcSpanInfo 25129 { srcInfoSpan = 25130 SrcSpan "tests/examples/RealGHC.lhs" 680 31 680 35 25131 , srcInfoPoints = [] 25132 } 25133 (UnQual 25134 SrcSpanInfo 25135 { srcInfoSpan = 25136 SrcSpan "tests/examples/RealGHC.lhs" 680 31 680 35 25137 , srcInfoPoints = [] 25138 } 25139 (Ident 25140 SrcSpanInfo 25141 { srcInfoSpan = 25142 SrcSpan "tests/examples/RealGHC.lhs" 680 31 680 35 25143 , srcInfoPoints = [] 25144 } 25145 "menv"))))) 25146 ] 25147 (Case 25148 SrcSpanInfo 25149 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 681 5 706 20 25150 , srcInfoPoints = 25151 [ SrcSpan "tests/examples/RealGHC.lhs" 681 5 681 9 25152 , SrcSpan "tests/examples/RealGHC.lhs" 681 36 681 38 25153 , SrcSpan "tests/examples/RealGHC.lhs" 682 5 682 5 25154 , SrcSpan "tests/examples/RealGHC.lhs" 702 5 702 5 25155 , SrcSpan "tests/examples/RealGHC.lhs" 708 3 708 0 25156 ] 25157 } 25158 (App 25159 SrcSpanInfo 25160 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 681 10 681 35 25161 , srcInfoPoints = [] 25162 } 25163 (App 25164 SrcSpanInfo 25165 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 681 10 681 31 25166 , srcInfoPoints = [] 25167 } 25168 (Var 25169 SrcSpanInfo 25170 { srcInfoSpan = 25171 SrcSpan "tests/examples/RealGHC.lhs" 681 10 681 22 25172 , srcInfoPoints = [] 25173 } 25174 (UnQual 25175 SrcSpanInfo 25176 { srcInfoSpan = 25177 SrcSpan "tests/examples/RealGHC.lhs" 681 10 681 22 25178 , srcInfoPoints = [] 25179 } 25180 (Ident 25181 SrcSpanInfo 25182 { srcInfoSpan = 25183 SrcSpan "tests/examples/RealGHC.lhs" 681 10 681 22 25184 , srcInfoPoints = [] 25185 } 25186 "lookupVarEnv"))) 25187 (Var 25188 SrcSpanInfo 25189 { srcInfoSpan = 25190 SrcSpan "tests/examples/RealGHC.lhs" 681 23 681 31 25191 , srcInfoPoints = [] 25192 } 25193 (UnQual 25194 SrcSpanInfo 25195 { srcInfoSpan = 25196 SrcSpan "tests/examples/RealGHC.lhs" 681 23 681 31 25197 , srcInfoPoints = [] 25198 } 25199 (Ident 25200 SrcSpanInfo 25201 { srcInfoSpan = 25202 SrcSpan "tests/examples/RealGHC.lhs" 681 23 681 31 25203 , srcInfoPoints = [] 25204 } 25205 "id_subst")))) 25206 (Var 25207 SrcSpanInfo 25208 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 681 32 681 35 25209 , srcInfoPoints = [] 25210 } 25211 (UnQual 25212 SrcSpanInfo 25213 { srcInfoSpan = 25214 SrcSpan "tests/examples/RealGHC.lhs" 681 32 681 35 25215 , srcInfoPoints = [] 25216 } 25217 (Ident 25218 SrcSpanInfo 25219 { srcInfoSpan = 25220 SrcSpan "tests/examples/RealGHC.lhs" 681 32 681 35 25221 , srcInfoPoints = [] 25222 } 25223 "v1'")))) 25224 [ Alt 25225 SrcSpanInfo 25226 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 5 700 72 25227 , srcInfoPoints = [] 25228 } 25229 (PApp 25230 SrcSpanInfo 25231 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 5 682 12 25232 , srcInfoPoints = [] 25233 } 25234 (UnQual 25235 SrcSpanInfo 25236 { srcInfoSpan = 25237 SrcSpan "tests/examples/RealGHC.lhs" 682 5 682 12 25238 , srcInfoPoints = [] 25239 } 25240 (Ident 25241 SrcSpanInfo 25242 { srcInfoSpan = 25243 SrcSpan "tests/examples/RealGHC.lhs" 682 5 682 12 25244 , srcInfoPoints = [] 25245 } 25246 "Nothing")) 25247 []) 25248 (GuardedRhss 25249 SrcSpanInfo 25250 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 682 13 700 72 25251 , srcInfoPoints = [] 25252 } 25253 [ GuardedRhs 25254 SrcSpanInfo 25255 { srcInfoSpan = 25256 SrcSpan "tests/examples/RealGHC.lhs" 682 13 683 19 25257 , srcInfoPoints = 25258 [ SrcSpan "tests/examples/RealGHC.lhs" 682 13 682 14 25259 , SrcSpan "tests/examples/RealGHC.lhs" 683 9 683 11 25260 ] 25261 } 25262 [ Qualifier 25263 SrcSpanInfo 25264 { srcInfoSpan = 25265 SrcSpan "tests/examples/RealGHC.lhs" 682 15 682 68 25266 , srcInfoPoints = [] 25267 } 25268 (App 25269 SrcSpanInfo 25270 { srcInfoSpan = 25271 SrcSpan "tests/examples/RealGHC.lhs" 682 15 682 68 25272 , srcInfoPoints = [] 25273 } 25274 (App 25275 SrcSpanInfo 25276 { srcInfoSpan = 25277 SrcSpan 25278 "tests/examples/RealGHC.lhs" 682 15 682 36 25279 , srcInfoPoints = [] 25280 } 25281 (Var 25282 SrcSpanInfo 25283 { srcInfoSpan = 25284 SrcSpan 25285 "tests/examples/RealGHC.lhs" 682 15 682 18 25286 , srcInfoPoints = [] 25287 } 25288 (UnQual 25289 SrcSpanInfo 25290 { srcInfoSpan = 25291 SrcSpan 25292 "tests/examples/RealGHC.lhs" 25293 682 25294 15 25295 682 25296 18 25297 , srcInfoPoints = [] 25298 } 25299 (Ident 25300 SrcSpanInfo 25301 { srcInfoSpan = 25302 SrcSpan 25303 "tests/examples/RealGHC.lhs" 25304 682 25305 15 25306 682 25307 18 25308 , srcInfoPoints = [] 25309 } 25310 "any"))) 25311 (Paren 25312 SrcSpanInfo 25313 { srcInfoSpan = 25314 SrcSpan 25315 "tests/examples/RealGHC.lhs" 682 19 682 36 25316 , srcInfoPoints = 25317 [ SrcSpan 25318 "tests/examples/RealGHC.lhs" 682 19 682 20 25319 , SrcSpan 25320 "tests/examples/RealGHC.lhs" 682 35 682 36 25321 ] 25322 } 25323 (App 25324 SrcSpanInfo 25325 { srcInfoSpan = 25326 SrcSpan 25327 "tests/examples/RealGHC.lhs" 25328 682 25329 20 25330 682 25331 35 25332 , srcInfoPoints = [] 25333 } 25334 (Var 25335 SrcSpanInfo 25336 { srcInfoSpan = 25337 SrcSpan 25338 "tests/examples/RealGHC.lhs" 25339 682 25340 20 25341 682 25342 28 25343 , srcInfoPoints = [] 25344 } 25345 (UnQual 25346 SrcSpanInfo 25347 { srcInfoSpan = 25348 SrcSpan 25349 "tests/examples/RealGHC.lhs" 25350 682 25351 20 25352 682 25353 28 25354 , srcInfoPoints = [] 25355 } 25356 (Ident 25357 SrcSpanInfo 25358 { srcInfoSpan = 25359 SrcSpan 25360 "tests/examples/RealGHC.lhs" 25361 682 25362 20 25363 682 25364 28 25365 , srcInfoPoints = [] 25366 } 25367 "inRnEnvR"))) 25368 (Var 25369 SrcSpanInfo 25370 { srcInfoSpan = 25371 SrcSpan 25372 "tests/examples/RealGHC.lhs" 25373 682 25374 29 25375 682 25376 35 25377 , srcInfoPoints = [] 25378 } 25379 (UnQual 25380 SrcSpanInfo 25381 { srcInfoSpan = 25382 SrcSpan 25383 "tests/examples/RealGHC.lhs" 25384 682 25385 29 25386 682 25387 35 25388 , srcInfoPoints = [] 25389 } 25390 (Ident 25391 SrcSpanInfo 25392 { srcInfoSpan = 25393 SrcSpan 25394 "tests/examples/RealGHC.lhs" 25395 682 25396 29 25397 682 25398 35 25399 , srcInfoPoints = [] 25400 } 25401 "rn_env")))))) 25402 (Paren 25403 SrcSpanInfo 25404 { srcInfoSpan = 25405 SrcSpan 25406 "tests/examples/RealGHC.lhs" 682 37 682 68 25407 , srcInfoPoints = 25408 [ SrcSpan 25409 "tests/examples/RealGHC.lhs" 682 37 682 38 25410 , SrcSpan 25411 "tests/examples/RealGHC.lhs" 682 67 682 68 25412 ] 25413 } 25414 (App 25415 SrcSpanInfo 25416 { srcInfoSpan = 25417 SrcSpan 25418 "tests/examples/RealGHC.lhs" 682 38 682 67 25419 , srcInfoPoints = [] 25420 } 25421 (Var 25422 SrcSpanInfo 25423 { srcInfoSpan = 25424 SrcSpan 25425 "tests/examples/RealGHC.lhs" 25426 682 25427 38 25428 682 25429 49 25430 , srcInfoPoints = [] 25431 } 25432 (UnQual 25433 SrcSpanInfo 25434 { srcInfoSpan = 25435 SrcSpan 25436 "tests/examples/RealGHC.lhs" 25437 682 25438 38 25439 682 25440 49 25441 , srcInfoPoints = [] 25442 } 25443 (Ident 25444 SrcSpanInfo 25445 { srcInfoSpan = 25446 SrcSpan 25447 "tests/examples/RealGHC.lhs" 25448 682 25449 38 25450 682 25451 49 25452 , srcInfoPoints = [] 25453 } 25454 "varSetElems"))) 25455 (Paren 25456 SrcSpanInfo 25457 { srcInfoSpan = 25458 SrcSpan 25459 "tests/examples/RealGHC.lhs" 25460 682 25461 50 25462 682 25463 67 25464 , srcInfoPoints = 25465 [ SrcSpan 25466 "tests/examples/RealGHC.lhs" 25467 682 25468 50 25469 682 25470 51 25471 , SrcSpan 25472 "tests/examples/RealGHC.lhs" 25473 682 25474 66 25475 682 25476 67 25477 ] 25478 } 25479 (App 25480 SrcSpanInfo 25481 { srcInfoSpan = 25482 SrcSpan 25483 "tests/examples/RealGHC.lhs" 25484 682 25485 51 25486 682 25487 66 25488 , srcInfoPoints = [] 25489 } 25490 (Var 25491 SrcSpanInfo 25492 { srcInfoSpan = 25493 SrcSpan 25494 "tests/examples/RealGHC.lhs" 25495 682 25496 51 25497 682 25498 63 25499 , srcInfoPoints = [] 25500 } 25501 (UnQual 25502 SrcSpanInfo 25503 { srcInfoSpan = 25504 SrcSpan 25505 "tests/examples/RealGHC.lhs" 25506 682 25507 51 25508 682 25509 63 25510 , srcInfoPoints = [] 25511 } 25512 (Ident 25513 SrcSpanInfo 25514 { srcInfoSpan = 25515 SrcSpan 25516 "tests/examples/RealGHC.lhs" 25517 682 25518 51 25519 682 25520 63 25521 , srcInfoPoints = [] 25522 } 25523 "exprFreeVars"))) 25524 (Var 25525 SrcSpanInfo 25526 { srcInfoSpan = 25527 SrcSpan 25528 "tests/examples/RealGHC.lhs" 25529 682 25530 64 25531 682 25532 66 25533 , srcInfoPoints = [] 25534 } 25535 (UnQual 25536 SrcSpanInfo 25537 { srcInfoSpan = 25538 SrcSpan 25539 "tests/examples/RealGHC.lhs" 25540 682 25541 64 25542 682 25543 66 25544 , srcInfoPoints = [] 25545 } 25546 (Ident 25547 SrcSpanInfo 25548 { srcInfoSpan = 25549 SrcSpan 25550 "tests/examples/RealGHC.lhs" 25551 682 25552 64 25553 682 25554 66 25555 , srcInfoPoints = [] 25556 } 25557 "e2")))))))) 25558 ] 25559 (Con 25560 SrcSpanInfo 25561 { srcInfoSpan = 25562 SrcSpan "tests/examples/RealGHC.lhs" 683 12 683 19 25563 , srcInfoPoints = [] 25564 } 25565 (UnQual 25566 SrcSpanInfo 25567 { srcInfoSpan = 25568 SrcSpan "tests/examples/RealGHC.lhs" 683 12 683 19 25569 , srcInfoPoints = [] 25570 } 25571 (Ident 25572 SrcSpanInfo 25573 { srcInfoSpan = 25574 SrcSpan "tests/examples/RealGHC.lhs" 683 12 683 19 25575 , srcInfoPoints = [] 25576 } 25577 "Nothing"))) 25578 , GuardedRhs 25579 SrcSpanInfo 25580 { srcInfoSpan = 25581 SrcSpan "tests/examples/RealGHC.lhs" 686 9 700 72 25582 , srcInfoPoints = 25583 [ SrcSpan "tests/examples/RealGHC.lhs" 686 9 686 10 25584 , SrcSpan "tests/examples/RealGHC.lhs" 698 9 698 11 25585 ] 25586 } 25587 [ Qualifier 25588 SrcSpanInfo 25589 { srcInfoSpan = 25590 SrcSpan "tests/examples/RealGHC.lhs" 686 11 686 20 25591 , srcInfoPoints = [] 25592 } 25593 (Var 25594 SrcSpanInfo 25595 { srcInfoSpan = 25596 SrcSpan "tests/examples/RealGHC.lhs" 686 11 686 20 25597 , srcInfoPoints = [] 25598 } 25599 (UnQual 25600 SrcSpanInfo 25601 { srcInfoSpan = 25602 SrcSpan 25603 "tests/examples/RealGHC.lhs" 686 11 686 20 25604 , srcInfoPoints = [] 25605 } 25606 (Ident 25607 SrcSpanInfo 25608 { srcInfoSpan = 25609 SrcSpan 25610 "tests/examples/RealGHC.lhs" 686 11 686 20 25611 , srcInfoPoints = [] 25612 } 25613 "otherwise"))) 25614 ] 25615 (Do 25616 SrcSpanInfo 25617 { srcInfoSpan = 25618 SrcSpan "tests/examples/RealGHC.lhs" 698 12 700 72 25619 , srcInfoPoints = 25620 [ SrcSpan "tests/examples/RealGHC.lhs" 698 12 698 14 25621 , SrcSpan "tests/examples/RealGHC.lhs" 698 17 698 18 25622 , SrcSpan "tests/examples/RealGHC.lhs" 700 13 700 14 25623 , SrcSpan "tests/examples/RealGHC.lhs" 700 71 700 72 25624 ] 25625 } 25626 [ Generator 25627 SrcSpanInfo 25628 { srcInfoSpan = 25629 SrcSpan "tests/examples/RealGHC.lhs" 698 19 698 91 25630 , srcInfoPoints = 25631 [ SrcSpan "tests/examples/RealGHC.lhs" 698 29 698 31 25632 ] 25633 } 25634 (PVar 25635 SrcSpanInfo 25636 { srcInfoSpan = 25637 SrcSpan 25638 "tests/examples/RealGHC.lhs" 698 19 698 28 25639 , srcInfoPoints = [] 25640 } 25641 (Ident 25642 SrcSpanInfo 25643 { srcInfoSpan = 25644 SrcSpan 25645 "tests/examples/RealGHC.lhs" 698 19 698 28 25646 , srcInfoPoints = [] 25647 } 25648 "tv_subst'")) 25649 (App 25650 SrcSpanInfo 25651 { srcInfoSpan = 25652 SrcSpan 25653 "tests/examples/RealGHC.lhs" 698 32 698 91 25654 , srcInfoPoints = [] 25655 } 25656 (App 25657 SrcSpanInfo 25658 { srcInfoSpan = 25659 SrcSpan 25660 "tests/examples/RealGHC.lhs" 698 32 698 77 25661 , srcInfoPoints = [] 25662 } 25663 (App 25664 SrcSpanInfo 25665 { srcInfoSpan = 25666 SrcSpan 25667 "tests/examples/RealGHC.lhs" 25668 698 25669 32 25670 698 25671 64 25672 , srcInfoPoints = [] 25673 } 25674 (App 25675 SrcSpanInfo 25676 { srcInfoSpan = 25677 SrcSpan 25678 "tests/examples/RealGHC.lhs" 25679 698 25680 32 25681 698 25682 55 25683 , srcInfoPoints = [] 25684 } 25685 (Var 25686 SrcSpanInfo 25687 { srcInfoSpan = 25688 SrcSpan 25689 "tests/examples/RealGHC.lhs" 25690 698 25691 32 25692 698 25693 50 25694 , srcInfoPoints = [] 25695 } 25696 (Qual 25697 SrcSpanInfo 25698 { srcInfoSpan = 25699 SrcSpan 25700 "tests/examples/RealGHC.lhs" 25701 698 25702 32 25703 698 25704 50 25705 , srcInfoPoints = [] 25706 } 25707 (ModuleName 25708 SrcSpanInfo 25709 { srcInfoSpan = 25710 SrcSpan 25711 "tests/examples/RealGHC.lhs" 25712 698 25713 32 25714 698 25715 50 25716 , srcInfoPoints = [] 25717 } 25718 "Unify") 25719 (Ident 25720 SrcSpanInfo 25721 { srcInfoSpan = 25722 SrcSpan 25723 "tests/examples/RealGHC.lhs" 25724 698 25725 32 25726 698 25727 50 25728 , srcInfoPoints = [] 25729 } 25730 "ruleMatchTyX"))) 25731 (Var 25732 SrcSpanInfo 25733 { srcInfoSpan = 25734 SrcSpan 25735 "tests/examples/RealGHC.lhs" 25736 698 25737 51 25738 698 25739 55 25740 , srcInfoPoints = [] 25741 } 25742 (UnQual 25743 SrcSpanInfo 25744 { srcInfoSpan = 25745 SrcSpan 25746 "tests/examples/RealGHC.lhs" 25747 698 25748 51 25749 698 25750 55 25751 , srcInfoPoints = [] 25752 } 25753 (Ident 25754 SrcSpanInfo 25755 { srcInfoSpan = 25756 SrcSpan 25757 "tests/examples/RealGHC.lhs" 25758 698 25759 51 25760 698 25761 55 25762 , srcInfoPoints = [] 25763 } 25764 "menv")))) 25765 (Var 25766 SrcSpanInfo 25767 { srcInfoSpan = 25768 SrcSpan 25769 "tests/examples/RealGHC.lhs" 25770 698 25771 56 25772 698 25773 64 25774 , srcInfoPoints = [] 25775 } 25776 (UnQual 25777 SrcSpanInfo 25778 { srcInfoSpan = 25779 SrcSpan 25780 "tests/examples/RealGHC.lhs" 25781 698 25782 56 25783 698 25784 64 25785 , srcInfoPoints = [] 25786 } 25787 (Ident 25788 SrcSpanInfo 25789 { srcInfoSpan = 25790 SrcSpan 25791 "tests/examples/RealGHC.lhs" 25792 698 25793 56 25794 698 25795 64 25796 , srcInfoPoints = [] 25797 } 25798 "tv_subst")))) 25799 (Paren 25800 SrcSpanInfo 25801 { srcInfoSpan = 25802 SrcSpan 25803 "tests/examples/RealGHC.lhs" 25804 698 25805 65 25806 698 25807 77 25808 , srcInfoPoints = 25809 [ SrcSpan 25810 "tests/examples/RealGHC.lhs" 25811 698 25812 65 25813 698 25814 66 25815 , SrcSpan 25816 "tests/examples/RealGHC.lhs" 25817 698 25818 76 25819 698 25820 77 25821 ] 25822 } 25823 (App 25824 SrcSpanInfo 25825 { srcInfoSpan = 25826 SrcSpan 25827 "tests/examples/RealGHC.lhs" 25828 698 25829 66 25830 698 25831 76 25832 , srcInfoPoints = [] 25833 } 25834 (Var 25835 SrcSpanInfo 25836 { srcInfoSpan = 25837 SrcSpan 25838 "tests/examples/RealGHC.lhs" 25839 698 25840 66 25841 698 25842 72 25843 , srcInfoPoints = [] 25844 } 25845 (UnQual 25846 SrcSpanInfo 25847 { srcInfoSpan = 25848 SrcSpan 25849 "tests/examples/RealGHC.lhs" 25850 698 25851 66 25852 698 25853 72 25854 , srcInfoPoints = [] 25855 } 25856 (Ident 25857 SrcSpanInfo 25858 { srcInfoSpan = 25859 SrcSpan 25860 "tests/examples/RealGHC.lhs" 25861 698 25862 66 25863 698 25864 72 25865 , srcInfoPoints = [] 25866 } 25867 "idType"))) 25868 (Var 25869 SrcSpanInfo 25870 { srcInfoSpan = 25871 SrcSpan 25872 "tests/examples/RealGHC.lhs" 25873 698 25874 73 25875 698 25876 76 25877 , srcInfoPoints = [] 25878 } 25879 (UnQual 25880 SrcSpanInfo 25881 { srcInfoSpan = 25882 SrcSpan 25883 "tests/examples/RealGHC.lhs" 25884 698 25885 73 25886 698 25887 76 25888 , srcInfoPoints = [] 25889 } 25890 (Ident 25891 SrcSpanInfo 25892 { srcInfoSpan = 25893 SrcSpan 25894 "tests/examples/RealGHC.lhs" 25895 698 25896 73 25897 698 25898 76 25899 , srcInfoPoints = [] 25900 } 25901 "v1'")))))) 25902 (Paren 25903 SrcSpanInfo 25904 { srcInfoSpan = 25905 SrcSpan 25906 "tests/examples/RealGHC.lhs" 698 78 698 91 25907 , srcInfoPoints = 25908 [ SrcSpan 25909 "tests/examples/RealGHC.lhs" 698 78 698 79 25910 , SrcSpan 25911 "tests/examples/RealGHC.lhs" 698 90 698 91 25912 ] 25913 } 25914 (App 25915 SrcSpanInfo 25916 { srcInfoSpan = 25917 SrcSpan 25918 "tests/examples/RealGHC.lhs" 25919 698 25920 79 25921 698 25922 90 25923 , srcInfoPoints = [] 25924 } 25925 (Var 25926 SrcSpanInfo 25927 { srcInfoSpan = 25928 SrcSpan 25929 "tests/examples/RealGHC.lhs" 25930 698 25931 79 25932 698 25933 87 25934 , srcInfoPoints = [] 25935 } 25936 (UnQual 25937 SrcSpanInfo 25938 { srcInfoSpan = 25939 SrcSpan 25940 "tests/examples/RealGHC.lhs" 25941 698 25942 79 25943 698 25944 87 25945 , srcInfoPoints = [] 25946 } 25947 (Ident 25948 SrcSpanInfo 25949 { srcInfoSpan = 25950 SrcSpan 25951 "tests/examples/RealGHC.lhs" 25952 698 25953 79 25954 698 25955 87 25956 , srcInfoPoints = [] 25957 } 25958 "exprType"))) 25959 (Var 25960 SrcSpanInfo 25961 { srcInfoSpan = 25962 SrcSpan 25963 "tests/examples/RealGHC.lhs" 25964 698 25965 88 25966 698 25967 90 25968 , srcInfoPoints = [] 25969 } 25970 (UnQual 25971 SrcSpanInfo 25972 { srcInfoSpan = 25973 SrcSpan 25974 "tests/examples/RealGHC.lhs" 25975 698 25976 88 25977 698 25978 90 25979 , srcInfoPoints = [] 25980 } 25981 (Ident 25982 SrcSpanInfo 25983 { srcInfoSpan = 25984 SrcSpan 25985 "tests/examples/RealGHC.lhs" 25986 698 25987 88 25988 698 25989 90 25990 , srcInfoPoints = [] 25991 } 25992 "e2")))))) 25993 , Qualifier 25994 SrcSpanInfo 25995 { srcInfoSpan = 25996 SrcSpan "tests/examples/RealGHC.lhs" 700 15 700 70 25997 , srcInfoPoints = [] 25998 } 25999 (App 26000 SrcSpanInfo 26001 { srcInfoSpan = 26002 SrcSpan 26003 "tests/examples/RealGHC.lhs" 700 15 700 70 26004 , srcInfoPoints = [] 26005 } 26006 (Var 26007 SrcSpanInfo 26008 { srcInfoSpan = 26009 SrcSpan 26010 "tests/examples/RealGHC.lhs" 700 15 700 21 26011 , srcInfoPoints = [] 26012 } 26013 (UnQual 26014 SrcSpanInfo 26015 { srcInfoSpan = 26016 SrcSpan 26017 "tests/examples/RealGHC.lhs" 26018 700 26019 15 26020 700 26021 21 26022 , srcInfoPoints = [] 26023 } 26024 (Ident 26025 SrcSpanInfo 26026 { srcInfoSpan = 26027 SrcSpan 26028 "tests/examples/RealGHC.lhs" 26029 700 26030 15 26031 700 26032 21 26033 , srcInfoPoints = [] 26034 } 26035 "return"))) 26036 (Tuple 26037 SrcSpanInfo 26038 { srcInfoSpan = 26039 SrcSpan 26040 "tests/examples/RealGHC.lhs" 700 22 700 70 26041 , srcInfoPoints = 26042 [ SrcSpan 26043 "tests/examples/RealGHC.lhs" 700 22 700 23 26044 , SrcSpan 26045 "tests/examples/RealGHC.lhs" 700 32 700 33 26046 , SrcSpan 26047 "tests/examples/RealGHC.lhs" 700 62 700 63 26048 , SrcSpan 26049 "tests/examples/RealGHC.lhs" 700 69 700 70 26050 ] 26051 } 26052 Boxed 26053 [ Var 26054 SrcSpanInfo 26055 { srcInfoSpan = 26056 SrcSpan 26057 "tests/examples/RealGHC.lhs" 26058 700 26059 23 26060 700 26061 32 26062 , srcInfoPoints = [] 26063 } 26064 (UnQual 26065 SrcSpanInfo 26066 { srcInfoSpan = 26067 SrcSpan 26068 "tests/examples/RealGHC.lhs" 26069 700 26070 23 26071 700 26072 32 26073 , srcInfoPoints = [] 26074 } 26075 (Ident 26076 SrcSpanInfo 26077 { srcInfoSpan = 26078 SrcSpan 26079 "tests/examples/RealGHC.lhs" 26080 700 26081 23 26082 700 26083 32 26084 , srcInfoPoints = [] 26085 } 26086 "tv_subst'")) 26087 , App 26088 SrcSpanInfo 26089 { srcInfoSpan = 26090 SrcSpan 26091 "tests/examples/RealGHC.lhs" 26092 700 26093 34 26094 700 26095 62 26096 , srcInfoPoints = [] 26097 } 26098 (App 26099 SrcSpanInfo 26100 { srcInfoSpan = 26101 SrcSpan 26102 "tests/examples/RealGHC.lhs" 26103 700 26104 34 26105 700 26106 59 26107 , srcInfoPoints = [] 26108 } 26109 (App 26110 SrcSpanInfo 26111 { srcInfoSpan = 26112 SrcSpan 26113 "tests/examples/RealGHC.lhs" 26114 700 26115 34 26116 700 26117 55 26118 , srcInfoPoints = [] 26119 } 26120 (Var 26121 SrcSpanInfo 26122 { srcInfoSpan = 26123 SrcSpan 26124 "tests/examples/RealGHC.lhs" 26125 700 26126 34 26127 700 26128 46 26129 , srcInfoPoints = [] 26130 } 26131 (UnQual 26132 SrcSpanInfo 26133 { srcInfoSpan = 26134 SrcSpan 26135 "tests/examples/RealGHC.lhs" 26136 700 26137 34 26138 700 26139 46 26140 , srcInfoPoints = [] 26141 } 26142 (Ident 26143 SrcSpanInfo 26144 { srcInfoSpan = 26145 SrcSpan 26146 "tests/examples/RealGHC.lhs" 26147 700 26148 34 26149 700 26150 46 26151 , srcInfoPoints = [] 26152 } 26153 "extendVarEnv"))) 26154 (Var 26155 SrcSpanInfo 26156 { srcInfoSpan = 26157 SrcSpan 26158 "tests/examples/RealGHC.lhs" 26159 700 26160 47 26161 700 26162 55 26163 , srcInfoPoints = [] 26164 } 26165 (UnQual 26166 SrcSpanInfo 26167 { srcInfoSpan = 26168 SrcSpan 26169 "tests/examples/RealGHC.lhs" 26170 700 26171 47 26172 700 26173 55 26174 , srcInfoPoints = [] 26175 } 26176 (Ident 26177 SrcSpanInfo 26178 { srcInfoSpan = 26179 SrcSpan 26180 "tests/examples/RealGHC.lhs" 26181 700 26182 47 26183 700 26184 55 26185 , srcInfoPoints = [] 26186 } 26187 "id_subst")))) 26188 (Var 26189 SrcSpanInfo 26190 { srcInfoSpan = 26191 SrcSpan 26192 "tests/examples/RealGHC.lhs" 26193 700 26194 56 26195 700 26196 59 26197 , srcInfoPoints = [] 26198 } 26199 (UnQual 26200 SrcSpanInfo 26201 { srcInfoSpan = 26202 SrcSpan 26203 "tests/examples/RealGHC.lhs" 26204 700 26205 56 26206 700 26207 59 26208 , srcInfoPoints = [] 26209 } 26210 (Ident 26211 SrcSpanInfo 26212 { srcInfoSpan = 26213 SrcSpan 26214 "tests/examples/RealGHC.lhs" 26215 700 26216 56 26217 700 26218 59 26219 , srcInfoPoints = [] 26220 } 26221 "v1'")))) 26222 (Var 26223 SrcSpanInfo 26224 { srcInfoSpan = 26225 SrcSpan 26226 "tests/examples/RealGHC.lhs" 26227 700 26228 60 26229 700 26230 62 26231 , srcInfoPoints = [] 26232 } 26233 (UnQual 26234 SrcSpanInfo 26235 { srcInfoSpan = 26236 SrcSpan 26237 "tests/examples/RealGHC.lhs" 26238 700 26239 60 26240 700 26241 62 26242 , srcInfoPoints = [] 26243 } 26244 (Ident 26245 SrcSpanInfo 26246 { srcInfoSpan = 26247 SrcSpan 26248 "tests/examples/RealGHC.lhs" 26249 700 26250 60 26251 700 26252 62 26253 , srcInfoPoints = [] 26254 } 26255 "e2"))) 26256 , Var 26257 SrcSpanInfo 26258 { srcInfoSpan = 26259 SrcSpan 26260 "tests/examples/RealGHC.lhs" 26261 700 26262 64 26263 700 26264 69 26265 , srcInfoPoints = [] 26266 } 26267 (UnQual 26268 SrcSpanInfo 26269 { srcInfoSpan = 26270 SrcSpan 26271 "tests/examples/RealGHC.lhs" 26272 700 26273 64 26274 700 26275 69 26276 , srcInfoPoints = [] 26277 } 26278 (Ident 26279 SrcSpanInfo 26280 { srcInfoSpan = 26281 SrcSpan 26282 "tests/examples/RealGHC.lhs" 26283 700 26284 64 26285 700 26286 69 26287 , srcInfoPoints = [] 26288 } 26289 "binds")) 26290 ])) 26291 ]) 26292 ]) 26293 Nothing 26294 , Alt 26295 SrcSpanInfo 26296 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 5 706 20 26297 , srcInfoPoints = [] 26298 } 26299 (PApp 26300 SrcSpanInfo 26301 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 5 702 13 26302 , srcInfoPoints = [] 26303 } 26304 (UnQual 26305 SrcSpanInfo 26306 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 5 702 9 26307 , srcInfoPoints = [] 26308 } 26309 (Ident 26310 SrcSpanInfo 26311 { srcInfoSpan = 26312 SrcSpan "tests/examples/RealGHC.lhs" 702 5 702 9 26313 , srcInfoPoints = [] 26314 } 26315 "Just")) 26316 [ PVar 26317 SrcSpanInfo 26318 { srcInfoSpan = 26319 SrcSpan "tests/examples/RealGHC.lhs" 702 10 702 13 26320 , srcInfoPoints = [] 26321 } 26322 (Ident 26323 SrcSpanInfo 26324 { srcInfoSpan = 26325 SrcSpan "tests/examples/RealGHC.lhs" 702 10 702 13 26326 , srcInfoPoints = [] 26327 } 26328 "e1'") 26329 ]) 26330 (GuardedRhss 26331 SrcSpanInfo 26332 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 702 14 706 20 26333 , srcInfoPoints = [] 26334 } 26335 [ GuardedRhs 26336 SrcSpanInfo 26337 { srcInfoSpan = 26338 SrcSpan "tests/examples/RealGHC.lhs" 702 14 703 23 26339 , srcInfoPoints = 26340 [ SrcSpan "tests/examples/RealGHC.lhs" 702 14 702 15 26341 , SrcSpan "tests/examples/RealGHC.lhs" 703 10 703 12 26342 ] 26343 } 26344 [ Qualifier 26345 SrcSpanInfo 26346 { srcInfoSpan = 26347 SrcSpan "tests/examples/RealGHC.lhs" 702 16 702 52 26348 , srcInfoPoints = [] 26349 } 26350 (App 26351 SrcSpanInfo 26352 { srcInfoSpan = 26353 SrcSpan "tests/examples/RealGHC.lhs" 702 16 702 52 26354 , srcInfoPoints = [] 26355 } 26356 (App 26357 SrcSpanInfo 26358 { srcInfoSpan = 26359 SrcSpan 26360 "tests/examples/RealGHC.lhs" 702 16 702 49 26361 , srcInfoPoints = [] 26362 } 26363 (App 26364 SrcSpanInfo 26365 { srcInfoSpan = 26366 SrcSpan 26367 "tests/examples/RealGHC.lhs" 702 16 702 45 26368 , srcInfoPoints = [] 26369 } 26370 (Var 26371 SrcSpanInfo 26372 { srcInfoSpan = 26373 SrcSpan 26374 "tests/examples/RealGHC.lhs" 26375 702 26376 16 26377 702 26378 25 26379 , srcInfoPoints = [] 26380 } 26381 (UnQual 26382 SrcSpanInfo 26383 { srcInfoSpan = 26384 SrcSpan 26385 "tests/examples/RealGHC.lhs" 26386 702 26387 16 26388 702 26389 25 26390 , srcInfoPoints = [] 26391 } 26392 (Ident 26393 SrcSpanInfo 26394 { srcInfoSpan = 26395 SrcSpan 26396 "tests/examples/RealGHC.lhs" 26397 702 26398 16 26399 702 26400 25 26401 , srcInfoPoints = [] 26402 } 26403 "tcEqExprX"))) 26404 (Paren 26405 SrcSpanInfo 26406 { srcInfoSpan = 26407 SrcSpan 26408 "tests/examples/RealGHC.lhs" 26409 702 26410 26 26411 702 26412 45 26413 , srcInfoPoints = 26414 [ SrcSpan 26415 "tests/examples/RealGHC.lhs" 26416 702 26417 26 26418 702 26419 27 26420 , SrcSpan 26421 "tests/examples/RealGHC.lhs" 26422 702 26423 44 26424 702 26425 45 26426 ] 26427 } 26428 (App 26429 SrcSpanInfo 26430 { srcInfoSpan = 26431 SrcSpan 26432 "tests/examples/RealGHC.lhs" 26433 702 26434 27 26435 702 26436 44 26437 , srcInfoPoints = [] 26438 } 26439 (Var 26440 SrcSpanInfo 26441 { srcInfoSpan = 26442 SrcSpan 26443 "tests/examples/RealGHC.lhs" 26444 702 26445 27 26446 702 26447 37 26448 , srcInfoPoints = [] 26449 } 26450 (UnQual 26451 SrcSpanInfo 26452 { srcInfoSpan = 26453 SrcSpan 26454 "tests/examples/RealGHC.lhs" 26455 702 26456 27 26457 702 26458 37 26459 , srcInfoPoints = [] 26460 } 26461 (Ident 26462 SrcSpanInfo 26463 { srcInfoSpan = 26464 SrcSpan 26465 "tests/examples/RealGHC.lhs" 26466 702 26467 27 26468 702 26469 37 26470 , srcInfoPoints = [] 26471 } 26472 "nukeRnEnvL"))) 26473 (Var 26474 SrcSpanInfo 26475 { srcInfoSpan = 26476 SrcSpan 26477 "tests/examples/RealGHC.lhs" 26478 702 26479 38 26480 702 26481 44 26482 , srcInfoPoints = [] 26483 } 26484 (UnQual 26485 SrcSpanInfo 26486 { srcInfoSpan = 26487 SrcSpan 26488 "tests/examples/RealGHC.lhs" 26489 702 26490 38 26491 702 26492 44 26493 , srcInfoPoints = [] 26494 } 26495 (Ident 26496 SrcSpanInfo 26497 { srcInfoSpan = 26498 SrcSpan 26499 "tests/examples/RealGHC.lhs" 26500 702 26501 38 26502 702 26503 44 26504 , srcInfoPoints = [] 26505 } 26506 "rn_env")))))) 26507 (Var 26508 SrcSpanInfo 26509 { srcInfoSpan = 26510 SrcSpan 26511 "tests/examples/RealGHC.lhs" 702 46 702 49 26512 , srcInfoPoints = [] 26513 } 26514 (UnQual 26515 SrcSpanInfo 26516 { srcInfoSpan = 26517 SrcSpan 26518 "tests/examples/RealGHC.lhs" 26519 702 26520 46 26521 702 26522 49 26523 , srcInfoPoints = [] 26524 } 26525 (Ident 26526 SrcSpanInfo 26527 { srcInfoSpan = 26528 SrcSpan 26529 "tests/examples/RealGHC.lhs" 26530 702 26531 46 26532 702 26533 49 26534 , srcInfoPoints = [] 26535 } 26536 "e1'")))) 26537 (Var 26538 SrcSpanInfo 26539 { srcInfoSpan = 26540 SrcSpan 26541 "tests/examples/RealGHC.lhs" 702 50 702 52 26542 , srcInfoPoints = [] 26543 } 26544 (UnQual 26545 SrcSpanInfo 26546 { srcInfoSpan = 26547 SrcSpan 26548 "tests/examples/RealGHC.lhs" 702 50 702 52 26549 , srcInfoPoints = [] 26550 } 26551 (Ident 26552 SrcSpanInfo 26553 { srcInfoSpan = 26554 SrcSpan 26555 "tests/examples/RealGHC.lhs" 26556 702 26557 50 26558 702 26559 52 26560 , srcInfoPoints = [] 26561 } 26562 "e2")))) 26563 ] 26564 (App 26565 SrcSpanInfo 26566 { srcInfoSpan = 26567 SrcSpan "tests/examples/RealGHC.lhs" 703 13 703 23 26568 , srcInfoPoints = [] 26569 } 26570 (Con 26571 SrcSpanInfo 26572 { srcInfoSpan = 26573 SrcSpan "tests/examples/RealGHC.lhs" 703 13 703 17 26574 , srcInfoPoints = [] 26575 } 26576 (UnQual 26577 SrcSpanInfo 26578 { srcInfoSpan = 26579 SrcSpan "tests/examples/RealGHC.lhs" 703 13 703 17 26580 , srcInfoPoints = [] 26581 } 26582 (Ident 26583 SrcSpanInfo 26584 { srcInfoSpan = 26585 SrcSpan 26586 "tests/examples/RealGHC.lhs" 703 13 703 17 26587 , srcInfoPoints = [] 26588 } 26589 "Just"))) 26590 (Var 26591 SrcSpanInfo 26592 { srcInfoSpan = 26593 SrcSpan "tests/examples/RealGHC.lhs" 703 18 703 23 26594 , srcInfoPoints = [] 26595 } 26596 (UnQual 26597 SrcSpanInfo 26598 { srcInfoSpan = 26599 SrcSpan "tests/examples/RealGHC.lhs" 703 18 703 23 26600 , srcInfoPoints = [] 26601 } 26602 (Ident 26603 SrcSpanInfo 26604 { srcInfoSpan = 26605 SrcSpan 26606 "tests/examples/RealGHC.lhs" 703 18 703 23 26607 , srcInfoPoints = [] 26608 } 26609 "subst")))) 26610 , GuardedRhs 26611 SrcSpanInfo 26612 { srcInfoSpan = 26613 SrcSpan "tests/examples/RealGHC.lhs" 705 10 706 20 26614 , srcInfoPoints = 26615 [ SrcSpan "tests/examples/RealGHC.lhs" 705 10 705 11 26616 , SrcSpan "tests/examples/RealGHC.lhs" 706 10 706 12 26617 ] 26618 } 26619 [ Qualifier 26620 SrcSpanInfo 26621 { srcInfoSpan = 26622 SrcSpan "tests/examples/RealGHC.lhs" 705 12 705 21 26623 , srcInfoPoints = [] 26624 } 26625 (Var 26626 SrcSpanInfo 26627 { srcInfoSpan = 26628 SrcSpan "tests/examples/RealGHC.lhs" 705 12 705 21 26629 , srcInfoPoints = [] 26630 } 26631 (UnQual 26632 SrcSpanInfo 26633 { srcInfoSpan = 26634 SrcSpan 26635 "tests/examples/RealGHC.lhs" 705 12 705 21 26636 , srcInfoPoints = [] 26637 } 26638 (Ident 26639 SrcSpanInfo 26640 { srcInfoSpan = 26641 SrcSpan 26642 "tests/examples/RealGHC.lhs" 705 12 705 21 26643 , srcInfoPoints = [] 26644 } 26645 "otherwise"))) 26646 ] 26647 (Con 26648 SrcSpanInfo 26649 { srcInfoSpan = 26650 SrcSpan "tests/examples/RealGHC.lhs" 706 13 706 20 26651 , srcInfoPoints = [] 26652 } 26653 (UnQual 26654 SrcSpanInfo 26655 { srcInfoSpan = 26656 SrcSpan "tests/examples/RealGHC.lhs" 706 13 706 20 26657 , srcInfoPoints = [] 26658 } 26659 (Ident 26660 SrcSpanInfo 26661 { srcInfoSpan = 26662 SrcSpan "tests/examples/RealGHC.lhs" 706 13 706 20 26663 , srcInfoPoints = [] 26664 } 26665 "Nothing"))) 26666 ]) 26667 Nothing 26668 ]) 26669 , GuardedRhs 26670 SrcSpanInfo 26671 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 708 3 711 39 26672 , srcInfoPoints = 26673 [ SrcSpan "tests/examples/RealGHC.lhs" 708 3 708 4 26674 , SrcSpan "tests/examples/RealGHC.lhs" 709 3 709 4 26675 ] 26676 } 26677 [ Qualifier 26678 SrcSpanInfo 26679 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 708 5 708 14 26680 , srcInfoPoints = [] 26681 } 26682 (Var 26683 SrcSpanInfo 26684 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 708 5 708 14 26685 , srcInfoPoints = [] 26686 } 26687 (UnQual 26688 SrcSpanInfo 26689 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 708 5 708 14 26690 , srcInfoPoints = [] 26691 } 26692 (Ident 26693 SrcSpanInfo 26694 { srcInfoSpan = 26695 SrcSpan "tests/examples/RealGHC.lhs" 708 5 708 14 26696 , srcInfoPoints = [] 26697 } 26698 "otherwise"))) 26699 ] 26700 (Case 26701 SrcSpanInfo 26702 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 709 5 711 39 26703 , srcInfoPoints = 26704 [ SrcSpan "tests/examples/RealGHC.lhs" 709 5 709 9 26705 , SrcSpan "tests/examples/RealGHC.lhs" 709 13 709 15 26706 , SrcSpan "tests/examples/RealGHC.lhs" 710 8 710 8 26707 , SrcSpan "tests/examples/RealGHC.lhs" 711 8 711 8 26708 , SrcSpan "tests/examples/RealGHC.lhs" 713 3 713 0 26709 ] 26710 } 26711 (Var 26712 SrcSpanInfo 26713 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 709 10 709 12 26714 , srcInfoPoints = [] 26715 } 26716 (UnQual 26717 SrcSpanInfo 26718 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 709 10 709 12 26719 , srcInfoPoints = [] 26720 } 26721 (Ident 26722 SrcSpanInfo 26723 { srcInfoSpan = 26724 SrcSpan "tests/examples/RealGHC.lhs" 709 10 709 12 26725 , srcInfoPoints = [] 26726 } 26727 "e2"))) 26728 [ Alt 26729 SrcSpanInfo 26730 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 8 710 54 26731 , srcInfoPoints = [] 26732 } 26733 (PApp 26734 SrcSpanInfo 26735 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 8 710 14 26736 , srcInfoPoints = [] 26737 } 26738 (UnQual 26739 SrcSpanInfo 26740 { srcInfoSpan = 26741 SrcSpan "tests/examples/RealGHC.lhs" 710 8 710 11 26742 , srcInfoPoints = [] 26743 } 26744 (Ident 26745 SrcSpanInfo 26746 { srcInfoSpan = 26747 SrcSpan "tests/examples/RealGHC.lhs" 710 8 710 11 26748 , srcInfoPoints = [] 26749 } 26750 "Var")) 26751 [ PVar 26752 SrcSpanInfo 26753 { srcInfoSpan = 26754 SrcSpan "tests/examples/RealGHC.lhs" 710 12 710 14 26755 , srcInfoPoints = [] 26756 } 26757 (Ident 26758 SrcSpanInfo 26759 { srcInfoSpan = 26760 SrcSpan "tests/examples/RealGHC.lhs" 710 12 710 14 26761 , srcInfoPoints = [] 26762 } 26763 "v2") 26764 ]) 26765 (GuardedRhss 26766 SrcSpanInfo 26767 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 710 15 710 54 26768 , srcInfoPoints = 26769 [ SrcSpan "tests/examples/RealGHC.lhs" 710 15 710 16 26770 , SrcSpan "tests/examples/RealGHC.lhs" 710 41 710 43 26771 ] 26772 } 26773 [ GuardedRhs 26774 SrcSpanInfo 26775 { srcInfoSpan = 26776 SrcSpan "tests/examples/RealGHC.lhs" 710 15 710 54 26777 , srcInfoPoints = 26778 [ SrcSpan "tests/examples/RealGHC.lhs" 710 15 710 16 26779 , SrcSpan "tests/examples/RealGHC.lhs" 710 41 710 43 26780 ] 26781 } 26782 [ Qualifier 26783 SrcSpanInfo 26784 { srcInfoSpan = 26785 SrcSpan "tests/examples/RealGHC.lhs" 710 17 710 40 26786 , srcInfoPoints = [] 26787 } 26788 (InfixApp 26789 SrcSpanInfo 26790 { srcInfoSpan = 26791 SrcSpan "tests/examples/RealGHC.lhs" 710 17 710 40 26792 , srcInfoPoints = [] 26793 } 26794 (Var 26795 SrcSpanInfo 26796 { srcInfoSpan = 26797 SrcSpan 26798 "tests/examples/RealGHC.lhs" 710 17 710 20 26799 , srcInfoPoints = [] 26800 } 26801 (UnQual 26802 SrcSpanInfo 26803 { srcInfoSpan = 26804 SrcSpan 26805 "tests/examples/RealGHC.lhs" 710 17 710 20 26806 , srcInfoPoints = [] 26807 } 26808 (Ident 26809 SrcSpanInfo 26810 { srcInfoSpan = 26811 SrcSpan 26812 "tests/examples/RealGHC.lhs" 26813 710 26814 17 26815 710 26816 20 26817 , srcInfoPoints = [] 26818 } 26819 "v1'"))) 26820 (QVarOp 26821 SrcSpanInfo 26822 { srcInfoSpan = 26823 SrcSpan 26824 "tests/examples/RealGHC.lhs" 710 21 710 23 26825 , srcInfoPoints = [] 26826 } 26827 (UnQual 26828 SrcSpanInfo 26829 { srcInfoSpan = 26830 SrcSpan 26831 "tests/examples/RealGHC.lhs" 710 21 710 23 26832 , srcInfoPoints = [] 26833 } 26834 (Symbol 26835 SrcSpanInfo 26836 { srcInfoSpan = 26837 SrcSpan 26838 "tests/examples/RealGHC.lhs" 26839 710 26840 21 26841 710 26842 23 26843 , srcInfoPoints = [] 26844 } 26845 "=="))) 26846 (App 26847 SrcSpanInfo 26848 { srcInfoSpan = 26849 SrcSpan 26850 "tests/examples/RealGHC.lhs" 710 24 710 40 26851 , srcInfoPoints = [] 26852 } 26853 (App 26854 SrcSpanInfo 26855 { srcInfoSpan = 26856 SrcSpan 26857 "tests/examples/RealGHC.lhs" 710 24 710 37 26858 , srcInfoPoints = [] 26859 } 26860 (Var 26861 SrcSpanInfo 26862 { srcInfoSpan = 26863 SrcSpan 26864 "tests/examples/RealGHC.lhs" 26865 710 26866 24 26867 710 26868 30 26869 , srcInfoPoints = [] 26870 } 26871 (UnQual 26872 SrcSpanInfo 26873 { srcInfoSpan = 26874 SrcSpan 26875 "tests/examples/RealGHC.lhs" 26876 710 26877 24 26878 710 26879 30 26880 , srcInfoPoints = [] 26881 } 26882 (Ident 26883 SrcSpanInfo 26884 { srcInfoSpan = 26885 SrcSpan 26886 "tests/examples/RealGHC.lhs" 26887 710 26888 24 26889 710 26890 30 26891 , srcInfoPoints = [] 26892 } 26893 "rnOccR"))) 26894 (Var 26895 SrcSpanInfo 26896 { srcInfoSpan = 26897 SrcSpan 26898 "tests/examples/RealGHC.lhs" 26899 710 26900 31 26901 710 26902 37 26903 , srcInfoPoints = [] 26904 } 26905 (UnQual 26906 SrcSpanInfo 26907 { srcInfoSpan = 26908 SrcSpan 26909 "tests/examples/RealGHC.lhs" 26910 710 26911 31 26912 710 26913 37 26914 , srcInfoPoints = [] 26915 } 26916 (Ident 26917 SrcSpanInfo 26918 { srcInfoSpan = 26919 SrcSpan 26920 "tests/examples/RealGHC.lhs" 26921 710 26922 31 26923 710 26924 37 26925 , srcInfoPoints = [] 26926 } 26927 "rn_env")))) 26928 (Var 26929 SrcSpanInfo 26930 { srcInfoSpan = 26931 SrcSpan 26932 "tests/examples/RealGHC.lhs" 710 38 710 40 26933 , srcInfoPoints = [] 26934 } 26935 (UnQual 26936 SrcSpanInfo 26937 { srcInfoSpan = 26938 SrcSpan 26939 "tests/examples/RealGHC.lhs" 26940 710 26941 38 26942 710 26943 40 26944 , srcInfoPoints = [] 26945 } 26946 (Ident 26947 SrcSpanInfo 26948 { srcInfoSpan = 26949 SrcSpan 26950 "tests/examples/RealGHC.lhs" 26951 710 26952 38 26953 710 26954 40 26955 , srcInfoPoints = [] 26956 } 26957 "v2"))))) 26958 ] 26959 (App 26960 SrcSpanInfo 26961 { srcInfoSpan = 26962 SrcSpan "tests/examples/RealGHC.lhs" 710 44 710 54 26963 , srcInfoPoints = [] 26964 } 26965 (Con 26966 SrcSpanInfo 26967 { srcInfoSpan = 26968 SrcSpan "tests/examples/RealGHC.lhs" 710 44 710 48 26969 , srcInfoPoints = [] 26970 } 26971 (UnQual 26972 SrcSpanInfo 26973 { srcInfoSpan = 26974 SrcSpan "tests/examples/RealGHC.lhs" 710 44 710 48 26975 , srcInfoPoints = [] 26976 } 26977 (Ident 26978 SrcSpanInfo 26979 { srcInfoSpan = 26980 SrcSpan 26981 "tests/examples/RealGHC.lhs" 710 44 710 48 26982 , srcInfoPoints = [] 26983 } 26984 "Just"))) 26985 (Var 26986 SrcSpanInfo 26987 { srcInfoSpan = 26988 SrcSpan "tests/examples/RealGHC.lhs" 710 49 710 54 26989 , srcInfoPoints = [] 26990 } 26991 (UnQual 26992 SrcSpanInfo 26993 { srcInfoSpan = 26994 SrcSpan "tests/examples/RealGHC.lhs" 710 49 710 54 26995 , srcInfoPoints = [] 26996 } 26997 (Ident 26998 SrcSpanInfo 26999 { srcInfoSpan = 27000 SrcSpan 27001 "tests/examples/RealGHC.lhs" 710 49 710 54 27002 , srcInfoPoints = [] 27003 } 27004 "subst")))) 27005 ]) 27006 Nothing 27007 , Alt 27008 SrcSpanInfo 27009 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 711 8 711 39 27010 , srcInfoPoints = [] 27011 } 27012 (PVar 27013 SrcSpanInfo 27014 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 711 8 711 13 27015 , srcInfoPoints = [] 27016 } 27017 (Ident 27018 SrcSpanInfo 27019 { srcInfoSpan = 27020 SrcSpan "tests/examples/RealGHC.lhs" 711 8 711 13 27021 , srcInfoPoints = [] 27022 } 27023 "other")) 27024 (UnGuardedRhs 27025 SrcSpanInfo 27026 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 711 29 711 39 27027 , srcInfoPoints = 27028 [ SrcSpan "tests/examples/RealGHC.lhs" 711 29 711 31 ] 27029 } 27030 (Con 27031 SrcSpanInfo 27032 { srcInfoSpan = 27033 SrcSpan "tests/examples/RealGHC.lhs" 711 32 711 39 27034 , srcInfoPoints = [] 27035 } 27036 (UnQual 27037 SrcSpanInfo 27038 { srcInfoSpan = 27039 SrcSpan "tests/examples/RealGHC.lhs" 711 32 711 39 27040 , srcInfoPoints = [] 27041 } 27042 (Ident 27043 SrcSpanInfo 27044 { srcInfoSpan = 27045 SrcSpan "tests/examples/RealGHC.lhs" 711 32 711 39 27046 , srcInfoPoints = [] 27047 } 27048 "Nothing")))) 27049 Nothing 27050 ]) 27051 ]) 27052 (Just 27053 (BDecls 27054 SrcSpanInfo 27055 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 5 715 30 27056 , srcInfoPoints = 27057 [ SrcSpan "tests/examples/RealGHC.lhs" 714 5 714 5 27058 , SrcSpan "tests/examples/RealGHC.lhs" 715 5 715 5 27059 , SrcSpan "tests/examples/RealGHC.lhs" 723 1 723 0 27060 ] 27061 } 27062 [ PatBind 27063 SrcSpanInfo 27064 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 5 714 25 27065 , srcInfoPoints = [] 27066 } 27067 (PVar 27068 SrcSpanInfo 27069 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 5 714 11 27070 , srcInfoPoints = [] 27071 } 27072 (Ident 27073 SrcSpanInfo 27074 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 5 714 11 27075 , srcInfoPoints = [] 27076 } 27077 "rn_env")) 27078 (UnGuardedRhs 27079 SrcSpanInfo 27080 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 12 714 25 27081 , srcInfoPoints = 27082 [ SrcSpan "tests/examples/RealGHC.lhs" 714 12 714 13 ] 27083 } 27084 (App 27085 SrcSpanInfo 27086 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 714 14 714 25 27087 , srcInfoPoints = [] 27088 } 27089 (Var 27090 SrcSpanInfo 27091 { srcInfoSpan = 27092 SrcSpan "tests/examples/RealGHC.lhs" 714 14 714 20 27093 , srcInfoPoints = [] 27094 } 27095 (UnQual 27096 SrcSpanInfo 27097 { srcInfoSpan = 27098 SrcSpan "tests/examples/RealGHC.lhs" 714 14 714 20 27099 , srcInfoPoints = [] 27100 } 27101 (Ident 27102 SrcSpanInfo 27103 { srcInfoSpan = 27104 SrcSpan "tests/examples/RealGHC.lhs" 714 14 714 20 27105 , srcInfoPoints = [] 27106 } 27107 "me_env"))) 27108 (Var 27109 SrcSpanInfo 27110 { srcInfoSpan = 27111 SrcSpan "tests/examples/RealGHC.lhs" 714 21 714 25 27112 , srcInfoPoints = [] 27113 } 27114 (UnQual 27115 SrcSpanInfo 27116 { srcInfoSpan = 27117 SrcSpan "tests/examples/RealGHC.lhs" 714 21 714 25 27118 , srcInfoPoints = [] 27119 } 27120 (Ident 27121 SrcSpanInfo 27122 { srcInfoSpan = 27123 SrcSpan "tests/examples/RealGHC.lhs" 714 21 714 25 27124 , srcInfoPoints = [] 27125 } 27126 "menv"))))) 27127 Nothing 27128 , PatBind 27129 SrcSpanInfo 27130 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 5 715 30 27131 , srcInfoPoints = [] 27132 } 27133 (PVar 27134 SrcSpanInfo 27135 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 5 715 8 27136 , srcInfoPoints = [] 27137 } 27138 (Ident 27139 SrcSpanInfo 27140 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 5 715 8 27141 , srcInfoPoints = [] 27142 } 27143 "v1'")) 27144 (UnGuardedRhs 27145 SrcSpanInfo 27146 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 12 715 30 27147 , srcInfoPoints = 27148 [ SrcSpan "tests/examples/RealGHC.lhs" 715 12 715 13 ] 27149 } 27150 (App 27151 SrcSpanInfo 27152 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 715 14 715 30 27153 , srcInfoPoints = [] 27154 } 27155 (App 27156 SrcSpanInfo 27157 { srcInfoSpan = 27158 SrcSpan "tests/examples/RealGHC.lhs" 715 14 715 27 27159 , srcInfoPoints = [] 27160 } 27161 (Var 27162 SrcSpanInfo 27163 { srcInfoSpan = 27164 SrcSpan "tests/examples/RealGHC.lhs" 715 14 715 20 27165 , srcInfoPoints = [] 27166 } 27167 (UnQual 27168 SrcSpanInfo 27169 { srcInfoSpan = 27170 SrcSpan "tests/examples/RealGHC.lhs" 715 14 715 20 27171 , srcInfoPoints = [] 27172 } 27173 (Ident 27174 SrcSpanInfo 27175 { srcInfoSpan = 27176 SrcSpan "tests/examples/RealGHC.lhs" 715 14 715 20 27177 , srcInfoPoints = [] 27178 } 27179 "rnOccL"))) 27180 (Var 27181 SrcSpanInfo 27182 { srcInfoSpan = 27183 SrcSpan "tests/examples/RealGHC.lhs" 715 21 715 27 27184 , srcInfoPoints = [] 27185 } 27186 (UnQual 27187 SrcSpanInfo 27188 { srcInfoSpan = 27189 SrcSpan "tests/examples/RealGHC.lhs" 715 21 715 27 27190 , srcInfoPoints = [] 27191 } 27192 (Ident 27193 SrcSpanInfo 27194 { srcInfoSpan = 27195 SrcSpan "tests/examples/RealGHC.lhs" 715 21 715 27 27196 , srcInfoPoints = [] 27197 } 27198 "rn_env")))) 27199 (Var 27200 SrcSpanInfo 27201 { srcInfoSpan = 27202 SrcSpan "tests/examples/RealGHC.lhs" 715 28 715 30 27203 , srcInfoPoints = [] 27204 } 27205 (UnQual 27206 SrcSpanInfo 27207 { srcInfoSpan = 27208 SrcSpan "tests/examples/RealGHC.lhs" 715 28 715 30 27209 , srcInfoPoints = [] 27210 } 27211 (Ident 27212 SrcSpanInfo 27213 { srcInfoSpan = 27214 SrcSpan "tests/examples/RealGHC.lhs" 715 28 715 30 27215 , srcInfoPoints = [] 27216 } 27217 "v1"))))) 27218 Nothing 27219 ])) 27220 ] 27221 , TypeSig 27222 SrcSpanInfo 27223 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 723 1 727 24 27224 , srcInfoPoints = 27225 [ SrcSpan "tests/examples/RealGHC.lhs" 723 12 723 14 ] 27226 } 27227 [ Ident 27228 SrcSpanInfo 27229 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 723 1 723 11 27230 , srcInfoPoints = [] 27231 } 27232 "match_alts" 27233 ] 27234 (TyFun 27235 SrcSpanInfo 27236 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 723 15 727 24 27237 , srcInfoPoints = 27238 [ SrcSpan "tests/examples/RealGHC.lhs" 724 7 724 9 ] 27239 } 27240 (TyCon 27241 SrcSpanInfo 27242 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 723 15 723 23 27243 , srcInfoPoints = [] 27244 } 27245 (UnQual 27246 SrcSpanInfo 27247 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 723 15 723 23 27248 , srcInfoPoints = [] 27249 } 27250 (Ident 27251 SrcSpanInfo 27252 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 723 15 723 23 27253 , srcInfoPoints = [] 27254 } 27255 "MatchEnv"))) 27256 (TyFun 27257 SrcSpanInfo 27258 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 724 10 727 24 27259 , srcInfoPoints = 27260 [ SrcSpan "tests/examples/RealGHC.lhs" 725 7 725 9 ] 27261 } 27262 (TyCon 27263 SrcSpanInfo 27264 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 724 10 724 18 27265 , srcInfoPoints = [] 27266 } 27267 (UnQual 27268 SrcSpanInfo 27269 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 724 10 724 18 27270 , srcInfoPoints = [] 27271 } 27272 (Ident 27273 SrcSpanInfo 27274 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 724 10 724 18 27275 , srcInfoPoints = [] 27276 } 27277 "SubstEnv"))) 27278 (TyFun 27279 SrcSpanInfo 27280 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 725 10 727 24 27281 , srcInfoPoints = 27282 [ SrcSpan "tests/examples/RealGHC.lhs" 726 7 726 9 ] 27283 } 27284 (TyList 27285 SrcSpanInfo 27286 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 725 10 725 19 27287 , srcInfoPoints = 27288 [ SrcSpan "tests/examples/RealGHC.lhs" 725 10 725 11 27289 , SrcSpan "tests/examples/RealGHC.lhs" 725 18 725 19 27290 ] 27291 } 27292 (TyCon 27293 SrcSpanInfo 27294 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 725 11 725 18 27295 , srcInfoPoints = [] 27296 } 27297 (UnQual 27298 SrcSpanInfo 27299 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 725 11 725 18 27300 , srcInfoPoints = [] 27301 } 27302 (Ident 27303 SrcSpanInfo 27304 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 725 11 725 18 27305 , srcInfoPoints = [] 27306 } 27307 "CoreAlt")))) 27308 (TyFun 27309 SrcSpanInfo 27310 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 726 10 727 24 27311 , srcInfoPoints = 27312 [ SrcSpan "tests/examples/RealGHC.lhs" 727 7 727 9 ] 27313 } 27314 (TyList 27315 SrcSpanInfo 27316 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 726 10 726 19 27317 , srcInfoPoints = 27318 [ SrcSpan "tests/examples/RealGHC.lhs" 726 10 726 11 27319 , SrcSpan "tests/examples/RealGHC.lhs" 726 18 726 19 27320 ] 27321 } 27322 (TyCon 27323 SrcSpanInfo 27324 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 726 11 726 18 27325 , srcInfoPoints = [] 27326 } 27327 (UnQual 27328 SrcSpanInfo 27329 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 726 11 726 18 27330 , srcInfoPoints = [] 27331 } 27332 (Ident 27333 SrcSpanInfo 27334 { srcInfoSpan = 27335 SrcSpan "tests/examples/RealGHC.lhs" 726 11 726 18 27336 , srcInfoPoints = [] 27337 } 27338 "CoreAlt")))) 27339 (TyApp 27340 SrcSpanInfo 27341 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 727 10 727 24 27342 , srcInfoPoints = [] 27343 } 27344 (TyCon 27345 SrcSpanInfo 27346 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 727 10 727 15 27347 , srcInfoPoints = [] 27348 } 27349 (UnQual 27350 SrcSpanInfo 27351 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 727 10 727 15 27352 , srcInfoPoints = [] 27353 } 27354 (Ident 27355 SrcSpanInfo 27356 { srcInfoSpan = 27357 SrcSpan "tests/examples/RealGHC.lhs" 727 10 727 15 27358 , srcInfoPoints = [] 27359 } 27360 "Maybe"))) 27361 (TyCon 27362 SrcSpanInfo 27363 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 727 16 727 24 27364 , srcInfoPoints = [] 27365 } 27366 (UnQual 27367 SrcSpanInfo 27368 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 727 16 727 24 27369 , srcInfoPoints = [] 27370 } 27371 (Ident 27372 SrcSpanInfo 27373 { srcInfoSpan = 27374 SrcSpan "tests/examples/RealGHC.lhs" 727 16 727 24 27375 , srcInfoPoints = [] 27376 } 27377 "SubstEnv")))))))) 27378 , FunBind 27379 SrcSpanInfo 27380 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 1 739 12 27381 , srcInfoPoints = [] 27382 } 27383 [ Match 27384 SrcSpanInfo 27385 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 1 729 17 27386 , srcInfoPoints = [] 27387 } 27388 (Ident 27389 SrcSpanInfo 27390 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 1 728 11 27391 , srcInfoPoints = [] 27392 } 27393 "match_alts") 27394 [ PVar 27395 SrcSpanInfo 27396 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 12 728 16 27397 , srcInfoPoints = [] 27398 } 27399 (Ident 27400 SrcSpanInfo 27401 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 12 728 16 27402 , srcInfoPoints = [] 27403 } 27404 "menv") 27405 , PVar 27406 SrcSpanInfo 27407 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 17 728 22 27408 , srcInfoPoints = [] 27409 } 27410 (Ident 27411 SrcSpanInfo 27412 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 17 728 22 27413 , srcInfoPoints = [] 27414 } 27415 "subst") 27416 , PList 27417 SrcSpanInfo 27418 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 23 728 25 27419 , srcInfoPoints = 27420 [ SrcSpan "tests/examples/RealGHC.lhs" 728 23 728 24 27421 , SrcSpan "tests/examples/RealGHC.lhs" 728 24 728 25 27422 ] 27423 } 27424 [] 27425 , PList 27426 SrcSpanInfo 27427 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 728 26 728 28 27428 , srcInfoPoints = 27429 [ SrcSpan "tests/examples/RealGHC.lhs" 728 26 728 27 27430 , SrcSpan "tests/examples/RealGHC.lhs" 728 27 728 28 27431 ] 27432 } 27433 [] 27434 ] 27435 (UnGuardedRhs 27436 SrcSpanInfo 27437 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 729 3 729 17 27438 , srcInfoPoints = 27439 [ SrcSpan "tests/examples/RealGHC.lhs" 729 3 729 4 ] 27440 } 27441 (App 27442 SrcSpanInfo 27443 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 729 5 729 17 27444 , srcInfoPoints = [] 27445 } 27446 (Var 27447 SrcSpanInfo 27448 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 729 5 729 11 27449 , srcInfoPoints = [] 27450 } 27451 (UnQual 27452 SrcSpanInfo 27453 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 729 5 729 11 27454 , srcInfoPoints = [] 27455 } 27456 (Ident 27457 SrcSpanInfo 27458 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 729 5 729 11 27459 , srcInfoPoints = [] 27460 } 27461 "return"))) 27462 (Var 27463 SrcSpanInfo 27464 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 729 12 729 17 27465 , srcInfoPoints = [] 27466 } 27467 (UnQual 27468 SrcSpanInfo 27469 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 729 12 729 17 27470 , srcInfoPoints = [] 27471 } 27472 (Ident 27473 SrcSpanInfo 27474 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 729 12 729 17 27475 , srcInfoPoints = [] 27476 } 27477 "subst"))))) 27478 Nothing 27479 , Match 27480 SrcSpanInfo 27481 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 1 736 61 27482 , srcInfoPoints = 27483 [ SrcSpan "tests/examples/RealGHC.lhs" 734 3 734 8 ] 27484 } 27485 (Ident 27486 SrcSpanInfo 27487 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 1 730 11 27488 , srcInfoPoints = [] 27489 } 27490 "match_alts") 27491 [ PVar 27492 SrcSpanInfo 27493 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 12 730 16 27494 , srcInfoPoints = [] 27495 } 27496 (Ident 27497 SrcSpanInfo 27498 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 12 730 16 27499 , srcInfoPoints = [] 27500 } 27501 "menv") 27502 , PVar 27503 SrcSpanInfo 27504 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 17 730 22 27505 , srcInfoPoints = [] 27506 } 27507 (Ident 27508 SrcSpanInfo 27509 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 17 730 22 27510 , srcInfoPoints = [] 27511 } 27512 "subst") 27513 , PParen 27514 SrcSpanInfo 27515 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 23 730 42 27516 , srcInfoPoints = 27517 [ SrcSpan "tests/examples/RealGHC.lhs" 730 23 730 24 27518 , SrcSpan "tests/examples/RealGHC.lhs" 730 41 730 42 27519 ] 27520 } 27521 (PInfixApp 27522 SrcSpanInfo 27523 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 24 730 41 27524 , srcInfoPoints = [] 27525 } 27526 (PTuple 27527 SrcSpanInfo 27528 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 24 730 35 27529 , srcInfoPoints = 27530 [ SrcSpan "tests/examples/RealGHC.lhs" 730 24 730 25 27531 , SrcSpan "tests/examples/RealGHC.lhs" 730 27 730 28 27532 , SrcSpan "tests/examples/RealGHC.lhs" 730 31 730 32 27533 , SrcSpan "tests/examples/RealGHC.lhs" 730 34 730 35 27534 ] 27535 } 27536 Boxed 27537 [ PVar 27538 SrcSpanInfo 27539 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 25 730 27 27540 , srcInfoPoints = [] 27541 } 27542 (Ident 27543 SrcSpanInfo 27544 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 25 730 27 27545 , srcInfoPoints = [] 27546 } 27547 "c1") 27548 , PVar 27549 SrcSpanInfo 27550 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 28 730 31 27551 , srcInfoPoints = [] 27552 } 27553 (Ident 27554 SrcSpanInfo 27555 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 28 730 31 27556 , srcInfoPoints = [] 27557 } 27558 "vs1") 27559 , PVar 27560 SrcSpanInfo 27561 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 32 730 34 27562 , srcInfoPoints = [] 27563 } 27564 (Ident 27565 SrcSpanInfo 27566 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 32 730 34 27567 , srcInfoPoints = [] 27568 } 27569 "r1") 27570 ]) 27571 (Special 27572 SrcSpanInfo 27573 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 35 730 36 27574 , srcInfoPoints = [] 27575 } 27576 (Cons 27577 SrcSpanInfo 27578 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 35 730 36 27579 , srcInfoPoints = [] 27580 })) 27581 (PVar 27582 SrcSpanInfo 27583 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 36 730 41 27584 , srcInfoPoints = [] 27585 } 27586 (Ident 27587 SrcSpanInfo 27588 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 36 730 41 27589 , srcInfoPoints = [] 27590 } 27591 "alts1"))) 27592 , PParen 27593 SrcSpanInfo 27594 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 43 730 62 27595 , srcInfoPoints = 27596 [ SrcSpan "tests/examples/RealGHC.lhs" 730 43 730 44 27597 , SrcSpan "tests/examples/RealGHC.lhs" 730 61 730 62 27598 ] 27599 } 27600 (PInfixApp 27601 SrcSpanInfo 27602 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 44 730 61 27603 , srcInfoPoints = [] 27604 } 27605 (PTuple 27606 SrcSpanInfo 27607 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 44 730 55 27608 , srcInfoPoints = 27609 [ SrcSpan "tests/examples/RealGHC.lhs" 730 44 730 45 27610 , SrcSpan "tests/examples/RealGHC.lhs" 730 47 730 48 27611 , SrcSpan "tests/examples/RealGHC.lhs" 730 51 730 52 27612 , SrcSpan "tests/examples/RealGHC.lhs" 730 54 730 55 27613 ] 27614 } 27615 Boxed 27616 [ PVar 27617 SrcSpanInfo 27618 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 45 730 47 27619 , srcInfoPoints = [] 27620 } 27621 (Ident 27622 SrcSpanInfo 27623 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 45 730 47 27624 , srcInfoPoints = [] 27625 } 27626 "c2") 27627 , PVar 27628 SrcSpanInfo 27629 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 48 730 51 27630 , srcInfoPoints = [] 27631 } 27632 (Ident 27633 SrcSpanInfo 27634 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 48 730 51 27635 , srcInfoPoints = [] 27636 } 27637 "vs2") 27638 , PVar 27639 SrcSpanInfo 27640 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 52 730 54 27641 , srcInfoPoints = [] 27642 } 27643 (Ident 27644 SrcSpanInfo 27645 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 52 730 54 27646 , srcInfoPoints = [] 27647 } 27648 "r2") 27649 ]) 27650 (Special 27651 SrcSpanInfo 27652 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 55 730 56 27653 , srcInfoPoints = [] 27654 } 27655 (Cons 27656 SrcSpanInfo 27657 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 55 730 56 27658 , srcInfoPoints = [] 27659 })) 27660 (PVar 27661 SrcSpanInfo 27662 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 56 730 61 27663 , srcInfoPoints = [] 27664 } 27665 (Ident 27666 SrcSpanInfo 27667 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 730 56 730 61 27668 , srcInfoPoints = [] 27669 } 27670 "alts2"))) 27671 ] 27672 (GuardedRhss 27673 SrcSpanInfo 27674 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 3 733 43 27675 , srcInfoPoints = 27676 [ SrcSpan "tests/examples/RealGHC.lhs" 731 3 731 4 27677 , SrcSpan "tests/examples/RealGHC.lhs" 732 3 732 4 27678 ] 27679 } 27680 [ GuardedRhs 27681 SrcSpanInfo 27682 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 3 733 43 27683 , srcInfoPoints = 27684 [ SrcSpan "tests/examples/RealGHC.lhs" 731 3 731 4 27685 , SrcSpan "tests/examples/RealGHC.lhs" 732 3 732 4 27686 ] 27687 } 27688 [ Qualifier 27689 SrcSpanInfo 27690 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 5 731 13 27691 , srcInfoPoints = [] 27692 } 27693 (InfixApp 27694 SrcSpanInfo 27695 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 5 731 13 27696 , srcInfoPoints = [] 27697 } 27698 (Var 27699 SrcSpanInfo 27700 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 5 731 7 27701 , srcInfoPoints = [] 27702 } 27703 (UnQual 27704 SrcSpanInfo 27705 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 5 731 7 27706 , srcInfoPoints = [] 27707 } 27708 (Ident 27709 SrcSpanInfo 27710 { srcInfoSpan = 27711 SrcSpan "tests/examples/RealGHC.lhs" 731 5 731 7 27712 , srcInfoPoints = [] 27713 } 27714 "c1"))) 27715 (QVarOp 27716 SrcSpanInfo 27717 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 8 731 10 27718 , srcInfoPoints = [] 27719 } 27720 (UnQual 27721 SrcSpanInfo 27722 { srcInfoSpan = 27723 SrcSpan "tests/examples/RealGHC.lhs" 731 8 731 10 27724 , srcInfoPoints = [] 27725 } 27726 (Symbol 27727 SrcSpanInfo 27728 { srcInfoSpan = 27729 SrcSpan "tests/examples/RealGHC.lhs" 731 8 731 10 27730 , srcInfoPoints = [] 27731 } 27732 "=="))) 27733 (Var 27734 SrcSpanInfo 27735 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 731 11 731 13 27736 , srcInfoPoints = [] 27737 } 27738 (UnQual 27739 SrcSpanInfo 27740 { srcInfoSpan = 27741 SrcSpan "tests/examples/RealGHC.lhs" 731 11 731 13 27742 , srcInfoPoints = [] 27743 } 27744 (Ident 27745 SrcSpanInfo 27746 { srcInfoSpan = 27747 SrcSpan "tests/examples/RealGHC.lhs" 731 11 731 13 27748 , srcInfoPoints = [] 27749 } 27750 "c2")))) 27751 ] 27752 (Do 27753 SrcSpanInfo 27754 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 5 733 43 27755 , srcInfoPoints = 27756 [ SrcSpan "tests/examples/RealGHC.lhs" 732 5 732 7 27757 , SrcSpan "tests/examples/RealGHC.lhs" 732 9 732 10 27758 , SrcSpan "tests/examples/RealGHC.lhs" 733 5 733 6 27759 , SrcSpan "tests/examples/RealGHC.lhs" 733 42 733 43 27760 ] 27761 } 27762 [ Generator 27763 SrcSpanInfo 27764 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 11 732 44 27765 , srcInfoPoints = 27766 [ SrcSpan "tests/examples/RealGHC.lhs" 732 18 732 20 ] 27767 } 27768 (PVar 27769 SrcSpanInfo 27770 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 11 732 17 27771 , srcInfoPoints = [] 27772 } 27773 (Ident 27774 SrcSpanInfo 27775 { srcInfoSpan = 27776 SrcSpan "tests/examples/RealGHC.lhs" 732 11 732 17 27777 , srcInfoPoints = [] 27778 } 27779 "subst1")) 27780 (App 27781 SrcSpanInfo 27782 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 732 21 732 44 27783 , srcInfoPoints = [] 27784 } 27785 (App 27786 SrcSpanInfo 27787 { srcInfoSpan = 27788 SrcSpan "tests/examples/RealGHC.lhs" 732 21 732 41 27789 , srcInfoPoints = [] 27790 } 27791 (App 27792 SrcSpanInfo 27793 { srcInfoSpan = 27794 SrcSpan "tests/examples/RealGHC.lhs" 732 21 732 38 27795 , srcInfoPoints = [] 27796 } 27797 (App 27798 SrcSpanInfo 27799 { srcInfoSpan = 27800 SrcSpan "tests/examples/RealGHC.lhs" 732 21 732 32 27801 , srcInfoPoints = [] 27802 } 27803 (Var 27804 SrcSpanInfo 27805 { srcInfoSpan = 27806 SrcSpan "tests/examples/RealGHC.lhs" 732 21 732 26 27807 , srcInfoPoints = [] 27808 } 27809 (UnQual 27810 SrcSpanInfo 27811 { srcInfoSpan = 27812 SrcSpan 27813 "tests/examples/RealGHC.lhs" 732 21 732 26 27814 , srcInfoPoints = [] 27815 } 27816 (Ident 27817 SrcSpanInfo 27818 { srcInfoSpan = 27819 SrcSpan 27820 "tests/examples/RealGHC.lhs" 732 21 732 26 27821 , srcInfoPoints = [] 27822 } 27823 "match"))) 27824 (Var 27825 SrcSpanInfo 27826 { srcInfoSpan = 27827 SrcSpan "tests/examples/RealGHC.lhs" 732 27 732 32 27828 , srcInfoPoints = [] 27829 } 27830 (UnQual 27831 SrcSpanInfo 27832 { srcInfoSpan = 27833 SrcSpan 27834 "tests/examples/RealGHC.lhs" 732 27 732 32 27835 , srcInfoPoints = [] 27836 } 27837 (Ident 27838 SrcSpanInfo 27839 { srcInfoSpan = 27840 SrcSpan 27841 "tests/examples/RealGHC.lhs" 732 27 732 32 27842 , srcInfoPoints = [] 27843 } 27844 "menv'")))) 27845 (Var 27846 SrcSpanInfo 27847 { srcInfoSpan = 27848 SrcSpan "tests/examples/RealGHC.lhs" 732 33 732 38 27849 , srcInfoPoints = [] 27850 } 27851 (UnQual 27852 SrcSpanInfo 27853 { srcInfoSpan = 27854 SrcSpan "tests/examples/RealGHC.lhs" 732 33 732 38 27855 , srcInfoPoints = [] 27856 } 27857 (Ident 27858 SrcSpanInfo 27859 { srcInfoSpan = 27860 SrcSpan 27861 "tests/examples/RealGHC.lhs" 732 33 732 38 27862 , srcInfoPoints = [] 27863 } 27864 "subst")))) 27865 (Var 27866 SrcSpanInfo 27867 { srcInfoSpan = 27868 SrcSpan "tests/examples/RealGHC.lhs" 732 39 732 41 27869 , srcInfoPoints = [] 27870 } 27871 (UnQual 27872 SrcSpanInfo 27873 { srcInfoSpan = 27874 SrcSpan "tests/examples/RealGHC.lhs" 732 39 732 41 27875 , srcInfoPoints = [] 27876 } 27877 (Ident 27878 SrcSpanInfo 27879 { srcInfoSpan = 27880 SrcSpan "tests/examples/RealGHC.lhs" 732 39 732 41 27881 , srcInfoPoints = [] 27882 } 27883 "r1")))) 27884 (Var 27885 SrcSpanInfo 27886 { srcInfoSpan = 27887 SrcSpan "tests/examples/RealGHC.lhs" 732 42 732 44 27888 , srcInfoPoints = [] 27889 } 27890 (UnQual 27891 SrcSpanInfo 27892 { srcInfoSpan = 27893 SrcSpan "tests/examples/RealGHC.lhs" 732 42 732 44 27894 , srcInfoPoints = [] 27895 } 27896 (Ident 27897 SrcSpanInfo 27898 { srcInfoSpan = 27899 SrcSpan "tests/examples/RealGHC.lhs" 732 42 732 44 27900 , srcInfoPoints = [] 27901 } 27902 "r2")))) 27903 , Qualifier 27904 SrcSpanInfo 27905 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 7 733 41 27906 , srcInfoPoints = [] 27907 } 27908 (App 27909 SrcSpanInfo 27910 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 733 7 733 41 27911 , srcInfoPoints = [] 27912 } 27913 (App 27914 SrcSpanInfo 27915 { srcInfoSpan = 27916 SrcSpan "tests/examples/RealGHC.lhs" 733 7 733 35 27917 , srcInfoPoints = [] 27918 } 27919 (App 27920 SrcSpanInfo 27921 { srcInfoSpan = 27922 SrcSpan "tests/examples/RealGHC.lhs" 733 7 733 29 27923 , srcInfoPoints = [] 27924 } 27925 (App 27926 SrcSpanInfo 27927 { srcInfoSpan = 27928 SrcSpan "tests/examples/RealGHC.lhs" 733 7 733 22 27929 , srcInfoPoints = [] 27930 } 27931 (Var 27932 SrcSpanInfo 27933 { srcInfoSpan = 27934 SrcSpan "tests/examples/RealGHC.lhs" 733 7 733 17 27935 , srcInfoPoints = [] 27936 } 27937 (UnQual 27938 SrcSpanInfo 27939 { srcInfoSpan = 27940 SrcSpan 27941 "tests/examples/RealGHC.lhs" 733 7 733 17 27942 , srcInfoPoints = [] 27943 } 27944 (Ident 27945 SrcSpanInfo 27946 { srcInfoSpan = 27947 SrcSpan 27948 "tests/examples/RealGHC.lhs" 733 7 733 17 27949 , srcInfoPoints = [] 27950 } 27951 "match_alts"))) 27952 (Var 27953 SrcSpanInfo 27954 { srcInfoSpan = 27955 SrcSpan "tests/examples/RealGHC.lhs" 733 18 733 22 27956 , srcInfoPoints = [] 27957 } 27958 (UnQual 27959 SrcSpanInfo 27960 { srcInfoSpan = 27961 SrcSpan 27962 "tests/examples/RealGHC.lhs" 733 18 733 22 27963 , srcInfoPoints = [] 27964 } 27965 (Ident 27966 SrcSpanInfo 27967 { srcInfoSpan = 27968 SrcSpan 27969 "tests/examples/RealGHC.lhs" 733 18 733 22 27970 , srcInfoPoints = [] 27971 } 27972 "menv")))) 27973 (Var 27974 SrcSpanInfo 27975 { srcInfoSpan = 27976 SrcSpan "tests/examples/RealGHC.lhs" 733 23 733 29 27977 , srcInfoPoints = [] 27978 } 27979 (UnQual 27980 SrcSpanInfo 27981 { srcInfoSpan = 27982 SrcSpan "tests/examples/RealGHC.lhs" 733 23 733 29 27983 , srcInfoPoints = [] 27984 } 27985 (Ident 27986 SrcSpanInfo 27987 { srcInfoSpan = 27988 SrcSpan 27989 "tests/examples/RealGHC.lhs" 733 23 733 29 27990 , srcInfoPoints = [] 27991 } 27992 "subst1")))) 27993 (Var 27994 SrcSpanInfo 27995 { srcInfoSpan = 27996 SrcSpan "tests/examples/RealGHC.lhs" 733 30 733 35 27997 , srcInfoPoints = [] 27998 } 27999 (UnQual 28000 SrcSpanInfo 28001 { srcInfoSpan = 28002 SrcSpan "tests/examples/RealGHC.lhs" 733 30 733 35 28003 , srcInfoPoints = [] 28004 } 28005 (Ident 28006 SrcSpanInfo 28007 { srcInfoSpan = 28008 SrcSpan "tests/examples/RealGHC.lhs" 733 30 733 35 28009 , srcInfoPoints = [] 28010 } 28011 "alts1")))) 28012 (Var 28013 SrcSpanInfo 28014 { srcInfoSpan = 28015 SrcSpan "tests/examples/RealGHC.lhs" 733 36 733 41 28016 , srcInfoPoints = [] 28017 } 28018 (UnQual 28019 SrcSpanInfo 28020 { srcInfoSpan = 28021 SrcSpan "tests/examples/RealGHC.lhs" 733 36 733 41 28022 , srcInfoPoints = [] 28023 } 28024 (Ident 28025 SrcSpanInfo 28026 { srcInfoSpan = 28027 SrcSpan "tests/examples/RealGHC.lhs" 733 36 733 41 28028 , srcInfoPoints = [] 28029 } 28030 "alts2")))) 28031 ]) 28032 ]) 28033 (Just 28034 (BDecls 28035 SrcSpanInfo 28036 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 735 5 736 61 28037 , srcInfoPoints = 28038 [ SrcSpan "tests/examples/RealGHC.lhs" 735 5 735 5 28039 , SrcSpan "tests/examples/RealGHC.lhs" 736 5 736 5 28040 , SrcSpan "tests/examples/RealGHC.lhs" 738 1 738 0 28041 ] 28042 } 28043 [ TypeSig 28044 SrcSpanInfo 28045 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 735 5 735 22 28046 , srcInfoPoints = 28047 [ SrcSpan "tests/examples/RealGHC.lhs" 735 11 735 13 ] 28048 } 28049 [ Ident 28050 SrcSpanInfo 28051 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 735 5 735 10 28052 , srcInfoPoints = [] 28053 } 28054 "menv'" 28055 ] 28056 (TyCon 28057 SrcSpanInfo 28058 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 735 14 735 22 28059 , srcInfoPoints = [] 28060 } 28061 (UnQual 28062 SrcSpanInfo 28063 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 735 14 735 22 28064 , srcInfoPoints = [] 28065 } 28066 (Ident 28067 SrcSpanInfo 28068 { srcInfoSpan = 28069 SrcSpan "tests/examples/RealGHC.lhs" 735 14 735 22 28070 , srcInfoPoints = [] 28071 } 28072 "MatchEnv"))) 28073 , PatBind 28074 SrcSpanInfo 28075 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 5 736 61 28076 , srcInfoPoints = [] 28077 } 28078 (PVar 28079 SrcSpanInfo 28080 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 5 736 10 28081 , srcInfoPoints = [] 28082 } 28083 (Ident 28084 SrcSpanInfo 28085 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 5 736 10 28086 , srcInfoPoints = [] 28087 } 28088 "menv'")) 28089 (UnGuardedRhs 28090 SrcSpanInfo 28091 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 11 736 61 28092 , srcInfoPoints = 28093 [ SrcSpan "tests/examples/RealGHC.lhs" 736 11 736 12 ] 28094 } 28095 (RecUpdate 28096 SrcSpanInfo 28097 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 736 13 736 61 28098 , srcInfoPoints = 28099 [ SrcSpan "tests/examples/RealGHC.lhs" 736 18 736 19 28100 , SrcSpan "tests/examples/RealGHC.lhs" 736 60 736 61 28101 ] 28102 } 28103 (Var 28104 SrcSpanInfo 28105 { srcInfoSpan = 28106 SrcSpan "tests/examples/RealGHC.lhs" 736 13 736 17 28107 , srcInfoPoints = [] 28108 } 28109 (UnQual 28110 SrcSpanInfo 28111 { srcInfoSpan = 28112 SrcSpan "tests/examples/RealGHC.lhs" 736 13 736 17 28113 , srcInfoPoints = [] 28114 } 28115 (Ident 28116 SrcSpanInfo 28117 { srcInfoSpan = 28118 SrcSpan "tests/examples/RealGHC.lhs" 736 13 736 17 28119 , srcInfoPoints = [] 28120 } 28121 "menv"))) 28122 [ FieldUpdate 28123 SrcSpanInfo 28124 { srcInfoSpan = 28125 SrcSpan "tests/examples/RealGHC.lhs" 736 20 736 59 28126 , srcInfoPoints = 28127 [ SrcSpan "tests/examples/RealGHC.lhs" 736 27 736 28 ] 28128 } 28129 (UnQual 28130 SrcSpanInfo 28131 { srcInfoSpan = 28132 SrcSpan "tests/examples/RealGHC.lhs" 736 20 736 26 28133 , srcInfoPoints = [] 28134 } 28135 (Ident 28136 SrcSpanInfo 28137 { srcInfoSpan = 28138 SrcSpan "tests/examples/RealGHC.lhs" 736 20 736 26 28139 , srcInfoPoints = [] 28140 } 28141 "me_env")) 28142 (App 28143 SrcSpanInfo 28144 { srcInfoSpan = 28145 SrcSpan "tests/examples/RealGHC.lhs" 736 29 736 59 28146 , srcInfoPoints = [] 28147 } 28148 (App 28149 SrcSpanInfo 28150 { srcInfoSpan = 28151 SrcSpan "tests/examples/RealGHC.lhs" 736 29 736 55 28152 , srcInfoPoints = [] 28153 } 28154 (App 28155 SrcSpanInfo 28156 { srcInfoSpan = 28157 SrcSpan "tests/examples/RealGHC.lhs" 736 29 736 51 28158 , srcInfoPoints = [] 28159 } 28160 (Var 28161 SrcSpanInfo 28162 { srcInfoSpan = 28163 SrcSpan 28164 "tests/examples/RealGHC.lhs" 736 29 736 37 28165 , srcInfoPoints = [] 28166 } 28167 (UnQual 28168 SrcSpanInfo 28169 { srcInfoSpan = 28170 SrcSpan 28171 "tests/examples/RealGHC.lhs" 736 29 736 37 28172 , srcInfoPoints = [] 28173 } 28174 (Ident 28175 SrcSpanInfo 28176 { srcInfoSpan = 28177 SrcSpan 28178 "tests/examples/RealGHC.lhs" 28179 736 28180 29 28181 736 28182 37 28183 , srcInfoPoints = [] 28184 } 28185 "rnBndrs2"))) 28186 (Paren 28187 SrcSpanInfo 28188 { srcInfoSpan = 28189 SrcSpan 28190 "tests/examples/RealGHC.lhs" 736 38 736 51 28191 , srcInfoPoints = 28192 [ SrcSpan 28193 "tests/examples/RealGHC.lhs" 736 38 736 39 28194 , SrcSpan 28195 "tests/examples/RealGHC.lhs" 736 50 736 51 28196 ] 28197 } 28198 (App 28199 SrcSpanInfo 28200 { srcInfoSpan = 28201 SrcSpan 28202 "tests/examples/RealGHC.lhs" 736 39 736 50 28203 , srcInfoPoints = [] 28204 } 28205 (Var 28206 SrcSpanInfo 28207 { srcInfoSpan = 28208 SrcSpan 28209 "tests/examples/RealGHC.lhs" 28210 736 28211 39 28212 736 28213 45 28214 , srcInfoPoints = [] 28215 } 28216 (UnQual 28217 SrcSpanInfo 28218 { srcInfoSpan = 28219 SrcSpan 28220 "tests/examples/RealGHC.lhs" 28221 736 28222 39 28223 736 28224 45 28225 , srcInfoPoints = [] 28226 } 28227 (Ident 28228 SrcSpanInfo 28229 { srcInfoSpan = 28230 SrcSpan 28231 "tests/examples/RealGHC.lhs" 28232 736 28233 39 28234 736 28235 45 28236 , srcInfoPoints = [] 28237 } 28238 "me_env"))) 28239 (Var 28240 SrcSpanInfo 28241 { srcInfoSpan = 28242 SrcSpan 28243 "tests/examples/RealGHC.lhs" 28244 736 28245 46 28246 736 28247 50 28248 , srcInfoPoints = [] 28249 } 28250 (UnQual 28251 SrcSpanInfo 28252 { srcInfoSpan = 28253 SrcSpan 28254 "tests/examples/RealGHC.lhs" 28255 736 28256 46 28257 736 28258 50 28259 , srcInfoPoints = [] 28260 } 28261 (Ident 28262 SrcSpanInfo 28263 { srcInfoSpan = 28264 SrcSpan 28265 "tests/examples/RealGHC.lhs" 28266 736 28267 46 28268 736 28269 50 28270 , srcInfoPoints = [] 28271 } 28272 "menv")))))) 28273 (Var 28274 SrcSpanInfo 28275 { srcInfoSpan = 28276 SrcSpan "tests/examples/RealGHC.lhs" 736 52 736 55 28277 , srcInfoPoints = [] 28278 } 28279 (UnQual 28280 SrcSpanInfo 28281 { srcInfoSpan = 28282 SrcSpan 28283 "tests/examples/RealGHC.lhs" 736 52 736 55 28284 , srcInfoPoints = [] 28285 } 28286 (Ident 28287 SrcSpanInfo 28288 { srcInfoSpan = 28289 SrcSpan 28290 "tests/examples/RealGHC.lhs" 736 52 736 55 28291 , srcInfoPoints = [] 28292 } 28293 "vs1")))) 28294 (Var 28295 SrcSpanInfo 28296 { srcInfoSpan = 28297 SrcSpan "tests/examples/RealGHC.lhs" 736 56 736 59 28298 , srcInfoPoints = [] 28299 } 28300 (UnQual 28301 SrcSpanInfo 28302 { srcInfoSpan = 28303 SrcSpan "tests/examples/RealGHC.lhs" 736 56 736 59 28304 , srcInfoPoints = [] 28305 } 28306 (Ident 28307 SrcSpanInfo 28308 { srcInfoSpan = 28309 SrcSpan 28310 "tests/examples/RealGHC.lhs" 736 56 736 59 28311 , srcInfoPoints = [] 28312 } 28313 "vs2")))) 28314 ])) 28315 Nothing 28316 ])) 28317 , Match 28318 SrcSpanInfo 28319 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 1 739 12 28320 , srcInfoPoints = [] 28321 } 28322 (Ident 28323 SrcSpanInfo 28324 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 1 738 11 28325 , srcInfoPoints = [] 28326 } 28327 "match_alts") 28328 [ PVar 28329 SrcSpanInfo 28330 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 12 738 16 28331 , srcInfoPoints = [] 28332 } 28333 (Ident 28334 SrcSpanInfo 28335 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 12 738 16 28336 , srcInfoPoints = [] 28337 } 28338 "menv") 28339 , PVar 28340 SrcSpanInfo 28341 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 17 738 22 28342 , srcInfoPoints = [] 28343 } 28344 (Ident 28345 SrcSpanInfo 28346 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 17 738 22 28347 , srcInfoPoints = [] 28348 } 28349 "subst") 28350 , PVar 28351 SrcSpanInfo 28352 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 23 738 28 28353 , srcInfoPoints = [] 28354 } 28355 (Ident 28356 SrcSpanInfo 28357 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 23 738 28 28358 , srcInfoPoints = [] 28359 } 28360 "alts1") 28361 , PVar 28362 SrcSpanInfo 28363 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 29 738 34 28364 , srcInfoPoints = [] 28365 } 28366 (Ident 28367 SrcSpanInfo 28368 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 738 29 738 34 28369 , srcInfoPoints = [] 28370 } 28371 "alts2") 28372 ] 28373 (UnGuardedRhs 28374 SrcSpanInfo 28375 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 739 3 739 12 28376 , srcInfoPoints = 28377 [ SrcSpan "tests/examples/RealGHC.lhs" 739 3 739 4 ] 28378 } 28379 (Con 28380 SrcSpanInfo 28381 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 739 5 739 12 28382 , srcInfoPoints = [] 28383 } 28384 (UnQual 28385 SrcSpanInfo 28386 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 739 5 739 12 28387 , srcInfoPoints = [] 28388 } 28389 (Ident 28390 SrcSpanInfo 28391 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 739 5 739 12 28392 , srcInfoPoints = [] 28393 } 28394 "Nothing")))) 28395 Nothing 28396 ] 28397 , TypeSig 28398 SrcSpanInfo 28399 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 750 1 754 27 28400 , srcInfoPoints = 28401 [ SrcSpan "tests/examples/RealGHC.lhs" 750 10 750 12 ] 28402 } 28403 [ Ident 28404 SrcSpanInfo 28405 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 750 1 750 9 28406 , srcInfoPoints = [] 28407 } 28408 "match_ty" 28409 ] 28410 (TyFun 28411 SrcSpanInfo 28412 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 750 13 754 27 28413 , srcInfoPoints = 28414 [ SrcSpan "tests/examples/RealGHC.lhs" 751 10 751 12 ] 28415 } 28416 (TyCon 28417 SrcSpanInfo 28418 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 750 13 750 21 28419 , srcInfoPoints = [] 28420 } 28421 (UnQual 28422 SrcSpanInfo 28423 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 750 13 750 21 28424 , srcInfoPoints = [] 28425 } 28426 (Ident 28427 SrcSpanInfo 28428 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 750 13 750 21 28429 , srcInfoPoints = [] 28430 } 28431 "MatchEnv"))) 28432 (TyFun 28433 SrcSpanInfo 28434 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 751 13 754 27 28435 , srcInfoPoints = 28436 [ SrcSpan "tests/examples/RealGHC.lhs" 752 10 752 12 ] 28437 } 28438 (TyCon 28439 SrcSpanInfo 28440 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 751 13 751 21 28441 , srcInfoPoints = [] 28442 } 28443 (UnQual 28444 SrcSpanInfo 28445 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 751 13 751 21 28446 , srcInfoPoints = [] 28447 } 28448 (Ident 28449 SrcSpanInfo 28450 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 751 13 751 21 28451 , srcInfoPoints = [] 28452 } 28453 "SubstEnv"))) 28454 (TyFun 28455 SrcSpanInfo 28456 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 752 13 754 27 28457 , srcInfoPoints = 28458 [ SrcSpan "tests/examples/RealGHC.lhs" 753 10 753 12 ] 28459 } 28460 (TyCon 28461 SrcSpanInfo 28462 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 752 13 752 17 28463 , srcInfoPoints = [] 28464 } 28465 (UnQual 28466 SrcSpanInfo 28467 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 752 13 752 17 28468 , srcInfoPoints = [] 28469 } 28470 (Ident 28471 SrcSpanInfo 28472 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 752 13 752 17 28473 , srcInfoPoints = [] 28474 } 28475 "Type"))) 28476 (TyFun 28477 SrcSpanInfo 28478 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 753 13 754 27 28479 , srcInfoPoints = 28480 [ SrcSpan "tests/examples/RealGHC.lhs" 754 10 754 12 ] 28481 } 28482 (TyCon 28483 SrcSpanInfo 28484 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 753 13 753 17 28485 , srcInfoPoints = [] 28486 } 28487 (UnQual 28488 SrcSpanInfo 28489 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 753 13 753 17 28490 , srcInfoPoints = [] 28491 } 28492 (Ident 28493 SrcSpanInfo 28494 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 753 13 753 17 28495 , srcInfoPoints = [] 28496 } 28497 "Type"))) 28498 (TyApp 28499 SrcSpanInfo 28500 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 754 13 754 27 28501 , srcInfoPoints = [] 28502 } 28503 (TyCon 28504 SrcSpanInfo 28505 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 754 13 754 18 28506 , srcInfoPoints = [] 28507 } 28508 (UnQual 28509 SrcSpanInfo 28510 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 754 13 754 18 28511 , srcInfoPoints = [] 28512 } 28513 (Ident 28514 SrcSpanInfo 28515 { srcInfoSpan = 28516 SrcSpan "tests/examples/RealGHC.lhs" 754 13 754 18 28517 , srcInfoPoints = [] 28518 } 28519 "Maybe"))) 28520 (TyCon 28521 SrcSpanInfo 28522 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 754 19 754 27 28523 , srcInfoPoints = [] 28524 } 28525 (UnQual 28526 SrcSpanInfo 28527 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 754 19 754 27 28528 , srcInfoPoints = [] 28529 } 28530 (Ident 28531 SrcSpanInfo 28532 { srcInfoSpan = 28533 SrcSpan "tests/examples/RealGHC.lhs" 754 19 754 27 28534 , srcInfoPoints = [] 28535 } 28536 "SubstEnv")))))))) 28537 , FunBind 28538 SrcSpanInfo 28539 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 1 757 44 28540 , srcInfoPoints = [] 28541 } 28542 [ Match 28543 SrcSpanInfo 28544 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 1 757 44 28545 , srcInfoPoints = [] 28546 } 28547 (Ident 28548 SrcSpanInfo 28549 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 1 755 9 28550 , srcInfoPoints = [] 28551 } 28552 "match_ty") 28553 [ PVar 28554 SrcSpanInfo 28555 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 10 755 14 28556 , srcInfoPoints = [] 28557 } 28558 (Ident 28559 SrcSpanInfo 28560 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 10 755 14 28561 , srcInfoPoints = [] 28562 } 28563 "menv") 28564 , PTuple 28565 SrcSpanInfo 28566 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 15 755 42 28567 , srcInfoPoints = 28568 [ SrcSpan "tests/examples/RealGHC.lhs" 755 15 755 16 28569 , SrcSpan "tests/examples/RealGHC.lhs" 755 24 755 25 28570 , SrcSpan "tests/examples/RealGHC.lhs" 755 34 755 35 28571 , SrcSpan "tests/examples/RealGHC.lhs" 755 41 755 42 28572 ] 28573 } 28574 Boxed 28575 [ PVar 28576 SrcSpanInfo 28577 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 16 755 24 28578 , srcInfoPoints = [] 28579 } 28580 (Ident 28581 SrcSpanInfo 28582 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 16 755 24 28583 , srcInfoPoints = [] 28584 } 28585 "tv_subst") 28586 , PVar 28587 SrcSpanInfo 28588 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 26 755 34 28589 , srcInfoPoints = [] 28590 } 28591 (Ident 28592 SrcSpanInfo 28593 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 26 755 34 28594 , srcInfoPoints = [] 28595 } 28596 "id_subst") 28597 , PVar 28598 SrcSpanInfo 28599 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 36 755 41 28600 , srcInfoPoints = [] 28601 } 28602 (Ident 28603 SrcSpanInfo 28604 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 36 755 41 28605 , srcInfoPoints = [] 28606 } 28607 "binds") 28608 ] 28609 , PVar 28610 SrcSpanInfo 28611 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 43 755 46 28612 , srcInfoPoints = [] 28613 } 28614 (Ident 28615 SrcSpanInfo 28616 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 43 755 46 28617 , srcInfoPoints = [] 28618 } 28619 "ty1") 28620 , PVar 28621 SrcSpanInfo 28622 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 47 755 50 28623 , srcInfoPoints = [] 28624 } 28625 (Ident 28626 SrcSpanInfo 28627 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 755 47 755 50 28628 , srcInfoPoints = [] 28629 } 28630 "ty2") 28631 ] 28632 (UnGuardedRhs 28633 SrcSpanInfo 28634 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 3 757 44 28635 , srcInfoPoints = 28636 [ SrcSpan "tests/examples/RealGHC.lhs" 756 3 756 4 ] 28637 } 28638 (Do 28639 SrcSpanInfo 28640 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 5 757 44 28641 , srcInfoPoints = 28642 [ SrcSpan "tests/examples/RealGHC.lhs" 756 5 756 7 28643 , SrcSpan "tests/examples/RealGHC.lhs" 756 9 756 10 28644 , SrcSpan "tests/examples/RealGHC.lhs" 757 5 757 6 28645 , SrcSpan "tests/examples/RealGHC.lhs" 757 43 757 44 28646 ] 28647 } 28648 [ Generator 28649 SrcSpanInfo 28650 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 11 756 64 28651 , srcInfoPoints = 28652 [ SrcSpan "tests/examples/RealGHC.lhs" 756 21 756 23 ] 28653 } 28654 (PVar 28655 SrcSpanInfo 28656 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 11 756 20 28657 , srcInfoPoints = [] 28658 } 28659 (Ident 28660 SrcSpanInfo 28661 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 11 756 20 28662 , srcInfoPoints = [] 28663 } 28664 "tv_subst'")) 28665 (App 28666 SrcSpanInfo 28667 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 24 756 64 28668 , srcInfoPoints = [] 28669 } 28670 (App 28671 SrcSpanInfo 28672 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 24 756 60 28673 , srcInfoPoints = [] 28674 } 28675 (App 28676 SrcSpanInfo 28677 { srcInfoSpan = 28678 SrcSpan "tests/examples/RealGHC.lhs" 756 24 756 56 28679 , srcInfoPoints = [] 28680 } 28681 (App 28682 SrcSpanInfo 28683 { srcInfoSpan = 28684 SrcSpan "tests/examples/RealGHC.lhs" 756 24 756 47 28685 , srcInfoPoints = [] 28686 } 28687 (Var 28688 SrcSpanInfo 28689 { srcInfoSpan = 28690 SrcSpan "tests/examples/RealGHC.lhs" 756 24 756 42 28691 , srcInfoPoints = [] 28692 } 28693 (Qual 28694 SrcSpanInfo 28695 { srcInfoSpan = 28696 SrcSpan "tests/examples/RealGHC.lhs" 756 24 756 42 28697 , srcInfoPoints = [] 28698 } 28699 (ModuleName 28700 SrcSpanInfo 28701 { srcInfoSpan = 28702 SrcSpan 28703 "tests/examples/RealGHC.lhs" 756 24 756 42 28704 , srcInfoPoints = [] 28705 } 28706 "Unify") 28707 (Ident 28708 SrcSpanInfo 28709 { srcInfoSpan = 28710 SrcSpan 28711 "tests/examples/RealGHC.lhs" 756 24 756 42 28712 , srcInfoPoints = [] 28713 } 28714 "ruleMatchTyX"))) 28715 (Var 28716 SrcSpanInfo 28717 { srcInfoSpan = 28718 SrcSpan "tests/examples/RealGHC.lhs" 756 43 756 47 28719 , srcInfoPoints = [] 28720 } 28721 (UnQual 28722 SrcSpanInfo 28723 { srcInfoSpan = 28724 SrcSpan "tests/examples/RealGHC.lhs" 756 43 756 47 28725 , srcInfoPoints = [] 28726 } 28727 (Ident 28728 SrcSpanInfo 28729 { srcInfoSpan = 28730 SrcSpan 28731 "tests/examples/RealGHC.lhs" 756 43 756 47 28732 , srcInfoPoints = [] 28733 } 28734 "menv")))) 28735 (Var 28736 SrcSpanInfo 28737 { srcInfoSpan = 28738 SrcSpan "tests/examples/RealGHC.lhs" 756 48 756 56 28739 , srcInfoPoints = [] 28740 } 28741 (UnQual 28742 SrcSpanInfo 28743 { srcInfoSpan = 28744 SrcSpan "tests/examples/RealGHC.lhs" 756 48 756 56 28745 , srcInfoPoints = [] 28746 } 28747 (Ident 28748 SrcSpanInfo 28749 { srcInfoSpan = 28750 SrcSpan "tests/examples/RealGHC.lhs" 756 48 756 56 28751 , srcInfoPoints = [] 28752 } 28753 "tv_subst")))) 28754 (Var 28755 SrcSpanInfo 28756 { srcInfoSpan = 28757 SrcSpan "tests/examples/RealGHC.lhs" 756 57 756 60 28758 , srcInfoPoints = [] 28759 } 28760 (UnQual 28761 SrcSpanInfo 28762 { srcInfoSpan = 28763 SrcSpan "tests/examples/RealGHC.lhs" 756 57 756 60 28764 , srcInfoPoints = [] 28765 } 28766 (Ident 28767 SrcSpanInfo 28768 { srcInfoSpan = 28769 SrcSpan "tests/examples/RealGHC.lhs" 756 57 756 60 28770 , srcInfoPoints = [] 28771 } 28772 "ty1")))) 28773 (Var 28774 SrcSpanInfo 28775 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 756 61 756 64 28776 , srcInfoPoints = [] 28777 } 28778 (UnQual 28779 SrcSpanInfo 28780 { srcInfoSpan = 28781 SrcSpan "tests/examples/RealGHC.lhs" 756 61 756 64 28782 , srcInfoPoints = [] 28783 } 28784 (Ident 28785 SrcSpanInfo 28786 { srcInfoSpan = 28787 SrcSpan "tests/examples/RealGHC.lhs" 756 61 756 64 28788 , srcInfoPoints = [] 28789 } 28790 "ty2")))) 28791 , Qualifier 28792 SrcSpanInfo 28793 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 7 757 42 28794 , srcInfoPoints = [] 28795 } 28796 (App 28797 SrcSpanInfo 28798 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 7 757 42 28799 , srcInfoPoints = [] 28800 } 28801 (Var 28802 SrcSpanInfo 28803 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 7 757 13 28804 , srcInfoPoints = [] 28805 } 28806 (UnQual 28807 SrcSpanInfo 28808 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 7 757 13 28809 , srcInfoPoints = [] 28810 } 28811 (Ident 28812 SrcSpanInfo 28813 { srcInfoSpan = 28814 SrcSpan "tests/examples/RealGHC.lhs" 757 7 757 13 28815 , srcInfoPoints = [] 28816 } 28817 "return"))) 28818 (Tuple 28819 SrcSpanInfo 28820 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 757 14 757 42 28821 , srcInfoPoints = 28822 [ SrcSpan "tests/examples/RealGHC.lhs" 757 14 757 15 28823 , SrcSpan "tests/examples/RealGHC.lhs" 757 24 757 25 28824 , SrcSpan "tests/examples/RealGHC.lhs" 757 34 757 35 28825 , SrcSpan "tests/examples/RealGHC.lhs" 757 41 757 42 28826 ] 28827 } 28828 Boxed 28829 [ Var 28830 SrcSpanInfo 28831 { srcInfoSpan = 28832 SrcSpan "tests/examples/RealGHC.lhs" 757 15 757 24 28833 , srcInfoPoints = [] 28834 } 28835 (UnQual 28836 SrcSpanInfo 28837 { srcInfoSpan = 28838 SrcSpan "tests/examples/RealGHC.lhs" 757 15 757 24 28839 , srcInfoPoints = [] 28840 } 28841 (Ident 28842 SrcSpanInfo 28843 { srcInfoSpan = 28844 SrcSpan "tests/examples/RealGHC.lhs" 757 15 757 24 28845 , srcInfoPoints = [] 28846 } 28847 "tv_subst'")) 28848 , Var 28849 SrcSpanInfo 28850 { srcInfoSpan = 28851 SrcSpan "tests/examples/RealGHC.lhs" 757 26 757 34 28852 , srcInfoPoints = [] 28853 } 28854 (UnQual 28855 SrcSpanInfo 28856 { srcInfoSpan = 28857 SrcSpan "tests/examples/RealGHC.lhs" 757 26 757 34 28858 , srcInfoPoints = [] 28859 } 28860 (Ident 28861 SrcSpanInfo 28862 { srcInfoSpan = 28863 SrcSpan "tests/examples/RealGHC.lhs" 757 26 757 34 28864 , srcInfoPoints = [] 28865 } 28866 "id_subst")) 28867 , Var 28868 SrcSpanInfo 28869 { srcInfoSpan = 28870 SrcSpan "tests/examples/RealGHC.lhs" 757 36 757 41 28871 , srcInfoPoints = [] 28872 } 28873 (UnQual 28874 SrcSpanInfo 28875 { srcInfoSpan = 28876 SrcSpan "tests/examples/RealGHC.lhs" 757 36 757 41 28877 , srcInfoPoints = [] 28878 } 28879 (Ident 28880 SrcSpanInfo 28881 { srcInfoSpan = 28882 SrcSpan "tests/examples/RealGHC.lhs" 757 36 757 41 28883 , srcInfoPoints = [] 28884 } 28885 "binds")) 28886 ])) 28887 ])) 28888 Nothing 28889 ] 28890 , TypeSig 28891 SrcSpanInfo 28892 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 1 817 25 28893 , srcInfoPoints = 28894 [ SrcSpan "tests/examples/RealGHC.lhs" 813 18 813 20 ] 28895 } 28896 [ Ident 28897 SrcSpanInfo 28898 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 1 813 17 28899 , srcInfoPoints = [] 28900 } 28901 "ruleCheckProgram" 28902 ] 28903 (TyFun 28904 SrcSpanInfo 28905 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 21 817 25 28906 , srcInfoPoints = 28907 [ SrcSpan "tests/examples/RealGHC.lhs" 814 18 814 20 ] 28908 } 28909 (TyParen 28910 SrcSpanInfo 28911 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 21 813 41 28912 , srcInfoPoints = 28913 [ SrcSpan "tests/examples/RealGHC.lhs" 813 21 813 22 28914 , SrcSpan "tests/examples/RealGHC.lhs" 813 40 813 41 28915 ] 28916 } 28917 (TyFun 28918 SrcSpanInfo 28919 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 22 813 40 28920 , srcInfoPoints = 28921 [ SrcSpan "tests/examples/RealGHC.lhs" 813 33 813 35 ] 28922 } 28923 (TyCon 28924 SrcSpanInfo 28925 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 22 813 32 28926 , srcInfoPoints = [] 28927 } 28928 (UnQual 28929 SrcSpanInfo 28930 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 22 813 32 28931 , srcInfoPoints = [] 28932 } 28933 (Ident 28934 SrcSpanInfo 28935 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 22 813 32 28936 , srcInfoPoints = [] 28937 } 28938 "Activation"))) 28939 (TyCon 28940 SrcSpanInfo 28941 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 36 813 40 28942 , srcInfoPoints = [] 28943 } 28944 (UnQual 28945 SrcSpanInfo 28946 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 36 813 40 28947 , srcInfoPoints = [] 28948 } 28949 (Ident 28950 SrcSpanInfo 28951 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 813 36 813 40 28952 , srcInfoPoints = [] 28953 } 28954 "Bool"))))) 28955 (TyFun 28956 SrcSpanInfo 28957 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 814 21 817 25 28958 , srcInfoPoints = 28959 [ SrcSpan "tests/examples/RealGHC.lhs" 815 18 815 20 ] 28960 } 28961 (TyCon 28962 SrcSpanInfo 28963 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 814 21 814 27 28964 , srcInfoPoints = [] 28965 } 28966 (UnQual 28967 SrcSpanInfo 28968 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 814 21 814 27 28969 , srcInfoPoints = [] 28970 } 28971 (Ident 28972 SrcSpanInfo 28973 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 814 21 814 27 28974 , srcInfoPoints = [] 28975 } 28976 "String"))) 28977 (TyFun 28978 SrcSpanInfo 28979 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 815 21 817 25 28980 , srcInfoPoints = 28981 [ SrcSpan "tests/examples/RealGHC.lhs" 816 18 816 20 ] 28982 } 28983 (TyCon 28984 SrcSpanInfo 28985 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 815 21 815 29 28986 , srcInfoPoints = [] 28987 } 28988 (UnQual 28989 SrcSpanInfo 28990 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 815 21 815 29 28991 , srcInfoPoints = [] 28992 } 28993 (Ident 28994 SrcSpanInfo 28995 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 815 21 815 29 28996 , srcInfoPoints = [] 28997 } 28998 "RuleBase"))) 28999 (TyFun 29000 SrcSpanInfo 29001 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 816 21 817 25 29002 , srcInfoPoints = 29003 [ SrcSpan "tests/examples/RealGHC.lhs" 817 18 817 20 ] 29004 } 29005 (TyList 29006 SrcSpanInfo 29007 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 816 21 816 31 29008 , srcInfoPoints = 29009 [ SrcSpan "tests/examples/RealGHC.lhs" 816 21 816 22 29010 , SrcSpan "tests/examples/RealGHC.lhs" 816 30 816 31 29011 ] 29012 } 29013 (TyCon 29014 SrcSpanInfo 29015 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 816 22 816 30 29016 , srcInfoPoints = [] 29017 } 29018 (UnQual 29019 SrcSpanInfo 29020 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 816 22 816 30 29021 , srcInfoPoints = [] 29022 } 29023 (Ident 29024 SrcSpanInfo 29025 { srcInfoSpan = 29026 SrcSpan "tests/examples/RealGHC.lhs" 816 22 816 30 29027 , srcInfoPoints = [] 29028 } 29029 "CoreBind")))) 29030 (TyCon 29031 SrcSpanInfo 29032 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 817 21 817 25 29033 , srcInfoPoints = [] 29034 } 29035 (UnQual 29036 SrcSpanInfo 29037 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 817 21 817 25 29038 , srcInfoPoints = [] 29039 } 29040 (Ident 29041 SrcSpanInfo 29042 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 817 21 817 25 29043 , srcInfoPoints = [] 29044 } 29045 "SDoc"))))))) 29046 , FunBind 29047 SrcSpanInfo 29048 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 1 828 35 29049 , srcInfoPoints = 29050 [ SrcSpan "tests/examples/RealGHC.lhs" 826 3 826 8 ] 29051 } 29052 [ Match 29053 SrcSpanInfo 29054 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 1 828 35 29055 , srcInfoPoints = 29056 [ SrcSpan "tests/examples/RealGHC.lhs" 826 3 826 8 ] 29057 } 29058 (Ident 29059 SrcSpanInfo 29060 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 1 818 17 29061 , srcInfoPoints = [] 29062 } 29063 "ruleCheckProgram") 29064 [ PVar 29065 SrcSpanInfo 29066 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 18 818 27 29067 , srcInfoPoints = [] 29068 } 29069 (Ident 29070 SrcSpanInfo 29071 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 18 818 27 29072 , srcInfoPoints = [] 29073 } 29074 "is_active") 29075 , PVar 29076 SrcSpanInfo 29077 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 28 818 36 29078 , srcInfoPoints = [] 29079 } 29080 (Ident 29081 SrcSpanInfo 29082 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 28 818 36 29083 , srcInfoPoints = [] 29084 } 29085 "rule_pat") 29086 , PVar 29087 SrcSpanInfo 29088 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 37 818 46 29089 , srcInfoPoints = [] 29090 } 29091 (Ident 29092 SrcSpanInfo 29093 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 37 818 46 29094 , srcInfoPoints = [] 29095 } 29096 "rule_base") 29097 , PVar 29098 SrcSpanInfo 29099 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 47 818 52 29100 , srcInfoPoints = [] 29101 } 29102 (Ident 29103 SrcSpanInfo 29104 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 818 47 818 52 29105 , srcInfoPoints = [] 29106 } 29107 "binds") 29108 ] 29109 (GuardedRhss 29110 SrcSpanInfo 29111 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 819 3 825 7 29112 , srcInfoPoints = [] 29113 } 29114 [ GuardedRhs 29115 SrcSpanInfo 29116 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 819 3 820 57 29117 , srcInfoPoints = 29118 [ SrcSpan "tests/examples/RealGHC.lhs" 819 3 819 4 29119 , SrcSpan "tests/examples/RealGHC.lhs" 820 3 820 4 29120 ] 29121 } 29122 [ Qualifier 29123 SrcSpanInfo 29124 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 819 5 819 23 29125 , srcInfoPoints = [] 29126 } 29127 (App 29128 SrcSpanInfo 29129 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 819 5 819 23 29130 , srcInfoPoints = [] 29131 } 29132 (Var 29133 SrcSpanInfo 29134 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 819 5 819 15 29135 , srcInfoPoints = [] 29136 } 29137 (UnQual 29138 SrcSpanInfo 29139 { srcInfoSpan = 29140 SrcSpan "tests/examples/RealGHC.lhs" 819 5 819 15 29141 , srcInfoPoints = [] 29142 } 29143 (Ident 29144 SrcSpanInfo 29145 { srcInfoSpan = 29146 SrcSpan "tests/examples/RealGHC.lhs" 819 5 819 15 29147 , srcInfoPoints = [] 29148 } 29149 "isEmptyBag"))) 29150 (Var 29151 SrcSpanInfo 29152 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 819 16 819 23 29153 , srcInfoPoints = [] 29154 } 29155 (UnQual 29156 SrcSpanInfo 29157 { srcInfoSpan = 29158 SrcSpan "tests/examples/RealGHC.lhs" 819 16 819 23 29159 , srcInfoPoints = [] 29160 } 29161 (Ident 29162 SrcSpanInfo 29163 { srcInfoSpan = 29164 SrcSpan "tests/examples/RealGHC.lhs" 819 16 819 23 29165 , srcInfoPoints = [] 29166 } 29167 "results")))) 29168 ] 29169 (App 29170 SrcSpanInfo 29171 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 820 5 820 57 29172 , srcInfoPoints = [] 29173 } 29174 (Var 29175 SrcSpanInfo 29176 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 820 5 820 9 29177 , srcInfoPoints = [] 29178 } 29179 (UnQual 29180 SrcSpanInfo 29181 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 820 5 820 9 29182 , srcInfoPoints = [] 29183 } 29184 (Ident 29185 SrcSpanInfo 29186 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 820 5 820 9 29187 , srcInfoPoints = [] 29188 } 29189 "text"))) 29190 (Lit 29191 SrcSpanInfo 29192 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 820 10 820 57 29193 , srcInfoPoints = [] 29194 } 29195 (String 29196 SrcSpanInfo 29197 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 820 10 820 57 29198 , srcInfoPoints = [] 29199 } 29200 "Rule check results: no rule application sites" 29201 "Rule check results: no rule application sites"))) 29202 , GuardedRhs 29203 SrcSpanInfo 29204 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 821 3 825 7 29205 , srcInfoPoints = 29206 [ SrcSpan "tests/examples/RealGHC.lhs" 821 3 821 4 29207 , SrcSpan "tests/examples/RealGHC.lhs" 822 3 822 4 29208 ] 29209 } 29210 [ Qualifier 29211 SrcSpanInfo 29212 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 821 5 821 14 29213 , srcInfoPoints = [] 29214 } 29215 (Var 29216 SrcSpanInfo 29217 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 821 5 821 14 29218 , srcInfoPoints = [] 29219 } 29220 (UnQual 29221 SrcSpanInfo 29222 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 821 5 821 14 29223 , srcInfoPoints = [] 29224 } 29225 (Ident 29226 SrcSpanInfo 29227 { srcInfoSpan = 29228 SrcSpan "tests/examples/RealGHC.lhs" 821 5 821 14 29229 , srcInfoPoints = [] 29230 } 29231 "otherwise"))) 29232 ] 29233 (App 29234 SrcSpanInfo 29235 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 822 5 825 7 29236 , srcInfoPoints = [] 29237 } 29238 (Var 29239 SrcSpanInfo 29240 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 822 5 822 9 29241 , srcInfoPoints = [] 29242 } 29243 (UnQual 29244 SrcSpanInfo 29245 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 822 5 822 9 29246 , srcInfoPoints = [] 29247 } 29248 (Ident 29249 SrcSpanInfo 29250 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 822 5 822 9 29251 , srcInfoPoints = [] 29252 } 29253 "vcat"))) 29254 (List 29255 SrcSpanInfo 29256 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 822 10 825 7 29257 , srcInfoPoints = 29258 [ SrcSpan "tests/examples/RealGHC.lhs" 822 10 822 11 29259 , SrcSpan "tests/examples/RealGHC.lhs" 822 37 822 38 29260 , SrcSpan "tests/examples/RealGHC.lhs" 823 11 823 12 29261 , SrcSpan "tests/examples/RealGHC.lhs" 825 6 825 7 29262 ] 29263 } 29264 [ App 29265 SrcSpanInfo 29266 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 822 11 822 37 29267 , srcInfoPoints = [] 29268 } 29269 (Var 29270 SrcSpanInfo 29271 { srcInfoSpan = 29272 SrcSpan "tests/examples/RealGHC.lhs" 822 11 822 15 29273 , srcInfoPoints = [] 29274 } 29275 (UnQual 29276 SrcSpanInfo 29277 { srcInfoSpan = 29278 SrcSpan "tests/examples/RealGHC.lhs" 822 11 822 15 29279 , srcInfoPoints = [] 29280 } 29281 (Ident 29282 SrcSpanInfo 29283 { srcInfoSpan = 29284 SrcSpan "tests/examples/RealGHC.lhs" 822 11 822 15 29285 , srcInfoPoints = [] 29286 } 29287 "text"))) 29288 (Lit 29289 SrcSpanInfo 29290 { srcInfoSpan = 29291 SrcSpan "tests/examples/RealGHC.lhs" 822 16 822 37 29292 , srcInfoPoints = [] 29293 } 29294 (String 29295 SrcSpanInfo 29296 { srcInfoSpan = 29297 SrcSpan "tests/examples/RealGHC.lhs" 822 16 822 37 29298 , srcInfoPoints = [] 29299 } 29300 "Rule check results:" 29301 "Rule check results:")) 29302 , Var 29303 SrcSpanInfo 29304 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 823 7 823 11 29305 , srcInfoPoints = [] 29306 } 29307 (UnQual 29308 SrcSpanInfo 29309 { srcInfoSpan = 29310 SrcSpan "tests/examples/RealGHC.lhs" 823 7 823 11 29311 , srcInfoPoints = [] 29312 } 29313 (Ident 29314 SrcSpanInfo 29315 { srcInfoSpan = 29316 SrcSpan "tests/examples/RealGHC.lhs" 823 7 823 11 29317 , srcInfoPoints = [] 29318 } 29319 "line")) 29320 , App 29321 SrcSpanInfo 29322 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 824 7 824 50 29323 , srcInfoPoints = [] 29324 } 29325 (Var 29326 SrcSpanInfo 29327 { srcInfoSpan = 29328 SrcSpan "tests/examples/RealGHC.lhs" 824 7 824 11 29329 , srcInfoPoints = [] 29330 } 29331 (UnQual 29332 SrcSpanInfo 29333 { srcInfoSpan = 29334 SrcSpan "tests/examples/RealGHC.lhs" 824 7 824 11 29335 , srcInfoPoints = [] 29336 } 29337 (Ident 29338 SrcSpanInfo 29339 { srcInfoSpan = 29340 SrcSpan "tests/examples/RealGHC.lhs" 824 7 824 11 29341 , srcInfoPoints = [] 29342 } 29343 "vcat"))) 29344 (ListComp 29345 SrcSpanInfo 29346 { srcInfoSpan = 29347 SrcSpan "tests/examples/RealGHC.lhs" 824 12 824 50 29348 , srcInfoPoints = 29349 [ SrcSpan "tests/examples/RealGHC.lhs" 824 12 824 13 29350 , SrcSpan "tests/examples/RealGHC.lhs" 824 24 824 25 29351 , SrcSpan "tests/examples/RealGHC.lhs" 824 49 824 50 29352 ] 29353 } 29354 (InfixApp 29355 SrcSpanInfo 29356 { srcInfoSpan = 29357 SrcSpan "tests/examples/RealGHC.lhs" 824 14 824 23 29358 , srcInfoPoints = [] 29359 } 29360 (Var 29361 SrcSpanInfo 29362 { srcInfoSpan = 29363 SrcSpan "tests/examples/RealGHC.lhs" 824 14 824 15 29364 , srcInfoPoints = [] 29365 } 29366 (UnQual 29367 SrcSpanInfo 29368 { srcInfoSpan = 29369 SrcSpan "tests/examples/RealGHC.lhs" 824 14 824 15 29370 , srcInfoPoints = [] 29371 } 29372 (Ident 29373 SrcSpanInfo 29374 { srcInfoSpan = 29375 SrcSpan 29376 "tests/examples/RealGHC.lhs" 824 14 824 15 29377 , srcInfoPoints = [] 29378 } 29379 "p"))) 29380 (QVarOp 29381 SrcSpanInfo 29382 { srcInfoSpan = 29383 SrcSpan "tests/examples/RealGHC.lhs" 824 16 824 18 29384 , srcInfoPoints = [] 29385 } 29386 (UnQual 29387 SrcSpanInfo 29388 { srcInfoSpan = 29389 SrcSpan "tests/examples/RealGHC.lhs" 824 16 824 18 29390 , srcInfoPoints = [] 29391 } 29392 (Symbol 29393 SrcSpanInfo 29394 { srcInfoSpan = 29395 SrcSpan 29396 "tests/examples/RealGHC.lhs" 824 16 824 18 29397 , srcInfoPoints = [] 29398 } 29399 "$$"))) 29400 (Var 29401 SrcSpanInfo 29402 { srcInfoSpan = 29403 SrcSpan "tests/examples/RealGHC.lhs" 824 19 824 23 29404 , srcInfoPoints = [] 29405 } 29406 (UnQual 29407 SrcSpanInfo 29408 { srcInfoSpan = 29409 SrcSpan "tests/examples/RealGHC.lhs" 824 19 824 23 29410 , srcInfoPoints = [] 29411 } 29412 (Ident 29413 SrcSpanInfo 29414 { srcInfoSpan = 29415 SrcSpan 29416 "tests/examples/RealGHC.lhs" 824 19 824 23 29417 , srcInfoPoints = [] 29418 } 29419 "line")))) 29420 [ QualStmt 29421 SrcSpanInfo 29422 { srcInfoSpan = 29423 SrcSpan "tests/examples/RealGHC.lhs" 824 26 824 48 29424 , srcInfoPoints = 29425 [ SrcSpan "tests/examples/RealGHC.lhs" 824 28 824 30 ] 29426 } 29427 (Generator 29428 SrcSpanInfo 29429 { srcInfoSpan = 29430 SrcSpan "tests/examples/RealGHC.lhs" 824 26 824 48 29431 , srcInfoPoints = 29432 [ SrcSpan "tests/examples/RealGHC.lhs" 824 28 824 30 29433 ] 29434 } 29435 (PVar 29436 SrcSpanInfo 29437 { srcInfoSpan = 29438 SrcSpan "tests/examples/RealGHC.lhs" 824 26 824 27 29439 , srcInfoPoints = [] 29440 } 29441 (Ident 29442 SrcSpanInfo 29443 { srcInfoSpan = 29444 SrcSpan 29445 "tests/examples/RealGHC.lhs" 824 26 824 27 29446 , srcInfoPoints = [] 29447 } 29448 "p")) 29449 (App 29450 SrcSpanInfo 29451 { srcInfoSpan = 29452 SrcSpan "tests/examples/RealGHC.lhs" 824 31 824 48 29453 , srcInfoPoints = [] 29454 } 29455 (Var 29456 SrcSpanInfo 29457 { srcInfoSpan = 29458 SrcSpan 29459 "tests/examples/RealGHC.lhs" 824 31 824 40 29460 , srcInfoPoints = [] 29461 } 29462 (UnQual 29463 SrcSpanInfo 29464 { srcInfoSpan = 29465 SrcSpan 29466 "tests/examples/RealGHC.lhs" 824 31 824 40 29467 , srcInfoPoints = [] 29468 } 29469 (Ident 29470 SrcSpanInfo 29471 { srcInfoSpan = 29472 SrcSpan 29473 "tests/examples/RealGHC.lhs" 29474 824 29475 31 29476 824 29477 40 29478 , srcInfoPoints = [] 29479 } 29480 "bagToList"))) 29481 (Var 29482 SrcSpanInfo 29483 { srcInfoSpan = 29484 SrcSpan 29485 "tests/examples/RealGHC.lhs" 824 41 824 48 29486 , srcInfoPoints = [] 29487 } 29488 (UnQual 29489 SrcSpanInfo 29490 { srcInfoSpan = 29491 SrcSpan 29492 "tests/examples/RealGHC.lhs" 824 41 824 48 29493 , srcInfoPoints = [] 29494 } 29495 (Ident 29496 SrcSpanInfo 29497 { srcInfoSpan = 29498 SrcSpan 29499 "tests/examples/RealGHC.lhs" 29500 824 29501 41 29502 824 29503 48 29504 , srcInfoPoints = [] 29505 } 29506 "results"))))) 29507 ]) 29508 ])) 29509 ]) 29510 (Just 29511 (BDecls 29512 SrcSpanInfo 29513 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 5 828 35 29514 , srcInfoPoints = 29515 [ SrcSpan "tests/examples/RealGHC.lhs" 827 5 827 5 29516 , SrcSpan "tests/examples/RealGHC.lhs" 828 5 828 5 29517 , SrcSpan "tests/examples/RealGHC.lhs" 830 1 830 0 29518 ] 29519 } 29520 [ PatBind 29521 SrcSpanInfo 29522 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 5 827 100 29523 , srcInfoPoints = [] 29524 } 29525 (PVar 29526 SrcSpanInfo 29527 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 5 827 12 29528 , srcInfoPoints = [] 29529 } 29530 (Ident 29531 SrcSpanInfo 29532 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 5 827 12 29533 , srcInfoPoints = [] 29534 } 29535 "results")) 29536 (UnGuardedRhs 29537 SrcSpanInfo 29538 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 13 827 100 29539 , srcInfoPoints = 29540 [ SrcSpan "tests/examples/RealGHC.lhs" 827 13 827 14 ] 29541 } 29542 (App 29543 SrcSpanInfo 29544 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 827 15 827 100 29545 , srcInfoPoints = [] 29546 } 29547 (Var 29548 SrcSpanInfo 29549 { srcInfoSpan = 29550 SrcSpan "tests/examples/RealGHC.lhs" 827 15 827 28 29551 , srcInfoPoints = [] 29552 } 29553 (UnQual 29554 SrcSpanInfo 29555 { srcInfoSpan = 29556 SrcSpan "tests/examples/RealGHC.lhs" 827 15 827 28 29557 , srcInfoPoints = [] 29558 } 29559 (Ident 29560 SrcSpanInfo 29561 { srcInfoSpan = 29562 SrcSpan "tests/examples/RealGHC.lhs" 827 15 827 28 29563 , srcInfoPoints = [] 29564 } 29565 "unionManyBags"))) 29566 (Paren 29567 SrcSpanInfo 29568 { srcInfoSpan = 29569 SrcSpan "tests/examples/RealGHC.lhs" 827 29 827 100 29570 , srcInfoPoints = 29571 [ SrcSpan "tests/examples/RealGHC.lhs" 827 29 827 30 29572 , SrcSpan "tests/examples/RealGHC.lhs" 827 99 827 100 29573 ] 29574 } 29575 (App 29576 SrcSpanInfo 29577 { srcInfoSpan = 29578 SrcSpan "tests/examples/RealGHC.lhs" 827 30 827 99 29579 , srcInfoPoints = [] 29580 } 29581 (App 29582 SrcSpanInfo 29583 { srcInfoSpan = 29584 SrcSpan "tests/examples/RealGHC.lhs" 827 30 827 93 29585 , srcInfoPoints = [] 29586 } 29587 (Var 29588 SrcSpanInfo 29589 { srcInfoSpan = 29590 SrcSpan "tests/examples/RealGHC.lhs" 827 30 827 33 29591 , srcInfoPoints = [] 29592 } 29593 (UnQual 29594 SrcSpanInfo 29595 { srcInfoSpan = 29596 SrcSpan 29597 "tests/examples/RealGHC.lhs" 827 30 827 33 29598 , srcInfoPoints = [] 29599 } 29600 (Ident 29601 SrcSpanInfo 29602 { srcInfoSpan = 29603 SrcSpan 29604 "tests/examples/RealGHC.lhs" 827 30 827 33 29605 , srcInfoPoints = [] 29606 } 29607 "map"))) 29608 (Paren 29609 SrcSpanInfo 29610 { srcInfoSpan = 29611 SrcSpan "tests/examples/RealGHC.lhs" 827 34 827 93 29612 , srcInfoPoints = 29613 [ SrcSpan "tests/examples/RealGHC.lhs" 827 34 827 35 29614 , SrcSpan "tests/examples/RealGHC.lhs" 827 92 827 93 29615 ] 29616 } 29617 (App 29618 SrcSpanInfo 29619 { srcInfoSpan = 29620 SrcSpan 29621 "tests/examples/RealGHC.lhs" 827 35 827 92 29622 , srcInfoPoints = [] 29623 } 29624 (Var 29625 SrcSpanInfo 29626 { srcInfoSpan = 29627 SrcSpan 29628 "tests/examples/RealGHC.lhs" 827 35 827 48 29629 , srcInfoPoints = [] 29630 } 29631 (UnQual 29632 SrcSpanInfo 29633 { srcInfoSpan = 29634 SrcSpan 29635 "tests/examples/RealGHC.lhs" 29636 827 29637 35 29638 827 29639 48 29640 , srcInfoPoints = [] 29641 } 29642 (Ident 29643 SrcSpanInfo 29644 { srcInfoSpan = 29645 SrcSpan 29646 "tests/examples/RealGHC.lhs" 29647 827 29648 35 29649 827 29650 48 29651 , srcInfoPoints = [] 29652 } 29653 "ruleCheckBind"))) 29654 (Paren 29655 SrcSpanInfo 29656 { srcInfoSpan = 29657 SrcSpan 29658 "tests/examples/RealGHC.lhs" 827 49 827 92 29659 , srcInfoPoints = 29660 [ SrcSpan 29661 "tests/examples/RealGHC.lhs" 827 49 827 50 29662 , SrcSpan 29663 "tests/examples/RealGHC.lhs" 827 91 827 92 29664 ] 29665 } 29666 (App 29667 SrcSpanInfo 29668 { srcInfoSpan = 29669 SrcSpan 29670 "tests/examples/RealGHC.lhs" 29671 827 29672 50 29673 827 29674 91 29675 , srcInfoPoints = [] 29676 } 29677 (App 29678 SrcSpanInfo 29679 { srcInfoSpan = 29680 SrcSpan 29681 "tests/examples/RealGHC.lhs" 29682 827 29683 50 29684 827 29685 81 29686 , srcInfoPoints = [] 29687 } 29688 (App 29689 SrcSpanInfo 29690 { srcInfoSpan = 29691 SrcSpan 29692 "tests/examples/RealGHC.lhs" 29693 827 29694 50 29695 827 29696 72 29697 , srcInfoPoints = [] 29698 } 29699 (Con 29700 SrcSpanInfo 29701 { srcInfoSpan = 29702 SrcSpan 29703 "tests/examples/RealGHC.lhs" 29704 827 29705 50 29706 827 29707 62 29708 , srcInfoPoints = [] 29709 } 29710 (UnQual 29711 SrcSpanInfo 29712 { srcInfoSpan = 29713 SrcSpan 29714 "tests/examples/RealGHC.lhs" 29715 827 29716 50 29717 827 29718 62 29719 , srcInfoPoints = [] 29720 } 29721 (Ident 29722 SrcSpanInfo 29723 { srcInfoSpan = 29724 SrcSpan 29725 "tests/examples/RealGHC.lhs" 29726 827 29727 50 29728 827 29729 62 29730 , srcInfoPoints = [] 29731 } 29732 "RuleCheckEnv"))) 29733 (Var 29734 SrcSpanInfo 29735 { srcInfoSpan = 29736 SrcSpan 29737 "tests/examples/RealGHC.lhs" 29738 827 29739 63 29740 827 29741 72 29742 , srcInfoPoints = [] 29743 } 29744 (UnQual 29745 SrcSpanInfo 29746 { srcInfoSpan = 29747 SrcSpan 29748 "tests/examples/RealGHC.lhs" 29749 827 29750 63 29751 827 29752 72 29753 , srcInfoPoints = [] 29754 } 29755 (Ident 29756 SrcSpanInfo 29757 { srcInfoSpan = 29758 SrcSpan 29759 "tests/examples/RealGHC.lhs" 29760 827 29761 63 29762 827 29763 72 29764 , srcInfoPoints = [] 29765 } 29766 "is_active")))) 29767 (Var 29768 SrcSpanInfo 29769 { srcInfoSpan = 29770 SrcSpan 29771 "tests/examples/RealGHC.lhs" 29772 827 29773 73 29774 827 29775 81 29776 , srcInfoPoints = [] 29777 } 29778 (UnQual 29779 SrcSpanInfo 29780 { srcInfoSpan = 29781 SrcSpan 29782 "tests/examples/RealGHC.lhs" 29783 827 29784 73 29785 827 29786 81 29787 , srcInfoPoints = [] 29788 } 29789 (Ident 29790 SrcSpanInfo 29791 { srcInfoSpan = 29792 SrcSpan 29793 "tests/examples/RealGHC.lhs" 29794 827 29795 73 29796 827 29797 81 29798 , srcInfoPoints = [] 29799 } 29800 "rule_pat")))) 29801 (Var 29802 SrcSpanInfo 29803 { srcInfoSpan = 29804 SrcSpan 29805 "tests/examples/RealGHC.lhs" 29806 827 29807 82 29808 827 29809 91 29810 , srcInfoPoints = [] 29811 } 29812 (UnQual 29813 SrcSpanInfo 29814 { srcInfoSpan = 29815 SrcSpan 29816 "tests/examples/RealGHC.lhs" 29817 827 29818 82 29819 827 29820 91 29821 , srcInfoPoints = [] 29822 } 29823 (Ident 29824 SrcSpanInfo 29825 { srcInfoSpan = 29826 SrcSpan 29827 "tests/examples/RealGHC.lhs" 29828 827 29829 82 29830 827 29831 91 29832 , srcInfoPoints = [] 29833 } 29834 "rule_base")))))))) 29835 (Var 29836 SrcSpanInfo 29837 { srcInfoSpan = 29838 SrcSpan "tests/examples/RealGHC.lhs" 827 94 827 99 29839 , srcInfoPoints = [] 29840 } 29841 (UnQual 29842 SrcSpanInfo 29843 { srcInfoSpan = 29844 SrcSpan "tests/examples/RealGHC.lhs" 827 94 827 99 29845 , srcInfoPoints = [] 29846 } 29847 (Ident 29848 SrcSpanInfo 29849 { srcInfoSpan = 29850 SrcSpan 29851 "tests/examples/RealGHC.lhs" 827 94 827 99 29852 , srcInfoPoints = [] 29853 } 29854 "binds"))))))) 29855 Nothing 29856 , PatBind 29857 SrcSpanInfo 29858 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 5 828 35 29859 , srcInfoPoints = [] 29860 } 29861 (PVar 29862 SrcSpanInfo 29863 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 5 828 9 29864 , srcInfoPoints = [] 29865 } 29866 (Ident 29867 SrcSpanInfo 29868 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 5 828 9 29869 , srcInfoPoints = [] 29870 } 29871 "line")) 29872 (UnGuardedRhs 29873 SrcSpanInfo 29874 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 10 828 35 29875 , srcInfoPoints = 29876 [ SrcSpan "tests/examples/RealGHC.lhs" 828 10 828 11 ] 29877 } 29878 (App 29879 SrcSpanInfo 29880 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 828 12 828 35 29881 , srcInfoPoints = [] 29882 } 29883 (Var 29884 SrcSpanInfo 29885 { srcInfoSpan = 29886 SrcSpan "tests/examples/RealGHC.lhs" 828 12 828 16 29887 , srcInfoPoints = [] 29888 } 29889 (UnQual 29890 SrcSpanInfo 29891 { srcInfoSpan = 29892 SrcSpan "tests/examples/RealGHC.lhs" 828 12 828 16 29893 , srcInfoPoints = [] 29894 } 29895 (Ident 29896 SrcSpanInfo 29897 { srcInfoSpan = 29898 SrcSpan "tests/examples/RealGHC.lhs" 828 12 828 16 29899 , srcInfoPoints = [] 29900 } 29901 "text"))) 29902 (Paren 29903 SrcSpanInfo 29904 { srcInfoSpan = 29905 SrcSpan "tests/examples/RealGHC.lhs" 828 17 828 35 29906 , srcInfoPoints = 29907 [ SrcSpan "tests/examples/RealGHC.lhs" 828 17 828 18 29908 , SrcSpan "tests/examples/RealGHC.lhs" 828 34 828 35 29909 ] 29910 } 29911 (App 29912 SrcSpanInfo 29913 { srcInfoSpan = 29914 SrcSpan "tests/examples/RealGHC.lhs" 828 18 828 34 29915 , srcInfoPoints = [] 29916 } 29917 (App 29918 SrcSpanInfo 29919 { srcInfoSpan = 29920 SrcSpan "tests/examples/RealGHC.lhs" 828 18 828 30 29921 , srcInfoPoints = [] 29922 } 29923 (Var 29924 SrcSpanInfo 29925 { srcInfoSpan = 29926 SrcSpan "tests/examples/RealGHC.lhs" 828 18 828 27 29927 , srcInfoPoints = [] 29928 } 29929 (UnQual 29930 SrcSpanInfo 29931 { srcInfoSpan = 29932 SrcSpan 29933 "tests/examples/RealGHC.lhs" 828 18 828 27 29934 , srcInfoPoints = [] 29935 } 29936 (Ident 29937 SrcSpanInfo 29938 { srcInfoSpan = 29939 SrcSpan 29940 "tests/examples/RealGHC.lhs" 828 18 828 27 29941 , srcInfoPoints = [] 29942 } 29943 "replicate"))) 29944 (Lit 29945 SrcSpanInfo 29946 { srcInfoSpan = 29947 SrcSpan "tests/examples/RealGHC.lhs" 828 28 828 30 29948 , srcInfoPoints = [] 29949 } 29950 (Int 29951 SrcSpanInfo 29952 { srcInfoSpan = 29953 SrcSpan 29954 "tests/examples/RealGHC.lhs" 828 28 828 30 29955 , srcInfoPoints = [] 29956 } 29957 20 29958 "20"))) 29959 (Lit 29960 SrcSpanInfo 29961 { srcInfoSpan = 29962 SrcSpan "tests/examples/RealGHC.lhs" 828 31 828 34 29963 , srcInfoPoints = [] 29964 } 29965 (Char 29966 SrcSpanInfo 29967 { srcInfoSpan = 29968 SrcSpan "tests/examples/RealGHC.lhs" 828 31 828 34 29969 , srcInfoPoints = [] 29970 } 29971 '-' 29972 "-")))))) 29973 Nothing 29974 ])) 29975 ] 29976 , DataDecl 29977 SrcSpanInfo 29978 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 830 1 834 2 29979 , srcInfoPoints = 29980 [ SrcSpan "tests/examples/RealGHC.lhs" 830 19 830 20 ] 29981 } 29982 (DataType 29983 SrcSpanInfo 29984 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 830 1 830 5 29985 , srcInfoPoints = [] 29986 }) 29987 Nothing 29988 (DHead 29989 SrcSpanInfo 29990 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 830 6 830 18 29991 , srcInfoPoints = [] 29992 } 29993 (Ident 29994 SrcSpanInfo 29995 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 830 6 830 18 29996 , srcInfoPoints = [] 29997 } 29998 "RuleCheckEnv")) 29999 [ QualConDecl 30000 SrcSpanInfo 30001 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 830 21 834 2 30002 , srcInfoPoints = 30003 [ SrcSpan "tests/examples/RealGHC.lhs" 830 34 830 35 30004 , SrcSpan "tests/examples/RealGHC.lhs" 831 39 831 40 30005 , SrcSpan "tests/examples/RealGHC.lhs" 832 25 832 26 30006 , SrcSpan "tests/examples/RealGHC.lhs" 834 1 834 2 30007 ] 30008 } 30009 Nothing 30010 Nothing 30011 (RecDecl 30012 SrcSpanInfo 30013 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 830 21 834 2 30014 , srcInfoPoints = 30015 [ SrcSpan "tests/examples/RealGHC.lhs" 830 34 830 35 30016 , SrcSpan "tests/examples/RealGHC.lhs" 831 39 831 40 30017 , SrcSpan "tests/examples/RealGHC.lhs" 832 25 832 26 30018 , SrcSpan "tests/examples/RealGHC.lhs" 834 1 834 2 30019 ] 30020 } 30021 (Ident 30022 SrcSpanInfo 30023 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 830 21 830 33 30024 , srcInfoPoints = [] 30025 } 30026 "RuleCheckEnv") 30027 [ FieldDecl 30028 SrcSpanInfo 30029 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 831 5 831 39 30030 , srcInfoPoints = 30031 [ SrcSpan "tests/examples/RealGHC.lhs" 831 18 831 20 ] 30032 } 30033 [ Ident 30034 SrcSpanInfo 30035 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 831 5 831 17 30036 , srcInfoPoints = [] 30037 } 30038 "rc_is_active" 30039 ] 30040 (TyFun 30041 SrcSpanInfo 30042 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 831 21 831 39 30043 , srcInfoPoints = 30044 [ SrcSpan "tests/examples/RealGHC.lhs" 831 32 831 34 ] 30045 } 30046 (TyCon 30047 SrcSpanInfo 30048 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 831 21 831 31 30049 , srcInfoPoints = [] 30050 } 30051 (UnQual 30052 SrcSpanInfo 30053 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 831 21 831 31 30054 , srcInfoPoints = [] 30055 } 30056 (Ident 30057 SrcSpanInfo 30058 { srcInfoSpan = 30059 SrcSpan "tests/examples/RealGHC.lhs" 831 21 831 31 30060 , srcInfoPoints = [] 30061 } 30062 "Activation"))) 30063 (TyCon 30064 SrcSpanInfo 30065 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 831 35 831 39 30066 , srcInfoPoints = [] 30067 } 30068 (UnQual 30069 SrcSpanInfo 30070 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 831 35 831 39 30071 , srcInfoPoints = [] 30072 } 30073 (Ident 30074 SrcSpanInfo 30075 { srcInfoSpan = 30076 SrcSpan "tests/examples/RealGHC.lhs" 831 35 831 39 30077 , srcInfoPoints = [] 30078 } 30079 "Bool")))) 30080 , FieldDecl 30081 SrcSpanInfo 30082 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 832 5 832 25 30083 , srcInfoPoints = 30084 [ SrcSpan "tests/examples/RealGHC.lhs" 832 16 832 18 ] 30085 } 30086 [ Ident 30087 SrcSpanInfo 30088 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 832 5 832 15 30089 , srcInfoPoints = [] 30090 } 30091 "rc_pattern" 30092 ] 30093 (TyCon 30094 SrcSpanInfo 30095 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 832 19 832 25 30096 , srcInfoPoints = [] 30097 } 30098 (UnQual 30099 SrcSpanInfo 30100 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 832 19 832 25 30101 , srcInfoPoints = [] 30102 } 30103 (Ident 30104 SrcSpanInfo 30105 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 832 19 832 25 30106 , srcInfoPoints = [] 30107 } 30108 "String"))) 30109 , FieldDecl 30110 SrcSpanInfo 30111 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 833 5 833 29 30112 , srcInfoPoints = 30113 [ SrcSpan "tests/examples/RealGHC.lhs" 833 18 833 20 ] 30114 } 30115 [ Ident 30116 SrcSpanInfo 30117 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 833 5 833 17 30118 , srcInfoPoints = [] 30119 } 30120 "rc_rule_base" 30121 ] 30122 (TyCon 30123 SrcSpanInfo 30124 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 833 21 833 29 30125 , srcInfoPoints = [] 30126 } 30127 (UnQual 30128 SrcSpanInfo 30129 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 833 21 833 29 30130 , srcInfoPoints = [] 30131 } 30132 (Ident 30133 SrcSpanInfo 30134 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 833 21 833 29 30135 , srcInfoPoints = [] 30136 } 30137 "RuleBase"))) 30138 ]) 30139 ] 30140 [] 30141 , TypeSig 30142 SrcSpanInfo 30143 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 1 836 54 30144 , srcInfoPoints = 30145 [ SrcSpan "tests/examples/RealGHC.lhs" 836 15 836 17 ] 30146 } 30147 [ Ident 30148 SrcSpanInfo 30149 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 1 836 14 30150 , srcInfoPoints = [] 30151 } 30152 "ruleCheckBind" 30153 ] 30154 (TyFun 30155 SrcSpanInfo 30156 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 18 836 54 30157 , srcInfoPoints = 30158 [ SrcSpan "tests/examples/RealGHC.lhs" 836 31 836 33 ] 30159 } 30160 (TyCon 30161 SrcSpanInfo 30162 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 18 836 30 30163 , srcInfoPoints = [] 30164 } 30165 (UnQual 30166 SrcSpanInfo 30167 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 18 836 30 30168 , srcInfoPoints = [] 30169 } 30170 (Ident 30171 SrcSpanInfo 30172 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 18 836 30 30173 , srcInfoPoints = [] 30174 } 30175 "RuleCheckEnv"))) 30176 (TyFun 30177 SrcSpanInfo 30178 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 34 836 54 30179 , srcInfoPoints = 30180 [ SrcSpan "tests/examples/RealGHC.lhs" 836 43 836 45 ] 30181 } 30182 (TyCon 30183 SrcSpanInfo 30184 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 34 836 42 30185 , srcInfoPoints = [] 30186 } 30187 (UnQual 30188 SrcSpanInfo 30189 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 34 836 42 30190 , srcInfoPoints = [] 30191 } 30192 (Ident 30193 SrcSpanInfo 30194 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 34 836 42 30195 , srcInfoPoints = [] 30196 } 30197 "CoreBind"))) 30198 (TyApp 30199 SrcSpanInfo 30200 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 46 836 54 30201 , srcInfoPoints = [] 30202 } 30203 (TyCon 30204 SrcSpanInfo 30205 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 46 836 49 30206 , srcInfoPoints = [] 30207 } 30208 (UnQual 30209 SrcSpanInfo 30210 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 46 836 49 30211 , srcInfoPoints = [] 30212 } 30213 (Ident 30214 SrcSpanInfo 30215 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 46 836 49 30216 , srcInfoPoints = [] 30217 } 30218 "Bag"))) 30219 (TyCon 30220 SrcSpanInfo 30221 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 50 836 54 30222 , srcInfoPoints = [] 30223 } 30224 (UnQual 30225 SrcSpanInfo 30226 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 50 836 54 30227 , srcInfoPoints = [] 30228 } 30229 (Ident 30230 SrcSpanInfo 30231 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 836 50 836 54 30232 , srcInfoPoints = [] 30233 } 30234 "SDoc")))))) 30235 , FunBind 30236 SrcSpanInfo 30237 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 1 839 80 30238 , srcInfoPoints = [] 30239 } 30240 [ Match 30241 SrcSpanInfo 30242 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 1 838 49 30243 , srcInfoPoints = [] 30244 } 30245 (Ident 30246 SrcSpanInfo 30247 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 1 838 14 30248 , srcInfoPoints = [] 30249 } 30250 "ruleCheckBind") 30251 [ PVar 30252 SrcSpanInfo 30253 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 15 838 18 30254 , srcInfoPoints = [] 30255 } 30256 (Ident 30257 SrcSpanInfo 30258 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 15 838 18 30259 , srcInfoPoints = [] 30260 } 30261 "env") 30262 , PParen 30263 SrcSpanInfo 30264 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 19 838 31 30265 , srcInfoPoints = 30266 [ SrcSpan "tests/examples/RealGHC.lhs" 838 19 838 20 30267 , SrcSpan "tests/examples/RealGHC.lhs" 838 30 838 31 30268 ] 30269 } 30270 (PApp 30271 SrcSpanInfo 30272 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 20 838 30 30273 , srcInfoPoints = [] 30274 } 30275 (UnQual 30276 SrcSpanInfo 30277 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 20 838 26 30278 , srcInfoPoints = [] 30279 } 30280 (Ident 30281 SrcSpanInfo 30282 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 20 838 26 30283 , srcInfoPoints = [] 30284 } 30285 "NonRec")) 30286 [ PVar 30287 SrcSpanInfo 30288 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 27 838 28 30289 , srcInfoPoints = [] 30290 } 30291 (Ident 30292 SrcSpanInfo 30293 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 27 838 28 30294 , srcInfoPoints = [] 30295 } 30296 "b") 30297 , PVar 30298 SrcSpanInfo 30299 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 29 838 30 30300 , srcInfoPoints = [] 30301 } 30302 (Ident 30303 SrcSpanInfo 30304 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 29 838 30 30305 , srcInfoPoints = [] 30306 } 30307 "r") 30308 ]) 30309 ] 30310 (UnGuardedRhs 30311 SrcSpanInfo 30312 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 32 838 49 30313 , srcInfoPoints = 30314 [ SrcSpan "tests/examples/RealGHC.lhs" 838 32 838 33 ] 30315 } 30316 (App 30317 SrcSpanInfo 30318 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 34 838 49 30319 , srcInfoPoints = [] 30320 } 30321 (App 30322 SrcSpanInfo 30323 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 34 838 47 30324 , srcInfoPoints = [] 30325 } 30326 (Var 30327 SrcSpanInfo 30328 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 34 838 43 30329 , srcInfoPoints = [] 30330 } 30331 (UnQual 30332 SrcSpanInfo 30333 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 34 838 43 30334 , srcInfoPoints = [] 30335 } 30336 (Ident 30337 SrcSpanInfo 30338 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 34 838 43 30339 , srcInfoPoints = [] 30340 } 30341 "ruleCheck"))) 30342 (Var 30343 SrcSpanInfo 30344 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 44 838 47 30345 , srcInfoPoints = [] 30346 } 30347 (UnQual 30348 SrcSpanInfo 30349 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 44 838 47 30350 , srcInfoPoints = [] 30351 } 30352 (Ident 30353 SrcSpanInfo 30354 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 44 838 47 30355 , srcInfoPoints = [] 30356 } 30357 "env")))) 30358 (Var 30359 SrcSpanInfo 30360 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 48 838 49 30361 , srcInfoPoints = [] 30362 } 30363 (UnQual 30364 SrcSpanInfo 30365 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 48 838 49 30366 , srcInfoPoints = [] 30367 } 30368 (Ident 30369 SrcSpanInfo 30370 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 838 48 838 49 30371 , srcInfoPoints = [] 30372 } 30373 "r"))))) 30374 Nothing 30375 , Match 30376 SrcSpanInfo 30377 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 1 839 80 30378 , srcInfoPoints = [] 30379 } 30380 (Ident 30381 SrcSpanInfo 30382 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 1 839 14 30383 , srcInfoPoints = [] 30384 } 30385 "ruleCheckBind") 30386 [ PVar 30387 SrcSpanInfo 30388 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 15 839 18 30389 , srcInfoPoints = [] 30390 } 30391 (Ident 30392 SrcSpanInfo 30393 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 15 839 18 30394 , srcInfoPoints = [] 30395 } 30396 "env") 30397 , PParen 30398 SrcSpanInfo 30399 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 19 839 28 30400 , srcInfoPoints = 30401 [ SrcSpan "tests/examples/RealGHC.lhs" 839 19 839 20 30402 , SrcSpan "tests/examples/RealGHC.lhs" 839 27 839 28 30403 ] 30404 } 30405 (PApp 30406 SrcSpanInfo 30407 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 20 839 27 30408 , srcInfoPoints = [] 30409 } 30410 (UnQual 30411 SrcSpanInfo 30412 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 20 839 23 30413 , srcInfoPoints = [] 30414 } 30415 (Ident 30416 SrcSpanInfo 30417 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 20 839 23 30418 , srcInfoPoints = [] 30419 } 30420 "Rec")) 30421 [ PVar 30422 SrcSpanInfo 30423 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 24 839 27 30424 , srcInfoPoints = [] 30425 } 30426 (Ident 30427 SrcSpanInfo 30428 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 24 839 27 30429 , srcInfoPoints = [] 30430 } 30431 "prs") 30432 ]) 30433 ] 30434 (UnGuardedRhs 30435 SrcSpanInfo 30436 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 32 839 80 30437 , srcInfoPoints = 30438 [ SrcSpan "tests/examples/RealGHC.lhs" 839 32 839 33 ] 30439 } 30440 (App 30441 SrcSpanInfo 30442 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 34 839 80 30443 , srcInfoPoints = [] 30444 } 30445 (Var 30446 SrcSpanInfo 30447 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 34 839 47 30448 , srcInfoPoints = [] 30449 } 30450 (UnQual 30451 SrcSpanInfo 30452 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 34 839 47 30453 , srcInfoPoints = [] 30454 } 30455 (Ident 30456 SrcSpanInfo 30457 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 34 839 47 30458 , srcInfoPoints = [] 30459 } 30460 "unionManyBags"))) 30461 (ListComp 30462 SrcSpanInfo 30463 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 48 839 80 30464 , srcInfoPoints = 30465 [ SrcSpan "tests/examples/RealGHC.lhs" 839 48 839 49 30466 , SrcSpan "tests/examples/RealGHC.lhs" 839 65 839 66 30467 , SrcSpan "tests/examples/RealGHC.lhs" 839 79 839 80 30468 ] 30469 } 30470 (App 30471 SrcSpanInfo 30472 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 49 839 64 30473 , srcInfoPoints = [] 30474 } 30475 (App 30476 SrcSpanInfo 30477 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 49 839 62 30478 , srcInfoPoints = [] 30479 } 30480 (Var 30481 SrcSpanInfo 30482 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 49 839 58 30483 , srcInfoPoints = [] 30484 } 30485 (UnQual 30486 SrcSpanInfo 30487 { srcInfoSpan = 30488 SrcSpan "tests/examples/RealGHC.lhs" 839 49 839 58 30489 , srcInfoPoints = [] 30490 } 30491 (Ident 30492 SrcSpanInfo 30493 { srcInfoSpan = 30494 SrcSpan "tests/examples/RealGHC.lhs" 839 49 839 58 30495 , srcInfoPoints = [] 30496 } 30497 "ruleCheck"))) 30498 (Var 30499 SrcSpanInfo 30500 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 59 839 62 30501 , srcInfoPoints = [] 30502 } 30503 (UnQual 30504 SrcSpanInfo 30505 { srcInfoSpan = 30506 SrcSpan "tests/examples/RealGHC.lhs" 839 59 839 62 30507 , srcInfoPoints = [] 30508 } 30509 (Ident 30510 SrcSpanInfo 30511 { srcInfoSpan = 30512 SrcSpan "tests/examples/RealGHC.lhs" 839 59 839 62 30513 , srcInfoPoints = [] 30514 } 30515 "env")))) 30516 (Var 30517 SrcSpanInfo 30518 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 63 839 64 30519 , srcInfoPoints = [] 30520 } 30521 (UnQual 30522 SrcSpanInfo 30523 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 63 839 64 30524 , srcInfoPoints = [] 30525 } 30526 (Ident 30527 SrcSpanInfo 30528 { srcInfoSpan = 30529 SrcSpan "tests/examples/RealGHC.lhs" 839 63 839 64 30530 , srcInfoPoints = [] 30531 } 30532 "r")))) 30533 [ QualStmt 30534 SrcSpanInfo 30535 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 67 839 79 30536 , srcInfoPoints = 30537 [ SrcSpan "tests/examples/RealGHC.lhs" 839 73 839 75 ] 30538 } 30539 (Generator 30540 SrcSpanInfo 30541 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 839 67 839 79 30542 , srcInfoPoints = 30543 [ SrcSpan "tests/examples/RealGHC.lhs" 839 73 839 75 ] 30544 } 30545 (PTuple 30546 SrcSpanInfo 30547 { srcInfoSpan = 30548 SrcSpan "tests/examples/RealGHC.lhs" 839 67 839 72 30549 , srcInfoPoints = 30550 [ SrcSpan "tests/examples/RealGHC.lhs" 839 67 839 68 30551 , SrcSpan "tests/examples/RealGHC.lhs" 839 69 839 70 30552 , SrcSpan "tests/examples/RealGHC.lhs" 839 71 839 72 30553 ] 30554 } 30555 Boxed 30556 [ PVar 30557 SrcSpanInfo 30558 { srcInfoSpan = 30559 SrcSpan "tests/examples/RealGHC.lhs" 839 68 839 69 30560 , srcInfoPoints = [] 30561 } 30562 (Ident 30563 SrcSpanInfo 30564 { srcInfoSpan = 30565 SrcSpan "tests/examples/RealGHC.lhs" 839 68 839 69 30566 , srcInfoPoints = [] 30567 } 30568 "b") 30569 , PVar 30570 SrcSpanInfo 30571 { srcInfoSpan = 30572 SrcSpan "tests/examples/RealGHC.lhs" 839 70 839 71 30573 , srcInfoPoints = [] 30574 } 30575 (Ident 30576 SrcSpanInfo 30577 { srcInfoSpan = 30578 SrcSpan "tests/examples/RealGHC.lhs" 839 70 839 71 30579 , srcInfoPoints = [] 30580 } 30581 "r") 30582 ]) 30583 (Var 30584 SrcSpanInfo 30585 { srcInfoSpan = 30586 SrcSpan "tests/examples/RealGHC.lhs" 839 76 839 79 30587 , srcInfoPoints = [] 30588 } 30589 (UnQual 30590 SrcSpanInfo 30591 { srcInfoSpan = 30592 SrcSpan "tests/examples/RealGHC.lhs" 839 76 839 79 30593 , srcInfoPoints = [] 30594 } 30595 (Ident 30596 SrcSpanInfo 30597 { srcInfoSpan = 30598 SrcSpan "tests/examples/RealGHC.lhs" 839 76 839 79 30599 , srcInfoPoints = [] 30600 } 30601 "prs")))) 30602 ]))) 30603 Nothing 30604 ] 30605 , TypeSig 30606 SrcSpanInfo 30607 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 1 841 50 30608 , srcInfoPoints = 30609 [ SrcSpan "tests/examples/RealGHC.lhs" 841 11 841 13 ] 30610 } 30611 [ Ident 30612 SrcSpanInfo 30613 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 1 841 10 30614 , srcInfoPoints = [] 30615 } 30616 "ruleCheck" 30617 ] 30618 (TyFun 30619 SrcSpanInfo 30620 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 14 841 50 30621 , srcInfoPoints = 30622 [ SrcSpan "tests/examples/RealGHC.lhs" 841 27 841 29 ] 30623 } 30624 (TyCon 30625 SrcSpanInfo 30626 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 14 841 26 30627 , srcInfoPoints = [] 30628 } 30629 (UnQual 30630 SrcSpanInfo 30631 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 14 841 26 30632 , srcInfoPoints = [] 30633 } 30634 (Ident 30635 SrcSpanInfo 30636 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 14 841 26 30637 , srcInfoPoints = [] 30638 } 30639 "RuleCheckEnv"))) 30640 (TyFun 30641 SrcSpanInfo 30642 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 30 841 50 30643 , srcInfoPoints = 30644 [ SrcSpan "tests/examples/RealGHC.lhs" 841 39 841 41 ] 30645 } 30646 (TyCon 30647 SrcSpanInfo 30648 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 30 841 38 30649 , srcInfoPoints = [] 30650 } 30651 (UnQual 30652 SrcSpanInfo 30653 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 30 841 38 30654 , srcInfoPoints = [] 30655 } 30656 (Ident 30657 SrcSpanInfo 30658 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 30 841 38 30659 , srcInfoPoints = [] 30660 } 30661 "CoreExpr"))) 30662 (TyApp 30663 SrcSpanInfo 30664 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 42 841 50 30665 , srcInfoPoints = [] 30666 } 30667 (TyCon 30668 SrcSpanInfo 30669 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 42 841 45 30670 , srcInfoPoints = [] 30671 } 30672 (UnQual 30673 SrcSpanInfo 30674 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 42 841 45 30675 , srcInfoPoints = [] 30676 } 30677 (Ident 30678 SrcSpanInfo 30679 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 42 841 45 30680 , srcInfoPoints = [] 30681 } 30682 "Bag"))) 30683 (TyCon 30684 SrcSpanInfo 30685 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 46 841 50 30686 , srcInfoPoints = [] 30687 } 30688 (UnQual 30689 SrcSpanInfo 30690 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 46 841 50 30691 , srcInfoPoints = [] 30692 } 30693 (Ident 30694 SrcSpanInfo 30695 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 841 46 841 50 30696 , srcInfoPoints = [] 30697 } 30698 "SDoc")))))) 30699 , FunBind 30700 SrcSpanInfo 30701 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 1 851 68 30702 , srcInfoPoints = [] 30703 } 30704 [ Match 30705 SrcSpanInfo 30706 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 1 842 39 30707 , srcInfoPoints = [] 30708 } 30709 (Ident 30710 SrcSpanInfo 30711 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 1 842 10 30712 , srcInfoPoints = [] 30713 } 30714 "ruleCheck") 30715 [ PVar 30716 SrcSpanInfo 30717 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 11 842 14 30718 , srcInfoPoints = [] 30719 } 30720 (Ident 30721 SrcSpanInfo 30722 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 11 842 14 30723 , srcInfoPoints = [] 30724 } 30725 "env") 30726 , PParen 30727 SrcSpanInfo 30728 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 15 842 22 30729 , srcInfoPoints = 30730 [ SrcSpan "tests/examples/RealGHC.lhs" 842 15 842 16 30731 , SrcSpan "tests/examples/RealGHC.lhs" 842 21 842 22 30732 ] 30733 } 30734 (PApp 30735 SrcSpanInfo 30736 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 16 842 21 30737 , srcInfoPoints = [] 30738 } 30739 (UnQual 30740 SrcSpanInfo 30741 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 16 842 19 30742 , srcInfoPoints = [] 30743 } 30744 (Ident 30745 SrcSpanInfo 30746 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 16 842 19 30747 , srcInfoPoints = [] 30748 } 30749 "Var")) 30750 [ PVar 30751 SrcSpanInfo 30752 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 20 842 21 30753 , srcInfoPoints = [] 30754 } 30755 (Ident 30756 SrcSpanInfo 30757 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 20 842 21 30758 , srcInfoPoints = [] 30759 } 30760 "v") 30761 ]) 30762 ] 30763 (UnGuardedRhs 30764 SrcSpanInfo 30765 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 29 842 39 30766 , srcInfoPoints = 30767 [ SrcSpan "tests/examples/RealGHC.lhs" 842 29 842 30 ] 30768 } 30769 (Var 30770 SrcSpanInfo 30771 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 31 842 39 30772 , srcInfoPoints = [] 30773 } 30774 (UnQual 30775 SrcSpanInfo 30776 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 31 842 39 30777 , srcInfoPoints = [] 30778 } 30779 (Ident 30780 SrcSpanInfo 30781 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 842 31 842 39 30782 , srcInfoPoints = [] 30783 } 30784 "emptyBag")))) 30785 Nothing 30786 , Match 30787 SrcSpanInfo 30788 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 1 843 39 30789 , srcInfoPoints = [] 30790 } 30791 (Ident 30792 SrcSpanInfo 30793 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 1 843 10 30794 , srcInfoPoints = [] 30795 } 30796 "ruleCheck") 30797 [ PVar 30798 SrcSpanInfo 30799 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 11 843 14 30800 , srcInfoPoints = [] 30801 } 30802 (Ident 30803 SrcSpanInfo 30804 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 11 843 14 30805 , srcInfoPoints = [] 30806 } 30807 "env") 30808 , PParen 30809 SrcSpanInfo 30810 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 15 843 22 30811 , srcInfoPoints = 30812 [ SrcSpan "tests/examples/RealGHC.lhs" 843 15 843 16 30813 , SrcSpan "tests/examples/RealGHC.lhs" 843 21 843 22 30814 ] 30815 } 30816 (PApp 30817 SrcSpanInfo 30818 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 16 843 21 30819 , srcInfoPoints = [] 30820 } 30821 (UnQual 30822 SrcSpanInfo 30823 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 16 843 19 30824 , srcInfoPoints = [] 30825 } 30826 (Ident 30827 SrcSpanInfo 30828 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 16 843 19 30829 , srcInfoPoints = [] 30830 } 30831 "Lit")) 30832 [ PVar 30833 SrcSpanInfo 30834 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 20 843 21 30835 , srcInfoPoints = [] 30836 } 30837 (Ident 30838 SrcSpanInfo 30839 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 20 843 21 30840 , srcInfoPoints = [] 30841 } 30842 "l") 30843 ]) 30844 ] 30845 (UnGuardedRhs 30846 SrcSpanInfo 30847 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 29 843 39 30848 , srcInfoPoints = 30849 [ SrcSpan "tests/examples/RealGHC.lhs" 843 29 843 30 ] 30850 } 30851 (Var 30852 SrcSpanInfo 30853 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 31 843 39 30854 , srcInfoPoints = [] 30855 } 30856 (UnQual 30857 SrcSpanInfo 30858 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 31 843 39 30859 , srcInfoPoints = [] 30860 } 30861 (Ident 30862 SrcSpanInfo 30863 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 843 31 843 39 30864 , srcInfoPoints = [] 30865 } 30866 "emptyBag")))) 30867 Nothing 30868 , Match 30869 SrcSpanInfo 30870 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 1 844 39 30871 , srcInfoPoints = [] 30872 } 30873 (Ident 30874 SrcSpanInfo 30875 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 1 844 10 30876 , srcInfoPoints = [] 30877 } 30878 "ruleCheck") 30879 [ PVar 30880 SrcSpanInfo 30881 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 11 844 14 30882 , srcInfoPoints = [] 30883 } 30884 (Ident 30885 SrcSpanInfo 30886 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 11 844 14 30887 , srcInfoPoints = [] 30888 } 30889 "env") 30890 , PParen 30891 SrcSpanInfo 30892 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 15 844 24 30893 , srcInfoPoints = 30894 [ SrcSpan "tests/examples/RealGHC.lhs" 844 15 844 16 30895 , SrcSpan "tests/examples/RealGHC.lhs" 844 23 844 24 30896 ] 30897 } 30898 (PApp 30899 SrcSpanInfo 30900 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 16 844 23 30901 , srcInfoPoints = [] 30902 } 30903 (UnQual 30904 SrcSpanInfo 30905 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 16 844 20 30906 , srcInfoPoints = [] 30907 } 30908 (Ident 30909 SrcSpanInfo 30910 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 16 844 20 30911 , srcInfoPoints = [] 30912 } 30913 "Type")) 30914 [ PVar 30915 SrcSpanInfo 30916 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 21 844 23 30917 , srcInfoPoints = [] 30918 } 30919 (Ident 30920 SrcSpanInfo 30921 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 21 844 23 30922 , srcInfoPoints = [] 30923 } 30924 "ty") 30925 ]) 30926 ] 30927 (UnGuardedRhs 30928 SrcSpanInfo 30929 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 29 844 39 30930 , srcInfoPoints = 30931 [ SrcSpan "tests/examples/RealGHC.lhs" 844 29 844 30 ] 30932 } 30933 (Var 30934 SrcSpanInfo 30935 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 31 844 39 30936 , srcInfoPoints = [] 30937 } 30938 (UnQual 30939 SrcSpanInfo 30940 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 31 844 39 30941 , srcInfoPoints = [] 30942 } 30943 (Ident 30944 SrcSpanInfo 30945 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 844 31 844 39 30946 , srcInfoPoints = [] 30947 } 30948 "emptyBag")))) 30949 Nothing 30950 , Match 30951 SrcSpanInfo 30952 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 1 845 60 30953 , srcInfoPoints = [] 30954 } 30955 (Ident 30956 SrcSpanInfo 30957 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 1 845 10 30958 , srcInfoPoints = [] 30959 } 30960 "ruleCheck") 30961 [ PVar 30962 SrcSpanInfo 30963 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 11 845 14 30964 , srcInfoPoints = [] 30965 } 30966 (Ident 30967 SrcSpanInfo 30968 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 11 845 14 30969 , srcInfoPoints = [] 30970 } 30971 "env") 30972 , PParen 30973 SrcSpanInfo 30974 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 15 845 24 30975 , srcInfoPoints = 30976 [ SrcSpan "tests/examples/RealGHC.lhs" 845 15 845 16 30977 , SrcSpan "tests/examples/RealGHC.lhs" 845 23 845 24 30978 ] 30979 } 30980 (PApp 30981 SrcSpanInfo 30982 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 16 845 23 30983 , srcInfoPoints = [] 30984 } 30985 (UnQual 30986 SrcSpanInfo 30987 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 16 845 19 30988 , srcInfoPoints = [] 30989 } 30990 (Ident 30991 SrcSpanInfo 30992 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 16 845 19 30993 , srcInfoPoints = [] 30994 } 30995 "App")) 30996 [ PVar 30997 SrcSpanInfo 30998 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 20 845 21 30999 , srcInfoPoints = [] 31000 } 31001 (Ident 31002 SrcSpanInfo 31003 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 20 845 21 31004 , srcInfoPoints = [] 31005 } 31006 "f") 31007 , PVar 31008 SrcSpanInfo 31009 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 22 845 23 31010 , srcInfoPoints = [] 31011 } 31012 (Ident 31013 SrcSpanInfo 31014 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 22 845 23 31015 , srcInfoPoints = [] 31016 } 31017 "a") 31018 ]) 31019 ] 31020 (UnGuardedRhs 31021 SrcSpanInfo 31022 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 29 845 60 31023 , srcInfoPoints = 31024 [ SrcSpan "tests/examples/RealGHC.lhs" 845 29 845 30 ] 31025 } 31026 (App 31027 SrcSpanInfo 31028 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 31 845 60 31029 , srcInfoPoints = [] 31030 } 31031 (App 31032 SrcSpanInfo 31033 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 31 845 57 31034 , srcInfoPoints = [] 31035 } 31036 (App 31037 SrcSpanInfo 31038 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 31 845 47 31039 , srcInfoPoints = [] 31040 } 31041 (Var 31042 SrcSpanInfo 31043 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 31 845 43 31044 , srcInfoPoints = [] 31045 } 31046 (UnQual 31047 SrcSpanInfo 31048 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 31 845 43 31049 , srcInfoPoints = [] 31050 } 31051 (Ident 31052 SrcSpanInfo 31053 { srcInfoSpan = 31054 SrcSpan "tests/examples/RealGHC.lhs" 845 31 845 43 31055 , srcInfoPoints = [] 31056 } 31057 "ruleCheckApp"))) 31058 (Var 31059 SrcSpanInfo 31060 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 44 845 47 31061 , srcInfoPoints = [] 31062 } 31063 (UnQual 31064 SrcSpanInfo 31065 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 44 845 47 31066 , srcInfoPoints = [] 31067 } 31068 (Ident 31069 SrcSpanInfo 31070 { srcInfoSpan = 31071 SrcSpan "tests/examples/RealGHC.lhs" 845 44 845 47 31072 , srcInfoPoints = [] 31073 } 31074 "env")))) 31075 (Paren 31076 SrcSpanInfo 31077 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 48 845 57 31078 , srcInfoPoints = 31079 [ SrcSpan "tests/examples/RealGHC.lhs" 845 48 845 49 31080 , SrcSpan "tests/examples/RealGHC.lhs" 845 56 845 57 31081 ] 31082 } 31083 (App 31084 SrcSpanInfo 31085 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 49 845 56 31086 , srcInfoPoints = [] 31087 } 31088 (App 31089 SrcSpanInfo 31090 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 49 845 54 31091 , srcInfoPoints = [] 31092 } 31093 (Con 31094 SrcSpanInfo 31095 { srcInfoSpan = 31096 SrcSpan "tests/examples/RealGHC.lhs" 845 49 845 52 31097 , srcInfoPoints = [] 31098 } 31099 (UnQual 31100 SrcSpanInfo 31101 { srcInfoSpan = 31102 SrcSpan "tests/examples/RealGHC.lhs" 845 49 845 52 31103 , srcInfoPoints = [] 31104 } 31105 (Ident 31106 SrcSpanInfo 31107 { srcInfoSpan = 31108 SrcSpan "tests/examples/RealGHC.lhs" 845 49 845 52 31109 , srcInfoPoints = [] 31110 } 31111 "App"))) 31112 (Var 31113 SrcSpanInfo 31114 { srcInfoSpan = 31115 SrcSpan "tests/examples/RealGHC.lhs" 845 53 845 54 31116 , srcInfoPoints = [] 31117 } 31118 (UnQual 31119 SrcSpanInfo 31120 { srcInfoSpan = 31121 SrcSpan "tests/examples/RealGHC.lhs" 845 53 845 54 31122 , srcInfoPoints = [] 31123 } 31124 (Ident 31125 SrcSpanInfo 31126 { srcInfoSpan = 31127 SrcSpan "tests/examples/RealGHC.lhs" 845 53 845 54 31128 , srcInfoPoints = [] 31129 } 31130 "f")))) 31131 (Var 31132 SrcSpanInfo 31133 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 55 845 56 31134 , srcInfoPoints = [] 31135 } 31136 (UnQual 31137 SrcSpanInfo 31138 { srcInfoSpan = 31139 SrcSpan "tests/examples/RealGHC.lhs" 845 55 845 56 31140 , srcInfoPoints = [] 31141 } 31142 (Ident 31143 SrcSpanInfo 31144 { srcInfoSpan = 31145 SrcSpan "tests/examples/RealGHC.lhs" 845 55 845 56 31146 , srcInfoPoints = [] 31147 } 31148 "a")))))) 31149 (List 31150 SrcSpanInfo 31151 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 845 58 845 60 31152 , srcInfoPoints = 31153 [ SrcSpan "tests/examples/RealGHC.lhs" 845 58 845 59 31154 , SrcSpan "tests/examples/RealGHC.lhs" 845 59 845 60 31155 ] 31156 } 31157 []))) 31158 Nothing 31159 , Match 31160 SrcSpanInfo 31161 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 1 846 46 31162 , srcInfoPoints = [] 31163 } 31164 (Ident 31165 SrcSpanInfo 31166 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 1 846 10 31167 , srcInfoPoints = [] 31168 } 31169 "ruleCheck") 31170 [ PVar 31171 SrcSpanInfo 31172 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 11 846 14 31173 , srcInfoPoints = [] 31174 } 31175 (Ident 31176 SrcSpanInfo 31177 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 11 846 14 31178 , srcInfoPoints = [] 31179 } 31180 "env") 31181 , PParen 31182 SrcSpanInfo 31183 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 15 846 25 31184 , srcInfoPoints = 31185 [ SrcSpan "tests/examples/RealGHC.lhs" 846 15 846 16 31186 , SrcSpan "tests/examples/RealGHC.lhs" 846 24 846 25 31187 ] 31188 } 31189 (PApp 31190 SrcSpanInfo 31191 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 16 846 24 31192 , srcInfoPoints = [] 31193 } 31194 (UnQual 31195 SrcSpanInfo 31196 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 16 846 20 31197 , srcInfoPoints = [] 31198 } 31199 (Ident 31200 SrcSpanInfo 31201 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 16 846 20 31202 , srcInfoPoints = [] 31203 } 31204 "Note")) 31205 [ PVar 31206 SrcSpanInfo 31207 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 21 846 22 31208 , srcInfoPoints = [] 31209 } 31210 (Ident 31211 SrcSpanInfo 31212 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 21 846 22 31213 , srcInfoPoints = [] 31214 } 31215 "n") 31216 , PVar 31217 SrcSpanInfo 31218 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 23 846 24 31219 , srcInfoPoints = [] 31220 } 31221 (Ident 31222 SrcSpanInfo 31223 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 23 846 24 31224 , srcInfoPoints = [] 31225 } 31226 "e") 31227 ]) 31228 ] 31229 (UnGuardedRhs 31230 SrcSpanInfo 31231 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 29 846 46 31232 , srcInfoPoints = 31233 [ SrcSpan "tests/examples/RealGHC.lhs" 846 29 846 30 ] 31234 } 31235 (App 31236 SrcSpanInfo 31237 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 31 846 46 31238 , srcInfoPoints = [] 31239 } 31240 (App 31241 SrcSpanInfo 31242 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 31 846 44 31243 , srcInfoPoints = [] 31244 } 31245 (Var 31246 SrcSpanInfo 31247 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 31 846 40 31248 , srcInfoPoints = [] 31249 } 31250 (UnQual 31251 SrcSpanInfo 31252 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 31 846 40 31253 , srcInfoPoints = [] 31254 } 31255 (Ident 31256 SrcSpanInfo 31257 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 31 846 40 31258 , srcInfoPoints = [] 31259 } 31260 "ruleCheck"))) 31261 (Var 31262 SrcSpanInfo 31263 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 41 846 44 31264 , srcInfoPoints = [] 31265 } 31266 (UnQual 31267 SrcSpanInfo 31268 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 41 846 44 31269 , srcInfoPoints = [] 31270 } 31271 (Ident 31272 SrcSpanInfo 31273 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 41 846 44 31274 , srcInfoPoints = [] 31275 } 31276 "env")))) 31277 (Var 31278 SrcSpanInfo 31279 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 45 846 46 31280 , srcInfoPoints = [] 31281 } 31282 (UnQual 31283 SrcSpanInfo 31284 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 45 846 46 31285 , srcInfoPoints = [] 31286 } 31287 (Ident 31288 SrcSpanInfo 31289 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 846 45 846 46 31290 , srcInfoPoints = [] 31291 } 31292 "e"))))) 31293 Nothing 31294 , Match 31295 SrcSpanInfo 31296 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 1 847 46 31297 , srcInfoPoints = [] 31298 } 31299 (Ident 31300 SrcSpanInfo 31301 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 1 847 10 31302 , srcInfoPoints = [] 31303 } 31304 "ruleCheck") 31305 [ PVar 31306 SrcSpanInfo 31307 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 11 847 14 31308 , srcInfoPoints = [] 31309 } 31310 (Ident 31311 SrcSpanInfo 31312 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 11 847 14 31313 , srcInfoPoints = [] 31314 } 31315 "env") 31316 , PParen 31317 SrcSpanInfo 31318 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 15 847 26 31319 , srcInfoPoints = 31320 [ SrcSpan "tests/examples/RealGHC.lhs" 847 15 847 16 31321 , SrcSpan "tests/examples/RealGHC.lhs" 847 25 847 26 31322 ] 31323 } 31324 (PApp 31325 SrcSpanInfo 31326 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 16 847 25 31327 , srcInfoPoints = [] 31328 } 31329 (UnQual 31330 SrcSpanInfo 31331 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 16 847 20 31332 , srcInfoPoints = [] 31333 } 31334 (Ident 31335 SrcSpanInfo 31336 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 16 847 20 31337 , srcInfoPoints = [] 31338 } 31339 "Cast")) 31340 [ PVar 31341 SrcSpanInfo 31342 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 21 847 22 31343 , srcInfoPoints = [] 31344 } 31345 (Ident 31346 SrcSpanInfo 31347 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 21 847 22 31348 , srcInfoPoints = [] 31349 } 31350 "e") 31351 , PVar 31352 SrcSpanInfo 31353 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 23 847 25 31354 , srcInfoPoints = [] 31355 } 31356 (Ident 31357 SrcSpanInfo 31358 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 23 847 25 31359 , srcInfoPoints = [] 31360 } 31361 "co") 31362 ]) 31363 ] 31364 (UnGuardedRhs 31365 SrcSpanInfo 31366 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 29 847 46 31367 , srcInfoPoints = 31368 [ SrcSpan "tests/examples/RealGHC.lhs" 847 29 847 30 ] 31369 } 31370 (App 31371 SrcSpanInfo 31372 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 31 847 46 31373 , srcInfoPoints = [] 31374 } 31375 (App 31376 SrcSpanInfo 31377 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 31 847 44 31378 , srcInfoPoints = [] 31379 } 31380 (Var 31381 SrcSpanInfo 31382 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 31 847 40 31383 , srcInfoPoints = [] 31384 } 31385 (UnQual 31386 SrcSpanInfo 31387 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 31 847 40 31388 , srcInfoPoints = [] 31389 } 31390 (Ident 31391 SrcSpanInfo 31392 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 31 847 40 31393 , srcInfoPoints = [] 31394 } 31395 "ruleCheck"))) 31396 (Var 31397 SrcSpanInfo 31398 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 41 847 44 31399 , srcInfoPoints = [] 31400 } 31401 (UnQual 31402 SrcSpanInfo 31403 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 41 847 44 31404 , srcInfoPoints = [] 31405 } 31406 (Ident 31407 SrcSpanInfo 31408 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 41 847 44 31409 , srcInfoPoints = [] 31410 } 31411 "env")))) 31412 (Var 31413 SrcSpanInfo 31414 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 45 847 46 31415 , srcInfoPoints = [] 31416 } 31417 (UnQual 31418 SrcSpanInfo 31419 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 45 847 46 31420 , srcInfoPoints = [] 31421 } 31422 (Ident 31423 SrcSpanInfo 31424 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 847 45 847 46 31425 , srcInfoPoints = [] 31426 } 31427 "e"))))) 31428 Nothing 31429 , Match 31430 SrcSpanInfo 31431 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 1 848 79 31432 , srcInfoPoints = [] 31433 } 31434 (Ident 31435 SrcSpanInfo 31436 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 1 848 10 31437 , srcInfoPoints = [] 31438 } 31439 "ruleCheck") 31440 [ PVar 31441 SrcSpanInfo 31442 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 11 848 14 31443 , srcInfoPoints = [] 31444 } 31445 (Ident 31446 SrcSpanInfo 31447 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 11 848 14 31448 , srcInfoPoints = [] 31449 } 31450 "env") 31451 , PParen 31452 SrcSpanInfo 31453 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 15 848 25 31454 , srcInfoPoints = 31455 [ SrcSpan "tests/examples/RealGHC.lhs" 848 15 848 16 31456 , SrcSpan "tests/examples/RealGHC.lhs" 848 24 848 25 31457 ] 31458 } 31459 (PApp 31460 SrcSpanInfo 31461 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 16 848 24 31462 , srcInfoPoints = [] 31463 } 31464 (UnQual 31465 SrcSpanInfo 31466 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 16 848 19 31467 , srcInfoPoints = [] 31468 } 31469 (Ident 31470 SrcSpanInfo 31471 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 16 848 19 31472 , srcInfoPoints = [] 31473 } 31474 "Let")) 31475 [ PVar 31476 SrcSpanInfo 31477 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 20 848 22 31478 , srcInfoPoints = [] 31479 } 31480 (Ident 31481 SrcSpanInfo 31482 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 20 848 22 31483 , srcInfoPoints = [] 31484 } 31485 "bd") 31486 , PVar 31487 SrcSpanInfo 31488 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 23 848 24 31489 , srcInfoPoints = [] 31490 } 31491 (Ident 31492 SrcSpanInfo 31493 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 23 848 24 31494 , srcInfoPoints = [] 31495 } 31496 "e") 31497 ]) 31498 ] 31499 (UnGuardedRhs 31500 SrcSpanInfo 31501 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 29 848 79 31502 , srcInfoPoints = 31503 [ SrcSpan "tests/examples/RealGHC.lhs" 848 29 848 30 ] 31504 } 31505 (InfixApp 31506 SrcSpanInfo 31507 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 31 848 79 31508 , srcInfoPoints = [] 31509 } 31510 (App 31511 SrcSpanInfo 31512 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 31 848 51 31513 , srcInfoPoints = [] 31514 } 31515 (App 31516 SrcSpanInfo 31517 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 31 848 48 31518 , srcInfoPoints = [] 31519 } 31520 (Var 31521 SrcSpanInfo 31522 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 31 848 44 31523 , srcInfoPoints = [] 31524 } 31525 (UnQual 31526 SrcSpanInfo 31527 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 31 848 44 31528 , srcInfoPoints = [] 31529 } 31530 (Ident 31531 SrcSpanInfo 31532 { srcInfoSpan = 31533 SrcSpan "tests/examples/RealGHC.lhs" 848 31 848 44 31534 , srcInfoPoints = [] 31535 } 31536 "ruleCheckBind"))) 31537 (Var 31538 SrcSpanInfo 31539 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 45 848 48 31540 , srcInfoPoints = [] 31541 } 31542 (UnQual 31543 SrcSpanInfo 31544 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 45 848 48 31545 , srcInfoPoints = [] 31546 } 31547 (Ident 31548 SrcSpanInfo 31549 { srcInfoSpan = 31550 SrcSpan "tests/examples/RealGHC.lhs" 848 45 848 48 31551 , srcInfoPoints = [] 31552 } 31553 "env")))) 31554 (Var 31555 SrcSpanInfo 31556 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 49 848 51 31557 , srcInfoPoints = [] 31558 } 31559 (UnQual 31560 SrcSpanInfo 31561 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 49 848 51 31562 , srcInfoPoints = [] 31563 } 31564 (Ident 31565 SrcSpanInfo 31566 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 49 848 51 31567 , srcInfoPoints = [] 31568 } 31569 "bd")))) 31570 (QVarOp 31571 SrcSpanInfo 31572 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 52 848 63 31573 , srcInfoPoints = 31574 [ SrcSpan "tests/examples/RealGHC.lhs" 848 52 848 53 31575 , SrcSpan "tests/examples/RealGHC.lhs" 848 53 848 62 31576 , SrcSpan "tests/examples/RealGHC.lhs" 848 62 848 63 31577 ] 31578 } 31579 (UnQual 31580 SrcSpanInfo 31581 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 52 848 63 31582 , srcInfoPoints = 31583 [ SrcSpan "tests/examples/RealGHC.lhs" 848 52 848 53 31584 , SrcSpan "tests/examples/RealGHC.lhs" 848 53 848 62 31585 , SrcSpan "tests/examples/RealGHC.lhs" 848 62 848 63 31586 ] 31587 } 31588 (Ident 31589 SrcSpanInfo 31590 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 53 848 62 31591 , srcInfoPoints = [] 31592 } 31593 "unionBags"))) 31594 (App 31595 SrcSpanInfo 31596 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 64 848 79 31597 , srcInfoPoints = [] 31598 } 31599 (App 31600 SrcSpanInfo 31601 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 64 848 77 31602 , srcInfoPoints = [] 31603 } 31604 (Var 31605 SrcSpanInfo 31606 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 64 848 73 31607 , srcInfoPoints = [] 31608 } 31609 (UnQual 31610 SrcSpanInfo 31611 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 64 848 73 31612 , srcInfoPoints = [] 31613 } 31614 (Ident 31615 SrcSpanInfo 31616 { srcInfoSpan = 31617 SrcSpan "tests/examples/RealGHC.lhs" 848 64 848 73 31618 , srcInfoPoints = [] 31619 } 31620 "ruleCheck"))) 31621 (Var 31622 SrcSpanInfo 31623 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 74 848 77 31624 , srcInfoPoints = [] 31625 } 31626 (UnQual 31627 SrcSpanInfo 31628 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 74 848 77 31629 , srcInfoPoints = [] 31630 } 31631 (Ident 31632 SrcSpanInfo 31633 { srcInfoSpan = 31634 SrcSpan "tests/examples/RealGHC.lhs" 848 74 848 77 31635 , srcInfoPoints = [] 31636 } 31637 "env")))) 31638 (Var 31639 SrcSpanInfo 31640 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 78 848 79 31641 , srcInfoPoints = [] 31642 } 31643 (UnQual 31644 SrcSpanInfo 31645 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 78 848 79 31646 , srcInfoPoints = [] 31647 } 31648 (Ident 31649 SrcSpanInfo 31650 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 848 78 848 79 31651 , srcInfoPoints = [] 31652 } 31653 "e")))))) 31654 Nothing 31655 , Match 31656 SrcSpanInfo 31657 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 1 849 46 31658 , srcInfoPoints = [] 31659 } 31660 (Ident 31661 SrcSpanInfo 31662 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 1 849 10 31663 , srcInfoPoints = [] 31664 } 31665 "ruleCheck") 31666 [ PVar 31667 SrcSpanInfo 31668 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 11 849 14 31669 , srcInfoPoints = [] 31670 } 31671 (Ident 31672 SrcSpanInfo 31673 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 11 849 14 31674 , srcInfoPoints = [] 31675 } 31676 "env") 31677 , PParen 31678 SrcSpanInfo 31679 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 15 849 24 31680 , srcInfoPoints = 31681 [ SrcSpan "tests/examples/RealGHC.lhs" 849 15 849 16 31682 , SrcSpan "tests/examples/RealGHC.lhs" 849 23 849 24 31683 ] 31684 } 31685 (PApp 31686 SrcSpanInfo 31687 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 16 849 23 31688 , srcInfoPoints = [] 31689 } 31690 (UnQual 31691 SrcSpanInfo 31692 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 16 849 19 31693 , srcInfoPoints = [] 31694 } 31695 (Ident 31696 SrcSpanInfo 31697 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 16 849 19 31698 , srcInfoPoints = [] 31699 } 31700 "Lam")) 31701 [ PVar 31702 SrcSpanInfo 31703 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 20 849 21 31704 , srcInfoPoints = [] 31705 } 31706 (Ident 31707 SrcSpanInfo 31708 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 20 849 21 31709 , srcInfoPoints = [] 31710 } 31711 "b") 31712 , PVar 31713 SrcSpanInfo 31714 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 22 849 23 31715 , srcInfoPoints = [] 31716 } 31717 (Ident 31718 SrcSpanInfo 31719 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 22 849 23 31720 , srcInfoPoints = [] 31721 } 31722 "e") 31723 ]) 31724 ] 31725 (UnGuardedRhs 31726 SrcSpanInfo 31727 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 29 849 46 31728 , srcInfoPoints = 31729 [ SrcSpan "tests/examples/RealGHC.lhs" 849 29 849 30 ] 31730 } 31731 (App 31732 SrcSpanInfo 31733 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 31 849 46 31734 , srcInfoPoints = [] 31735 } 31736 (App 31737 SrcSpanInfo 31738 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 31 849 44 31739 , srcInfoPoints = [] 31740 } 31741 (Var 31742 SrcSpanInfo 31743 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 31 849 40 31744 , srcInfoPoints = [] 31745 } 31746 (UnQual 31747 SrcSpanInfo 31748 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 31 849 40 31749 , srcInfoPoints = [] 31750 } 31751 (Ident 31752 SrcSpanInfo 31753 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 31 849 40 31754 , srcInfoPoints = [] 31755 } 31756 "ruleCheck"))) 31757 (Var 31758 SrcSpanInfo 31759 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 41 849 44 31760 , srcInfoPoints = [] 31761 } 31762 (UnQual 31763 SrcSpanInfo 31764 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 41 849 44 31765 , srcInfoPoints = [] 31766 } 31767 (Ident 31768 SrcSpanInfo 31769 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 41 849 44 31770 , srcInfoPoints = [] 31771 } 31772 "env")))) 31773 (Var 31774 SrcSpanInfo 31775 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 45 849 46 31776 , srcInfoPoints = [] 31777 } 31778 (UnQual 31779 SrcSpanInfo 31780 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 45 849 46 31781 , srcInfoPoints = [] 31782 } 31783 (Ident 31784 SrcSpanInfo 31785 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 849 45 849 46 31786 , srcInfoPoints = [] 31787 } 31788 "e"))))) 31789 Nothing 31790 , Match 31791 SrcSpanInfo 31792 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 1 851 68 31793 , srcInfoPoints = [] 31794 } 31795 (Ident 31796 SrcSpanInfo 31797 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 1 850 10 31798 , srcInfoPoints = [] 31799 } 31800 "ruleCheck") 31801 [ PVar 31802 SrcSpanInfo 31803 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 11 850 14 31804 , srcInfoPoints = [] 31805 } 31806 (Ident 31807 SrcSpanInfo 31808 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 11 850 14 31809 , srcInfoPoints = [] 31810 } 31811 "env") 31812 , PParen 31813 SrcSpanInfo 31814 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 15 850 30 31815 , srcInfoPoints = 31816 [ SrcSpan "tests/examples/RealGHC.lhs" 850 15 850 16 31817 , SrcSpan "tests/examples/RealGHC.lhs" 850 29 850 30 31818 ] 31819 } 31820 (PApp 31821 SrcSpanInfo 31822 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 16 850 29 31823 , srcInfoPoints = [] 31824 } 31825 (UnQual 31826 SrcSpanInfo 31827 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 16 850 20 31828 , srcInfoPoints = [] 31829 } 31830 (Ident 31831 SrcSpanInfo 31832 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 16 850 20 31833 , srcInfoPoints = [] 31834 } 31835 "Case")) 31836 [ PVar 31837 SrcSpanInfo 31838 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 21 850 22 31839 , srcInfoPoints = [] 31840 } 31841 (Ident 31842 SrcSpanInfo 31843 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 21 850 22 31844 , srcInfoPoints = [] 31845 } 31846 "e") 31847 , PWildCard 31848 SrcSpanInfo 31849 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 23 850 24 31850 , srcInfoPoints = [] 31851 } 31852 , PWildCard 31853 SrcSpanInfo 31854 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 25 850 26 31855 , srcInfoPoints = [] 31856 } 31857 , PVar 31858 SrcSpanInfo 31859 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 27 850 29 31860 , srcInfoPoints = [] 31861 } 31862 (Ident 31863 SrcSpanInfo 31864 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 27 850 29 31865 , srcInfoPoints = [] 31866 } 31867 "as") 31868 ]) 31869 ] 31870 (UnGuardedRhs 31871 SrcSpanInfo 31872 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 31 851 68 31873 , srcInfoPoints = 31874 [ SrcSpan "tests/examples/RealGHC.lhs" 850 31 850 32 ] 31875 } 31876 (InfixApp 31877 SrcSpanInfo 31878 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 33 851 68 31879 , srcInfoPoints = [] 31880 } 31881 (App 31882 SrcSpanInfo 31883 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 33 850 48 31884 , srcInfoPoints = [] 31885 } 31886 (App 31887 SrcSpanInfo 31888 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 33 850 46 31889 , srcInfoPoints = [] 31890 } 31891 (Var 31892 SrcSpanInfo 31893 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 33 850 42 31894 , srcInfoPoints = [] 31895 } 31896 (UnQual 31897 SrcSpanInfo 31898 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 33 850 42 31899 , srcInfoPoints = [] 31900 } 31901 (Ident 31902 SrcSpanInfo 31903 { srcInfoSpan = 31904 SrcSpan "tests/examples/RealGHC.lhs" 850 33 850 42 31905 , srcInfoPoints = [] 31906 } 31907 "ruleCheck"))) 31908 (Var 31909 SrcSpanInfo 31910 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 43 850 46 31911 , srcInfoPoints = [] 31912 } 31913 (UnQual 31914 SrcSpanInfo 31915 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 43 850 46 31916 , srcInfoPoints = [] 31917 } 31918 (Ident 31919 SrcSpanInfo 31920 { srcInfoSpan = 31921 SrcSpan "tests/examples/RealGHC.lhs" 850 43 850 46 31922 , srcInfoPoints = [] 31923 } 31924 "env")))) 31925 (Var 31926 SrcSpanInfo 31927 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 47 850 48 31928 , srcInfoPoints = [] 31929 } 31930 (UnQual 31931 SrcSpanInfo 31932 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 47 850 48 31933 , srcInfoPoints = [] 31934 } 31935 (Ident 31936 SrcSpanInfo 31937 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 47 850 48 31938 , srcInfoPoints = [] 31939 } 31940 "e")))) 31941 (QVarOp 31942 SrcSpanInfo 31943 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 49 850 60 31944 , srcInfoPoints = 31945 [ SrcSpan "tests/examples/RealGHC.lhs" 850 49 850 50 31946 , SrcSpan "tests/examples/RealGHC.lhs" 850 50 850 59 31947 , SrcSpan "tests/examples/RealGHC.lhs" 850 59 850 60 31948 ] 31949 } 31950 (UnQual 31951 SrcSpanInfo 31952 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 49 850 60 31953 , srcInfoPoints = 31954 [ SrcSpan "tests/examples/RealGHC.lhs" 850 49 850 50 31955 , SrcSpan "tests/examples/RealGHC.lhs" 850 50 850 59 31956 , SrcSpan "tests/examples/RealGHC.lhs" 850 59 850 60 31957 ] 31958 } 31959 (Ident 31960 SrcSpanInfo 31961 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 850 50 850 59 31962 , srcInfoPoints = [] 31963 } 31964 "unionBags"))) 31965 (App 31966 SrcSpanInfo 31967 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 21 851 68 31968 , srcInfoPoints = [] 31969 } 31970 (Var 31971 SrcSpanInfo 31972 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 21 851 34 31973 , srcInfoPoints = [] 31974 } 31975 (UnQual 31976 SrcSpanInfo 31977 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 21 851 34 31978 , srcInfoPoints = [] 31979 } 31980 (Ident 31981 SrcSpanInfo 31982 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 21 851 34 31983 , srcInfoPoints = [] 31984 } 31985 "unionManyBags"))) 31986 (ListComp 31987 SrcSpanInfo 31988 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 35 851 68 31989 , srcInfoPoints = 31990 [ SrcSpan "tests/examples/RealGHC.lhs" 851 35 851 36 31991 , SrcSpan "tests/examples/RealGHC.lhs" 851 52 851 53 31992 , SrcSpan "tests/examples/RealGHC.lhs" 851 67 851 68 31993 ] 31994 } 31995 (App 31996 SrcSpanInfo 31997 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 36 851 51 31998 , srcInfoPoints = [] 31999 } 32000 (App 32001 SrcSpanInfo 32002 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 36 851 49 32003 , srcInfoPoints = [] 32004 } 32005 (Var 32006 SrcSpanInfo 32007 { srcInfoSpan = 32008 SrcSpan "tests/examples/RealGHC.lhs" 851 36 851 45 32009 , srcInfoPoints = [] 32010 } 32011 (UnQual 32012 SrcSpanInfo 32013 { srcInfoSpan = 32014 SrcSpan "tests/examples/RealGHC.lhs" 851 36 851 45 32015 , srcInfoPoints = [] 32016 } 32017 (Ident 32018 SrcSpanInfo 32019 { srcInfoSpan = 32020 SrcSpan "tests/examples/RealGHC.lhs" 851 36 851 45 32021 , srcInfoPoints = [] 32022 } 32023 "ruleCheck"))) 32024 (Var 32025 SrcSpanInfo 32026 { srcInfoSpan = 32027 SrcSpan "tests/examples/RealGHC.lhs" 851 46 851 49 32028 , srcInfoPoints = [] 32029 } 32030 (UnQual 32031 SrcSpanInfo 32032 { srcInfoSpan = 32033 SrcSpan "tests/examples/RealGHC.lhs" 851 46 851 49 32034 , srcInfoPoints = [] 32035 } 32036 (Ident 32037 SrcSpanInfo 32038 { srcInfoSpan = 32039 SrcSpan "tests/examples/RealGHC.lhs" 851 46 851 49 32040 , srcInfoPoints = [] 32041 } 32042 "env")))) 32043 (Var 32044 SrcSpanInfo 32045 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 50 851 51 32046 , srcInfoPoints = [] 32047 } 32048 (UnQual 32049 SrcSpanInfo 32050 { srcInfoSpan = 32051 SrcSpan "tests/examples/RealGHC.lhs" 851 50 851 51 32052 , srcInfoPoints = [] 32053 } 32054 (Ident 32055 SrcSpanInfo 32056 { srcInfoSpan = 32057 SrcSpan "tests/examples/RealGHC.lhs" 851 50 851 51 32058 , srcInfoPoints = [] 32059 } 32060 "r")))) 32061 [ QualStmt 32062 SrcSpanInfo 32063 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 851 54 851 67 32064 , srcInfoPoints = 32065 [ SrcSpan "tests/examples/RealGHC.lhs" 851 62 851 64 ] 32066 } 32067 (Generator 32068 SrcSpanInfo 32069 { srcInfoSpan = 32070 SrcSpan "tests/examples/RealGHC.lhs" 851 54 851 67 32071 , srcInfoPoints = 32072 [ SrcSpan "tests/examples/RealGHC.lhs" 851 62 851 64 ] 32073 } 32074 (PTuple 32075 SrcSpanInfo 32076 { srcInfoSpan = 32077 SrcSpan "tests/examples/RealGHC.lhs" 851 54 851 61 32078 , srcInfoPoints = 32079 [ SrcSpan "tests/examples/RealGHC.lhs" 851 54 851 55 32080 , SrcSpan "tests/examples/RealGHC.lhs" 851 56 851 57 32081 , SrcSpan "tests/examples/RealGHC.lhs" 851 58 851 59 32082 , SrcSpan "tests/examples/RealGHC.lhs" 851 60 851 61 32083 ] 32084 } 32085 Boxed 32086 [ PWildCard 32087 SrcSpanInfo 32088 { srcInfoSpan = 32089 SrcSpan "tests/examples/RealGHC.lhs" 851 55 851 56 32090 , srcInfoPoints = [] 32091 } 32092 , PWildCard 32093 SrcSpanInfo 32094 { srcInfoSpan = 32095 SrcSpan "tests/examples/RealGHC.lhs" 851 57 851 58 32096 , srcInfoPoints = [] 32097 } 32098 , PVar 32099 SrcSpanInfo 32100 { srcInfoSpan = 32101 SrcSpan "tests/examples/RealGHC.lhs" 851 59 851 60 32102 , srcInfoPoints = [] 32103 } 32104 (Ident 32105 SrcSpanInfo 32106 { srcInfoSpan = 32107 SrcSpan "tests/examples/RealGHC.lhs" 851 59 851 60 32108 , srcInfoPoints = [] 32109 } 32110 "r") 32111 ]) 32112 (Var 32113 SrcSpanInfo 32114 { srcInfoSpan = 32115 SrcSpan "tests/examples/RealGHC.lhs" 851 65 851 67 32116 , srcInfoPoints = [] 32117 } 32118 (UnQual 32119 SrcSpanInfo 32120 { srcInfoSpan = 32121 SrcSpan "tests/examples/RealGHC.lhs" 851 65 851 67 32122 , srcInfoPoints = [] 32123 } 32124 (Ident 32125 SrcSpanInfo 32126 { srcInfoSpan = 32127 SrcSpan "tests/examples/RealGHC.lhs" 851 65 851 67 32128 , srcInfoPoints = [] 32129 } 32130 "as")))) 32131 ])))) 32132 Nothing 32133 ] 32134 , FunBind 32135 SrcSpanInfo 32136 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 1 855 52 32137 , srcInfoPoints = [] 32138 } 32139 [ Match 32140 SrcSpanInfo 32141 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 1 853 86 32142 , srcInfoPoints = [] 32143 } 32144 (Ident 32145 SrcSpanInfo 32146 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 1 853 13 32147 , srcInfoPoints = [] 32148 } 32149 "ruleCheckApp") 32150 [ PVar 32151 SrcSpanInfo 32152 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 14 853 17 32153 , srcInfoPoints = [] 32154 } 32155 (Ident 32156 SrcSpanInfo 32157 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 14 853 17 32158 , srcInfoPoints = [] 32159 } 32160 "env") 32161 , PParen 32162 SrcSpanInfo 32163 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 18 853 27 32164 , srcInfoPoints = 32165 [ SrcSpan "tests/examples/RealGHC.lhs" 853 18 853 19 32166 , SrcSpan "tests/examples/RealGHC.lhs" 853 26 853 27 32167 ] 32168 } 32169 (PApp 32170 SrcSpanInfo 32171 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 19 853 26 32172 , srcInfoPoints = [] 32173 } 32174 (UnQual 32175 SrcSpanInfo 32176 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 19 853 22 32177 , srcInfoPoints = [] 32178 } 32179 (Ident 32180 SrcSpanInfo 32181 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 19 853 22 32182 , srcInfoPoints = [] 32183 } 32184 "App")) 32185 [ PVar 32186 SrcSpanInfo 32187 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 23 853 24 32188 , srcInfoPoints = [] 32189 } 32190 (Ident 32191 SrcSpanInfo 32192 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 23 853 24 32193 , srcInfoPoints = [] 32194 } 32195 "f") 32196 , PVar 32197 SrcSpanInfo 32198 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 25 853 26 32199 , srcInfoPoints = [] 32200 } 32201 (Ident 32202 SrcSpanInfo 32203 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 25 853 26 32204 , srcInfoPoints = [] 32205 } 32206 "a") 32207 ]) 32208 , PVar 32209 SrcSpanInfo 32210 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 28 853 30 32211 , srcInfoPoints = [] 32212 } 32213 (Ident 32214 SrcSpanInfo 32215 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 28 853 30 32216 , srcInfoPoints = [] 32217 } 32218 "as") 32219 ] 32220 (UnGuardedRhs 32221 SrcSpanInfo 32222 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 31 853 86 32223 , srcInfoPoints = 32224 [ SrcSpan "tests/examples/RealGHC.lhs" 853 31 853 32 ] 32225 } 32226 (InfixApp 32227 SrcSpanInfo 32228 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 33 853 86 32229 , srcInfoPoints = [] 32230 } 32231 (App 32232 SrcSpanInfo 32233 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 33 853 48 32234 , srcInfoPoints = [] 32235 } 32236 (App 32237 SrcSpanInfo 32238 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 33 853 46 32239 , srcInfoPoints = [] 32240 } 32241 (Var 32242 SrcSpanInfo 32243 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 33 853 42 32244 , srcInfoPoints = [] 32245 } 32246 (UnQual 32247 SrcSpanInfo 32248 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 33 853 42 32249 , srcInfoPoints = [] 32250 } 32251 (Ident 32252 SrcSpanInfo 32253 { srcInfoSpan = 32254 SrcSpan "tests/examples/RealGHC.lhs" 853 33 853 42 32255 , srcInfoPoints = [] 32256 } 32257 "ruleCheck"))) 32258 (Var 32259 SrcSpanInfo 32260 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 43 853 46 32261 , srcInfoPoints = [] 32262 } 32263 (UnQual 32264 SrcSpanInfo 32265 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 43 853 46 32266 , srcInfoPoints = [] 32267 } 32268 (Ident 32269 SrcSpanInfo 32270 { srcInfoSpan = 32271 SrcSpan "tests/examples/RealGHC.lhs" 853 43 853 46 32272 , srcInfoPoints = [] 32273 } 32274 "env")))) 32275 (Var 32276 SrcSpanInfo 32277 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 47 853 48 32278 , srcInfoPoints = [] 32279 } 32280 (UnQual 32281 SrcSpanInfo 32282 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 47 853 48 32283 , srcInfoPoints = [] 32284 } 32285 (Ident 32286 SrcSpanInfo 32287 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 47 853 48 32288 , srcInfoPoints = [] 32289 } 32290 "a")))) 32291 (QVarOp 32292 SrcSpanInfo 32293 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 49 853 60 32294 , srcInfoPoints = 32295 [ SrcSpan "tests/examples/RealGHC.lhs" 853 49 853 50 32296 , SrcSpan "tests/examples/RealGHC.lhs" 853 50 853 59 32297 , SrcSpan "tests/examples/RealGHC.lhs" 853 59 853 60 32298 ] 32299 } 32300 (UnQual 32301 SrcSpanInfo 32302 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 49 853 60 32303 , srcInfoPoints = 32304 [ SrcSpan "tests/examples/RealGHC.lhs" 853 49 853 50 32305 , SrcSpan "tests/examples/RealGHC.lhs" 853 50 853 59 32306 , SrcSpan "tests/examples/RealGHC.lhs" 853 59 853 60 32307 ] 32308 } 32309 (Ident 32310 SrcSpanInfo 32311 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 50 853 59 32312 , srcInfoPoints = [] 32313 } 32314 "unionBags"))) 32315 (App 32316 SrcSpanInfo 32317 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 61 853 86 32318 , srcInfoPoints = [] 32319 } 32320 (App 32321 SrcSpanInfo 32322 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 61 853 79 32323 , srcInfoPoints = [] 32324 } 32325 (App 32326 SrcSpanInfo 32327 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 61 853 77 32328 , srcInfoPoints = [] 32329 } 32330 (Var 32331 SrcSpanInfo 32332 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 61 853 73 32333 , srcInfoPoints = [] 32334 } 32335 (UnQual 32336 SrcSpanInfo 32337 { srcInfoSpan = 32338 SrcSpan "tests/examples/RealGHC.lhs" 853 61 853 73 32339 , srcInfoPoints = [] 32340 } 32341 (Ident 32342 SrcSpanInfo 32343 { srcInfoSpan = 32344 SrcSpan "tests/examples/RealGHC.lhs" 853 61 853 73 32345 , srcInfoPoints = [] 32346 } 32347 "ruleCheckApp"))) 32348 (Var 32349 SrcSpanInfo 32350 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 74 853 77 32351 , srcInfoPoints = [] 32352 } 32353 (UnQual 32354 SrcSpanInfo 32355 { srcInfoSpan = 32356 SrcSpan "tests/examples/RealGHC.lhs" 853 74 853 77 32357 , srcInfoPoints = [] 32358 } 32359 (Ident 32360 SrcSpanInfo 32361 { srcInfoSpan = 32362 SrcSpan "tests/examples/RealGHC.lhs" 853 74 853 77 32363 , srcInfoPoints = [] 32364 } 32365 "env")))) 32366 (Var 32367 SrcSpanInfo 32368 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 78 853 79 32369 , srcInfoPoints = [] 32370 } 32371 (UnQual 32372 SrcSpanInfo 32373 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 78 853 79 32374 , srcInfoPoints = [] 32375 } 32376 (Ident 32377 SrcSpanInfo 32378 { srcInfoSpan = 32379 SrcSpan "tests/examples/RealGHC.lhs" 853 78 853 79 32380 , srcInfoPoints = [] 32381 } 32382 "f")))) 32383 (Paren 32384 SrcSpanInfo 32385 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 80 853 86 32386 , srcInfoPoints = 32387 [ SrcSpan "tests/examples/RealGHC.lhs" 853 80 853 81 32388 , SrcSpan "tests/examples/RealGHC.lhs" 853 85 853 86 32389 ] 32390 } 32391 (InfixApp 32392 SrcSpanInfo 32393 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 81 853 85 32394 , srcInfoPoints = [] 32395 } 32396 (Var 32397 SrcSpanInfo 32398 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 81 853 82 32399 , srcInfoPoints = [] 32400 } 32401 (UnQual 32402 SrcSpanInfo 32403 { srcInfoSpan = 32404 SrcSpan "tests/examples/RealGHC.lhs" 853 81 853 82 32405 , srcInfoPoints = [] 32406 } 32407 (Ident 32408 SrcSpanInfo 32409 { srcInfoSpan = 32410 SrcSpan "tests/examples/RealGHC.lhs" 853 81 853 82 32411 , srcInfoPoints = [] 32412 } 32413 "a"))) 32414 (QConOp 32415 SrcSpanInfo 32416 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 82 853 83 32417 , srcInfoPoints = [] 32418 } 32419 (Special 32420 SrcSpanInfo 32421 { srcInfoSpan = 32422 SrcSpan "tests/examples/RealGHC.lhs" 853 82 853 83 32423 , srcInfoPoints = [] 32424 } 32425 (Cons 32426 SrcSpanInfo 32427 { srcInfoSpan = 32428 SrcSpan "tests/examples/RealGHC.lhs" 853 82 853 83 32429 , srcInfoPoints = [] 32430 }))) 32431 (Var 32432 SrcSpanInfo 32433 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 853 83 853 85 32434 , srcInfoPoints = [] 32435 } 32436 (UnQual 32437 SrcSpanInfo 32438 { srcInfoSpan = 32439 SrcSpan "tests/examples/RealGHC.lhs" 853 83 853 85 32440 , srcInfoPoints = [] 32441 } 32442 (Ident 32443 SrcSpanInfo 32444 { srcInfoSpan = 32445 SrcSpan "tests/examples/RealGHC.lhs" 853 83 853 85 32446 , srcInfoPoints = [] 32447 } 32448 "as")))))))) 32449 Nothing 32450 , Match 32451 SrcSpanInfo 32452 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 1 854 54 32453 , srcInfoPoints = [] 32454 } 32455 (Ident 32456 SrcSpanInfo 32457 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 1 854 13 32458 , srcInfoPoints = [] 32459 } 32460 "ruleCheckApp") 32461 [ PVar 32462 SrcSpanInfo 32463 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 14 854 17 32464 , srcInfoPoints = [] 32465 } 32466 (Ident 32467 SrcSpanInfo 32468 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 14 854 17 32469 , srcInfoPoints = [] 32470 } 32471 "env") 32472 , PParen 32473 SrcSpanInfo 32474 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 18 854 25 32475 , srcInfoPoints = 32476 [ SrcSpan "tests/examples/RealGHC.lhs" 854 18 854 19 32477 , SrcSpan "tests/examples/RealGHC.lhs" 854 24 854 25 32478 ] 32479 } 32480 (PApp 32481 SrcSpanInfo 32482 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 19 854 24 32483 , srcInfoPoints = [] 32484 } 32485 (UnQual 32486 SrcSpanInfo 32487 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 19 854 22 32488 , srcInfoPoints = [] 32489 } 32490 (Ident 32491 SrcSpanInfo 32492 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 19 854 22 32493 , srcInfoPoints = [] 32494 } 32495 "Var")) 32496 [ PVar 32497 SrcSpanInfo 32498 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 23 854 24 32499 , srcInfoPoints = [] 32500 } 32501 (Ident 32502 SrcSpanInfo 32503 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 23 854 24 32504 , srcInfoPoints = [] 32505 } 32506 "f") 32507 ]) 32508 , PVar 32509 SrcSpanInfo 32510 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 26 854 28 32511 , srcInfoPoints = [] 32512 } 32513 (Ident 32514 SrcSpanInfo 32515 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 26 854 28 32516 , srcInfoPoints = [] 32517 } 32518 "as") 32519 ] 32520 (UnGuardedRhs 32521 SrcSpanInfo 32522 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 31 854 54 32523 , srcInfoPoints = 32524 [ SrcSpan "tests/examples/RealGHC.lhs" 854 31 854 32 ] 32525 } 32526 (App 32527 SrcSpanInfo 32528 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 33 854 54 32529 , srcInfoPoints = [] 32530 } 32531 (App 32532 SrcSpanInfo 32533 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 33 854 51 32534 , srcInfoPoints = [] 32535 } 32536 (App 32537 SrcSpanInfo 32538 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 33 854 49 32539 , srcInfoPoints = [] 32540 } 32541 (Var 32542 SrcSpanInfo 32543 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 33 854 45 32544 , srcInfoPoints = [] 32545 } 32546 (UnQual 32547 SrcSpanInfo 32548 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 33 854 45 32549 , srcInfoPoints = [] 32550 } 32551 (Ident 32552 SrcSpanInfo 32553 { srcInfoSpan = 32554 SrcSpan "tests/examples/RealGHC.lhs" 854 33 854 45 32555 , srcInfoPoints = [] 32556 } 32557 "ruleCheckFun"))) 32558 (Var 32559 SrcSpanInfo 32560 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 46 854 49 32561 , srcInfoPoints = [] 32562 } 32563 (UnQual 32564 SrcSpanInfo 32565 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 46 854 49 32566 , srcInfoPoints = [] 32567 } 32568 (Ident 32569 SrcSpanInfo 32570 { srcInfoSpan = 32571 SrcSpan "tests/examples/RealGHC.lhs" 854 46 854 49 32572 , srcInfoPoints = [] 32573 } 32574 "env")))) 32575 (Var 32576 SrcSpanInfo 32577 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 50 854 51 32578 , srcInfoPoints = [] 32579 } 32580 (UnQual 32581 SrcSpanInfo 32582 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 50 854 51 32583 , srcInfoPoints = [] 32584 } 32585 (Ident 32586 SrcSpanInfo 32587 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 50 854 51 32588 , srcInfoPoints = [] 32589 } 32590 "f")))) 32591 (Var 32592 SrcSpanInfo 32593 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 52 854 54 32594 , srcInfoPoints = [] 32595 } 32596 (UnQual 32597 SrcSpanInfo 32598 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 52 854 54 32599 , srcInfoPoints = [] 32600 } 32601 (Ident 32602 SrcSpanInfo 32603 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 854 52 854 54 32604 , srcInfoPoints = [] 32605 } 32606 "as"))))) 32607 Nothing 32608 , Match 32609 SrcSpanInfo 32610 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 1 855 52 32611 , srcInfoPoints = [] 32612 } 32613 (Ident 32614 SrcSpanInfo 32615 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 1 855 13 32616 , srcInfoPoints = [] 32617 } 32618 "ruleCheckApp") 32619 [ PVar 32620 SrcSpanInfo 32621 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 14 855 17 32622 , srcInfoPoints = [] 32623 } 32624 (Ident 32625 SrcSpanInfo 32626 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 14 855 17 32627 , srcInfoPoints = [] 32628 } 32629 "env") 32630 , PVar 32631 SrcSpanInfo 32632 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 18 855 23 32633 , srcInfoPoints = [] 32634 } 32635 (Ident 32636 SrcSpanInfo 32637 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 18 855 23 32638 , srcInfoPoints = [] 32639 } 32640 "other") 32641 , PVar 32642 SrcSpanInfo 32643 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 24 855 26 32644 , srcInfoPoints = [] 32645 } 32646 (Ident 32647 SrcSpanInfo 32648 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 24 855 26 32649 , srcInfoPoints = [] 32650 } 32651 "as") 32652 ] 32653 (UnGuardedRhs 32654 SrcSpanInfo 32655 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 31 855 52 32656 , srcInfoPoints = 32657 [ SrcSpan "tests/examples/RealGHC.lhs" 855 31 855 32 ] 32658 } 32659 (App 32660 SrcSpanInfo 32661 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 33 855 52 32662 , srcInfoPoints = [] 32663 } 32664 (App 32665 SrcSpanInfo 32666 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 33 855 46 32667 , srcInfoPoints = [] 32668 } 32669 (Var 32670 SrcSpanInfo 32671 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 33 855 42 32672 , srcInfoPoints = [] 32673 } 32674 (UnQual 32675 SrcSpanInfo 32676 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 33 855 42 32677 , srcInfoPoints = [] 32678 } 32679 (Ident 32680 SrcSpanInfo 32681 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 33 855 42 32682 , srcInfoPoints = [] 32683 } 32684 "ruleCheck"))) 32685 (Var 32686 SrcSpanInfo 32687 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 43 855 46 32688 , srcInfoPoints = [] 32689 } 32690 (UnQual 32691 SrcSpanInfo 32692 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 43 855 46 32693 , srcInfoPoints = [] 32694 } 32695 (Ident 32696 SrcSpanInfo 32697 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 43 855 46 32698 , srcInfoPoints = [] 32699 } 32700 "env")))) 32701 (Var 32702 SrcSpanInfo 32703 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 47 855 52 32704 , srcInfoPoints = [] 32705 } 32706 (UnQual 32707 SrcSpanInfo 32708 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 47 855 52 32709 , srcInfoPoints = [] 32710 } 32711 (Ident 32712 SrcSpanInfo 32713 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 855 47 855 52 32714 , srcInfoPoints = [] 32715 } 32716 "other"))))) 32717 Nothing 32718 ] 32719 , TypeSig 32720 SrcSpanInfo 32721 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 1 859 61 32722 , srcInfoPoints = 32723 [ SrcSpan "tests/examples/RealGHC.lhs" 859 14 859 16 ] 32724 } 32725 [ Ident 32726 SrcSpanInfo 32727 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 1 859 13 32728 , srcInfoPoints = [] 32729 } 32730 "ruleCheckFun" 32731 ] 32732 (TyFun 32733 SrcSpanInfo 32734 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 17 859 61 32735 , srcInfoPoints = 32736 [ SrcSpan "tests/examples/RealGHC.lhs" 859 30 859 32 ] 32737 } 32738 (TyCon 32739 SrcSpanInfo 32740 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 17 859 29 32741 , srcInfoPoints = [] 32742 } 32743 (UnQual 32744 SrcSpanInfo 32745 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 17 859 29 32746 , srcInfoPoints = [] 32747 } 32748 (Ident 32749 SrcSpanInfo 32750 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 17 859 29 32751 , srcInfoPoints = [] 32752 } 32753 "RuleCheckEnv"))) 32754 (TyFun 32755 SrcSpanInfo 32756 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 33 859 61 32757 , srcInfoPoints = 32758 [ SrcSpan "tests/examples/RealGHC.lhs" 859 36 859 38 ] 32759 } 32760 (TyCon 32761 SrcSpanInfo 32762 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 33 859 35 32763 , srcInfoPoints = [] 32764 } 32765 (UnQual 32766 SrcSpanInfo 32767 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 33 859 35 32768 , srcInfoPoints = [] 32769 } 32770 (Ident 32771 SrcSpanInfo 32772 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 33 859 35 32773 , srcInfoPoints = [] 32774 } 32775 "Id"))) 32776 (TyFun 32777 SrcSpanInfo 32778 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 39 859 61 32779 , srcInfoPoints = 32780 [ SrcSpan "tests/examples/RealGHC.lhs" 859 50 859 52 ] 32781 } 32782 (TyList 32783 SrcSpanInfo 32784 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 39 859 49 32785 , srcInfoPoints = 32786 [ SrcSpan "tests/examples/RealGHC.lhs" 859 39 859 40 32787 , SrcSpan "tests/examples/RealGHC.lhs" 859 48 859 49 32788 ] 32789 } 32790 (TyCon 32791 SrcSpanInfo 32792 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 40 859 48 32793 , srcInfoPoints = [] 32794 } 32795 (UnQual 32796 SrcSpanInfo 32797 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 40 859 48 32798 , srcInfoPoints = [] 32799 } 32800 (Ident 32801 SrcSpanInfo 32802 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 40 859 48 32803 , srcInfoPoints = [] 32804 } 32805 "CoreExpr")))) 32806 (TyApp 32807 SrcSpanInfo 32808 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 53 859 61 32809 , srcInfoPoints = [] 32810 } 32811 (TyCon 32812 SrcSpanInfo 32813 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 53 859 56 32814 , srcInfoPoints = [] 32815 } 32816 (UnQual 32817 SrcSpanInfo 32818 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 53 859 56 32819 , srcInfoPoints = [] 32820 } 32821 (Ident 32822 SrcSpanInfo 32823 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 53 859 56 32824 , srcInfoPoints = [] 32825 } 32826 "Bag"))) 32827 (TyCon 32828 SrcSpanInfo 32829 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 57 859 61 32830 , srcInfoPoints = [] 32831 } 32832 (UnQual 32833 SrcSpanInfo 32834 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 57 859 61 32835 , srcInfoPoints = [] 32836 } 32837 (Ident 32838 SrcSpanInfo 32839 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 859 57 859 61 32840 , srcInfoPoints = [] 32841 } 32842 "SDoc"))))))) 32843 , FunBind 32844 SrcSpanInfo 32845 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 1 868 72 32846 , srcInfoPoints = 32847 [ SrcSpan "tests/examples/RealGHC.lhs" 866 3 866 8 ] 32848 } 32849 [ Match 32850 SrcSpanInfo 32851 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 1 868 72 32852 , srcInfoPoints = 32853 [ SrcSpan "tests/examples/RealGHC.lhs" 866 3 866 8 ] 32854 } 32855 (Ident 32856 SrcSpanInfo 32857 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 1 863 13 32858 , srcInfoPoints = [] 32859 } 32860 "ruleCheckFun") 32861 [ PVar 32862 SrcSpanInfo 32863 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 14 863 17 32864 , srcInfoPoints = [] 32865 } 32866 (Ident 32867 SrcSpanInfo 32868 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 14 863 17 32869 , srcInfoPoints = [] 32870 } 32871 "env") 32872 , PVar 32873 SrcSpanInfo 32874 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 18 863 20 32875 , srcInfoPoints = [] 32876 } 32877 (Ident 32878 SrcSpanInfo 32879 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 18 863 20 32880 , srcInfoPoints = [] 32881 } 32882 "fn") 32883 , PVar 32884 SrcSpanInfo 32885 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 21 863 25 32886 , srcInfoPoints = [] 32887 } 32888 (Ident 32889 SrcSpanInfo 32890 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 863 21 863 25 32891 , srcInfoPoints = [] 32892 } 32893 "args") 32894 ] 32895 (GuardedRhss 32896 SrcSpanInfo 32897 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 3 865 96 32898 , srcInfoPoints = [] 32899 } 32900 [ GuardedRhs 32901 SrcSpanInfo 32902 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 3 864 37 32903 , srcInfoPoints = 32904 [ SrcSpan "tests/examples/RealGHC.lhs" 864 3 864 4 32905 , SrcSpan "tests/examples/RealGHC.lhs" 864 27 864 28 32906 ] 32907 } 32908 [ Qualifier 32909 SrcSpanInfo 32910 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 5 864 26 32911 , srcInfoPoints = [] 32912 } 32913 (App 32914 SrcSpanInfo 32915 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 5 864 26 32916 , srcInfoPoints = [] 32917 } 32918 (Var 32919 SrcSpanInfo 32920 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 5 864 9 32921 , srcInfoPoints = [] 32922 } 32923 (UnQual 32924 SrcSpanInfo 32925 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 5 864 9 32926 , srcInfoPoints = [] 32927 } 32928 (Ident 32929 SrcSpanInfo 32930 { srcInfoSpan = 32931 SrcSpan "tests/examples/RealGHC.lhs" 864 5 864 9 32932 , srcInfoPoints = [] 32933 } 32934 "null"))) 32935 (Var 32936 SrcSpanInfo 32937 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 10 864 26 32938 , srcInfoPoints = [] 32939 } 32940 (UnQual 32941 SrcSpanInfo 32942 { srcInfoSpan = 32943 SrcSpan "tests/examples/RealGHC.lhs" 864 10 864 26 32944 , srcInfoPoints = [] 32945 } 32946 (Ident 32947 SrcSpanInfo 32948 { srcInfoSpan = 32949 SrcSpan "tests/examples/RealGHC.lhs" 864 10 864 26 32950 , srcInfoPoints = [] 32951 } 32952 "name_match_rules")))) 32953 ] 32954 (Var 32955 SrcSpanInfo 32956 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 29 864 37 32957 , srcInfoPoints = [] 32958 } 32959 (UnQual 32960 SrcSpanInfo 32961 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 29 864 37 32962 , srcInfoPoints = [] 32963 } 32964 (Ident 32965 SrcSpanInfo 32966 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 864 29 864 37 32967 , srcInfoPoints = [] 32968 } 32969 "emptyBag"))) 32970 , GuardedRhs 32971 SrcSpanInfo 32972 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 3 865 96 32973 , srcInfoPoints = 32974 [ SrcSpan "tests/examples/RealGHC.lhs" 865 3 865 4 32975 , SrcSpan "tests/examples/RealGHC.lhs" 865 23 865 24 32976 ] 32977 } 32978 [ Qualifier 32979 SrcSpanInfo 32980 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 5 865 14 32981 , srcInfoPoints = [] 32982 } 32983 (Var 32984 SrcSpanInfo 32985 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 5 865 14 32986 , srcInfoPoints = [] 32987 } 32988 (UnQual 32989 SrcSpanInfo 32990 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 5 865 14 32991 , srcInfoPoints = [] 32992 } 32993 (Ident 32994 SrcSpanInfo 32995 { srcInfoSpan = 32996 SrcSpan "tests/examples/RealGHC.lhs" 865 5 865 14 32997 , srcInfoPoints = [] 32998 } 32999 "otherwise"))) 33000 ] 33001 (App 33002 SrcSpanInfo 33003 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 25 865 96 33004 , srcInfoPoints = [] 33005 } 33006 (Var 33007 SrcSpanInfo 33008 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 25 865 32 33009 , srcInfoPoints = [] 33010 } 33011 (UnQual 33012 SrcSpanInfo 33013 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 25 865 32 33014 , srcInfoPoints = [] 33015 } 33016 (Ident 33017 SrcSpanInfo 33018 { srcInfoSpan = 33019 SrcSpan "tests/examples/RealGHC.lhs" 865 25 865 32 33020 , srcInfoPoints = [] 33021 } 33022 "unitBag"))) 33023 (Paren 33024 SrcSpanInfo 33025 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 33 865 96 33026 , srcInfoPoints = 33027 [ SrcSpan "tests/examples/RealGHC.lhs" 865 33 865 34 33028 , SrcSpan "tests/examples/RealGHC.lhs" 865 95 865 96 33029 ] 33030 } 33031 (App 33032 SrcSpanInfo 33033 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 865 34 865 95 33034 , srcInfoPoints = [] 33035 } 33036 (App 33037 SrcSpanInfo 33038 { srcInfoSpan = 33039 SrcSpan "tests/examples/RealGHC.lhs" 865 34 865 78 33040 , srcInfoPoints = [] 33041 } 33042 (App 33043 SrcSpanInfo 33044 { srcInfoSpan = 33045 SrcSpan "tests/examples/RealGHC.lhs" 865 34 865 73 33046 , srcInfoPoints = [] 33047 } 33048 (App 33049 SrcSpanInfo 33050 { srcInfoSpan = 33051 SrcSpan "tests/examples/RealGHC.lhs" 865 34 865 70 33052 , srcInfoPoints = [] 33053 } 33054 (Var 33055 SrcSpanInfo 33056 { srcInfoSpan = 33057 SrcSpan "tests/examples/RealGHC.lhs" 865 34 865 51 33058 , srcInfoPoints = [] 33059 } 33060 (UnQual 33061 SrcSpanInfo 33062 { srcInfoSpan = 33063 SrcSpan 33064 "tests/examples/RealGHC.lhs" 865 34 865 51 33065 , srcInfoPoints = [] 33066 } 33067 (Ident 33068 SrcSpanInfo 33069 { srcInfoSpan = 33070 SrcSpan 33071 "tests/examples/RealGHC.lhs" 865 34 865 51 33072 , srcInfoPoints = [] 33073 } 33074 "ruleAppCheck_help"))) 33075 (Paren 33076 SrcSpanInfo 33077 { srcInfoSpan = 33078 SrcSpan "tests/examples/RealGHC.lhs" 865 52 865 70 33079 , srcInfoPoints = 33080 [ SrcSpan "tests/examples/RealGHC.lhs" 865 52 865 53 33081 , SrcSpan "tests/examples/RealGHC.lhs" 865 69 865 70 33082 ] 33083 } 33084 (App 33085 SrcSpanInfo 33086 { srcInfoSpan = 33087 SrcSpan 33088 "tests/examples/RealGHC.lhs" 865 53 865 69 33089 , srcInfoPoints = [] 33090 } 33091 (Var 33092 SrcSpanInfo 33093 { srcInfoSpan = 33094 SrcSpan 33095 "tests/examples/RealGHC.lhs" 865 53 865 65 33096 , srcInfoPoints = [] 33097 } 33098 (UnQual 33099 SrcSpanInfo 33100 { srcInfoSpan = 33101 SrcSpan 33102 "tests/examples/RealGHC.lhs" 33103 865 33104 53 33105 865 33106 65 33107 , srcInfoPoints = [] 33108 } 33109 (Ident 33110 SrcSpanInfo 33111 { srcInfoSpan = 33112 SrcSpan 33113 "tests/examples/RealGHC.lhs" 33114 865 33115 53 33116 865 33117 65 33118 , srcInfoPoints = [] 33119 } 33120 "rc_is_active"))) 33121 (Var 33122 SrcSpanInfo 33123 { srcInfoSpan = 33124 SrcSpan 33125 "tests/examples/RealGHC.lhs" 865 66 865 69 33126 , srcInfoPoints = [] 33127 } 33128 (UnQual 33129 SrcSpanInfo 33130 { srcInfoSpan = 33131 SrcSpan 33132 "tests/examples/RealGHC.lhs" 33133 865 33134 66 33135 865 33136 69 33137 , srcInfoPoints = [] 33138 } 33139 (Ident 33140 SrcSpanInfo 33141 { srcInfoSpan = 33142 SrcSpan 33143 "tests/examples/RealGHC.lhs" 33144 865 33145 66 33146 865 33147 69 33148 , srcInfoPoints = [] 33149 } 33150 "env")))))) 33151 (Var 33152 SrcSpanInfo 33153 { srcInfoSpan = 33154 SrcSpan "tests/examples/RealGHC.lhs" 865 71 865 73 33155 , srcInfoPoints = [] 33156 } 33157 (UnQual 33158 SrcSpanInfo 33159 { srcInfoSpan = 33160 SrcSpan "tests/examples/RealGHC.lhs" 865 71 865 73 33161 , srcInfoPoints = [] 33162 } 33163 (Ident 33164 SrcSpanInfo 33165 { srcInfoSpan = 33166 SrcSpan 33167 "tests/examples/RealGHC.lhs" 865 71 865 73 33168 , srcInfoPoints = [] 33169 } 33170 "fn")))) 33171 (Var 33172 SrcSpanInfo 33173 { srcInfoSpan = 33174 SrcSpan "tests/examples/RealGHC.lhs" 865 74 865 78 33175 , srcInfoPoints = [] 33176 } 33177 (UnQual 33178 SrcSpanInfo 33179 { srcInfoSpan = 33180 SrcSpan "tests/examples/RealGHC.lhs" 865 74 865 78 33181 , srcInfoPoints = [] 33182 } 33183 (Ident 33184 SrcSpanInfo 33185 { srcInfoSpan = 33186 SrcSpan "tests/examples/RealGHC.lhs" 865 74 865 78 33187 , srcInfoPoints = [] 33188 } 33189 "args")))) 33190 (Var 33191 SrcSpanInfo 33192 { srcInfoSpan = 33193 SrcSpan "tests/examples/RealGHC.lhs" 865 79 865 95 33194 , srcInfoPoints = [] 33195 } 33196 (UnQual 33197 SrcSpanInfo 33198 { srcInfoSpan = 33199 SrcSpan "tests/examples/RealGHC.lhs" 865 79 865 95 33200 , srcInfoPoints = [] 33201 } 33202 (Ident 33203 SrcSpanInfo 33204 { srcInfoSpan = 33205 SrcSpan "tests/examples/RealGHC.lhs" 865 79 865 95 33206 , srcInfoPoints = [] 33207 } 33208 "name_match_rules")))))) 33209 ]) 33210 (Just 33211 (BDecls 33212 SrcSpanInfo 33213 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 5 868 72 33214 , srcInfoPoints = 33215 [ SrcSpan "tests/examples/RealGHC.lhs" 867 5 867 5 33216 , SrcSpan "tests/examples/RealGHC.lhs" 868 5 868 5 33217 , SrcSpan "tests/examples/RealGHC.lhs" 870 1 870 0 33218 ] 33219 } 33220 [ PatBind 33221 SrcSpanInfo 33222 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 5 867 69 33223 , srcInfoPoints = [] 33224 } 33225 (PVar 33226 SrcSpanInfo 33227 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 5 867 21 33228 , srcInfoPoints = [] 33229 } 33230 (Ident 33231 SrcSpanInfo 33232 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 5 867 21 33233 , srcInfoPoints = [] 33234 } 33235 "name_match_rules")) 33236 (UnGuardedRhs 33237 SrcSpanInfo 33238 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 22 867 69 33239 , srcInfoPoints = 33240 [ SrcSpan "tests/examples/RealGHC.lhs" 867 22 867 23 ] 33241 } 33242 (App 33243 SrcSpanInfo 33244 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 867 24 867 69 33245 , srcInfoPoints = [] 33246 } 33247 (App 33248 SrcSpanInfo 33249 { srcInfoSpan = 33250 SrcSpan "tests/examples/RealGHC.lhs" 867 24 867 36 33251 , srcInfoPoints = [] 33252 } 33253 (Var 33254 SrcSpanInfo 33255 { srcInfoSpan = 33256 SrcSpan "tests/examples/RealGHC.lhs" 867 24 867 30 33257 , srcInfoPoints = [] 33258 } 33259 (UnQual 33260 SrcSpanInfo 33261 { srcInfoSpan = 33262 SrcSpan "tests/examples/RealGHC.lhs" 867 24 867 30 33263 , srcInfoPoints = [] 33264 } 33265 (Ident 33266 SrcSpanInfo 33267 { srcInfoSpan = 33268 SrcSpan "tests/examples/RealGHC.lhs" 867 24 867 30 33269 , srcInfoPoints = [] 33270 } 33271 "filter"))) 33272 (Var 33273 SrcSpanInfo 33274 { srcInfoSpan = 33275 SrcSpan "tests/examples/RealGHC.lhs" 867 31 867 36 33276 , srcInfoPoints = [] 33277 } 33278 (UnQual 33279 SrcSpanInfo 33280 { srcInfoSpan = 33281 SrcSpan "tests/examples/RealGHC.lhs" 867 31 867 36 33282 , srcInfoPoints = [] 33283 } 33284 (Ident 33285 SrcSpanInfo 33286 { srcInfoSpan = 33287 SrcSpan "tests/examples/RealGHC.lhs" 867 31 867 36 33288 , srcInfoPoints = [] 33289 } 33290 "match")))) 33291 (Paren 33292 SrcSpanInfo 33293 { srcInfoSpan = 33294 SrcSpan "tests/examples/RealGHC.lhs" 867 37 867 69 33295 , srcInfoPoints = 33296 [ SrcSpan "tests/examples/RealGHC.lhs" 867 37 867 38 33297 , SrcSpan "tests/examples/RealGHC.lhs" 867 68 867 69 33298 ] 33299 } 33300 (App 33301 SrcSpanInfo 33302 { srcInfoSpan = 33303 SrcSpan "tests/examples/RealGHC.lhs" 867 38 867 68 33304 , srcInfoPoints = [] 33305 } 33306 (App 33307 SrcSpanInfo 33308 { srcInfoSpan = 33309 SrcSpan "tests/examples/RealGHC.lhs" 867 38 867 65 33310 , srcInfoPoints = [] 33311 } 33312 (Var 33313 SrcSpanInfo 33314 { srcInfoSpan = 33315 SrcSpan "tests/examples/RealGHC.lhs" 867 38 867 46 33316 , srcInfoPoints = [] 33317 } 33318 (UnQual 33319 SrcSpanInfo 33320 { srcInfoSpan = 33321 SrcSpan 33322 "tests/examples/RealGHC.lhs" 867 38 867 46 33323 , srcInfoPoints = [] 33324 } 33325 (Ident 33326 SrcSpanInfo 33327 { srcInfoSpan = 33328 SrcSpan 33329 "tests/examples/RealGHC.lhs" 867 38 867 46 33330 , srcInfoPoints = [] 33331 } 33332 "getRules"))) 33333 (Paren 33334 SrcSpanInfo 33335 { srcInfoSpan = 33336 SrcSpan "tests/examples/RealGHC.lhs" 867 47 867 65 33337 , srcInfoPoints = 33338 [ SrcSpan "tests/examples/RealGHC.lhs" 867 47 867 48 33339 , SrcSpan "tests/examples/RealGHC.lhs" 867 64 867 65 33340 ] 33341 } 33342 (App 33343 SrcSpanInfo 33344 { srcInfoSpan = 33345 SrcSpan 33346 "tests/examples/RealGHC.lhs" 867 48 867 64 33347 , srcInfoPoints = [] 33348 } 33349 (Var 33350 SrcSpanInfo 33351 { srcInfoSpan = 33352 SrcSpan 33353 "tests/examples/RealGHC.lhs" 867 48 867 60 33354 , srcInfoPoints = [] 33355 } 33356 (UnQual 33357 SrcSpanInfo 33358 { srcInfoSpan = 33359 SrcSpan 33360 "tests/examples/RealGHC.lhs" 33361 867 33362 48 33363 867 33364 60 33365 , srcInfoPoints = [] 33366 } 33367 (Ident 33368 SrcSpanInfo 33369 { srcInfoSpan = 33370 SrcSpan 33371 "tests/examples/RealGHC.lhs" 33372 867 33373 48 33374 867 33375 60 33376 , srcInfoPoints = [] 33377 } 33378 "rc_rule_base"))) 33379 (Var 33380 SrcSpanInfo 33381 { srcInfoSpan = 33382 SrcSpan 33383 "tests/examples/RealGHC.lhs" 867 61 867 64 33384 , srcInfoPoints = [] 33385 } 33386 (UnQual 33387 SrcSpanInfo 33388 { srcInfoSpan = 33389 SrcSpan 33390 "tests/examples/RealGHC.lhs" 33391 867 33392 61 33393 867 33394 64 33395 , srcInfoPoints = [] 33396 } 33397 (Ident 33398 SrcSpanInfo 33399 { srcInfoSpan = 33400 SrcSpan 33401 "tests/examples/RealGHC.lhs" 33402 867 33403 61 33404 867 33405 64 33406 , srcInfoPoints = [] 33407 } 33408 "env")))))) 33409 (Var 33410 SrcSpanInfo 33411 { srcInfoSpan = 33412 SrcSpan "tests/examples/RealGHC.lhs" 867 66 867 68 33413 , srcInfoPoints = [] 33414 } 33415 (UnQual 33416 SrcSpanInfo 33417 { srcInfoSpan = 33418 SrcSpan "tests/examples/RealGHC.lhs" 867 66 867 68 33419 , srcInfoPoints = [] 33420 } 33421 (Ident 33422 SrcSpanInfo 33423 { srcInfoSpan = 33424 SrcSpan 33425 "tests/examples/RealGHC.lhs" 867 66 867 68 33426 , srcInfoPoints = [] 33427 } 33428 "fn"))))))) 33429 Nothing 33430 , FunBind 33431 SrcSpanInfo 33432 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 5 868 72 33433 , srcInfoPoints = [] 33434 } 33435 [ Match 33436 SrcSpanInfo 33437 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 5 868 72 33438 , srcInfoPoints = [] 33439 } 33440 (Ident 33441 SrcSpanInfo 33442 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 5 868 10 33443 , srcInfoPoints = [] 33444 } 33445 "match") 33446 [ PVar 33447 SrcSpanInfo 33448 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 11 868 15 33449 , srcInfoPoints = [] 33450 } 33451 (Ident 33452 SrcSpanInfo 33453 { srcInfoSpan = 33454 SrcSpan "tests/examples/RealGHC.lhs" 868 11 868 15 33455 , srcInfoPoints = [] 33456 } 33457 "rule") 33458 ] 33459 (UnGuardedRhs 33460 SrcSpanInfo 33461 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 868 16 868 72 33462 , srcInfoPoints = 33463 [ SrcSpan "tests/examples/RealGHC.lhs" 868 16 868 17 ] 33464 } 33465 (InfixApp 33466 SrcSpanInfo 33467 { srcInfoSpan = 33468 SrcSpan "tests/examples/RealGHC.lhs" 868 18 868 72 33469 , srcInfoPoints = [] 33470 } 33471 (Paren 33472 SrcSpanInfo 33473 { srcInfoSpan = 33474 SrcSpan "tests/examples/RealGHC.lhs" 868 18 868 34 33475 , srcInfoPoints = 33476 [ SrcSpan "tests/examples/RealGHC.lhs" 868 18 868 19 33477 , SrcSpan "tests/examples/RealGHC.lhs" 868 33 868 34 33478 ] 33479 } 33480 (App 33481 SrcSpanInfo 33482 { srcInfoSpan = 33483 SrcSpan "tests/examples/RealGHC.lhs" 868 19 868 33 33484 , srcInfoPoints = [] 33485 } 33486 (Var 33487 SrcSpanInfo 33488 { srcInfoSpan = 33489 SrcSpan "tests/examples/RealGHC.lhs" 868 19 868 29 33490 , srcInfoPoints = [] 33491 } 33492 (UnQual 33493 SrcSpanInfo 33494 { srcInfoSpan = 33495 SrcSpan 33496 "tests/examples/RealGHC.lhs" 868 19 868 29 33497 , srcInfoPoints = [] 33498 } 33499 (Ident 33500 SrcSpanInfo 33501 { srcInfoSpan = 33502 SrcSpan 33503 "tests/examples/RealGHC.lhs" 868 19 868 29 33504 , srcInfoPoints = [] 33505 } 33506 "rc_pattern"))) 33507 (Var 33508 SrcSpanInfo 33509 { srcInfoSpan = 33510 SrcSpan "tests/examples/RealGHC.lhs" 868 30 868 33 33511 , srcInfoPoints = [] 33512 } 33513 (UnQual 33514 SrcSpanInfo 33515 { srcInfoSpan = 33516 SrcSpan 33517 "tests/examples/RealGHC.lhs" 868 30 868 33 33518 , srcInfoPoints = [] 33519 } 33520 (Ident 33521 SrcSpanInfo 33522 { srcInfoSpan = 33523 SrcSpan 33524 "tests/examples/RealGHC.lhs" 868 30 868 33 33525 , srcInfoPoints = [] 33526 } 33527 "env"))))) 33528 (QVarOp 33529 SrcSpanInfo 33530 { srcInfoSpan = 33531 SrcSpan "tests/examples/RealGHC.lhs" 868 35 868 47 33532 , srcInfoPoints = 33533 [ SrcSpan "tests/examples/RealGHC.lhs" 868 35 868 36 33534 , SrcSpan "tests/examples/RealGHC.lhs" 868 36 868 46 33535 , SrcSpan "tests/examples/RealGHC.lhs" 868 46 868 47 33536 ] 33537 } 33538 (UnQual 33539 SrcSpanInfo 33540 { srcInfoSpan = 33541 SrcSpan "tests/examples/RealGHC.lhs" 868 35 868 47 33542 , srcInfoPoints = 33543 [ SrcSpan "tests/examples/RealGHC.lhs" 868 35 868 36 33544 , SrcSpan "tests/examples/RealGHC.lhs" 868 36 868 46 33545 , SrcSpan "tests/examples/RealGHC.lhs" 868 46 868 47 33546 ] 33547 } 33548 (Ident 33549 SrcSpanInfo 33550 { srcInfoSpan = 33551 SrcSpan "tests/examples/RealGHC.lhs" 868 36 868 46 33552 , srcInfoPoints = [] 33553 } 33554 "isPrefixOf"))) 33555 (App 33556 SrcSpanInfo 33557 { srcInfoSpan = 33558 SrcSpan "tests/examples/RealGHC.lhs" 868 48 868 72 33559 , srcInfoPoints = [] 33560 } 33561 (Var 33562 SrcSpanInfo 33563 { srcInfoSpan = 33564 SrcSpan "tests/examples/RealGHC.lhs" 868 48 868 56 33565 , srcInfoPoints = [] 33566 } 33567 (UnQual 33568 SrcSpanInfo 33569 { srcInfoSpan = 33570 SrcSpan "tests/examples/RealGHC.lhs" 868 48 868 56 33571 , srcInfoPoints = [] 33572 } 33573 (Ident 33574 SrcSpanInfo 33575 { srcInfoSpan = 33576 SrcSpan 33577 "tests/examples/RealGHC.lhs" 868 48 868 56 33578 , srcInfoPoints = [] 33579 } 33580 "unpackFS"))) 33581 (Paren 33582 SrcSpanInfo 33583 { srcInfoSpan = 33584 SrcSpan "tests/examples/RealGHC.lhs" 868 57 868 72 33585 , srcInfoPoints = 33586 [ SrcSpan "tests/examples/RealGHC.lhs" 868 57 868 58 33587 , SrcSpan "tests/examples/RealGHC.lhs" 868 71 868 72 33588 ] 33589 } 33590 (App 33591 SrcSpanInfo 33592 { srcInfoSpan = 33593 SrcSpan "tests/examples/RealGHC.lhs" 868 58 868 71 33594 , srcInfoPoints = [] 33595 } 33596 (Var 33597 SrcSpanInfo 33598 { srcInfoSpan = 33599 SrcSpan 33600 "tests/examples/RealGHC.lhs" 868 58 868 66 33601 , srcInfoPoints = [] 33602 } 33603 (UnQual 33604 SrcSpanInfo 33605 { srcInfoSpan = 33606 SrcSpan 33607 "tests/examples/RealGHC.lhs" 868 58 868 66 33608 , srcInfoPoints = [] 33609 } 33610 (Ident 33611 SrcSpanInfo 33612 { srcInfoSpan = 33613 SrcSpan 33614 "tests/examples/RealGHC.lhs" 33615 868 33616 58 33617 868 33618 66 33619 , srcInfoPoints = [] 33620 } 33621 "ruleName"))) 33622 (Var 33623 SrcSpanInfo 33624 { srcInfoSpan = 33625 SrcSpan 33626 "tests/examples/RealGHC.lhs" 868 67 868 71 33627 , srcInfoPoints = [] 33628 } 33629 (UnQual 33630 SrcSpanInfo 33631 { srcInfoSpan = 33632 SrcSpan 33633 "tests/examples/RealGHC.lhs" 868 67 868 71 33634 , srcInfoPoints = [] 33635 } 33636 (Ident 33637 SrcSpanInfo 33638 { srcInfoSpan = 33639 SrcSpan 33640 "tests/examples/RealGHC.lhs" 33641 868 33642 67 33643 868 33644 71 33645 , srcInfoPoints = [] 33646 } 33647 "rule")))))))) 33648 Nothing 33649 ] 33650 ])) 33651 ] 33652 , TypeSig 33653 SrcSpanInfo 33654 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 1 870 84 33655 , srcInfoPoints = 33656 [ SrcSpan "tests/examples/RealGHC.lhs" 870 19 870 21 ] 33657 } 33658 [ Ident 33659 SrcSpanInfo 33660 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 1 870 18 33661 , srcInfoPoints = [] 33662 } 33663 "ruleAppCheck_help" 33664 ] 33665 (TyFun 33666 SrcSpanInfo 33667 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 22 870 84 33668 , srcInfoPoints = 33669 [ SrcSpan "tests/examples/RealGHC.lhs" 870 43 870 45 ] 33670 } 33671 (TyParen 33672 SrcSpanInfo 33673 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 22 870 42 33674 , srcInfoPoints = 33675 [ SrcSpan "tests/examples/RealGHC.lhs" 870 22 870 23 33676 , SrcSpan "tests/examples/RealGHC.lhs" 870 41 870 42 33677 ] 33678 } 33679 (TyFun 33680 SrcSpanInfo 33681 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 23 870 41 33682 , srcInfoPoints = 33683 [ SrcSpan "tests/examples/RealGHC.lhs" 870 34 870 36 ] 33684 } 33685 (TyCon 33686 SrcSpanInfo 33687 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 23 870 33 33688 , srcInfoPoints = [] 33689 } 33690 (UnQual 33691 SrcSpanInfo 33692 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 23 870 33 33693 , srcInfoPoints = [] 33694 } 33695 (Ident 33696 SrcSpanInfo 33697 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 23 870 33 33698 , srcInfoPoints = [] 33699 } 33700 "Activation"))) 33701 (TyCon 33702 SrcSpanInfo 33703 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 37 870 41 33704 , srcInfoPoints = [] 33705 } 33706 (UnQual 33707 SrcSpanInfo 33708 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 37 870 41 33709 , srcInfoPoints = [] 33710 } 33711 (Ident 33712 SrcSpanInfo 33713 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 37 870 41 33714 , srcInfoPoints = [] 33715 } 33716 "Bool"))))) 33717 (TyFun 33718 SrcSpanInfo 33719 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 46 870 84 33720 , srcInfoPoints = 33721 [ SrcSpan "tests/examples/RealGHC.lhs" 870 49 870 51 ] 33722 } 33723 (TyCon 33724 SrcSpanInfo 33725 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 46 870 48 33726 , srcInfoPoints = [] 33727 } 33728 (UnQual 33729 SrcSpanInfo 33730 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 46 870 48 33731 , srcInfoPoints = [] 33732 } 33733 (Ident 33734 SrcSpanInfo 33735 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 46 870 48 33736 , srcInfoPoints = [] 33737 } 33738 "Id"))) 33739 (TyFun 33740 SrcSpanInfo 33741 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 52 870 84 33742 , srcInfoPoints = 33743 [ SrcSpan "tests/examples/RealGHC.lhs" 870 63 870 65 ] 33744 } 33745 (TyList 33746 SrcSpanInfo 33747 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 52 870 62 33748 , srcInfoPoints = 33749 [ SrcSpan "tests/examples/RealGHC.lhs" 870 52 870 53 33750 , SrcSpan "tests/examples/RealGHC.lhs" 870 61 870 62 33751 ] 33752 } 33753 (TyCon 33754 SrcSpanInfo 33755 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 53 870 61 33756 , srcInfoPoints = [] 33757 } 33758 (UnQual 33759 SrcSpanInfo 33760 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 53 870 61 33761 , srcInfoPoints = [] 33762 } 33763 (Ident 33764 SrcSpanInfo 33765 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 53 870 61 33766 , srcInfoPoints = [] 33767 } 33768 "CoreExpr")))) 33769 (TyFun 33770 SrcSpanInfo 33771 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 66 870 84 33772 , srcInfoPoints = 33773 [ SrcSpan "tests/examples/RealGHC.lhs" 870 77 870 79 ] 33774 } 33775 (TyList 33776 SrcSpanInfo 33777 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 66 870 76 33778 , srcInfoPoints = 33779 [ SrcSpan "tests/examples/RealGHC.lhs" 870 66 870 67 33780 , SrcSpan "tests/examples/RealGHC.lhs" 870 75 870 76 33781 ] 33782 } 33783 (TyCon 33784 SrcSpanInfo 33785 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 67 870 75 33786 , srcInfoPoints = [] 33787 } 33788 (UnQual 33789 SrcSpanInfo 33790 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 67 870 75 33791 , srcInfoPoints = [] 33792 } 33793 (Ident 33794 SrcSpanInfo 33795 { srcInfoSpan = 33796 SrcSpan "tests/examples/RealGHC.lhs" 870 67 870 75 33797 , srcInfoPoints = [] 33798 } 33799 "CoreRule")))) 33800 (TyCon 33801 SrcSpanInfo 33802 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 80 870 84 33803 , srcInfoPoints = [] 33804 } 33805 (UnQual 33806 SrcSpanInfo 33807 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 80 870 84 33808 , srcInfoPoints = [] 33809 } 33810 (Ident 33811 SrcSpanInfo 33812 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 870 80 870 84 33813 , srcInfoPoints = [] 33814 } 33815 "SDoc"))))))) 33816 , FunBind 33817 SrcSpanInfo 33818 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 1 911 59 33819 , srcInfoPoints = 33820 [ SrcSpan "tests/examples/RealGHC.lhs" 875 3 875 8 ] 33821 } 33822 [ Match 33823 SrcSpanInfo 33824 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 1 911 59 33825 , srcInfoPoints = 33826 [ SrcSpan "tests/examples/RealGHC.lhs" 875 3 875 8 ] 33827 } 33828 (Ident 33829 SrcSpanInfo 33830 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 1 871 18 33831 , srcInfoPoints = [] 33832 } 33833 "ruleAppCheck_help") 33834 [ PVar 33835 SrcSpanInfo 33836 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 19 871 28 33837 , srcInfoPoints = [] 33838 } 33839 (Ident 33840 SrcSpanInfo 33841 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 19 871 28 33842 , srcInfoPoints = [] 33843 } 33844 "is_active") 33845 , PVar 33846 SrcSpanInfo 33847 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 29 871 31 33848 , srcInfoPoints = [] 33849 } 33850 (Ident 33851 SrcSpanInfo 33852 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 29 871 31 33853 , srcInfoPoints = [] 33854 } 33855 "fn") 33856 , PVar 33857 SrcSpanInfo 33858 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 32 871 36 33859 , srcInfoPoints = [] 33860 } 33861 (Ident 33862 SrcSpanInfo 33863 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 32 871 36 33864 , srcInfoPoints = [] 33865 } 33866 "args") 33867 , PVar 33868 SrcSpanInfo 33869 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 37 871 42 33870 , srcInfoPoints = [] 33871 } 33872 (Ident 33873 SrcSpanInfo 33874 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 871 37 871 42 33875 , srcInfoPoints = [] 33876 } 33877 "rules") 33878 ] 33879 (UnGuardedRhs 33880 SrcSpanInfo 33881 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 872 3 874 35 33882 , srcInfoPoints = 33883 [ SrcSpan "tests/examples/RealGHC.lhs" 872 3 872 4 ] 33884 } 33885 (App 33886 SrcSpanInfo 33887 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 5 874 35 33888 , srcInfoPoints = [] 33889 } 33890 (Var 33891 SrcSpanInfo 33892 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 5 873 9 33893 , srcInfoPoints = [] 33894 } 33895 (UnQual 33896 SrcSpanInfo 33897 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 5 873 9 33898 , srcInfoPoints = [] 33899 } 33900 (Ident 33901 SrcSpanInfo 33902 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 5 873 9 33903 , srcInfoPoints = [] 33904 } 33905 "vcat"))) 33906 (List 33907 SrcSpanInfo 33908 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 10 874 35 33909 , srcInfoPoints = 33910 [ SrcSpan "tests/examples/RealGHC.lhs" 873 10 873 11 33911 , SrcSpan "tests/examples/RealGHC.lhs" 873 60 873 61 33912 , SrcSpan "tests/examples/RealGHC.lhs" 874 34 874 35 33913 ] 33914 } 33915 [ InfixApp 33916 SrcSpanInfo 33917 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 11 873 60 33918 , srcInfoPoints = [] 33919 } 33920 (App 33921 SrcSpanInfo 33922 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 11 873 29 33923 , srcInfoPoints = [] 33924 } 33925 (Var 33926 SrcSpanInfo 33927 { srcInfoSpan = 33928 SrcSpan "tests/examples/RealGHC.lhs" 873 11 873 15 33929 , srcInfoPoints = [] 33930 } 33931 (UnQual 33932 SrcSpanInfo 33933 { srcInfoSpan = 33934 SrcSpan "tests/examples/RealGHC.lhs" 873 11 873 15 33935 , srcInfoPoints = [] 33936 } 33937 (Ident 33938 SrcSpanInfo 33939 { srcInfoSpan = 33940 SrcSpan "tests/examples/RealGHC.lhs" 873 11 873 15 33941 , srcInfoPoints = [] 33942 } 33943 "text"))) 33944 (Lit 33945 SrcSpanInfo 33946 { srcInfoSpan = 33947 SrcSpan "tests/examples/RealGHC.lhs" 873 16 873 29 33948 , srcInfoPoints = [] 33949 } 33950 (String 33951 SrcSpanInfo 33952 { srcInfoSpan = 33953 SrcSpan "tests/examples/RealGHC.lhs" 873 16 873 29 33954 , srcInfoPoints = [] 33955 } 33956 "Expression:" 33957 "Expression:"))) 33958 (QVarOp 33959 SrcSpanInfo 33960 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 30 873 33 33961 , srcInfoPoints = [] 33962 } 33963 (UnQual 33964 SrcSpanInfo 33965 { srcInfoSpan = 33966 SrcSpan "tests/examples/RealGHC.lhs" 873 30 873 33 33967 , srcInfoPoints = [] 33968 } 33969 (Symbol 33970 SrcSpanInfo 33971 { srcInfoSpan = 33972 SrcSpan "tests/examples/RealGHC.lhs" 873 30 873 33 33973 , srcInfoPoints = [] 33974 } 33975 "<+>"))) 33976 (App 33977 SrcSpanInfo 33978 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 873 34 873 60 33979 , srcInfoPoints = [] 33980 } 33981 (Var 33982 SrcSpanInfo 33983 { srcInfoSpan = 33984 SrcSpan "tests/examples/RealGHC.lhs" 873 34 873 37 33985 , srcInfoPoints = [] 33986 } 33987 (UnQual 33988 SrcSpanInfo 33989 { srcInfoSpan = 33990 SrcSpan "tests/examples/RealGHC.lhs" 873 34 873 37 33991 , srcInfoPoints = [] 33992 } 33993 (Ident 33994 SrcSpanInfo 33995 { srcInfoSpan = 33996 SrcSpan "tests/examples/RealGHC.lhs" 873 34 873 37 33997 , srcInfoPoints = [] 33998 } 33999 "ppr"))) 34000 (Paren 34001 SrcSpanInfo 34002 { srcInfoSpan = 34003 SrcSpan "tests/examples/RealGHC.lhs" 873 38 873 60 34004 , srcInfoPoints = 34005 [ SrcSpan "tests/examples/RealGHC.lhs" 873 38 873 39 34006 , SrcSpan "tests/examples/RealGHC.lhs" 873 59 873 60 34007 ] 34008 } 34009 (App 34010 SrcSpanInfo 34011 { srcInfoSpan = 34012 SrcSpan "tests/examples/RealGHC.lhs" 873 39 873 59 34013 , srcInfoPoints = [] 34014 } 34015 (App 34016 SrcSpanInfo 34017 { srcInfoSpan = 34018 SrcSpan "tests/examples/RealGHC.lhs" 873 39 873 54 34019 , srcInfoPoints = [] 34020 } 34021 (Var 34022 SrcSpanInfo 34023 { srcInfoSpan = 34024 SrcSpan "tests/examples/RealGHC.lhs" 873 39 873 45 34025 , srcInfoPoints = [] 34026 } 34027 (UnQual 34028 SrcSpanInfo 34029 { srcInfoSpan = 34030 SrcSpan 34031 "tests/examples/RealGHC.lhs" 873 39 873 45 34032 , srcInfoPoints = [] 34033 } 34034 (Ident 34035 SrcSpanInfo 34036 { srcInfoSpan = 34037 SrcSpan 34038 "tests/examples/RealGHC.lhs" 873 39 873 45 34039 , srcInfoPoints = [] 34040 } 34041 "mkApps"))) 34042 (Paren 34043 SrcSpanInfo 34044 { srcInfoSpan = 34045 SrcSpan "tests/examples/RealGHC.lhs" 873 46 873 54 34046 , srcInfoPoints = 34047 [ SrcSpan "tests/examples/RealGHC.lhs" 873 46 873 47 34048 , SrcSpan "tests/examples/RealGHC.lhs" 873 53 873 54 34049 ] 34050 } 34051 (App 34052 SrcSpanInfo 34053 { srcInfoSpan = 34054 SrcSpan 34055 "tests/examples/RealGHC.lhs" 873 47 873 53 34056 , srcInfoPoints = [] 34057 } 34058 (Con 34059 SrcSpanInfo 34060 { srcInfoSpan = 34061 SrcSpan 34062 "tests/examples/RealGHC.lhs" 873 47 873 50 34063 , srcInfoPoints = [] 34064 } 34065 (UnQual 34066 SrcSpanInfo 34067 { srcInfoSpan = 34068 SrcSpan 34069 "tests/examples/RealGHC.lhs" 34070 873 34071 47 34072 873 34073 50 34074 , srcInfoPoints = [] 34075 } 34076 (Ident 34077 SrcSpanInfo 34078 { srcInfoSpan = 34079 SrcSpan 34080 "tests/examples/RealGHC.lhs" 34081 873 34082 47 34083 873 34084 50 34085 , srcInfoPoints = [] 34086 } 34087 "Var"))) 34088 (Var 34089 SrcSpanInfo 34090 { srcInfoSpan = 34091 SrcSpan 34092 "tests/examples/RealGHC.lhs" 873 51 873 53 34093 , srcInfoPoints = [] 34094 } 34095 (UnQual 34096 SrcSpanInfo 34097 { srcInfoSpan = 34098 SrcSpan 34099 "tests/examples/RealGHC.lhs" 34100 873 34101 51 34102 873 34103 53 34104 , srcInfoPoints = [] 34105 } 34106 (Ident 34107 SrcSpanInfo 34108 { srcInfoSpan = 34109 SrcSpan 34110 "tests/examples/RealGHC.lhs" 34111 873 34112 51 34113 873 34114 53 34115 , srcInfoPoints = [] 34116 } 34117 "fn")))))) 34118 (Var 34119 SrcSpanInfo 34120 { srcInfoSpan = 34121 SrcSpan "tests/examples/RealGHC.lhs" 873 55 873 59 34122 , srcInfoPoints = [] 34123 } 34124 (UnQual 34125 SrcSpanInfo 34126 { srcInfoSpan = 34127 SrcSpan "tests/examples/RealGHC.lhs" 873 55 873 59 34128 , srcInfoPoints = [] 34129 } 34130 (Ident 34131 SrcSpanInfo 34132 { srcInfoSpan = 34133 SrcSpan 34134 "tests/examples/RealGHC.lhs" 873 55 873 59 34135 , srcInfoPoints = [] 34136 } 34137 "args")))))) 34138 , App 34139 SrcSpanInfo 34140 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 7 874 34 34141 , srcInfoPoints = [] 34142 } 34143 (Var 34144 SrcSpanInfo 34145 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 7 874 11 34146 , srcInfoPoints = [] 34147 } 34148 (UnQual 34149 SrcSpanInfo 34150 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 7 874 11 34151 , srcInfoPoints = [] 34152 } 34153 (Ident 34154 SrcSpanInfo 34155 { srcInfoSpan = 34156 SrcSpan "tests/examples/RealGHC.lhs" 874 7 874 11 34157 , srcInfoPoints = [] 34158 } 34159 "vcat"))) 34160 (Paren 34161 SrcSpanInfo 34162 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 874 12 874 34 34163 , srcInfoPoints = 34164 [ SrcSpan "tests/examples/RealGHC.lhs" 874 12 874 13 34165 , SrcSpan "tests/examples/RealGHC.lhs" 874 33 874 34 34166 ] 34167 } 34168 (App 34169 SrcSpanInfo 34170 { srcInfoSpan = 34171 SrcSpan "tests/examples/RealGHC.lhs" 874 13 874 33 34172 , srcInfoPoints = [] 34173 } 34174 (App 34175 SrcSpanInfo 34176 { srcInfoSpan = 34177 SrcSpan "tests/examples/RealGHC.lhs" 874 13 874 27 34178 , srcInfoPoints = [] 34179 } 34180 (Var 34181 SrcSpanInfo 34182 { srcInfoSpan = 34183 SrcSpan "tests/examples/RealGHC.lhs" 874 13 874 16 34184 , srcInfoPoints = [] 34185 } 34186 (UnQual 34187 SrcSpanInfo 34188 { srcInfoSpan = 34189 SrcSpan "tests/examples/RealGHC.lhs" 874 13 874 16 34190 , srcInfoPoints = [] 34191 } 34192 (Ident 34193 SrcSpanInfo 34194 { srcInfoSpan = 34195 SrcSpan 34196 "tests/examples/RealGHC.lhs" 874 13 874 16 34197 , srcInfoPoints = [] 34198 } 34199 "map"))) 34200 (Var 34201 SrcSpanInfo 34202 { srcInfoSpan = 34203 SrcSpan "tests/examples/RealGHC.lhs" 874 17 874 27 34204 , srcInfoPoints = [] 34205 } 34206 (UnQual 34207 SrcSpanInfo 34208 { srcInfoSpan = 34209 SrcSpan "tests/examples/RealGHC.lhs" 874 17 874 27 34210 , srcInfoPoints = [] 34211 } 34212 (Ident 34213 SrcSpanInfo 34214 { srcInfoSpan = 34215 SrcSpan 34216 "tests/examples/RealGHC.lhs" 874 17 874 27 34217 , srcInfoPoints = [] 34218 } 34219 "check_rule")))) 34220 (Var 34221 SrcSpanInfo 34222 { srcInfoSpan = 34223 SrcSpan "tests/examples/RealGHC.lhs" 874 28 874 33 34224 , srcInfoPoints = [] 34225 } 34226 (UnQual 34227 SrcSpanInfo 34228 { srcInfoSpan = 34229 SrcSpan "tests/examples/RealGHC.lhs" 874 28 874 33 34230 , srcInfoPoints = [] 34231 } 34232 (Ident 34233 SrcSpanInfo 34234 { srcInfoSpan = 34235 SrcSpan "tests/examples/RealGHC.lhs" 874 28 874 33 34236 , srcInfoPoints = [] 34237 } 34238 "rules"))))) 34239 ]))) 34240 (Just 34241 (BDecls 34242 SrcSpanInfo 34243 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 5 911 59 34244 , srcInfoPoints = 34245 [ SrcSpan "tests/examples/RealGHC.lhs" 876 5 876 5 34246 , SrcSpan "tests/examples/RealGHC.lhs" 877 5 877 5 34247 , SrcSpan "tests/examples/RealGHC.lhs" 878 5 878 5 34248 , SrcSpan "tests/examples/RealGHC.lhs" 880 5 880 5 34249 , SrcSpan "tests/examples/RealGHC.lhs" 882 5 882 5 34250 , SrcSpan "tests/examples/RealGHC.lhs" 884 5 884 5 34251 , SrcSpan "tests/examples/RealGHC.lhs" 887 5 887 5 34252 , SrcSpan "tests/examples/RealGHC.lhs" 891 5 891 5 34253 , SrcSpan "tests/examples/RealGHC.lhs" 893 5 893 5 34254 , SrcSpan "tests/examples/RealGHC.lhs" 915 1 915 0 34255 ] 34256 } 34257 [ PatBind 34258 SrcSpanInfo 34259 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 5 876 25 34260 , srcInfoPoints = [] 34261 } 34262 (PVar 34263 SrcSpanInfo 34264 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 5 876 11 34265 , srcInfoPoints = [] 34266 } 34267 (Ident 34268 SrcSpanInfo 34269 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 5 876 11 34270 , srcInfoPoints = [] 34271 } 34272 "n_args")) 34273 (UnGuardedRhs 34274 SrcSpanInfo 34275 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 12 876 25 34276 , srcInfoPoints = 34277 [ SrcSpan "tests/examples/RealGHC.lhs" 876 12 876 13 ] 34278 } 34279 (App 34280 SrcSpanInfo 34281 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 876 14 876 25 34282 , srcInfoPoints = [] 34283 } 34284 (Var 34285 SrcSpanInfo 34286 { srcInfoSpan = 34287 SrcSpan "tests/examples/RealGHC.lhs" 876 14 876 20 34288 , srcInfoPoints = [] 34289 } 34290 (UnQual 34291 SrcSpanInfo 34292 { srcInfoSpan = 34293 SrcSpan "tests/examples/RealGHC.lhs" 876 14 876 20 34294 , srcInfoPoints = [] 34295 } 34296 (Ident 34297 SrcSpanInfo 34298 { srcInfoSpan = 34299 SrcSpan "tests/examples/RealGHC.lhs" 876 14 876 20 34300 , srcInfoPoints = [] 34301 } 34302 "length"))) 34303 (Var 34304 SrcSpanInfo 34305 { srcInfoSpan = 34306 SrcSpan "tests/examples/RealGHC.lhs" 876 21 876 25 34307 , srcInfoPoints = [] 34308 } 34309 (UnQual 34310 SrcSpanInfo 34311 { srcInfoSpan = 34312 SrcSpan "tests/examples/RealGHC.lhs" 876 21 876 25 34313 , srcInfoPoints = [] 34314 } 34315 (Ident 34316 SrcSpanInfo 34317 { srcInfoSpan = 34318 SrcSpan "tests/examples/RealGHC.lhs" 876 21 876 25 34319 , srcInfoPoints = [] 34320 } 34321 "args"))))) 34322 Nothing 34323 , PatBind 34324 SrcSpanInfo 34325 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 5 877 36 34326 , srcInfoPoints = [] 34327 } 34328 (PVar 34329 SrcSpanInfo 34330 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 5 877 11 34331 , srcInfoPoints = [] 34332 } 34333 (Ident 34334 SrcSpanInfo 34335 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 5 877 11 34336 , srcInfoPoints = [] 34337 } 34338 "i_args")) 34339 (UnGuardedRhs 34340 SrcSpanInfo 34341 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 12 877 36 34342 , srcInfoPoints = 34343 [ SrcSpan "tests/examples/RealGHC.lhs" 877 12 877 13 ] 34344 } 34345 (InfixApp 34346 SrcSpanInfo 34347 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 877 14 877 36 34348 , srcInfoPoints = [] 34349 } 34350 (Var 34351 SrcSpanInfo 34352 { srcInfoSpan = 34353 SrcSpan "tests/examples/RealGHC.lhs" 877 14 877 18 34354 , srcInfoPoints = [] 34355 } 34356 (UnQual 34357 SrcSpanInfo 34358 { srcInfoSpan = 34359 SrcSpan "tests/examples/RealGHC.lhs" 877 14 877 18 34360 , srcInfoPoints = [] 34361 } 34362 (Ident 34363 SrcSpanInfo 34364 { srcInfoSpan = 34365 SrcSpan "tests/examples/RealGHC.lhs" 877 14 877 18 34366 , srcInfoPoints = [] 34367 } 34368 "args"))) 34369 (QVarOp 34370 SrcSpanInfo 34371 { srcInfoSpan = 34372 SrcSpan "tests/examples/RealGHC.lhs" 877 19 877 24 34373 , srcInfoPoints = 34374 [ SrcSpan "tests/examples/RealGHC.lhs" 877 19 877 20 34375 , SrcSpan "tests/examples/RealGHC.lhs" 877 20 877 23 34376 , SrcSpan "tests/examples/RealGHC.lhs" 877 23 877 24 34377 ] 34378 } 34379 (UnQual 34380 SrcSpanInfo 34381 { srcInfoSpan = 34382 SrcSpan "tests/examples/RealGHC.lhs" 877 19 877 24 34383 , srcInfoPoints = 34384 [ SrcSpan "tests/examples/RealGHC.lhs" 877 19 877 20 34385 , SrcSpan "tests/examples/RealGHC.lhs" 877 20 877 23 34386 , SrcSpan "tests/examples/RealGHC.lhs" 877 23 877 24 34387 ] 34388 } 34389 (Ident 34390 SrcSpanInfo 34391 { srcInfoSpan = 34392 SrcSpan "tests/examples/RealGHC.lhs" 877 20 877 23 34393 , srcInfoPoints = [] 34394 } 34395 "zip"))) 34396 (EnumFrom 34397 SrcSpanInfo 34398 { srcInfoSpan = 34399 SrcSpan "tests/examples/RealGHC.lhs" 877 25 877 36 34400 , srcInfoPoints = 34401 [ SrcSpan "tests/examples/RealGHC.lhs" 877 25 877 26 34402 , SrcSpan "tests/examples/RealGHC.lhs" 877 33 877 35 34403 , SrcSpan "tests/examples/RealGHC.lhs" 877 35 877 36 34404 ] 34405 } 34406 (ExpTypeSig 34407 SrcSpanInfo 34408 { srcInfoSpan = 34409 SrcSpan "tests/examples/RealGHC.lhs" 877 26 877 32 34410 , srcInfoPoints = 34411 [ SrcSpan "tests/examples/RealGHC.lhs" 877 27 877 29 ] 34412 } 34413 (Lit 34414 SrcSpanInfo 34415 { srcInfoSpan = 34416 SrcSpan "tests/examples/RealGHC.lhs" 877 26 877 27 34417 , srcInfoPoints = [] 34418 } 34419 (Int 34420 SrcSpanInfo 34421 { srcInfoSpan = 34422 SrcSpan "tests/examples/RealGHC.lhs" 877 26 877 27 34423 , srcInfoPoints = [] 34424 } 34425 1 34426 "1")) 34427 (TyCon 34428 SrcSpanInfo 34429 { srcInfoSpan = 34430 SrcSpan "tests/examples/RealGHC.lhs" 877 29 877 32 34431 , srcInfoPoints = [] 34432 } 34433 (UnQual 34434 SrcSpanInfo 34435 { srcInfoSpan = 34436 SrcSpan "tests/examples/RealGHC.lhs" 877 29 877 32 34437 , srcInfoPoints = [] 34438 } 34439 (Ident 34440 SrcSpanInfo 34441 { srcInfoSpan = 34442 SrcSpan 34443 "tests/examples/RealGHC.lhs" 877 29 877 32 34444 , srcInfoPoints = [] 34445 } 34446 "Int"))))))) 34447 Nothing 34448 , PatBind 34449 SrcSpanInfo 34450 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 5 878 39 34451 , srcInfoPoints = [] 34452 } 34453 (PVar 34454 SrcSpanInfo 34455 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 5 878 15 34456 , srcInfoPoints = [] 34457 } 34458 (Ident 34459 SrcSpanInfo 34460 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 5 878 15 34461 , srcInfoPoints = [] 34462 } 34463 "rough_args")) 34464 (UnGuardedRhs 34465 SrcSpanInfo 34466 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 16 878 39 34467 , srcInfoPoints = 34468 [ SrcSpan "tests/examples/RealGHC.lhs" 878 16 878 17 ] 34469 } 34470 (App 34471 SrcSpanInfo 34472 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 878 18 878 39 34473 , srcInfoPoints = [] 34474 } 34475 (App 34476 SrcSpanInfo 34477 { srcInfoSpan = 34478 SrcSpan "tests/examples/RealGHC.lhs" 878 18 878 34 34479 , srcInfoPoints = [] 34480 } 34481 (Var 34482 SrcSpanInfo 34483 { srcInfoSpan = 34484 SrcSpan "tests/examples/RealGHC.lhs" 878 18 878 21 34485 , srcInfoPoints = [] 34486 } 34487 (UnQual 34488 SrcSpanInfo 34489 { srcInfoSpan = 34490 SrcSpan "tests/examples/RealGHC.lhs" 878 18 878 21 34491 , srcInfoPoints = [] 34492 } 34493 (Ident 34494 SrcSpanInfo 34495 { srcInfoSpan = 34496 SrcSpan "tests/examples/RealGHC.lhs" 878 18 878 21 34497 , srcInfoPoints = [] 34498 } 34499 "map"))) 34500 (Var 34501 SrcSpanInfo 34502 { srcInfoSpan = 34503 SrcSpan "tests/examples/RealGHC.lhs" 878 22 878 34 34504 , srcInfoPoints = [] 34505 } 34506 (UnQual 34507 SrcSpanInfo 34508 { srcInfoSpan = 34509 SrcSpan "tests/examples/RealGHC.lhs" 878 22 878 34 34510 , srcInfoPoints = [] 34511 } 34512 (Ident 34513 SrcSpanInfo 34514 { srcInfoSpan = 34515 SrcSpan "tests/examples/RealGHC.lhs" 878 22 878 34 34516 , srcInfoPoints = [] 34517 } 34518 "roughTopName")))) 34519 (Var 34520 SrcSpanInfo 34521 { srcInfoSpan = 34522 SrcSpan "tests/examples/RealGHC.lhs" 878 35 878 39 34523 , srcInfoPoints = [] 34524 } 34525 (UnQual 34526 SrcSpanInfo 34527 { srcInfoSpan = 34528 SrcSpan "tests/examples/RealGHC.lhs" 878 35 878 39 34529 , srcInfoPoints = [] 34530 } 34531 (Ident 34532 SrcSpanInfo 34533 { srcInfoSpan = 34534 SrcSpan "tests/examples/RealGHC.lhs" 878 35 878 39 34535 , srcInfoPoints = [] 34536 } 34537 "args"))))) 34538 Nothing 34539 , FunBind 34540 SrcSpanInfo 34541 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 5 880 67 34542 , srcInfoPoints = [] 34543 } 34544 [ Match 34545 SrcSpanInfo 34546 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 5 880 67 34547 , srcInfoPoints = [] 34548 } 34549 (Ident 34550 SrcSpanInfo 34551 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 5 880 15 34552 , srcInfoPoints = [] 34553 } 34554 "check_rule") 34555 [ PVar 34556 SrcSpanInfo 34557 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 16 880 20 34558 , srcInfoPoints = [] 34559 } 34560 (Ident 34561 SrcSpanInfo 34562 { srcInfoSpan = 34563 SrcSpan "tests/examples/RealGHC.lhs" 880 16 880 20 34564 , srcInfoPoints = [] 34565 } 34566 "rule") 34567 ] 34568 (UnGuardedRhs 34569 SrcSpanInfo 34570 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 880 21 880 67 34571 , srcInfoPoints = 34572 [ SrcSpan "tests/examples/RealGHC.lhs" 880 21 880 22 ] 34573 } 34574 (InfixApp 34575 SrcSpanInfo 34576 { srcInfoSpan = 34577 SrcSpan "tests/examples/RealGHC.lhs" 880 23 880 67 34578 , srcInfoPoints = [] 34579 } 34580 (InfixApp 34581 SrcSpanInfo 34582 { srcInfoSpan = 34583 SrcSpan "tests/examples/RealGHC.lhs" 880 23 880 48 34584 , srcInfoPoints = [] 34585 } 34586 (App 34587 SrcSpanInfo 34588 { srcInfoSpan = 34589 SrcSpan "tests/examples/RealGHC.lhs" 880 23 880 39 34590 , srcInfoPoints = [] 34591 } 34592 (Var 34593 SrcSpanInfo 34594 { srcInfoSpan = 34595 SrcSpan "tests/examples/RealGHC.lhs" 880 23 880 34 34596 , srcInfoPoints = [] 34597 } 34598 (UnQual 34599 SrcSpanInfo 34600 { srcInfoSpan = 34601 SrcSpan 34602 "tests/examples/RealGHC.lhs" 880 23 880 34 34603 , srcInfoPoints = [] 34604 } 34605 (Ident 34606 SrcSpanInfo 34607 { srcInfoSpan = 34608 SrcSpan 34609 "tests/examples/RealGHC.lhs" 880 23 880 34 34610 , srcInfoPoints = [] 34611 } 34612 "rule_herald"))) 34613 (Var 34614 SrcSpanInfo 34615 { srcInfoSpan = 34616 SrcSpan "tests/examples/RealGHC.lhs" 880 35 880 39 34617 , srcInfoPoints = [] 34618 } 34619 (UnQual 34620 SrcSpanInfo 34621 { srcInfoSpan = 34622 SrcSpan 34623 "tests/examples/RealGHC.lhs" 880 35 880 39 34624 , srcInfoPoints = [] 34625 } 34626 (Ident 34627 SrcSpanInfo 34628 { srcInfoSpan = 34629 SrcSpan 34630 "tests/examples/RealGHC.lhs" 880 35 880 39 34631 , srcInfoPoints = [] 34632 } 34633 "rule")))) 34634 (QVarOp 34635 SrcSpanInfo 34636 { srcInfoSpan = 34637 SrcSpan "tests/examples/RealGHC.lhs" 880 40 880 42 34638 , srcInfoPoints = [] 34639 } 34640 (UnQual 34641 SrcSpanInfo 34642 { srcInfoSpan = 34643 SrcSpan "tests/examples/RealGHC.lhs" 880 40 880 42 34644 , srcInfoPoints = [] 34645 } 34646 (Symbol 34647 SrcSpanInfo 34648 { srcInfoSpan = 34649 SrcSpan 34650 "tests/examples/RealGHC.lhs" 880 40 880 42 34651 , srcInfoPoints = [] 34652 } 34653 "<>"))) 34654 (Var 34655 SrcSpanInfo 34656 { srcInfoSpan = 34657 SrcSpan "tests/examples/RealGHC.lhs" 880 43 880 48 34658 , srcInfoPoints = [] 34659 } 34660 (UnQual 34661 SrcSpanInfo 34662 { srcInfoSpan = 34663 SrcSpan "tests/examples/RealGHC.lhs" 880 43 880 48 34664 , srcInfoPoints = [] 34665 } 34666 (Ident 34667 SrcSpanInfo 34668 { srcInfoSpan = 34669 SrcSpan 34670 "tests/examples/RealGHC.lhs" 880 43 880 48 34671 , srcInfoPoints = [] 34672 } 34673 "colon")))) 34674 (QVarOp 34675 SrcSpanInfo 34676 { srcInfoSpan = 34677 SrcSpan "tests/examples/RealGHC.lhs" 880 49 880 52 34678 , srcInfoPoints = [] 34679 } 34680 (UnQual 34681 SrcSpanInfo 34682 { srcInfoSpan = 34683 SrcSpan "tests/examples/RealGHC.lhs" 880 49 880 52 34684 , srcInfoPoints = [] 34685 } 34686 (Symbol 34687 SrcSpanInfo 34688 { srcInfoSpan = 34689 SrcSpan "tests/examples/RealGHC.lhs" 880 49 880 52 34690 , srcInfoPoints = [] 34691 } 34692 "<+>"))) 34693 (App 34694 SrcSpanInfo 34695 { srcInfoSpan = 34696 SrcSpan "tests/examples/RealGHC.lhs" 880 53 880 67 34697 , srcInfoPoints = [] 34698 } 34699 (Var 34700 SrcSpanInfo 34701 { srcInfoSpan = 34702 SrcSpan "tests/examples/RealGHC.lhs" 880 53 880 62 34703 , srcInfoPoints = [] 34704 } 34705 (UnQual 34706 SrcSpanInfo 34707 { srcInfoSpan = 34708 SrcSpan "tests/examples/RealGHC.lhs" 880 53 880 62 34709 , srcInfoPoints = [] 34710 } 34711 (Ident 34712 SrcSpanInfo 34713 { srcInfoSpan = 34714 SrcSpan 34715 "tests/examples/RealGHC.lhs" 880 53 880 62 34716 , srcInfoPoints = [] 34717 } 34718 "rule_info"))) 34719 (Var 34720 SrcSpanInfo 34721 { srcInfoSpan = 34722 SrcSpan "tests/examples/RealGHC.lhs" 880 63 880 67 34723 , srcInfoPoints = [] 34724 } 34725 (UnQual 34726 SrcSpanInfo 34727 { srcInfoSpan = 34728 SrcSpan "tests/examples/RealGHC.lhs" 880 63 880 67 34729 , srcInfoPoints = [] 34730 } 34731 (Ident 34732 SrcSpanInfo 34733 { srcInfoSpan = 34734 SrcSpan 34735 "tests/examples/RealGHC.lhs" 880 63 880 67 34736 , srcInfoPoints = [] 34737 } 34738 "rule")))))) 34739 Nothing 34740 ] 34741 , FunBind 34742 SrcSpanInfo 34743 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 882 5 885 60 34744 , srcInfoPoints = [] 34745 } 34746 [ Match 34747 SrcSpanInfo 34748 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 882 5 883 68 34749 , srcInfoPoints = [] 34750 } 34751 (Ident 34752 SrcSpanInfo 34753 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 882 5 882 16 34754 , srcInfoPoints = [] 34755 } 34756 "rule_herald") 34757 [ PParen 34758 SrcSpanInfo 34759 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 882 17 882 49 34760 , srcInfoPoints = 34761 [ SrcSpan "tests/examples/RealGHC.lhs" 882 17 882 18 34762 , SrcSpan "tests/examples/RealGHC.lhs" 882 48 882 49 34763 ] 34764 } 34765 (PRec 34766 SrcSpanInfo 34767 { srcInfoSpan = 34768 SrcSpan "tests/examples/RealGHC.lhs" 882 18 882 48 34769 , srcInfoPoints = 34770 [ SrcSpan "tests/examples/RealGHC.lhs" 882 30 882 31 34771 , SrcSpan "tests/examples/RealGHC.lhs" 882 47 882 48 34772 ] 34773 } 34774 (UnQual 34775 SrcSpanInfo 34776 { srcInfoSpan = 34777 SrcSpan "tests/examples/RealGHC.lhs" 882 18 882 29 34778 , srcInfoPoints = [] 34779 } 34780 (Ident 34781 SrcSpanInfo 34782 { srcInfoSpan = 34783 SrcSpan "tests/examples/RealGHC.lhs" 882 18 882 29 34784 , srcInfoPoints = [] 34785 } 34786 "BuiltinRule")) 34787 [ PFieldPat 34788 SrcSpanInfo 34789 { srcInfoSpan = 34790 SrcSpan "tests/examples/RealGHC.lhs" 882 32 882 46 34791 , srcInfoPoints = 34792 [ SrcSpan "tests/examples/RealGHC.lhs" 882 40 882 41 ] 34793 } 34794 (UnQual 34795 SrcSpanInfo 34796 { srcInfoSpan = 34797 SrcSpan "tests/examples/RealGHC.lhs" 882 32 882 39 34798 , srcInfoPoints = [] 34799 } 34800 (Ident 34801 SrcSpanInfo 34802 { srcInfoSpan = 34803 SrcSpan 34804 "tests/examples/RealGHC.lhs" 882 32 882 39 34805 , srcInfoPoints = [] 34806 } 34807 "ru_name")) 34808 (PVar 34809 SrcSpanInfo 34810 { srcInfoSpan = 34811 SrcSpan "tests/examples/RealGHC.lhs" 882 42 882 46 34812 , srcInfoPoints = [] 34813 } 34814 (Ident 34815 SrcSpanInfo 34816 { srcInfoSpan = 34817 SrcSpan 34818 "tests/examples/RealGHC.lhs" 882 42 882 46 34819 , srcInfoPoints = [] 34820 } 34821 "name")) 34822 ]) 34823 ] 34824 (UnGuardedRhs 34825 SrcSpanInfo 34826 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 883 9 883 68 34827 , srcInfoPoints = 34828 [ SrcSpan "tests/examples/RealGHC.lhs" 883 9 883 10 ] 34829 } 34830 (InfixApp 34831 SrcSpanInfo 34832 { srcInfoSpan = 34833 SrcSpan "tests/examples/RealGHC.lhs" 883 11 883 68 34834 , srcInfoPoints = [] 34835 } 34836 (App 34837 SrcSpanInfo 34838 { srcInfoSpan = 34839 SrcSpan "tests/examples/RealGHC.lhs" 883 11 883 38 34840 , srcInfoPoints = [] 34841 } 34842 (Var 34843 SrcSpanInfo 34844 { srcInfoSpan = 34845 SrcSpan "tests/examples/RealGHC.lhs" 883 11 883 16 34846 , srcInfoPoints = [] 34847 } 34848 (UnQual 34849 SrcSpanInfo 34850 { srcInfoSpan = 34851 SrcSpan "tests/examples/RealGHC.lhs" 883 11 883 16 34852 , srcInfoPoints = [] 34853 } 34854 (Ident 34855 SrcSpanInfo 34856 { srcInfoSpan = 34857 SrcSpan 34858 "tests/examples/RealGHC.lhs" 883 11 883 16 34859 , srcInfoPoints = [] 34860 } 34861 "ptext"))) 34862 (Paren 34863 SrcSpanInfo 34864 { srcInfoSpan = 34865 SrcSpan "tests/examples/RealGHC.lhs" 883 17 883 38 34866 , srcInfoPoints = 34867 [ SrcSpan "tests/examples/RealGHC.lhs" 883 17 883 18 34868 , SrcSpan "tests/examples/RealGHC.lhs" 883 37 883 38 34869 ] 34870 } 34871 (App 34872 SrcSpanInfo 34873 { srcInfoSpan = 34874 SrcSpan "tests/examples/RealGHC.lhs" 883 18 883 37 34875 , srcInfoPoints = [] 34876 } 34877 (Var 34878 SrcSpanInfo 34879 { srcInfoSpan = 34880 SrcSpan 34881 "tests/examples/RealGHC.lhs" 883 18 883 22 34882 , srcInfoPoints = [] 34883 } 34884 (UnQual 34885 SrcSpanInfo 34886 { srcInfoSpan = 34887 SrcSpan 34888 "tests/examples/RealGHC.lhs" 883 18 883 22 34889 , srcInfoPoints = [] 34890 } 34891 (Ident 34892 SrcSpanInfo 34893 { srcInfoSpan = 34894 SrcSpan 34895 "tests/examples/RealGHC.lhs" 34896 883 34897 18 34898 883 34899 22 34900 , srcInfoPoints = [] 34901 } 34902 "sLit"))) 34903 (Lit 34904 SrcSpanInfo 34905 { srcInfoSpan = 34906 SrcSpan 34907 "tests/examples/RealGHC.lhs" 883 23 883 37 34908 , srcInfoPoints = [] 34909 } 34910 (String 34911 SrcSpanInfo 34912 { srcInfoSpan = 34913 SrcSpan 34914 "tests/examples/RealGHC.lhs" 883 23 883 37 34915 , srcInfoPoints = [] 34916 } 34917 "Builtin rule" 34918 "Builtin rule"))))) 34919 (QVarOp 34920 SrcSpanInfo 34921 { srcInfoSpan = 34922 SrcSpan "tests/examples/RealGHC.lhs" 883 39 883 42 34923 , srcInfoPoints = [] 34924 } 34925 (UnQual 34926 SrcSpanInfo 34927 { srcInfoSpan = 34928 SrcSpan "tests/examples/RealGHC.lhs" 883 39 883 42 34929 , srcInfoPoints = [] 34930 } 34931 (Symbol 34932 SrcSpanInfo 34933 { srcInfoSpan = 34934 SrcSpan "tests/examples/RealGHC.lhs" 883 39 883 42 34935 , srcInfoPoints = [] 34936 } 34937 "<+>"))) 34938 (App 34939 SrcSpanInfo 34940 { srcInfoSpan = 34941 SrcSpan "tests/examples/RealGHC.lhs" 883 43 883 68 34942 , srcInfoPoints = [] 34943 } 34944 (Var 34945 SrcSpanInfo 34946 { srcInfoSpan = 34947 SrcSpan "tests/examples/RealGHC.lhs" 883 43 883 55 34948 , srcInfoPoints = [] 34949 } 34950 (UnQual 34951 SrcSpanInfo 34952 { srcInfoSpan = 34953 SrcSpan "tests/examples/RealGHC.lhs" 883 43 883 55 34954 , srcInfoPoints = [] 34955 } 34956 (Ident 34957 SrcSpanInfo 34958 { srcInfoSpan = 34959 SrcSpan 34960 "tests/examples/RealGHC.lhs" 883 43 883 55 34961 , srcInfoPoints = [] 34962 } 34963 "doubleQuotes"))) 34964 (Paren 34965 SrcSpanInfo 34966 { srcInfoSpan = 34967 SrcSpan "tests/examples/RealGHC.lhs" 883 56 883 68 34968 , srcInfoPoints = 34969 [ SrcSpan "tests/examples/RealGHC.lhs" 883 56 883 57 34970 , SrcSpan "tests/examples/RealGHC.lhs" 883 67 883 68 34971 ] 34972 } 34973 (App 34974 SrcSpanInfo 34975 { srcInfoSpan = 34976 SrcSpan "tests/examples/RealGHC.lhs" 883 57 883 67 34977 , srcInfoPoints = [] 34978 } 34979 (Var 34980 SrcSpanInfo 34981 { srcInfoSpan = 34982 SrcSpan 34983 "tests/examples/RealGHC.lhs" 883 57 883 62 34984 , srcInfoPoints = [] 34985 } 34986 (UnQual 34987 SrcSpanInfo 34988 { srcInfoSpan = 34989 SrcSpan 34990 "tests/examples/RealGHC.lhs" 883 57 883 62 34991 , srcInfoPoints = [] 34992 } 34993 (Ident 34994 SrcSpanInfo 34995 { srcInfoSpan = 34996 SrcSpan 34997 "tests/examples/RealGHC.lhs" 34998 883 34999 57 35000 883 35001 62 35002 , srcInfoPoints = [] 35003 } 35004 "ftext"))) 35005 (Var 35006 SrcSpanInfo 35007 { srcInfoSpan = 35008 SrcSpan 35009 "tests/examples/RealGHC.lhs" 883 63 883 67 35010 , srcInfoPoints = [] 35011 } 35012 (UnQual 35013 SrcSpanInfo 35014 { srcInfoSpan = 35015 SrcSpan 35016 "tests/examples/RealGHC.lhs" 883 63 883 67 35017 , srcInfoPoints = [] 35018 } 35019 (Ident 35020 SrcSpanInfo 35021 { srcInfoSpan = 35022 SrcSpan 35023 "tests/examples/RealGHC.lhs" 35024 883 35025 63 35026 883 35027 67 35028 , srcInfoPoints = [] 35029 } 35030 "name")))))))) 35031 Nothing 35032 , Match 35033 SrcSpanInfo 35034 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 884 5 885 60 35035 , srcInfoPoints = [] 35036 } 35037 (Ident 35038 SrcSpanInfo 35039 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 884 5 884 16 35040 , srcInfoPoints = [] 35041 } 35042 "rule_herald") 35043 [ PParen 35044 SrcSpanInfo 35045 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 884 17 884 42 35046 , srcInfoPoints = 35047 [ SrcSpan "tests/examples/RealGHC.lhs" 884 17 884 18 35048 , SrcSpan "tests/examples/RealGHC.lhs" 884 41 884 42 35049 ] 35050 } 35051 (PRec 35052 SrcSpanInfo 35053 { srcInfoSpan = 35054 SrcSpan "tests/examples/RealGHC.lhs" 884 18 884 41 35055 , srcInfoPoints = 35056 [ SrcSpan "tests/examples/RealGHC.lhs" 884 23 884 24 35057 , SrcSpan "tests/examples/RealGHC.lhs" 884 40 884 41 35058 ] 35059 } 35060 (UnQual 35061 SrcSpanInfo 35062 { srcInfoSpan = 35063 SrcSpan "tests/examples/RealGHC.lhs" 884 18 884 22 35064 , srcInfoPoints = [] 35065 } 35066 (Ident 35067 SrcSpanInfo 35068 { srcInfoSpan = 35069 SrcSpan "tests/examples/RealGHC.lhs" 884 18 884 22 35070 , srcInfoPoints = [] 35071 } 35072 "Rule")) 35073 [ PFieldPat 35074 SrcSpanInfo 35075 { srcInfoSpan = 35076 SrcSpan "tests/examples/RealGHC.lhs" 884 25 884 39 35077 , srcInfoPoints = 35078 [ SrcSpan "tests/examples/RealGHC.lhs" 884 33 884 34 ] 35079 } 35080 (UnQual 35081 SrcSpanInfo 35082 { srcInfoSpan = 35083 SrcSpan "tests/examples/RealGHC.lhs" 884 25 884 32 35084 , srcInfoPoints = [] 35085 } 35086 (Ident 35087 SrcSpanInfo 35088 { srcInfoSpan = 35089 SrcSpan 35090 "tests/examples/RealGHC.lhs" 884 25 884 32 35091 , srcInfoPoints = [] 35092 } 35093 "ru_name")) 35094 (PVar 35095 SrcSpanInfo 35096 { srcInfoSpan = 35097 SrcSpan "tests/examples/RealGHC.lhs" 884 35 884 39 35098 , srcInfoPoints = [] 35099 } 35100 (Ident 35101 SrcSpanInfo 35102 { srcInfoSpan = 35103 SrcSpan 35104 "tests/examples/RealGHC.lhs" 884 35 884 39 35105 , srcInfoPoints = [] 35106 } 35107 "name")) 35108 ]) 35109 ] 35110 (UnGuardedRhs 35111 SrcSpanInfo 35112 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 885 9 885 60 35113 , srcInfoPoints = 35114 [ SrcSpan "tests/examples/RealGHC.lhs" 885 9 885 10 ] 35115 } 35116 (InfixApp 35117 SrcSpanInfo 35118 { srcInfoSpan = 35119 SrcSpan "tests/examples/RealGHC.lhs" 885 11 885 60 35120 , srcInfoPoints = [] 35121 } 35122 (App 35123 SrcSpanInfo 35124 { srcInfoSpan = 35125 SrcSpan "tests/examples/RealGHC.lhs" 885 11 885 30 35126 , srcInfoPoints = [] 35127 } 35128 (Var 35129 SrcSpanInfo 35130 { srcInfoSpan = 35131 SrcSpan "tests/examples/RealGHC.lhs" 885 11 885 16 35132 , srcInfoPoints = [] 35133 } 35134 (UnQual 35135 SrcSpanInfo 35136 { srcInfoSpan = 35137 SrcSpan "tests/examples/RealGHC.lhs" 885 11 885 16 35138 , srcInfoPoints = [] 35139 } 35140 (Ident 35141 SrcSpanInfo 35142 { srcInfoSpan = 35143 SrcSpan 35144 "tests/examples/RealGHC.lhs" 885 11 885 16 35145 , srcInfoPoints = [] 35146 } 35147 "ptext"))) 35148 (Paren 35149 SrcSpanInfo 35150 { srcInfoSpan = 35151 SrcSpan "tests/examples/RealGHC.lhs" 885 17 885 30 35152 , srcInfoPoints = 35153 [ SrcSpan "tests/examples/RealGHC.lhs" 885 17 885 18 35154 , SrcSpan "tests/examples/RealGHC.lhs" 885 29 885 30 35155 ] 35156 } 35157 (App 35158 SrcSpanInfo 35159 { srcInfoSpan = 35160 SrcSpan "tests/examples/RealGHC.lhs" 885 18 885 29 35161 , srcInfoPoints = [] 35162 } 35163 (Var 35164 SrcSpanInfo 35165 { srcInfoSpan = 35166 SrcSpan 35167 "tests/examples/RealGHC.lhs" 885 18 885 22 35168 , srcInfoPoints = [] 35169 } 35170 (UnQual 35171 SrcSpanInfo 35172 { srcInfoSpan = 35173 SrcSpan 35174 "tests/examples/RealGHC.lhs" 885 18 885 22 35175 , srcInfoPoints = [] 35176 } 35177 (Ident 35178 SrcSpanInfo 35179 { srcInfoSpan = 35180 SrcSpan 35181 "tests/examples/RealGHC.lhs" 35182 885 35183 18 35184 885 35185 22 35186 , srcInfoPoints = [] 35187 } 35188 "sLit"))) 35189 (Lit 35190 SrcSpanInfo 35191 { srcInfoSpan = 35192 SrcSpan 35193 "tests/examples/RealGHC.lhs" 885 23 885 29 35194 , srcInfoPoints = [] 35195 } 35196 (String 35197 SrcSpanInfo 35198 { srcInfoSpan = 35199 SrcSpan 35200 "tests/examples/RealGHC.lhs" 885 23 885 29 35201 , srcInfoPoints = [] 35202 } 35203 "Rule" 35204 "Rule"))))) 35205 (QVarOp 35206 SrcSpanInfo 35207 { srcInfoSpan = 35208 SrcSpan "tests/examples/RealGHC.lhs" 885 31 885 34 35209 , srcInfoPoints = [] 35210 } 35211 (UnQual 35212 SrcSpanInfo 35213 { srcInfoSpan = 35214 SrcSpan "tests/examples/RealGHC.lhs" 885 31 885 34 35215 , srcInfoPoints = [] 35216 } 35217 (Symbol 35218 SrcSpanInfo 35219 { srcInfoSpan = 35220 SrcSpan "tests/examples/RealGHC.lhs" 885 31 885 34 35221 , srcInfoPoints = [] 35222 } 35223 "<+>"))) 35224 (App 35225 SrcSpanInfo 35226 { srcInfoSpan = 35227 SrcSpan "tests/examples/RealGHC.lhs" 885 35 885 60 35228 , srcInfoPoints = [] 35229 } 35230 (Var 35231 SrcSpanInfo 35232 { srcInfoSpan = 35233 SrcSpan "tests/examples/RealGHC.lhs" 885 35 885 47 35234 , srcInfoPoints = [] 35235 } 35236 (UnQual 35237 SrcSpanInfo 35238 { srcInfoSpan = 35239 SrcSpan "tests/examples/RealGHC.lhs" 885 35 885 47 35240 , srcInfoPoints = [] 35241 } 35242 (Ident 35243 SrcSpanInfo 35244 { srcInfoSpan = 35245 SrcSpan 35246 "tests/examples/RealGHC.lhs" 885 35 885 47 35247 , srcInfoPoints = [] 35248 } 35249 "doubleQuotes"))) 35250 (Paren 35251 SrcSpanInfo 35252 { srcInfoSpan = 35253 SrcSpan "tests/examples/RealGHC.lhs" 885 48 885 60 35254 , srcInfoPoints = 35255 [ SrcSpan "tests/examples/RealGHC.lhs" 885 48 885 49 35256 , SrcSpan "tests/examples/RealGHC.lhs" 885 59 885 60 35257 ] 35258 } 35259 (App 35260 SrcSpanInfo 35261 { srcInfoSpan = 35262 SrcSpan "tests/examples/RealGHC.lhs" 885 49 885 59 35263 , srcInfoPoints = [] 35264 } 35265 (Var 35266 SrcSpanInfo 35267 { srcInfoSpan = 35268 SrcSpan 35269 "tests/examples/RealGHC.lhs" 885 49 885 54 35270 , srcInfoPoints = [] 35271 } 35272 (UnQual 35273 SrcSpanInfo 35274 { srcInfoSpan = 35275 SrcSpan 35276 "tests/examples/RealGHC.lhs" 885 49 885 54 35277 , srcInfoPoints = [] 35278 } 35279 (Ident 35280 SrcSpanInfo 35281 { srcInfoSpan = 35282 SrcSpan 35283 "tests/examples/RealGHC.lhs" 35284 885 35285 49 35286 885 35287 54 35288 , srcInfoPoints = [] 35289 } 35290 "ftext"))) 35291 (Var 35292 SrcSpanInfo 35293 { srcInfoSpan = 35294 SrcSpan 35295 "tests/examples/RealGHC.lhs" 885 55 885 59 35296 , srcInfoPoints = [] 35297 } 35298 (UnQual 35299 SrcSpanInfo 35300 { srcInfoSpan = 35301 SrcSpan 35302 "tests/examples/RealGHC.lhs" 885 55 885 59 35303 , srcInfoPoints = [] 35304 } 35305 (Ident 35306 SrcSpanInfo 35307 { srcInfoSpan = 35308 SrcSpan 35309 "tests/examples/RealGHC.lhs" 35310 885 35311 55 35312 885 35313 59 35314 , srcInfoPoints = [] 35315 } 35316 "name")))))))) 35317 Nothing 35318 ] 35319 , FunBind 35320 SrcSpanInfo 35321 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 887 5 911 59 35322 , srcInfoPoints = [] 35323 } 35324 [ Match 35325 SrcSpanInfo 35326 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 887 5 889 55 35327 , srcInfoPoints = [] 35328 } 35329 (Ident 35330 SrcSpanInfo 35331 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 887 5 887 14 35332 , srcInfoPoints = [] 35333 } 35334 "rule_info") 35335 [ PVar 35336 SrcSpanInfo 35337 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 887 15 887 19 35338 , srcInfoPoints = [] 35339 } 35340 (Ident 35341 SrcSpanInfo 35342 { srcInfoSpan = 35343 SrcSpan "tests/examples/RealGHC.lhs" 887 15 887 19 35344 , srcInfoPoints = [] 35345 } 35346 "rule") 35347 ] 35348 (GuardedRhss 35349 SrcSpanInfo 35350 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 888 9 889 55 35351 , srcInfoPoints = 35352 [ SrcSpan "tests/examples/RealGHC.lhs" 888 9 888 10 35353 , SrcSpan "tests/examples/RealGHC.lhs" 889 13 889 14 35354 ] 35355 } 35356 [ GuardedRhs 35357 SrcSpanInfo 35358 { srcInfoSpan = 35359 SrcSpan "tests/examples/RealGHC.lhs" 888 9 889 55 35360 , srcInfoPoints = 35361 [ SrcSpan "tests/examples/RealGHC.lhs" 888 9 888 10 35362 , SrcSpan "tests/examples/RealGHC.lhs" 889 13 889 14 35363 ] 35364 } 35365 [ Generator 35366 SrcSpanInfo 35367 { srcInfoSpan = 35368 SrcSpan "tests/examples/RealGHC.lhs" 888 11 888 79 35369 , srcInfoPoints = 35370 [ SrcSpan "tests/examples/RealGHC.lhs" 888 18 888 20 ] 35371 } 35372 (PApp 35373 SrcSpanInfo 35374 { srcInfoSpan = 35375 SrcSpan "tests/examples/RealGHC.lhs" 888 11 888 17 35376 , srcInfoPoints = [] 35377 } 35378 (UnQual 35379 SrcSpanInfo 35380 { srcInfoSpan = 35381 SrcSpan 35382 "tests/examples/RealGHC.lhs" 888 11 888 15 35383 , srcInfoPoints = [] 35384 } 35385 (Ident 35386 SrcSpanInfo 35387 { srcInfoSpan = 35388 SrcSpan 35389 "tests/examples/RealGHC.lhs" 888 11 888 15 35390 , srcInfoPoints = [] 35391 } 35392 "Just")) 35393 [ PWildCard 35394 SrcSpanInfo 35395 { srcInfoSpan = 35396 SrcSpan 35397 "tests/examples/RealGHC.lhs" 888 16 888 17 35398 , srcInfoPoints = [] 35399 } 35400 ]) 35401 (App 35402 SrcSpanInfo 35403 { srcInfoSpan = 35404 SrcSpan "tests/examples/RealGHC.lhs" 888 21 888 79 35405 , srcInfoPoints = [] 35406 } 35407 (App 35408 SrcSpanInfo 35409 { srcInfoSpan = 35410 SrcSpan 35411 "tests/examples/RealGHC.lhs" 888 21 888 74 35412 , srcInfoPoints = [] 35413 } 35414 (App 35415 SrcSpanInfo 35416 { srcInfoSpan = 35417 SrcSpan 35418 "tests/examples/RealGHC.lhs" 888 21 888 63 35419 , srcInfoPoints = [] 35420 } 35421 (App 35422 SrcSpanInfo 35423 { srcInfoSpan = 35424 SrcSpan 35425 "tests/examples/RealGHC.lhs" 35426 888 35427 21 35428 888 35429 58 35430 , srcInfoPoints = [] 35431 } 35432 (App 35433 SrcSpanInfo 35434 { srcInfoSpan = 35435 SrcSpan 35436 "tests/examples/RealGHC.lhs" 35437 888 35438 21 35439 888 35440 42 35441 , srcInfoPoints = [] 35442 } 35443 (Var 35444 SrcSpanInfo 35445 { srcInfoSpan = 35446 SrcSpan 35447 "tests/examples/RealGHC.lhs" 35448 888 35449 21 35450 888 35451 30 35452 , srcInfoPoints = [] 35453 } 35454 (UnQual 35455 SrcSpanInfo 35456 { srcInfoSpan = 35457 SrcSpan 35458 "tests/examples/RealGHC.lhs" 35459 888 35460 21 35461 888 35462 30 35463 , srcInfoPoints = [] 35464 } 35465 (Ident 35466 SrcSpanInfo 35467 { srcInfoSpan = 35468 SrcSpan 35469 "tests/examples/RealGHC.lhs" 35470 888 35471 21 35472 888 35473 30 35474 , srcInfoPoints = [] 35475 } 35476 "matchRule"))) 35477 (Var 35478 SrcSpanInfo 35479 { srcInfoSpan = 35480 SrcSpan 35481 "tests/examples/RealGHC.lhs" 35482 888 35483 31 35484 888 35485 42 35486 , srcInfoPoints = [] 35487 } 35488 (UnQual 35489 SrcSpanInfo 35490 { srcInfoSpan = 35491 SrcSpan 35492 "tests/examples/RealGHC.lhs" 35493 888 35494 31 35495 888 35496 42 35497 , srcInfoPoints = [] 35498 } 35499 (Ident 35500 SrcSpanInfo 35501 { srcInfoSpan = 35502 SrcSpan 35503 "tests/examples/RealGHC.lhs" 35504 888 35505 31 35506 888 35507 42 35508 , srcInfoPoints = [] 35509 } 35510 "noBlackList")))) 35511 (Var 35512 SrcSpanInfo 35513 { srcInfoSpan = 35514 SrcSpan 35515 "tests/examples/RealGHC.lhs" 35516 888 35517 43 35518 888 35519 58 35520 , srcInfoPoints = [] 35521 } 35522 (UnQual 35523 SrcSpanInfo 35524 { srcInfoSpan = 35525 SrcSpan 35526 "tests/examples/RealGHC.lhs" 35527 888 35528 43 35529 888 35530 58 35531 , srcInfoPoints = [] 35532 } 35533 (Ident 35534 SrcSpanInfo 35535 { srcInfoSpan = 35536 SrcSpan 35537 "tests/examples/RealGHC.lhs" 35538 888 35539 43 35540 888 35541 58 35542 , srcInfoPoints = [] 35543 } 35544 "emptyInScopeSet")))) 35545 (Var 35546 SrcSpanInfo 35547 { srcInfoSpan = 35548 SrcSpan 35549 "tests/examples/RealGHC.lhs" 35550 888 35551 59 35552 888 35553 63 35554 , srcInfoPoints = [] 35555 } 35556 (UnQual 35557 SrcSpanInfo 35558 { srcInfoSpan = 35559 SrcSpan 35560 "tests/examples/RealGHC.lhs" 35561 888 35562 59 35563 888 35564 63 35565 , srcInfoPoints = [] 35566 } 35567 (Ident 35568 SrcSpanInfo 35569 { srcInfoSpan = 35570 SrcSpan 35571 "tests/examples/RealGHC.lhs" 35572 888 35573 59 35574 888 35575 63 35576 , srcInfoPoints = [] 35577 } 35578 "args")))) 35579 (Var 35580 SrcSpanInfo 35581 { srcInfoSpan = 35582 SrcSpan 35583 "tests/examples/RealGHC.lhs" 888 64 888 74 35584 , srcInfoPoints = [] 35585 } 35586 (UnQual 35587 SrcSpanInfo 35588 { srcInfoSpan = 35589 SrcSpan 35590 "tests/examples/RealGHC.lhs" 35591 888 35592 64 35593 888 35594 74 35595 , srcInfoPoints = [] 35596 } 35597 (Ident 35598 SrcSpanInfo 35599 { srcInfoSpan = 35600 SrcSpan 35601 "tests/examples/RealGHC.lhs" 35602 888 35603 64 35604 888 35605 74 35606 , srcInfoPoints = [] 35607 } 35608 "rough_args")))) 35609 (Var 35610 SrcSpanInfo 35611 { srcInfoSpan = 35612 SrcSpan 35613 "tests/examples/RealGHC.lhs" 888 75 888 79 35614 , srcInfoPoints = [] 35615 } 35616 (UnQual 35617 SrcSpanInfo 35618 { srcInfoSpan = 35619 SrcSpan 35620 "tests/examples/RealGHC.lhs" 888 75 888 79 35621 , srcInfoPoints = [] 35622 } 35623 (Ident 35624 SrcSpanInfo 35625 { srcInfoSpan = 35626 SrcSpan 35627 "tests/examples/RealGHC.lhs" 35628 888 35629 75 35630 888 35631 79 35632 , srcInfoPoints = [] 35633 } 35634 "rule")))) 35635 ] 35636 (App 35637 SrcSpanInfo 35638 { srcInfoSpan = 35639 SrcSpan "tests/examples/RealGHC.lhs" 889 15 889 55 35640 , srcInfoPoints = [] 35641 } 35642 (Var 35643 SrcSpanInfo 35644 { srcInfoSpan = 35645 SrcSpan "tests/examples/RealGHC.lhs" 889 15 889 19 35646 , srcInfoPoints = [] 35647 } 35648 (UnQual 35649 SrcSpanInfo 35650 { srcInfoSpan = 35651 SrcSpan "tests/examples/RealGHC.lhs" 889 15 889 19 35652 , srcInfoPoints = [] 35653 } 35654 (Ident 35655 SrcSpanInfo 35656 { srcInfoSpan = 35657 SrcSpan 35658 "tests/examples/RealGHC.lhs" 889 15 889 19 35659 , srcInfoPoints = [] 35660 } 35661 "text"))) 35662 (Lit 35663 SrcSpanInfo 35664 { srcInfoSpan = 35665 SrcSpan "tests/examples/RealGHC.lhs" 889 20 889 55 35666 , srcInfoPoints = [] 35667 } 35668 (String 35669 SrcSpanInfo 35670 { srcInfoSpan = 35671 SrcSpan "tests/examples/RealGHC.lhs" 889 20 889 55 35672 , srcInfoPoints = [] 35673 } 35674 "matches (which is very peculiar!)" 35675 "matches (which is very peculiar!)"))) 35676 ]) 35677 Nothing 35678 , Match 35679 SrcSpanInfo 35680 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 891 5 891 55 35681 , srcInfoPoints = [] 35682 } 35683 (Ident 35684 SrcSpanInfo 35685 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 891 5 891 14 35686 , srcInfoPoints = [] 35687 } 35688 "rule_info") 35689 [ PParen 35690 SrcSpanInfo 35691 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 891 15 891 31 35692 , srcInfoPoints = 35693 [ SrcSpan "tests/examples/RealGHC.lhs" 891 15 891 16 35694 , SrcSpan "tests/examples/RealGHC.lhs" 891 30 891 31 35695 ] 35696 } 35697 (PRec 35698 SrcSpanInfo 35699 { srcInfoSpan = 35700 SrcSpan "tests/examples/RealGHC.lhs" 891 16 891 30 35701 , srcInfoPoints = 35702 [ SrcSpan "tests/examples/RealGHC.lhs" 891 28 891 29 35703 , SrcSpan "tests/examples/RealGHC.lhs" 891 29 891 30 35704 ] 35705 } 35706 (UnQual 35707 SrcSpanInfo 35708 { srcInfoSpan = 35709 SrcSpan "tests/examples/RealGHC.lhs" 891 16 891 27 35710 , srcInfoPoints = [] 35711 } 35712 (Ident 35713 SrcSpanInfo 35714 { srcInfoSpan = 35715 SrcSpan "tests/examples/RealGHC.lhs" 891 16 891 27 35716 , srcInfoPoints = [] 35717 } 35718 "BuiltinRule")) 35719 []) 35720 ] 35721 (UnGuardedRhs 35722 SrcSpanInfo 35723 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 891 32 891 55 35724 , srcInfoPoints = 35725 [ SrcSpan "tests/examples/RealGHC.lhs" 891 32 891 33 ] 35726 } 35727 (App 35728 SrcSpanInfo 35729 { srcInfoSpan = 35730 SrcSpan "tests/examples/RealGHC.lhs" 891 34 891 55 35731 , srcInfoPoints = [] 35732 } 35733 (Var 35734 SrcSpanInfo 35735 { srcInfoSpan = 35736 SrcSpan "tests/examples/RealGHC.lhs" 891 34 891 38 35737 , srcInfoPoints = [] 35738 } 35739 (UnQual 35740 SrcSpanInfo 35741 { srcInfoSpan = 35742 SrcSpan "tests/examples/RealGHC.lhs" 891 34 891 38 35743 , srcInfoPoints = [] 35744 } 35745 (Ident 35746 SrcSpanInfo 35747 { srcInfoSpan = 35748 SrcSpan "tests/examples/RealGHC.lhs" 891 34 891 38 35749 , srcInfoPoints = [] 35750 } 35751 "text"))) 35752 (Lit 35753 SrcSpanInfo 35754 { srcInfoSpan = 35755 SrcSpan "tests/examples/RealGHC.lhs" 891 39 891 55 35756 , srcInfoPoints = [] 35757 } 35758 (String 35759 SrcSpanInfo 35760 { srcInfoSpan = 35761 SrcSpan "tests/examples/RealGHC.lhs" 891 39 891 55 35762 , srcInfoPoints = [] 35763 } 35764 "does not match" 35765 "does not match")))) 35766 Nothing 35767 , Match 35768 SrcSpanInfo 35769 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 5 911 59 35770 , srcInfoPoints = 35771 [ SrcSpan "tests/examples/RealGHC.lhs" 900 9 900 14 ] 35772 } 35773 (Ident 35774 SrcSpanInfo 35775 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 5 893 14 35776 , srcInfoPoints = [] 35777 } 35778 "rule_info") 35779 [ PParen 35780 SrcSpanInfo 35781 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 893 15 894 67 35782 , srcInfoPoints = 35783 [ SrcSpan "tests/examples/RealGHC.lhs" 893 15 893 16 35784 , SrcSpan "tests/examples/RealGHC.lhs" 894 66 894 67 35785 ] 35786 } 35787 (PRec 35788 SrcSpanInfo 35789 { srcInfoSpan = 35790 SrcSpan "tests/examples/RealGHC.lhs" 893 16 894 66 35791 , srcInfoPoints = 35792 [ SrcSpan "tests/examples/RealGHC.lhs" 893 21 893 22 35793 , SrcSpan "tests/examples/RealGHC.lhs" 893 37 893 38 35794 , SrcSpan "tests/examples/RealGHC.lhs" 893 51 893 52 35795 , SrcSpan "tests/examples/RealGHC.lhs" 894 44 894 45 35796 , SrcSpan "tests/examples/RealGHC.lhs" 894 65 894 66 35797 ] 35798 } 35799 (UnQual 35800 SrcSpanInfo 35801 { srcInfoSpan = 35802 SrcSpan "tests/examples/RealGHC.lhs" 893 16 893 20 35803 , srcInfoPoints = [] 35804 } 35805 (Ident 35806 SrcSpanInfo 35807 { srcInfoSpan = 35808 SrcSpan "tests/examples/RealGHC.lhs" 893 16 893 20 35809 , srcInfoPoints = [] 35810 } 35811 "Rule")) 35812 [ PFieldPat 35813 SrcSpanInfo 35814 { srcInfoSpan = 35815 SrcSpan "tests/examples/RealGHC.lhs" 893 23 893 37 35816 , srcInfoPoints = 35817 [ SrcSpan "tests/examples/RealGHC.lhs" 893 31 893 32 ] 35818 } 35819 (UnQual 35820 SrcSpanInfo 35821 { srcInfoSpan = 35822 SrcSpan "tests/examples/RealGHC.lhs" 893 23 893 30 35823 , srcInfoPoints = [] 35824 } 35825 (Ident 35826 SrcSpanInfo 35827 { srcInfoSpan = 35828 SrcSpan 35829 "tests/examples/RealGHC.lhs" 893 23 893 30 35830 , srcInfoPoints = [] 35831 } 35832 "ru_name")) 35833 (PVar 35834 SrcSpanInfo 35835 { srcInfoSpan = 35836 SrcSpan "tests/examples/RealGHC.lhs" 893 33 893 37 35837 , srcInfoPoints = [] 35838 } 35839 (Ident 35840 SrcSpanInfo 35841 { srcInfoSpan = 35842 SrcSpan 35843 "tests/examples/RealGHC.lhs" 893 33 893 37 35844 , srcInfoPoints = [] 35845 } 35846 "name")) 35847 , PFieldPat 35848 SrcSpanInfo 35849 { srcInfoSpan = 35850 SrcSpan "tests/examples/RealGHC.lhs" 893 39 893 51 35851 , srcInfoPoints = 35852 [ SrcSpan "tests/examples/RealGHC.lhs" 893 46 893 47 ] 35853 } 35854 (UnQual 35855 SrcSpanInfo 35856 { srcInfoSpan = 35857 SrcSpan "tests/examples/RealGHC.lhs" 893 39 893 45 35858 , srcInfoPoints = [] 35859 } 35860 (Ident 35861 SrcSpanInfo 35862 { srcInfoSpan = 35863 SrcSpan 35864 "tests/examples/RealGHC.lhs" 893 39 893 45 35865 , srcInfoPoints = [] 35866 } 35867 "ru_act")) 35868 (PVar 35869 SrcSpanInfo 35870 { srcInfoSpan = 35871 SrcSpan "tests/examples/RealGHC.lhs" 893 48 893 51 35872 , srcInfoPoints = [] 35873 } 35874 (Ident 35875 SrcSpanInfo 35876 { srcInfoSpan = 35877 SrcSpan 35878 "tests/examples/RealGHC.lhs" 893 48 893 51 35879 , srcInfoPoints = [] 35880 } 35881 "act")) 35882 , PFieldPat 35883 SrcSpanInfo 35884 { srcInfoSpan = 35885 SrcSpan "tests/examples/RealGHC.lhs" 894 23 894 44 35886 , srcInfoPoints = 35887 [ SrcSpan "tests/examples/RealGHC.lhs" 894 32 894 33 ] 35888 } 35889 (UnQual 35890 SrcSpanInfo 35891 { srcInfoSpan = 35892 SrcSpan "tests/examples/RealGHC.lhs" 894 23 894 31 35893 , srcInfoPoints = [] 35894 } 35895 (Ident 35896 SrcSpanInfo 35897 { srcInfoSpan = 35898 SrcSpan 35899 "tests/examples/RealGHC.lhs" 894 23 894 31 35900 , srcInfoPoints = [] 35901 } 35902 "ru_bndrs")) 35903 (PVar 35904 SrcSpanInfo 35905 { srcInfoSpan = 35906 SrcSpan "tests/examples/RealGHC.lhs" 894 34 894 44 35907 , srcInfoPoints = [] 35908 } 35909 (Ident 35910 SrcSpanInfo 35911 { srcInfoSpan = 35912 SrcSpan 35913 "tests/examples/RealGHC.lhs" 894 34 894 44 35914 , srcInfoPoints = [] 35915 } 35916 "rule_bndrs")) 35917 , PFieldPat 35918 SrcSpanInfo 35919 { srcInfoSpan = 35920 SrcSpan "tests/examples/RealGHC.lhs" 894 46 894 65 35921 , srcInfoPoints = 35922 [ SrcSpan "tests/examples/RealGHC.lhs" 894 54 894 55 ] 35923 } 35924 (UnQual 35925 SrcSpanInfo 35926 { srcInfoSpan = 35927 SrcSpan "tests/examples/RealGHC.lhs" 894 46 894 53 35928 , srcInfoPoints = [] 35929 } 35930 (Ident 35931 SrcSpanInfo 35932 { srcInfoSpan = 35933 SrcSpan 35934 "tests/examples/RealGHC.lhs" 894 46 894 53 35935 , srcInfoPoints = [] 35936 } 35937 "ru_args")) 35938 (PVar 35939 SrcSpanInfo 35940 { srcInfoSpan = 35941 SrcSpan "tests/examples/RealGHC.lhs" 894 56 894 65 35942 , srcInfoPoints = [] 35943 } 35944 (Ident 35945 SrcSpanInfo 35946 { srcInfoSpan = 35947 SrcSpan 35948 "tests/examples/RealGHC.lhs" 894 56 894 65 35949 , srcInfoPoints = [] 35950 } 35951 "rule_args")) 35952 ]) 35953 ] 35954 (GuardedRhss 35955 SrcSpanInfo 35956 { srcInfoSpan = SrcSpan "tests/examples/RealGHC.lhs" 895 9 899 105 35957 , srcInfoPoints = [] 35958 } 35959 [ GuardedRhs 35960 SrcSpanInfo 35961 { srcInfoSpan = 35962 SrcSpan "tests/examples/RealGHC.lhs" 895 9 895 69 35963 , srcInfoPoints = 35964 [ SrcSpan "tests/examples/RealGHC.lhs" 895 9 895 10 35965 , SrcSpan "tests/examples/RealGHC.lhs" 895 34 895 35 35966 ] 35967 } 35968 [ Qualifier 35969 SrcSpanInfo 35970 { srcInfoSpan = 35971 SrcSpan "tests/examples/RealGHC.lhs" 895 11 895 30 35972 , srcInfoPoints = [] 35973 } 35974 (App 35975 SrcSpanInfo 35976 { srcInfoSpan = 35977 SrcSpan "tests/examples/RealGHC.lhs" 895 11 895 30 35978 , srcInfoPoints = [] 35979 } 35980 (Var 35981 SrcSpanInfo 35982 { srcInfoSpan = 35983 SrcSpan 35984 "tests/examples/RealGHC.lhs" 895 11 895 14 35985 , srcInfoPoints = [] 35986 } 35987 (UnQual 35988 SrcSpanInfo 35989 { srcInfoSpan = 35990 SrcSpan 35991 "tests/examples/RealGHC.lhs" 895 11 895 14 35992 , srcInfoPoints = [] 35993 } 35994 (Ident 35995 SrcSpanInfo 35996 { srcInfoSpan = 35997 SrcSpan 35998 "tests/examples/RealGHC.lhs" 35999 895 36000 11 36001 895 36002 14 36003 , srcInfoPoints = [] 36004 } 36005 "not"))) 36006 (Paren 36007 SrcSpanInfo 36008 { srcInfoSpan = 36009 SrcSpan 36010 "tests/examples/RealGHC.lhs" 895 15 895 30 36011 , srcInfoPoints = 36012 [ SrcSpan 36013 "tests/examples/RealGHC.lhs" 895 15 895 16 36014 , SrcSpan 36015 "tests/examples/RealGHC.lhs" 895 29 895 30 36016 ] 36017 } 36018 (App 36019 SrcSpanInfo 36020 { srcInfoSpan = 36021 SrcSpan 36022 "tests/examples/RealGHC.lhs" 895 16 895 29 36023 , srcInfoPoints = [] 36024 } 36025 (Var 36026 SrcSpanInfo 36027 { srcInfoSpan = 36028 SrcSpan 36029 "tests/examples/RealGHC.lhs" 36030 895 36031 16 36032 895 36033 25 36034 , srcInfoPoints = [] 36035 } 36036 (UnQual 36037 SrcSpanInfo 36038 { srcInfoSpan = 36039 SrcSpan 36040 "tests/examples/RealGHC.lhs" 36041 895 36042 16 36043 895 36044 25 36045 , srcInfoPoints = [] 36046 } 36047 (Ident 36048 SrcSpanInfo 36049 { srcInfoSpan = 36050 SrcSpan 36051 "tests/examples/RealGHC.lhs" 36052 895 36053 16 36054 895 36055 25 36056 , srcInfoPoints = [] 36057 } 36058 "is_active"))) 36059 (Var 36060 SrcSpanInfo 36061 { srcInfoSpan = 36062 SrcSpan 36063 "tests/examples/RealGHC.lhs" 36064 895 36065 26 36066 895 36067 29 36068 , srcInfoPoints = [] 36069 } 36070 (UnQual 36071 SrcSpanInfo 36072 { srcInfoSpan = 36073 SrcSpan 36074 "tests/examples/RealGHC.lhs" 36075 895 36076 26 36077 895 36078 29 36079 , srcInfoPoints = [] 36080 } 36081 (Ident 36082 SrcSpanInfo 36083 { srcInfoSpan = 36084 SrcSpan 36085 "tests/examples/RealGHC.lhs" 36086 895 36087 26 36088 895 36089 29 36090 , srcInfoPoints = [] 36091 } 36092 "act")))))) 36093 ] 36094 (App 36095 SrcSpanInfo 36096 { srcInfoSpan = 36097 SrcSpan "tests/examples/RealGHC.lhs" 895 36 895 69 36098 , srcInfoPoints = [] 36099 } 36100 (Var 36101 SrcSpanInfo 36102 { srcInfoSpan = 36103 SrcSpan "tests/examples/RealGHC.lhs" 895 36 895 40 36104 , srcInfoPoints = [] 36105 } 36106 (UnQual 36107 SrcSpanInfo 36108 { srcInfoSpan = 36109 SrcSpan "tests/examples/RealGHC.lhs" 895 36 895 40 36110 , srcInfoPoints = [] 36111 } 36112 (Ident 36113 SrcSpanInfo 36114 { srcInfoSpan = 36115 SrcSpan 36116 "tests/examples/RealGHC.lhs" 895 36 895 40 36117 , srcInfoPoints = [] 36118 } 36119 "text"))) 36120 (Lit 36121 SrcSpanInfo 36122 { srcInfoSpan = 36123 SrcSpan "tests/examples/RealGHC.lhs" 895 41 895 69 36124 , srcInfoPoints = [] 36125 } 36126 (String 36127 SrcSpanInfo 36128 { srcInfoSpan = 36129 SrcSpan "tests/examples/RealGHC.lhs" 895 41 895 69 36130 , srcInfoPoints = [] 36131 } 36132 "active only in later phase" 36133 "active only in later phase"))) 36134 , GuardedRhs 36135 SrcSpanInfo 36136 { srcInfoSpan = 36137 SrcSpan "tests/examples/RealGHC.lhs" 896 9 896 65 36138 , srcInfoPoints = 36139 [ SrcSpan "tests/examples/RealGHC.lhs" 896 9 896 10 36140 , SrcSpan "tests/examples/RealGHC.lhs" 896 39 896 40 36141 ] 36142 } 36143 [ Qualifier 36144 SrcSpanInfo 36145 { srcInfoSpan = 36146 SrcSpan "tests/examples/RealGHC.lhs" 896 11 896 31 36147 , srcInfoPoints = [] 36148 } 36149 (InfixApp 36150 SrcSpanInfo 36151 { srcInfoSpan = 36152 SrcSpan "tests/examples/RealGHC.lhs" 896 11 896 31 36153 , srcInfoPoints = [] 36154 } 36155 (Var 36156 SrcSpanInfo 36157 { srcInfoSpan = 36158 SrcSpan 36159 "tests/examples/RealGHC.lhs" 896 11 896 17 36160 , srcInfoPoints = [] 36161 } 36162 (UnQual 36163 SrcSpanInfo 36164 { srcInfoSpan = 36165 SrcSpan 36166 "tests/examples/RealGHC.lhs" 896 11 896 17 36167 , srcInfoPoints = [] 36168 } 36169 (Ident 36170 SrcSpanInfo 36171 { srcInfoSpan = 36172 SrcSpan 36173 "tests/examples/RealGHC.lhs" 36174 896 36175 11 36176 896 36177 17 36178 , srcInfoPoints = [] 36179 } 36180 "n_args"))) 36181 (QVarOp 36182 SrcSpanInfo 36183 { srcInfoSpan = 36184 SrcSpan 36185 "tests/examples/RealGHC.lhs" 896 18 896 19 36186 , srcInfoPoints = [] 36187 } 36188 (UnQual 36189 SrcSpanInfo 36190 { srcInfoSpan = 36191 SrcSpan 36192 "tests/examples/RealGHC.lhs" 896 18 896 19 36193 , srcInfoPoints = [] 36194 } 36195 (Symbol 36196 SrcSpanInfo 36197 { srcInfoSpan = 36198 SrcSpan 36199 "tests/examples/RealGHC.lhs" 36200 896 36201 18 36202 896 36203 19 36204 , srcInfoPoints = [] 36205 } 36206 "<"))) 36207 (Var 36208 SrcSpanInfo 36209 { srcInfoSpan = 36210 SrcSpan 36211 "tests/examples/RealGHC.lhs" 896 20 896 31 36212 , srcInfoPoints = [] 36213 } 36214 (UnQual 36215 SrcSpanInfo 36216 { srcInfoSpan = 36217 SrcSpan 36218 "tests/examples/RealGHC.lhs" 896 20 896 31 36219 , srcInfoPoints = [] 36220 } 36221 (Ident 36222 SrcSpanInfo 36223 { srcInfoSpan = 36224 SrcSpan 36225 "tests/examples/RealGHC.lhs" 36226 896 36227 20 36228 896 36229 31 36230 , srcInfoPoints = [] 36231 } 36232 "n_rule_args")))) 36233 ] 36234 (App 36235 SrcSpanInfo 36236 { srcInfoSpan = 36237 SrcSpan "tests/examples/RealGHC.lhs" 896 41 896 65 36238 , srcInfoPoints = [] 36239 } 36240 (Var 36241 SrcSpanInfo 36242 { srcInfoSpan = 36243 SrcSpan "tests/examples/RealGHC.lhs" 896 41 896 45 36244 , srcInfoPoints = [] 36245 } 36246 (UnQual 36247 SrcSpanInfo 36248 { srcInfoSpan = 36249 SrcSpan "tests/examples/RealGHC.lhs" 896 41 896 45 36250 , srcInfoPoints = [] 36251 } 36252 (Ident 36253 SrcSpanInfo 36254 { srcInfoSpan = 36255 SrcSpan 36256 "tests/examples/RealGHC.lhs" 896 41 896 45 36257 , srcInfoPoints = [] 36258 } 36259 "text"))) 36260 (Lit 36261 SrcSpanInfo 36262 { srcInfoSpan = 36263 SrcSpan "tests/examples/RealGHC.lhs" 896 46 896 65 36264 , srcInfoPoints = [] 36265 } 36266 (String 36267 SrcSpanInfo 36268 { srcInfoSpan = 36269 SrcSpan "tests/examples/RealGHC.lhs" 896 46 896 65 36270 , srcInfoPoints = [] 36271 } 36272 "too few arguments" 36273 "too few arguments"))) 36274 , GuardedRhs 36275 SrcSpanInfo 36276 { srcInfoSpan = 36277 SrcSpan "tests/examples/RealGHC.lhs" 897 9 897 66 36278 , srcInfoPoints = 36279 [ SrcSpan "tests/examples/RealGHC.lhs" 897 9 897 10 36280 , SrcSpan "tests/examples/RealGHC.lhs" 897 39 897 40 36281 ] 36282 } 36283 [ Qualifier 36284 SrcSpanInfo 36285 { srcInfoSpan = 36286 SrcSpan "tests/examples/RealGHC.lhs" 897 11 897 38 36287 , srcInfoPoints = [] 36288 } 36289 (InfixApp 36290 SrcSpanInfo 36291 { srcInfoSpan = 36292 SrcSpan "tests/examples/RealGHC.lhs" 897 11 897 38 36293 , srcInfoPoints = [] 36294 } 36295 (Var 36296 SrcSpanInfo 36297 { srcInfoSpan = 36298 SrcSpan 36299 "tests/examples/RealGHC.lhs" 897 11 897 23 36300 , srcInfoPoints = [] 36301 } 36302 (UnQual 36303 SrcSpanInfo 36304 { srcInfoSpan = 36305 SrcSpan 36306 "tests/examples/RealGHC.lhs" 897 11 897 23 36307 , srcInfoPoints = [] 36308 } 36309 (Ident 36310 SrcSpanInfo 36311 { srcInfoSpan = 36312 SrcSpan 36313 "tests/examples/RealGHC.lhs" 36314 897 36315 11 36316 897 36317 23 36318 , srcInfoPoints = [] 36319 } 36320 "n_mismatches"))) 36321 (QVarOp 36322 SrcSpanInfo 36323 { srcInfoSpan = 36324 SrcSpan 36325 "tests/examples/RealGHC.lhs" 897 24 897 26 36326 , srcInfoPoints = [] 36327 } 36328 (UnQual 36329 SrcSpanInfo 36330 { srcInfoSpan = 36331 SrcSpan 36332 "tests/examples/RealGHC.lhs" 897 24 897 26 36333 , srcInfoPoints = [] 36334 } 36335 (Symbol 36336 SrcSpanInfo 36337 { srcInfoSpan = 36338 SrcSpan 36339 "tests/examples/RealGHC.lhs" 36340 897 36341 24 36342 897 36343 26 36344 , srcInfoPoints = [] 36345 } 36346 "=="))) 36347 (Var 36348 SrcSpanInfo 36349 { srcInfoSpan = 36350 SrcSpan 36351 "tests/examples/RealGHC.lhs" 897 27 897 38 36352 , srcInfoPoints = [] 36353 } 36354 (UnQual 36355 SrcSpanInfo 36356 { srcInfoSpan = 36357 SrcSpan 36358 "tests/examples/RealGHC.lhs" 897 27 897 38 36359 , srcInfoPoints = [] 36360 } 36361 (Ident 36362 SrcSpanInfo 36363 { srcInfoSpan = 36364 SrcSpan 36365 "tests/examples/RealGHC.lhs" 36366 897 36367 27 36368 897 36369 38 36370 , srcInfoPoints = [] 36371 } 36372 "n_rule_args")))) 36373 ] 36374 (App 36375 SrcSpanInfo 36376 { srcInfoSpan = 36377 SrcSpan "tests/examples/RealGHC.lhs" 897 41 897 66 36378 , srcInfoPoints = [] 36379 } 36380 (Var 36381 SrcSpanInfo 36382 { srcInfoSpan = 36383 SrcSpan "tests/examples/RealGHC.lhs" 897 41 897 45 36384 , srcInfoPoints = [] 36385 } 36386 (UnQual 36387 SrcSpanInfo 36388 { srcInfoSpan = 36389 SrcSpan "tests/examples/RealGHC.lhs" 897 41 897 45 36390 , srcInfoPoints = [] 36391 } 36392 (Ident 36393 SrcSpanInfo 36394 { srcInfoSpan = 36395 SrcSpan 36396 "tests/examples/RealGHC.lhs" 897 41 897 45 36397 , srcInfoPoints = [] 36398 } 36399 "text"))) 36400 (Lit 36401 SrcSpanInfo 36402 { srcInfoSpan = 36403 SrcSpan "tests/examples/RealGHC.lhs" 897 46 897 66 36404 , srcInfoPoints = [] 36405 } 36406 (String 36407 SrcSpanInfo 36408 { srcInfoSpan = 36409 SrcSpan "tests/examples/RealGHC.lhs" 897 46 897 66 36410 , srcInfoPoints = [] 36411 } 36412 "no arguments match" 36413 "no arguments match"))) 36414 , GuardedRhs 36415 SrcSpanInfo 36416 { srcInfoSpan = 36417 SrcSpan "tests/examples/RealGHC.lhs" 898 9 898 119 36418 , srcInfoPoints = 36419 [ SrcSpan "tests/examples/RealGHC.lhs" 898 9 898 10 36420 , SrcSpan "tests/examples/RealGHC.lhs" 898 35 898 36 36421 ] 36422 } 36423 [ Qualifier 36424 SrcSpanInfo 36425 { srcInfoSpan = 36426 SrcSpan "tests/examples/RealGHC.lhs" 898 11 898 28 36427 , srcInfoPoints = [] 36428 } 36429 (InfixApp 36430 SrcSpanInfo 36431 { srcInfoSpan = 36432 SrcSpan "tests/examples/RealGHC.lhs" 898 11 898 28 36433 , srcInfoPoints = [] 36434 } 36435 (Var 36436 SrcSpanInfo 36437 { srcInfoSpan = 36438 SrcSpan 36439 "tests/examples/RealGHC.lhs" 898 11 898 23 36440 , srcInfoPoints = [] 36441 } 36442 (UnQual 36443 SrcSpanInfo 36444 { srcInfoSpan = 36445 SrcSpan 36446 "tests/examples/RealGHC.lhs" 898 11 898 23 36447 , srcInfoPoints = [] 36448 } 36449 (Ident 36450 SrcSpanInfo 36451 { srcInfoSpan = 36452 SrcSpan 36453 "tests/examples/RealGHC.lhs" 36454 898 36455 11 36456 898 36457 23 36458 , srcInfoPoints = [] 36459 } 36460 "n_mismatches"))) 36461 (QVarOp 36462 SrcSpanInfo 36463 { srcInfoSpan = 36464 SrcSpan 36465 "tests/examples/RealGHC.lhs" 898 24 898 26 36466 , srcInfoPoints = [] 36467 } 36468 (UnQual 36469 SrcSpanInfo 36470 { srcInfoSpan = 36471 SrcSpan 36472 "tests/examples/RealGHC.lhs" 898 24 898 26 36473 , srcInfoPoints = [] 36474 } 36475 (Symbol 36476 SrcSpanInfo 36477 { srcInfoSpan = 36478 SrcSpan 36479 "tests/examples/RealGHC.lhs" 36480 898 36481 24 36482 898 36483 26 36484 , srcInfoPoints = [] 36485 } 36486 "=="))) 36487 (Lit 36488 SrcSpanInfo 36489 { srcInfoSpan = 36490 SrcSpan 36491 "tests/examples/RealGHC.lhs" 898 27 898 28 36492 , srcInfoPoints = [] 36493 } 36494 (Int 36495 SrcSpanInfo 36496 { srcInfoSpan = 36497 SrcSpan 36498 "tests/examples/RealGHC.lhs" 898 27 898 28 36499 , srcInfoPoints = [] 36500 } 36501 0 36502 "0"))) 36503 ] 36504 (App 36505 SrcSpanInfo 36506 { srcInfoSpan = 36507 SrcSpan "tests/examples/RealGHC.lhs" 898 37 898 119 36508 , srcInfoPoints = [] 36509 } 36510 (Var 36511 SrcSpanInfo 36512 { srcInfoSpan = 36513 SrcSpan "tests/examples/RealGHC.lhs" 898 37 898 41 36514 , srcInfoPoints = [] 36515 } 36516 (UnQual 36517 SrcSpanInfo 36518 { srcInfoSpan = 36519 SrcSpan "tests/examples/RealGHC.lhs" 898 37 898 41 36520 , srcInfoPoints = [] 36521 } 36522 (Ident 36523 SrcSpanInfo 36524 { srcInfoSpan = 36525 SrcSpan 36526 "tests/examples/RealGHC.lhs" 898 37 898 41 36527 , srcInfoPoints = [] 36528 } 36529 "text"))) 36530 (Lit 36531 SrcSpanInfo 36532 { srcInfoSpan = 36533 SrcSpan "tests/examples/RealGHC.lhs" 898 42 898 119 36534 , srcInfoPoints = [] 36535 } 36536 (String 36537 SrcSpanInfo 36538 { srcInfoSpan = 36539 SrcSpan 36540 "tests/examples/RealGHC.lhs" 898 42 898 119 36541 , srcInfoPoints = [] 36542 } 36543 "all arguments match (considered individually), but rule as a whole does not" 36544 "all arguments match (considered individually), but rule as a whole does not"))) 36545 , GuardedRhs 36546 SrcSpanInfo 36547 { srcInfoSpan = 36548 SrcSpan "tests/examples/RealGHC.lhs" 899 9 899 105 36549 , srcInfoPoints = 36550 [ SrcSpan "tests/examples/RealGHC.lhs" 899 9 899 10 36551 , SrcSpan "tests/examples/RealGHC.lhs" 899 31 899 32 36552 ] 36553 } 36554 [ Qualifier 36555 SrcSpanInfo 36556 { srcInfoSpan = 36557 SrcSpan "tests/examples/RealGHC.lhs" 899 11 899 20 36558 , srcInfoPoints = [] 36559 } 36560 (Var 36561 SrcSpanInfo 36562 { srcInfoSpan = 36563 SrcSpan "tests/examples/RealGHC.lhs" 899 11 899 20 36564 , srcInfoPoints = [] 36565 } 36566 (UnQual 36567 SrcSpanInfo 36568 { srcInfoSpan = 36569 SrcSpan 36570 "tests/examples/RealGHC.lhs" 899 11 899 20 36571 , srcInfoPoints = [] 36572 } 36573 (Ident 36574 SrcSpanInfo 36575 { srcInfoSpan = 36576 SrcSpan 36577 "tests/examples/RealGHC.lhs" 899 11 899 20 36578 , srcInfoPoints = [] 36579 } 36580 "otherwise"))) 36581 ] 36582 (InfixApp 36583 SrcSpanInfo 36584 { srcInfoSpan = 36585 SrcSpan "tests/examples/RealGHC.lhs" 899 33 899 105 36586 , srcInfoPoints = [] 36587 } 36588 (InfixApp 36589 SrcSpanInfo 36590 { srcInfoSpan = 36591 SrcSpan "tests/examples/RealGHC.lhs" 899 33 899 68 36592 , srcInfoPoints = [] 36593 } 36594 (App 36595 SrcSpanInfo 36596 { srcInfoSpan = 36597 SrcSpan "tests/examples/RealGHC.lhs" 899 33 899 49 36598 , srcInfoPoints = [] 36599 } 36600 (Var 36601 SrcSpanInfo 36602 { srcInfoSpan = 36603 SrcSpan 36604 "tests/examples/RealGHC.lhs" 899 33 899 37 36605 , srcInfoPoints = [] 36606 } 36607 (UnQual 36608 SrcSpanInfo 36609 { srcInfoSpan = 36610 SrcSpan 36611 "tests/examples/RealGHC.lhs" 899 33 899 37 36612 , srcInfoPoints = [] 36613 } 36614 (Ident 36615 SrcSpanInfo 36616 { srcInfoSpan = 36617 SrcSpan 36618 "tests/examples/RealGHC.lhs" 36619 899 36620 33 36621 899 36622 37 36623 , srcInfoPoints = [] 36624 } 36625 "text"))) 36626 (Lit 36627 SrcSpanInfo 36628 { srcInfoSpan = 36629 SrcSpan 36630 "tests/examples/RealGHC.lhs" 899 38 899 49 36631 , srcInfoPoints = [] 36632 } 36633 (String 36634 SrcSpanInfo 36635 { srcInfoSpan = 36636 SrcSpan 36637 "tests/examples/RealGHC.lhs" 899 38 899 49 36638 , srcInfoPoints = [] 36639 } 36640 "arguments" 36641 "arguments"))) 36642 (QVarOp 36643 SrcSpanInfo 36644 { srcInfoSpan = 36645 SrcSpan "tests/examples/RealGHC.lhs" 899 50 899 53 36646 , srcInfoPoints = [] 36647 } 36648 (UnQual 36649 SrcSpanInfo 36650 { srcInfoSpan = 36651 SrcSpan 36652 "tests/examples/RealGHC.lhs" 899 50 899 53 36653 , srcInfoPoints = [] 36654 } 36655 (Symbol 36656 SrcSpanInfo 36657 { srcInfoSpan = 36658 SrcSpan 36659 "tests/examples/RealGHC.lhs" 899 50 899 53 36660 , srcInfoPoints = [] 36661 } 36662 "<+>"))) 36663 (App 36664 SrcSpanInfo 36665 { srcInfoSpan = 36666 SrcSpan "tests/examples/RealGHC.lhs" 899 54 899 68 36667 , srcInfoPoints = [] 36668 } 36669 (Var 36670 SrcSpanInfo 36671 { srcInfoSpan = 36672 SrcSpan 36673 "tests/examples/RealGHC.lhs" 899 54 899 57 36674 , srcInfoPoints = [] 36675 } 36676 (UnQual 36677 SrcSpanInfo 36678 { srcInfoSpan = 36679 SrcSpan 36680 "tests/examples/RealGHC.lhs" 899 54 899 57 36681 , srcInfoPoints = [] 36682 } 36683 (Ident 36684 SrcSpanInfo 36685 { srcInfoSpan = 36686 SrcSpan 36687 "tests/examples/RealGHC.lhs" 36688 899 36689 54 36690 899 36691 57 36692 , srcInfoPoints = [] 36693 } 36694 "ppr"))) 36695 (Var 36696 SrcSpanInfo 36697 { srcInfoSpan = 36698 SrcSpan 36699 "tests/examples/RealGHC.lhs" 899 58 899 68 36700 , srcInfoPoints = [] 36701 } 36702 (UnQual 36703 SrcSpanInfo 36704 { srcInfoSpan = 36705 SrcSpan 36706 "tests/examples/RealGHC.lhs" 899 58 899 68 36707 , srcInfoPoints = [] 36708 } 36709 (Ident 36710 SrcSpanInfo 36711 { srcInfoSpan = 36712 SrcSpan 36713 "tests/examples/RealGHC.lhs" 36714 899 36715 58 36716 899 36717 68 36718 , srcInfoPoints = [] 36719 } 36720 "mismatches"))))) 36721 (QVarOp 36722 SrcSpanInfo 36723 { srcInfoSpan = 36724 SrcSpan "tests/examples/RealGHC.lhs" 899 69 899 72 36725 , srcInfoPoints = [] 36726 } 36727 (UnQual 36728 SrcSpanInfo 36729 { srcInfoSpan = 36730 SrcSpan "tests/examples/RealGHC.lhs" 899 69 899 72 36731 , srcInfoPoints = [] 36732 } 36733 (Symbol 36734 SrcSpanInfo 36735 { srcInfoSpan = 36736 SrcSpan 36737 "tests/examples/RealGHC.lhs" 899 69 899 72 36738 , srcInfoPoints = [] 36739 } 36740 "<+>"))) 36741 (App 36742 SrcSpanInfo 36743 { srcInfoSpan = 36744 SrcSpan "tests/examples/RealGHC.lhs" 899 73 899 105 36745 , srcInfoPoints = [] 36746 } 36747 (Var 36748 SrcSpanInfo 36749 { srcInfoSpan = 36750 SrcSpan "tests/examples/RealGHC.lhs" 899 73 899 77 36751 , srcInfoPoints = [] 36752 } 36753 (UnQual 36754 SrcSpanInfo 36755 { srcInfoSpan = 36756 SrcSpan 36757 "tests/examples/RealGHC.lhs" 899 73 899 77 36758 , srcInfoPoints = [] 36759 } 36760 (Ident 36761 SrcSpanInfo 36762 { srcInfoSpan = 36763 SrcSpan 36764 "tests/examples/RealGHC.lhs" 899 73 899 77 36765 , srcInfoPoints = [] 36766 } 36767 "text"))) 36768 (Lit 36769 SrcSpanInfo 36770 { srcInfoSpan = 36771 SrcSpan 36772 "tests/examples/RealGHC.lhs" 899 78 899 105 36773 , srcInfoPoints = [] 36774 } 36775 (String 36776 SrcSpanInfo 36777 { srcInfoSpan = 36778 SrcSpan 36779 "tests/examples/RealGHC.lhs" 899 78 899 105 36780 , srcInfoPoints = [] 36781 } 36782 "do not match (1-indexing)" 36783 "do not match (1-indexing)")))) 36784 ]) 36785 (Just 36786 (BDecls 36787 SrcSpanInfo 36788 { srcInfoSpan = 36789 SrcSpan "tests/examples/RealGHC.lhs" 901 11 911 59 36790 , srcInfoPoints = 36791 [ SrcSpan "tests/examples/RealGHC.lhs" 901 11 901 11 36792 , SrcSpan "tests/examples/RealGHC.lhs" 902 11 902 11 36793 , SrcSpan "tests/examples/RealGHC.lhs" 903 11 903 11 36794 , SrcSpan "tests/examples/RealGHC.lhs" 906 11 906 11 36795 , SrcSpan "tests/examples/RealGHC.lhs" 907 11 907 11 36796 , SrcSpan "tests/examples/RealGHC.lhs" 915 1 915 0 36797 ] 36798 } 36799 [ PatBind 36800 SrcSpanInfo 36801 { srcInfoSpan = 36802 SrcSpan "tests/examples/RealGHC.lhs" 901 11 901 42 36803 , srcInfoPoints = [] 36804 } 36805 (PVar 36806 SrcSpanInfo 36807 { srcInfoSpan = 36808 SrcSpan "tests/examples/RealGHC.lhs" 901 11 901 22 36809 , srcInfoPoints = [] 36810 } 36811 (Ident 36812 SrcSpanInfo 36813 { srcInfoSpan = 36814 SrcSpan "tests/examples/RealGHC.lhs" 901 11 901 22 36815 , srcInfoPoints = [] 36816 } 36817 "n_rule_args")) 36818 (UnGuardedRhs 36819 SrcSpanInfo 36820 { srcInfoSpan = 36821 SrcSpan "tests/examples/RealGHC.lhs" 901 24 901 42 36822 , srcInfoPoints = 36823 [ SrcSpan "tests/examples/RealGHC.lhs" 901 24 901 25 36824 ] 36825 } 36826 (App 36827 SrcSpanInfo 36828 { srcInfoSpan = 36829 SrcSpan "tests/examples/RealGHC.lhs" 901 26 901 42 36830 , srcInfoPoints = [] 36831 } 36832 (Var 36833 SrcSpanInfo 36834 { srcInfoSpan = 36835 SrcSpan 36836 "tests/examples/RealGHC.lhs" 901 26 901 32 36837 , srcInfoPoints = [] 36838 } 36839 (UnQual 36840 SrcSpanInfo 36841 { srcInfoSpan = 36842 SrcSpan 36843 "tests/examples/RealGHC.lhs" 901 26 901 32 36844 , srcInfoPoints = [] 36845 } 36846 (Ident 36847 SrcSpanInfo 36848 { srcInfoSpan = 36849 SrcSpan 36850 "tests/examples/RealGHC.lhs" 36851 901 36852 26 36853 901 36854 32 36855 , srcInfoPoints = [] 36856 } 36857 "length"))) 36858 (Var 36859 SrcSpanInfo 36860 { srcInfoSpan = 36861 SrcSpan 36862 "tests/examples/RealGHC.lhs" 901 33 901 42 36863 , srcInfoPoints = [] 36864 } 36865 (UnQual 36866 SrcSpanInfo 36867 { srcInfoSpan = 36868 SrcSpan 36869 "tests/examples/RealGHC.lhs" 901 33 901 42 36870 , srcInfoPoints = [] 36871 } 36872 (Ident 36873 SrcSpanInfo 36874 { srcInfoSpan = 36875 SrcSpan 36876 "tests/examples/RealGHC.lhs" 36877 901 36878 33 36879 901 36880 42 36881 , srcInfoPoints = [] 36882 } 36883 "rule_args"))))) 36884 Nothing 36885 , PatBind 36886 SrcSpanInfo 36887 { srcInfoSpan = 36888 SrcSpan "tests/examples/RealGHC.lhs" 902 11 902 43 36889 , srcInfoPoints = [] 36890 } 36891 (PVar 36892 SrcSpanInfo 36893 { srcInfoSpan = 36894 SrcSpan "tests/examples/RealGHC.lhs" 902 11 902 23 36895 , srcInfoPoints = [] 36896 } 36897 (Ident 36898 SrcSpanInfo 36899 { srcInfoSpan = 36900 SrcSpan "tests/examples/RealGHC.lhs" 902 11 902 23 36901 , srcInfoPoints = [] 36902 } 36903 "n_mismatches")) 36904 (UnGuardedRhs 36905 SrcSpanInfo 36906 { srcInfoSpan = 36907 SrcSpan "tests/examples/RealGHC.lhs" 902 24 902 43 36908 , srcInfoPoints = 36909 [ SrcSpan "tests/examples/RealGHC.lhs" 902 24 902 25 36910 ] 36911 } 36912 (App 36913 SrcSpanInfo 36914 { srcInfoSpan = 36915 SrcSpan "tests/examples/RealGHC.lhs" 902 26 902 43 36916 , srcInfoPoints = [] 36917 } 36918 (Var 36919 SrcSpanInfo 36920 { srcInfoSpan = 36921 SrcSpan 36922 "tests/examples/RealGHC.lhs" 902 26 902 32 36923 , srcInfoPoints = [] 36924 } 36925 (UnQual 36926 SrcSpanInfo 36927 { srcInfoSpan = 36928 SrcSpan 36929 "tests/examples/RealGHC.lhs" 902 26 902 32 36930 , srcInfoPoints = [] 36931 } 36932 (Ident 36933 SrcSpanInfo 36934 { srcInfoSpan = 36935 SrcSpan 36936 "tests/examples/RealGHC.lhs" 36937 902 36938 26 36939 902 36940 32 36941 , srcInfoPoints = [] 36942 } 36943 "length"))) 36944 (Var 36945 SrcSpanInfo 36946 { srcInfoSpan = 36947 SrcSpan 36948 "tests/examples/RealGHC.lhs" 902 33 902 43 36949 , srcInfoPoints = [] 36950 } 36951 (UnQual 36952 SrcSpanInfo 36953 { srcInfoSpan = 36954 SrcSpan 36955 "tests/examples/RealGHC.lhs" 902 33 902 43 36956 , srcInfoPoints = [] 36957 } 36958 (Ident 36959 SrcSpanInfo 36960 { srcInfoSpan = 36961 SrcSpan 36962 "tests/examples/RealGHC.lhs" 36963 902 36964 33 36965 902 36966 43 36967 , srcInfoPoints = [] 36968 } 36969 "mismatches"))))) 36970 Nothing 36971 , PatBind 36972 SrcSpanInfo 36973 { srcInfoSpan = 36974 SrcSpan "tests/examples/RealGHC.lhs" 903 11 904 72 36975 , srcInfoPoints = [] 36976 } 36977 (PVar 36978 SrcSpanInfo 36979 { srcInfoSpan = 36980 SrcSpan "tests/examples/RealGHC.lhs" 903 11 903 21 36981 , srcInfoPoints = [] 36982 } 36983 (Ident 36984 SrcSpanInfo 36985 { srcInfoSpan = 36986 SrcSpan "tests/examples/RealGHC.lhs" 903 11 903 21 36987 , srcInfoPoints = [] 36988 } 36989 "mismatches")) 36990 (UnGuardedRhs 36991 SrcSpanInfo 36992 { srcInfoSpan = 36993 SrcSpan "tests/examples/RealGHC.lhs" 903 24 904 72 36994 , srcInfoPoints = 36995 [ SrcSpan "tests/examples/RealGHC.lhs" 903 24 903 25 36996 ] 36997 } 36998 (ListComp 36999 SrcSpanInfo 37000 { srcInfoSpan = 37001 SrcSpan "tests/examples/RealGHC.lhs" 903 26 904 72 37002 , srcInfoPoints = 37003 [ SrcSpan 37004 "tests/examples/RealGHC.lhs" 903 26 903 27 37005 , SrcSpan 37006 "tests/examples/RealGHC.lhs" 903 29 903 30 37007 , SrcSpan 37008 "tests/examples/RealGHC.lhs" 903 76 903 77 37009 , SrcSpan 37010 "tests/examples/RealGHC.lhs" 904 71 904 72 37011 ] 37012 } 37013 (Var 37014 SrcSpanInfo 37015 { srcInfoSpan = 37016 SrcSpan 37017 "tests/examples/RealGHC.lhs" 903 27 903 28 37018 , srcInfoPoints = [] 37019 } 37020 (UnQual 37021 SrcSpanInfo 37022 { srcInfoSpan = 37023 SrcSpan 37024 "tests/examples/RealGHC.lhs" 903 27 903 28 37025 , srcInfoPoints = [] 37026 } 37027 (Ident 37028 SrcSpanInfo 37029 { srcInfoSpan = 37030 SrcSpan 37031 "tests/examples/RealGHC.lhs" 37032 903 37033 27 37034 903 37035 28 37036 , srcInfoPoints = [] 37037 } 37038 "i"))) 37039 [ QualStmt 37040 SrcSpanInfo 37041 { srcInfoSpan = 37042 SrcSpan 37043 "tests/examples/RealGHC.lhs" 903 31 903 76 37044 , srcInfoPoints = 37045 [ SrcSpan 37046 "tests/examples/RealGHC.lhs" 903 51 903 53 37047 ] 37048 } 37049 (Generator 37050 SrcSpanInfo 37051 { srcInfoSpan = 37052 SrcSpan 37053 "tests/examples/RealGHC.lhs" 37054 903 37055 31 37056 903 37057 76 37058 , srcInfoPoints = 37059 [ SrcSpan 37060 "tests/examples/RealGHC.lhs" 37061 903 37062 51 37063 903 37064 53 37065 ] 37066 } 37067 (PTuple 37068 SrcSpanInfo 37069 { srcInfoSpan = 37070 SrcSpan 37071 "tests/examples/RealGHC.lhs" 37072 903 37073 31 37074 903 37075 50 37076 , srcInfoPoints = 37077 [ SrcSpan 37078 "tests/examples/RealGHC.lhs" 37079 903 37080 31 37081 903 37082 32 37083 , SrcSpan 37084 "tests/examples/RealGHC.lhs" 37085 903 37086 40 37087 903 37088 41 37089 , SrcSpan 37090 "tests/examples/RealGHC.lhs" 37091 903 37092 49 37093 903 37094 50 37095 ] 37096 } 37097 Boxed 37098 [ PVar 37099 SrcSpanInfo 37100 { srcInfoSpan = 37101 SrcSpan 37102 "tests/examples/RealGHC.lhs" 37103 903 37104 32 37105 903 37106 40 37107 , srcInfoPoints = [] 37108 } 37109 (Ident 37110 SrcSpanInfo 37111 { srcInfoSpan = 37112 SrcSpan 37113 "tests/examples/RealGHC.lhs" 37114 903 37115 32 37116 903 37117 40 37118 , srcInfoPoints = [] 37119 } 37120 "rule_arg") 37121 , PTuple 37122 SrcSpanInfo 37123 { srcInfoSpan = 37124 SrcSpan 37125 "tests/examples/RealGHC.lhs" 37126 903 37127 42 37128 903 37129 49 37130 , srcInfoPoints = 37131 [ SrcSpan 37132 "tests/examples/RealGHC.lhs" 37133 903 37134 42 37135 903 37136 43 37137 , SrcSpan 37138 "tests/examples/RealGHC.lhs" 37139 903 37140 46 37141 903 37142 47 37143 , SrcSpan 37144 "tests/examples/RealGHC.lhs" 37145 903 37146 48 37147 903 37148 49 37149 ] 37150 } 37151 Boxed 37152 [ PVar 37153 SrcSpanInfo 37154 { srcInfoSpan = 37155 SrcSpan 37156 "tests/examples/RealGHC.lhs" 37157 903 37158 43 37159 903 37160 46 37161 , srcInfoPoints = [] 37162 } 37163 (Ident 37164 SrcSpanInfo 37165 { srcInfoSpan = 37166 SrcSpan 37167 "tests/examples/RealGHC.lhs" 37168 903 37169 43 37170 903 37171 46 37172 , srcInfoPoints = [] 37173 } 37174 "arg") 37175 , PVar 37176 SrcSpanInfo 37177 { srcInfoSpan = 37178 SrcSpan 37179 "tests/examples/RealGHC.lhs" 37180 903 37181 47 37182 903 37183 48 37184 , srcInfoPoints = [] 37185 } 37186 (Ident 37187 SrcSpanInfo 37188 { srcInfoSpan = 37189 SrcSpan 37190 "tests/examples/RealGHC.lhs" 37191 903 37192 47 37193 903 37194 48 37195 , srcInfoPoints = [] 37196 } 37197 "i") 37198 ] 37199 ]) 37200 (InfixApp 37201 SrcSpanInfo 37202 { srcInfoSpan = 37203 SrcSpan 37204 "tests/examples/RealGHC.lhs" 37205 903 37206 54 37207 903 37208 76 37209 , srcInfoPoints = [] 37210 } 37211 (Var 37212 SrcSpanInfo 37213 { srcInfoSpan = 37214 SrcSpan 37215 "tests/examples/RealGHC.lhs" 37216 903 37217 54 37218 903 37219 63 37220 , srcInfoPoints = [] 37221 } 37222 (UnQual 37223 SrcSpanInfo 37224 { srcInfoSpan = 37225 SrcSpan 37226 "tests/examples/RealGHC.lhs" 37227 903 37228 54 37229 903 37230 63 37231 , srcInfoPoints = [] 37232 } 37233 (Ident 37234 SrcSpanInfo 37235 { srcInfoSpan = 37236 SrcSpan 37237 "tests/examples/RealGHC.lhs" 37238 903 37239 54 37240 903 37241 63 37242 , srcInfoPoints = [] 37243 } 37244 "rule_args"))) 37245 (QVarOp 37246 SrcSpanInfo 37247 { srcInfoSpan = 37248 SrcSpan 37249 "tests/examples/RealGHC.lhs" 37250 903 37251 64 37252 903 37253 69 37254 , srcInfoPoints = 37255 [ SrcSpan 37256 "tests/examples/RealGHC.lhs" 37257 903 37258 64 37259 903 37260 65 37261 , SrcSpan 37262 "tests/examples/RealGHC.lhs" 37263 903 37264 65 37265 903 37266 68 37267 , SrcSpan 37268 "tests/examples/RealGHC.lhs" 37269 903 37270 68 37271 903 37272 69 37273 ] 37274 } 37275 (UnQual 37276 SrcSpanInfo 37277 { srcInfoSpan = 37278 SrcSpan 37279 "tests/examples/RealGHC.lhs" 37280 903 37281 64 37282 903 37283 69 37284 , srcInfoPoints = 37285 [ SrcSpan 37286 "tests/examples/RealGHC.lhs" 37287 903 37288 64 37289 903 37290 65 37291 , SrcSpan 37292 "tests/examples/RealGHC.lhs" 37293 903 37294 65 37295 903 37296 68 37297 , SrcSpan 37298 "tests/examples/RealGHC.lhs" 37299 903 37300 68 37301 903 37302 69 37303 ] 37304 } 37305 (Ident 37306 SrcSpanInfo 37307 { srcInfoSpan = 37308 SrcSpan 37309 "tests/examples/RealGHC.lhs" 37310 903 37311 65 37312 903 37313 68 37314 , srcInfoPoints = [] 37315 } 37316 "zip"))) 37317 (Var 37318 SrcSpanInfo 37319 { srcInfoSpan = 37320 SrcSpan 37321 "tests/examples/RealGHC.lhs" 37322 903 37323 70 37324 903 37325 76 37326 , srcInfoPoints = [] 37327 } 37328 (UnQual 37329 SrcSpanInfo 37330 { srcInfoSpan = 37331 SrcSpan 37332 "tests/examples/RealGHC.lhs" 37333 903 37334 70 37335 903 37336 76 37337 , srcInfoPoints = [] 37338 } 37339 (Ident 37340 SrcSpanInfo 37341 { srcInfoSpan = 37342 SrcSpan 37343 "tests/examples/RealGHC.lhs" 37344 903 37345 70 37346 903 37347 76 37348 , srcInfoPoints = [] 37349 } 37350 "i_args"))))) 37351 , QualStmt 37352 SrcSpanInfo 37353 { srcInfoSpan = 37354 SrcSpan 37355 "tests/examples/RealGHC.lhs" 904 35 904 71 37356 , srcInfoPoints = [] 37357 } 37358 (Qualifier 37359 SrcSpanInfo 37360 { srcInfoSpan = 37361 SrcSpan 37362 "tests/examples/RealGHC.lhs" 37363 904 37364 35 37365 904 37366 71 37367 , srcInfoPoints = [] 37368 } 37369 (App 37370 SrcSpanInfo 37371 { srcInfoSpan = 37372 SrcSpan 37373 "tests/examples/RealGHC.lhs" 37374 904 37375 35 37376 904 37377 71 37378 , srcInfoPoints = [] 37379 } 37380 (Var 37381 SrcSpanInfo 37382 { srcInfoSpan = 37383 SrcSpan 37384 "tests/examples/RealGHC.lhs" 37385 904 37386 35 37387 904 37388 38 37389 , srcInfoPoints = [] 37390 } 37391 (UnQual 37392 SrcSpanInfo 37393 { srcInfoSpan = 37394 SrcSpan 37395 "tests/examples/RealGHC.lhs" 37396 904 37397 35 37398 904 37399 38 37400 , srcInfoPoints = [] 37401 } 37402 (Ident 37403 SrcSpanInfo 37404 { srcInfoSpan = 37405 SrcSpan 37406 "tests/examples/RealGHC.lhs" 37407 904 37408 35 37409 904 37410 38 37411 , srcInfoPoints = [] 37412 } 37413 "not"))) 37414 (Paren 37415 SrcSpanInfo 37416 { srcInfoSpan = 37417 SrcSpan 37418 "tests/examples/RealGHC.lhs" 37419 904 37420 39 37421 904 37422 71 37423 , srcInfoPoints = 37424 [ SrcSpan 37425 "tests/examples/RealGHC.lhs" 37426 904 37427 39 37428 904 37429 40 37430 , SrcSpan 37431 "tests/examples/RealGHC.lhs" 37432 904 37433 70 37434 904 37435 71 37436 ] 37437 } 37438 (App 37439 SrcSpanInfo 37440 { srcInfoSpan = 37441 SrcSpan 37442 "tests/examples/RealGHC.lhs" 37443 904 37444 40 37445 904 37446 70 37447 , srcInfoPoints = [] 37448 } 37449 (Var 37450 SrcSpanInfo 37451 { srcInfoSpan = 37452 SrcSpan 37453 "tests/examples/RealGHC.lhs" 37454 904 37455 40 37456 904 37457 46 37458 , srcInfoPoints = [] 37459 } 37460 (UnQual 37461 SrcSpanInfo 37462 { srcInfoSpan = 37463 SrcSpan 37464 "tests/examples/RealGHC.lhs" 37465 904 37466 40 37467 904 37468 46 37469 , srcInfoPoints = [] 37470 } 37471 (Ident 37472 SrcSpanInfo 37473 { srcInfoSpan = 37474 SrcSpan 37475 "tests/examples/RealGHC.lhs" 37476 904 37477 40 37478 904 37479 46 37480 , srcInfoPoints = [] 37481 } 37482 "isJust"))) 37483 (Paren 37484 SrcSpanInfo 37485 { srcInfoSpan = 37486 SrcSpan 37487 "tests/examples/RealGHC.lhs" 37488 904 37489 47 37490 904 37491 70 37492 , srcInfoPoints = 37493 [ SrcSpan 37494 "tests/examples/RealGHC.lhs" 37495 904 37496 47 37497 904 37498 48 37499 , SrcSpan 37500 "tests/examples/RealGHC.lhs" 37501 904 37502 69 37503 904 37504 70 37505 ] 37506 } 37507 (App 37508 SrcSpanInfo 37509 { srcInfoSpan = 37510 SrcSpan 37511 "tests/examples/RealGHC.lhs" 37512 904 37513 48 37514 904 37515 69 37516 , srcInfoPoints = [] 37517 } 37518 (App 37519 SrcSpanInfo 37520 { srcInfoSpan = 37521 SrcSpan 37522 "tests/examples/RealGHC.lhs" 37523 904 37524 48 37525 904 37526 65 37527 , srcInfoPoints = [] 37528 } 37529 (Var 37530 SrcSpanInfo 37531 { srcInfoSpan = 37532 SrcSpan 37533 "tests/examples/RealGHC.lhs" 37534 904 37535 48 37536 904 37537 56 37538 , srcInfoPoints = [] 37539 } 37540 (UnQual 37541 SrcSpanInfo 37542 { srcInfoSpan = 37543 SrcSpan 37544 "tests/examples/RealGHC.lhs" 37545 904 37546 48 37547 904 37548 56 37549 , srcInfoPoints = [] 37550 } 37551 (Ident 37552 SrcSpanInfo 37553 { srcInfoSpan = 37554 SrcSpan 37555 "tests/examples/RealGHC.lhs" 37556 904 37557 48 37558 904 37559 56 37560 , srcInfoPoints = [] 37561 } 37562 "match_fn"))) 37563 (Var 37564 SrcSpanInfo 37565 { srcInfoSpan = 37566 SrcSpan 37567 "tests/examples/RealGHC.lhs" 37568 904 37569 57 37570 904 37571 65 37572 , srcInfoPoints = [] 37573 } 37574 (UnQual 37575 SrcSpanInfo 37576 { srcInfoSpan = 37577 SrcSpan 37578 "tests/examples/RealGHC.lhs" 37579 904 37580 57 37581 904 37582 65 37583 , srcInfoPoints = [] 37584 } 37585 (Ident 37586 SrcSpanInfo 37587 { srcInfoSpan = 37588 SrcSpan 37589 "tests/examples/RealGHC.lhs" 37590 904 37591 57 37592 904 37593 65 37594 , srcInfoPoints = [] 37595 } 37596 "rule_arg")))) 37597 (Var 37598 SrcSpanInfo 37599 { srcInfoSpan = 37600 SrcSpan 37601 "tests/examples/RealGHC.lhs" 37602 904 37603 66 37604 904 37605 69 37606 , srcInfoPoints = [] 37607 } 37608 (UnQual 37609 SrcSpanInfo 37610 { srcInfoSpan = 37611 SrcSpan 37612 "tests/examples/RealGHC.lhs" 37613 904 37614 66 37615 904 37616 69 37617 , srcInfoPoints = [] 37618 } 37619 (Ident 37620 SrcSpanInfo 37621 { srcInfoSpan = 37622 SrcSpan 37623 "tests/examples/RealGHC.lhs" 37624 904 37625 66 37626 904 37627 69 37628 , srcInfoPoints = [] 37629 } 37630 "arg"))))))))) 37631 ])) 37632 Nothing 37633 , PatBind 37634 SrcSpanInfo 37635 { srcInfoSpan = 37636 SrcSpan "tests/examples/RealGHC.lhs" 906 11 906 44 37637 , srcInfoPoints = [] 37638 } 37639 (PVar 37640 SrcSpanInfo 37641 { srcInfoSpan = 37642 SrcSpan "tests/examples/RealGHC.lhs" 906 11 906 18 37643 , srcInfoPoints = [] 37644 } 37645 (Ident 37646 SrcSpanInfo 37647 { srcInfoSpan = 37648 SrcSpan "tests/examples/RealGHC.lhs" 906 11 906 18 37649 , srcInfoPoints = [] 37650 } 37651 "lhs_fvs")) 37652 (UnGuardedRhs 37653 SrcSpanInfo 37654 { srcInfoSpan = 37655 SrcSpan "tests/examples/RealGHC.lhs" 906 19 906 44 37656 , srcInfoPoints = 37657 [ SrcSpan "tests/examples/RealGHC.lhs" 906 19 906 20 37658 ] 37659 } 37660 (App 37661 SrcSpanInfo 37662 { srcInfoSpan = 37663 SrcSpan "tests/examples/RealGHC.lhs" 906 21 906 44 37664 , srcInfoPoints = [] 37665 } 37666 (Var 37667 SrcSpanInfo 37668 { srcInfoSpan = 37669 SrcSpan 37670 "tests/examples/RealGHC.lhs" 906 21 906 34 37671 , srcInfoPoints = [] 37672 } 37673 (UnQual 37674 SrcSpanInfo 37675 { srcInfoSpan = 37676 SrcSpan 37677 "tests/examples/RealGHC.lhs" 906 21 906 34 37678 , srcInfoPoints = [] 37679 } 37680 (Ident 37681 SrcSpanInfo 37682 { srcInfoSpan = 37683 SrcSpan 37684 "tests/examples/RealGHC.lhs" 37685 906 37686 21 37687 906 37688 34 37689 , srcInfoPoints = [] 37690 } 37691 "exprsFreeVars"))) 37692 (Var 37693 SrcSpanInfo 37694 { srcInfoSpan = 37695 SrcSpan 37696 "tests/examples/RealGHC.lhs" 906 35 906 44 37697 , srcInfoPoints = [] 37698 } 37699 (UnQual 37700 SrcSpanInfo 37701 { srcInfoSpan = 37702 SrcSpan 37703 "tests/examples/RealGHC.lhs" 906 35 906 44 37704 , srcInfoPoints = [] 37705 } 37706 (Ident 37707 SrcSpanInfo 37708 { srcInfoSpan = 37709 SrcSpan 37710 "tests/examples/RealGHC.lhs" 37711 906 37712 35 37713 906 37714 44 37715 , srcInfoPoints = [] 37716 } 37717 "rule_args"))))) 37718 Nothing 37719 , FunBind 37720 SrcSpanInfo 37721 { srcInfoSpan = 37722 SrcSpan "tests/examples/RealGHC.lhs" 907 11 911 59 37723 , srcInfoPoints = 37724 [ SrcSpan "tests/examples/RealGHC.lhs" 908 13 908 18 ] 37725 } 37726 [ Match 37727 SrcSpanInfo 37728 { srcInfoSpan = 37729 SrcSpan "tests/examples/RealGHC.lhs" 907 11 911 59 37730 , srcInfoPoints = 37731 [ SrcSpan "tests/examples/RealGHC.lhs" 908 13 908 18 37732 ] 37733 } 37734 (Ident 37735 SrcSpanInfo 37736 { srcInfoSpan = 37737 SrcSpan 37738 "tests/examples/RealGHC.lhs" 907 11 907 19 37739 , srcInfoPoints = [] 37740 } 37741 "match_fn") 37742 [ PVar 37743 SrcSpanInfo 37744 { srcInfoSpan = 37745 SrcSpan 37746 "tests/examples/RealGHC.lhs" 907 20 907 28 37747 , srcInfoPoints = [] 37748 } 37749 (Ident 37750 SrcSpanInfo 37751 { srcInfoSpan = 37752 SrcSpan 37753 "tests/examples/RealGHC.lhs" 907 20 907 28 37754 , srcInfoPoints = [] 37755 } 37756 "rule_arg") 37757 , PVar 37758 SrcSpanInfo 37759 { srcInfoSpan = 37760 SrcSpan 37761 "tests/examples/RealGHC.lhs" 907 29 907 32 37762 , srcInfoPoints = [] 37763 } 37764 (Ident 37765 SrcSpanInfo 37766 { srcInfoSpan = 37767 SrcSpan 37768 "tests/examples/RealGHC.lhs" 907 29 907 32 37769 , srcInfoPoints = [] 37770 } 37771 "arg") 37772 ] 37773 (UnGuardedRhs 37774 SrcSpanInfo 37775 { srcInfoSpan = 37776 SrcSpan 37777 "tests/examples/RealGHC.lhs" 907 33 907 72 37778 , srcInfoPoints = 37779 [ SrcSpan 37780 "tests/examples/RealGHC.lhs" 907 33 907 34 37781 ] 37782 } 37783 (App 37784 SrcSpanInfo 37785 { srcInfoSpan = 37786 SrcSpan 37787 "tests/examples/RealGHC.lhs" 907 35 907 72 37788 , srcInfoPoints = [] 37789 } 37790 (App 37791 SrcSpanInfo 37792 { srcInfoSpan = 37793 SrcSpan 37794 "tests/examples/RealGHC.lhs" 37795 907 37796 35 37797 907 37798 68 37799 , srcInfoPoints = [] 37800 } 37801 (App 37802 SrcSpanInfo 37803 { srcInfoSpan = 37804 SrcSpan 37805 "tests/examples/RealGHC.lhs" 37806 907 37807 35 37808 907 37809 59 37810 , srcInfoPoints = [] 37811 } 37812 (App 37813 SrcSpanInfo 37814 { srcInfoSpan = 37815 SrcSpan 37816 "tests/examples/RealGHC.lhs" 37817 907 37818 35 37819 907 37820 45 37821 , srcInfoPoints = [] 37822 } 37823 (Var 37824 SrcSpanInfo 37825 { srcInfoSpan = 37826 SrcSpan 37827 "tests/examples/RealGHC.lhs" 37828 907 37829 35 37830 907 37831 40 37832 , srcInfoPoints = [] 37833 } 37834 (UnQual 37835 SrcSpanInfo 37836 { srcInfoSpan = 37837 SrcSpan 37838 "tests/examples/RealGHC.lhs" 37839 907 37840 35 37841 907 37842 40 37843 , srcInfoPoints = [] 37844 } 37845 (Ident 37846 SrcSpanInfo 37847 { srcInfoSpan = 37848 SrcSpan 37849 "tests/examples/RealGHC.lhs" 37850 907 37851 35 37852 907 37853 40 37854 , srcInfoPoints = [] 37855 } 37856 "match"))) 37857 (Var 37858 SrcSpanInfo 37859 { srcInfoSpan = 37860 SrcSpan 37861 "tests/examples/RealGHC.lhs" 37862 907 37863 41 37864 907 37865 45 37866 , srcInfoPoints = [] 37867 } 37868 (UnQual 37869 SrcSpanInfo 37870 { srcInfoSpan = 37871 SrcSpan 37872 "tests/examples/RealGHC.lhs" 37873 907 37874 41 37875 907 37876 45 37877 , srcInfoPoints = [] 37878 } 37879 (Ident 37880 SrcSpanInfo 37881 { srcInfoSpan = 37882 SrcSpan 37883 "tests/examples/RealGHC.lhs" 37884 907 37885 41 37886 907 37887 45 37888 , srcInfoPoints = [] 37889 } 37890 "menv")))) 37891 (Var 37892 SrcSpanInfo 37893 { srcInfoSpan = 37894 SrcSpan 37895 "tests/examples/RealGHC.lhs" 37896 907 37897 46 37898 907 37899 59 37900 , srcInfoPoints = [] 37901 } 37902 (UnQual 37903 SrcSpanInfo 37904 { srcInfoSpan = 37905 SrcSpan 37906 "tests/examples/RealGHC.lhs" 37907 907 37908 46 37909 907 37910 59 37911 , srcInfoPoints = [] 37912 } 37913 (Ident 37914 SrcSpanInfo 37915 { srcInfoSpan = 37916 SrcSpan 37917 "tests/examples/RealGHC.lhs" 37918 907 37919 46 37920 907 37921 59 37922 , srcInfoPoints = [] 37923 } 37924 "emptySubstEnv")))) 37925 (Var 37926 SrcSpanInfo 37927 { srcInfoSpan = 37928 SrcSpan 37929 "tests/examples/RealGHC.lhs" 37930 907 37931 60 37932 907 37933 68 37934 , srcInfoPoints = [] 37935 } 37936 (UnQual 37937 SrcSpanInfo 37938 { srcInfoSpan = 37939 SrcSpan 37940 "tests/examples/RealGHC.lhs" 37941 907 37942 60 37943 907 37944 68 37945 , srcInfoPoints = [] 37946 } 37947 (Ident 37948 SrcSpanInfo 37949 { srcInfoSpan = 37950 SrcSpan 37951 "tests/examples/RealGHC.lhs" 37952 907 37953 60 37954 907 37955 68 37956 , srcInfoPoints = [] 37957 } 37958 "rule_arg")))) 37959 (Var 37960 SrcSpanInfo 37961 { srcInfoSpan = 37962 SrcSpan 37963 "tests/examples/RealGHC.lhs" 37964 907 37965 69 37966 907 37967 72 37968 , srcInfoPoints = [] 37969 } 37970 (UnQual 37971 SrcSpanInfo 37972 { srcInfoSpan = 37973 SrcSpan 37974 "tests/examples/RealGHC.lhs" 37975 907 37976 69 37977 907 37978 72 37979 , srcInfoPoints = [] 37980 } 37981 (Ident 37982 SrcSpanInfo 37983 { srcInfoSpan = 37984 SrcSpan 37985 "tests/examples/RealGHC.lhs" 37986 907 37987 69 37988 907 37989 72 37990 , srcInfoPoints = [] 37991 } 37992 "arg"))))) 37993 (Just 37994 (BDecls 37995 SrcSpanInfo 37996 { srcInfoSpan = 37997 SrcSpan 37998 "tests/examples/RealGHC.lhs" 909 15 911 59 37999 , srcInfoPoints = 38000 [ SrcSpan 38001 "tests/examples/RealGHC.lhs" 909 15 909 15 38002 , SrcSpan 38003 "tests/examples/RealGHC.lhs" 910 15 910 15 38004 , SrcSpan 38005 "tests/examples/RealGHC.lhs" 915 1 915 0 38006 ] 38007 } 38008 [ PatBind 38009 SrcSpanInfo 38010 { srcInfoSpan = 38011 SrcSpan 38012 "tests/examples/RealGHC.lhs" 38013 909 38014 15 38015 909 38016 64 38017 , srcInfoPoints = [] 38018 } 38019 (PVar 38020 SrcSpanInfo 38021 { srcInfoSpan = 38022 SrcSpan 38023 "tests/examples/RealGHC.lhs" 38024 909 38025 15 38026 909 38027 23 38028 , srcInfoPoints = [] 38029 } 38030 (Ident 38031 SrcSpanInfo 38032 { srcInfoSpan = 38033 SrcSpan 38034 "tests/examples/RealGHC.lhs" 38035 909 38036 15 38037 909 38038 23 38039 , srcInfoPoints = [] 38040 } 38041 "in_scope")) 38042 (UnGuardedRhs 38043 SrcSpanInfo 38044 { srcInfoSpan = 38045 SrcSpan 38046 "tests/examples/RealGHC.lhs" 38047 909 38048 24 38049 909 38050 64 38051 , srcInfoPoints = 38052 [ SrcSpan 38053 "tests/examples/RealGHC.lhs" 38054 909 38055 24 38056 909 38057 25 38058 ] 38059 } 38060 (InfixApp 38061 SrcSpanInfo 38062 { srcInfoSpan = 38063 SrcSpan 38064 "tests/examples/RealGHC.lhs" 38065 909 38066 26 38067 909 38068 64 38069 , srcInfoPoints = [] 38070 } 38071 (Var 38072 SrcSpanInfo 38073 { srcInfoSpan = 38074 SrcSpan 38075 "tests/examples/RealGHC.lhs" 38076 909 38077 26 38078 909 38079 33 38080 , srcInfoPoints = [] 38081 } 38082 (UnQual 38083 SrcSpanInfo 38084 { srcInfoSpan = 38085 SrcSpan 38086 "tests/examples/RealGHC.lhs" 38087 909 38088 26 38089 909 38090 33 38091 , srcInfoPoints = [] 38092 } 38093 (Ident 38094 SrcSpanInfo 38095 { srcInfoSpan = 38096 SrcSpan 38097 "tests/examples/RealGHC.lhs" 38098 909 38099 26 38100 909 38101 33 38102 , srcInfoPoints = [] 38103 } 38104 "lhs_fvs"))) 38105 (QVarOp 38106 SrcSpanInfo 38107 { srcInfoSpan = 38108 SrcSpan 38109 "tests/examples/RealGHC.lhs" 38110 909 38111 34 38112 909 38113 47 38114 , srcInfoPoints = 38115 [ SrcSpan 38116 "tests/examples/RealGHC.lhs" 38117 909 38118 34 38119 909 38120 35 38121 , SrcSpan 38122 "tests/examples/RealGHC.lhs" 38123 909 38124 35 38125 909 38126 46 38127 , SrcSpan 38128 "tests/examples/RealGHC.lhs" 38129 909 38130 46 38131 909 38132 47 38133 ] 38134 } 38135 (UnQual 38136 SrcSpanInfo 38137 { srcInfoSpan = 38138 SrcSpan 38139 "tests/examples/RealGHC.lhs" 38140 909 38141 34 38142 909 38143 47 38144 , srcInfoPoints = 38145 [ SrcSpan 38146 "tests/examples/RealGHC.lhs" 38147 909 38148 34 38149 909 38150 35 38151 , SrcSpan 38152 "tests/examples/RealGHC.lhs" 38153 909 38154 35 38155 909 38156 46 38157 , SrcSpan 38158 "tests/examples/RealGHC.lhs" 38159 909 38160 46 38161 909 38162 47 38163 ] 38164 } 38165 (Ident 38166 SrcSpanInfo 38167 { srcInfoSpan = 38168 SrcSpan 38169 "tests/examples/RealGHC.lhs" 38170 909 38171 35 38172 909 38173 46 38174 , srcInfoPoints = [] 38175 } 38176 "unionVarSet"))) 38177 (App 38178 SrcSpanInfo 38179 { srcInfoSpan = 38180 SrcSpan 38181 "tests/examples/RealGHC.lhs" 38182 909 38183 48 38184 909 38185 64 38186 , srcInfoPoints = [] 38187 } 38188 (Var 38189 SrcSpanInfo 38190 { srcInfoSpan = 38191 SrcSpan 38192 "tests/examples/RealGHC.lhs" 38193 909 38194 48 38195 909 38196 60 38197 , srcInfoPoints = [] 38198 } 38199 (UnQual 38200 SrcSpanInfo 38201 { srcInfoSpan = 38202 SrcSpan 38203 "tests/examples/RealGHC.lhs" 38204 909 38205 48 38206 909 38207 60 38208 , srcInfoPoints = [] 38209 } 38210 (Ident 38211 SrcSpanInfo 38212 { srcInfoSpan = 38213 SrcSpan 38214 "tests/examples/RealGHC.lhs" 38215 909 38216 48 38217 909 38218 60 38219 , srcInfoPoints = [] 38220 } 38221 "exprFreeVars"))) 38222 (Var 38223 SrcSpanInfo 38224 { srcInfoSpan = 38225 SrcSpan 38226 "tests/examples/RealGHC.lhs" 38227 909 38228 61 38229 909 38230 64 38231 , srcInfoPoints = [] 38232 } 38233 (UnQual 38234 SrcSpanInfo 38235 { srcInfoSpan = 38236 SrcSpan 38237 "tests/examples/RealGHC.lhs" 38238 909 38239 61 38240 909 38241 64 38242 , srcInfoPoints = [] 38243 } 38244 (Ident 38245 SrcSpanInfo 38246 { srcInfoSpan = 38247 SrcSpan 38248 "tests/examples/RealGHC.lhs" 38249 909 38250 61 38251 909 38252 64 38253 , srcInfoPoints = [] 38254 } 38255 "arg")))))) 38256 Nothing 38257 , PatBind 38258 SrcSpanInfo 38259 { srcInfoSpan = 38260 SrcSpan 38261 "tests/examples/RealGHC.lhs" 38262 910 38263 15 38264 911 38265 59 38266 , srcInfoPoints = [] 38267 } 38268 (PVar 38269 SrcSpanInfo 38270 { srcInfoSpan = 38271 SrcSpan 38272 "tests/examples/RealGHC.lhs" 38273 910 38274 15 38275 910 38276 19 38277 , srcInfoPoints = [] 38278 } 38279 (Ident 38280 SrcSpanInfo 38281 { srcInfoSpan = 38282 SrcSpan 38283 "tests/examples/RealGHC.lhs" 38284 910 38285 15 38286 910 38287 19 38288 , srcInfoPoints = [] 38289 } 38290 "menv")) 38291 (UnGuardedRhs 38292 SrcSpanInfo 38293 { srcInfoSpan = 38294 SrcSpan 38295 "tests/examples/RealGHC.lhs" 38296 910 38297 20 38298 911 38299 59 38300 , srcInfoPoints = 38301 [ SrcSpan 38302 "tests/examples/RealGHC.lhs" 38303 910 38304 20 38305 910 38306 21 38307 ] 38308 } 38309 (RecConstr 38310 SrcSpanInfo 38311 { srcInfoSpan = 38312 SrcSpan 38313 "tests/examples/RealGHC.lhs" 38314 910 38315 22 38316 911 38317 59 38318 , srcInfoPoints = 38319 [ SrcSpan 38320 "tests/examples/RealGHC.lhs" 38321 910 38322 25 38323 910 38324 26 38325 , SrcSpan 38326 "tests/examples/RealGHC.lhs" 38327 911 38328 25 38329 911 38330 26 38331 , SrcSpan 38332 "tests/examples/RealGHC.lhs" 38333 911 38334 58 38335 911 38336 59 38337 ] 38338 } 38339 (UnQual 38340 SrcSpanInfo 38341 { srcInfoSpan = 38342 SrcSpan 38343 "tests/examples/RealGHC.lhs" 38344 910 38345 22 38346 910 38347 24 38348 , srcInfoPoints = [] 38349 } 38350 (Ident 38351 SrcSpanInfo 38352 { srcInfoSpan = 38353 SrcSpan 38354 "tests/examples/RealGHC.lhs" 38355 910 38356 22 38357 910 38358 24 38359 , srcInfoPoints = [] 38360 } 38361 "ME")) 38362 [ FieldUpdate 38363 SrcSpanInfo 38364 { srcInfoSpan = 38365 SrcSpan 38366 "tests/examples/RealGHC.lhs" 38367 910 38368 27 38369 910 38370 70 38371 , srcInfoPoints = 38372 [ SrcSpan 38373 "tests/examples/RealGHC.lhs" 38374 910 38375 36 38376 910 38377 37 38378 ] 38379 } 38380 (UnQual 38381 SrcSpanInfo 38382 { srcInfoSpan = 38383 SrcSpan 38384 "tests/examples/RealGHC.lhs" 38385 910 38386 27 38387 910 38388 33 38389 , srcInfoPoints = [] 38390 } 38391 (Ident 38392 SrcSpanInfo 38393 { srcInfoSpan = 38394 SrcSpan 38395 "tests/examples/RealGHC.lhs" 38396 910 38397 27 38398 910 38399 33 38400 , srcInfoPoints = [] 38401 } 38402 "me_env")) 38403 (App 38404 SrcSpanInfo 38405 { srcInfoSpan = 38406 SrcSpan 38407 "tests/examples/RealGHC.lhs" 38408 910 38409 38 38410 910 38411 70 38412 , srcInfoPoints = [] 38413 } 38414 (Var 38415 SrcSpanInfo 38416 { srcInfoSpan = 38417 SrcSpan 38418 "tests/examples/RealGHC.lhs" 38419 910 38420 38 38421 910 38422 46 38423 , srcInfoPoints = [] 38424 } 38425 (UnQual 38426 SrcSpanInfo 38427 { srcInfoSpan = 38428 SrcSpan 38429 "tests/examples/RealGHC.lhs" 38430 910 38431 38 38432 910 38433 46 38434 , srcInfoPoints = [] 38435 } 38436 (Ident 38437 SrcSpanInfo 38438 { srcInfoSpan = 38439 SrcSpan 38440 "tests/examples/RealGHC.lhs" 38441 910 38442 38 38443 910 38444 46 38445 , srcInfoPoints = [] 38446 } 38447 "mkRnEnv2"))) 38448 (Paren 38449 SrcSpanInfo 38450 { srcInfoSpan = 38451 SrcSpan 38452 "tests/examples/RealGHC.lhs" 38453 910 38454 47 38455 910 38456 70 38457 , srcInfoPoints = 38458 [ SrcSpan 38459 "tests/examples/RealGHC.lhs" 38460 910 38461 47 38462 910 38463 48 38464 , SrcSpan 38465 "tests/examples/RealGHC.lhs" 38466 910 38467 69 38468 910 38469 70 38470 ] 38471 } 38472 (App 38473 SrcSpanInfo 38474 { srcInfoSpan = 38475 SrcSpan 38476 "tests/examples/RealGHC.lhs" 38477 910 38478 48 38479 910 38480 69 38481 , srcInfoPoints = [] 38482 } 38483 (Var 38484 SrcSpanInfo 38485 { srcInfoSpan = 38486 SrcSpan 38487 "tests/examples/RealGHC.lhs" 38488 910 38489 48 38490 910 38491 60 38492 , srcInfoPoints = [] 38493 } 38494 (UnQual 38495 SrcSpanInfo 38496 { srcInfoSpan = 38497 SrcSpan 38498 "tests/examples/RealGHC.lhs" 38499 910 38500 48 38501 910 38502 60 38503 , srcInfoPoints = [] 38504 } 38505 (Ident 38506 SrcSpanInfo 38507 { srcInfoSpan = 38508 SrcSpan 38509 "tests/examples/RealGHC.lhs" 38510 910 38511 48 38512 910 38513 60 38514 , srcInfoPoints = 38515 [] 38516 } 38517 "mkInScopeSet"))) 38518 (Var 38519 SrcSpanInfo 38520 { srcInfoSpan = 38521 SrcSpan 38522 "tests/examples/RealGHC.lhs" 38523 910 38524 61 38525 910 38526 69 38527 , srcInfoPoints = [] 38528 } 38529 (UnQual 38530 SrcSpanInfo 38531 { srcInfoSpan = 38532 SrcSpan 38533 "tests/examples/RealGHC.lhs" 38534 910 38535 61 38536 910 38537 69 38538 , srcInfoPoints = [] 38539 } 38540 (Ident 38541 SrcSpanInfo 38542 { srcInfoSpan = 38543 SrcSpan 38544 "tests/examples/RealGHC.lhs" 38545 910 38546 61 38547 910 38548 69 38549 , srcInfoPoints = 38550 [] 38551 } 38552 "in_scope")))))) 38553 , FieldUpdate 38554 SrcSpanInfo 38555 { srcInfoSpan = 38556 SrcSpan 38557 "tests/examples/RealGHC.lhs" 38558 911 38559 27 38560 911 38561 57 38562 , srcInfoPoints = 38563 [ SrcSpan 38564 "tests/examples/RealGHC.lhs" 38565 911 38566 36 38567 911 38568 37 38569 ] 38570 } 38571 (UnQual 38572 SrcSpanInfo 38573 { srcInfoSpan = 38574 SrcSpan 38575 "tests/examples/RealGHC.lhs" 38576 911 38577 27 38578 911 38579 35 38580 , srcInfoPoints = [] 38581 } 38582 (Ident 38583 SrcSpanInfo 38584 { srcInfoSpan = 38585 SrcSpan 38586 "tests/examples/RealGHC.lhs" 38587 911 38588 27 38589 911 38590 35 38591 , srcInfoPoints = [] 38592 } 38593 "me_tmpls")) 38594 (App 38595 SrcSpanInfo 38596 { srcInfoSpan = 38597 SrcSpan 38598 "tests/examples/RealGHC.lhs" 38599 911 38600 38 38601 911 38602 57 38603 , srcInfoPoints = [] 38604 } 38605 (Var 38606 SrcSpanInfo 38607 { srcInfoSpan = 38608 SrcSpan 38609 "tests/examples/RealGHC.lhs" 38610 911 38611 38 38612 911 38613 46 38614 , srcInfoPoints = [] 38615 } 38616 (UnQual 38617 SrcSpanInfo 38618 { srcInfoSpan = 38619 SrcSpan 38620 "tests/examples/RealGHC.lhs" 38621 911 38622 38 38623 911 38624 46 38625 , srcInfoPoints = [] 38626 } 38627 (Ident 38628 SrcSpanInfo 38629 { srcInfoSpan = 38630 SrcSpan 38631 "tests/examples/RealGHC.lhs" 38632 911 38633 38 38634 911 38635 46 38636 , srcInfoPoints = [] 38637 } 38638 "mkVarSet"))) 38639 (Var 38640 SrcSpanInfo 38641 { srcInfoSpan = 38642 SrcSpan 38643 "tests/examples/RealGHC.lhs" 38644 911 38645 47 38646 911 38647 57 38648 , srcInfoPoints = [] 38649 } 38650 (UnQual 38651 SrcSpanInfo 38652 { srcInfoSpan = 38653 SrcSpan 38654 "tests/examples/RealGHC.lhs" 38655 911 38656 47 38657 911 38658 57 38659 , srcInfoPoints = [] 38660 } 38661 (Ident 38662 SrcSpanInfo 38663 { srcInfoSpan = 38664 SrcSpan 38665 "tests/examples/RealGHC.lhs" 38666 911 38667 47 38668 911 38669 57 38670 , srcInfoPoints = [] 38671 } 38672 "rule_bndrs")))) 38673 ])) 38674 Nothing 38675 ])) 38676 ] 38677 ])) 38678 ] 38679 ])) 38680 ] 38681 ] 38682 , [ Comment 38683 False 38684 (SrcSpan "tests/examples/RealGHC.lhs" 9 1 9 60) 38685 " The above warning supression flag is a temporary kludge." 38686 , Comment 38687 False 38688 (SrcSpan "tests/examples/RealGHC.lhs" 10 1 10 72) 38689 " While working on this module you are encouraged to remove it and fix" 38690 , Comment 38691 False 38692 (SrcSpan "tests/examples/RealGHC.lhs" 11 1 11 35) 38693 " any warnings in the module. See" 38694 , Comment 38695 False 38696 (SrcSpan "tests/examples/RealGHC.lhs" 12 1 12 80) 38697 " http://hackage.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#Warnings" 38698 , Comment 38699 False 38700 (SrcSpan "tests/examples/RealGHC.lhs" 13 1 13 15) 38701 " for details" 38702 , Comment 38703 False 38704 (SrcSpan "tests/examples/RealGHC.lhs" 15 1 15 79) 38705 " | Functions for collecting together and applying rewrite rules to a module." 38706 , Comment 38707 False 38708 (SrcSpan "tests/examples/RealGHC.lhs" 16 1 16 57) 38709 " The 'CoreRule' datatype itself is declared elsewhere." 38710 , Comment 38711 False 38712 (SrcSpan "tests/examples/RealGHC.lhs" 18 5 18 18) 38713 " * RuleBase" 38714 , Comment 38715 False 38716 (SrcSpan "tests/examples/RealGHC.lhs" 21 5 21 23) 38717 " ** Constructing" 38718 , Comment 38719 False 38720 (SrcSpan "tests/examples/RealGHC.lhs" 25 5 25 37) 38721 " ** Checking rule applications" 38722 , Comment 38723 False 38724 (SrcSpan "tests/examples/RealGHC.lhs" 28 9 28 44) 38725 " ** Manipulating 'SpecInfo' rules" 38726 , Comment 38727 False 38728 (SrcSpan "tests/examples/RealGHC.lhs" 32 5 32 32) 38729 " * Misc. CoreRule helpers" 38730 , Comment 38731 False 38732 (SrcSpan "tests/examples/RealGHC.lhs" 38 1 38 27) 38733 " #include \"HsVersions.h\"" 38734 , Comment 38735 False 38736 (SrcSpan "tests/examples/RealGHC.lhs" 40 21 40 33) 38737 " All of it" 38738 , Comment 38739 False 38740 (SrcSpan "tests/examples/RealGHC.lhs" 106 1 106 69) 38741 " ^ Used to make 'CoreRule' for an 'Id' defined in the module being" 38742 , Comment 38743 False 38744 (SrcSpan "tests/examples/RealGHC.lhs" 107 1 107 41) 38745 " compiled. See also 'CoreSyn.CoreRule'" 38746 , Comment 38747 False 38748 (SrcSpan "tests/examples/RealGHC.lhs" 114 1 114 15) 38749 "------------" 38750 , Comment 38751 False 38752 (SrcSpan "tests/examples/RealGHC.lhs" 116 1 116 57) 38753 " ^ Find the \\\"top\\\" free names of several expressions." 38754 , Comment 38755 False 38756 (SrcSpan "tests/examples/RealGHC.lhs" 117 1 117 26) 38757 " Such names are either:" 38758 , Comment 38759 False (SrcSpan "tests/examples/RealGHC.lhs" 118 1 118 3) "" 38760 , Comment 38761 False 38762 (SrcSpan "tests/examples/RealGHC.lhs" 119 1 119 68) 38763 " 1. The function finally being applied to in an application chain" 38764 , Comment 38765 False 38766 (SrcSpan "tests/examples/RealGHC.lhs" 120 1 120 64) 38767 " (if that name is a GlobalId: see \"Var#globalvslocal\"), or" 38768 , Comment 38769 False (SrcSpan "tests/examples/RealGHC.lhs" 121 1 121 3) "" 38770 , Comment 38771 False 38772 (SrcSpan "tests/examples/RealGHC.lhs" 122 1 122 48) 38773 " 2. The 'TyCon' if the expression is a 'Type'" 38774 , Comment 38775 False (SrcSpan "tests/examples/RealGHC.lhs" 123 1 123 3) "" 38776 , Comment 38777 False 38778 (SrcSpan "tests/examples/RealGHC.lhs" 124 1 124 52) 38779 " This is used for the fast-match-check for rules;" 38780 , Comment 38781 False 38782 (SrcSpan "tests/examples/RealGHC.lhs" 125 1 125 49) 38783 " if the top names don't match, the rest can't" 38784 , Comment 38785 False 38786 (SrcSpan "tests/examples/RealGHC.lhs" 138 1 138 62) 38787 " ^ @ruleCantMatch tpl actual@ returns True only if @actual@" 38788 , Comment 38789 False 38790 (SrcSpan "tests/examples/RealGHC.lhs" 139 1 139 56) 38791 " definitely can't match @tpl@ by instantiating @tpl@." 38792 , Comment 38793 False 38794 (SrcSpan "tests/examples/RealGHC.lhs" 140 1 140 58) 38795 " It's only a one-way match; unlike instance matching we" 38796 , Comment 38797 False 38798 (SrcSpan "tests/examples/RealGHC.lhs" 141 1 141 31) 38799 " don't consider unification." 38800 , Comment 38801 False (SrcSpan "tests/examples/RealGHC.lhs" 142 1 142 3) "" 38802 , Comment 38803 False 38804 (SrcSpan "tests/examples/RealGHC.lhs" 143 1 143 21) 38805 " Notice that [_$_]" 38806 , Comment 38807 False 38808 (SrcSpan "tests/examples/RealGHC.lhs" 144 1 144 48) 38809 " @ruleCantMatch [Nothing] [Just n2] = False@" 38810 , Comment 38811 False 38812 (SrcSpan "tests/examples/RealGHC.lhs" 145 1 145 70) 38813 " Reason: a template variable can be instantiated by a constant" 38814 , Comment 38815 False (SrcSpan "tests/examples/RealGHC.lhs" 146 1 146 9) " Also:" 38816 , Comment 38817 False 38818 (SrcSpan "tests/examples/RealGHC.lhs" 147 1 147 48) 38819 " @ruleCantMatch [Just n1] [Nothing] = False@" 38820 , Comment 38821 False 38822 (SrcSpan "tests/examples/RealGHC.lhs" 148 1 148 64) 38823 " Reason: a local variable @v@ in the actuals might [_$_]" 38824 , Comment 38825 False 38826 (SrcSpan "tests/examples/RealGHC.lhs" 157 1 157 22) 38827 " (a) tidy the rules" 38828 , Comment 38829 False 38830 (SrcSpan "tests/examples/RealGHC.lhs" 158 1 158 51) 38831 " (b) sort them into order based on the rule name" 38832 , Comment 38833 False 38834 (SrcSpan "tests/examples/RealGHC.lhs" 159 1 159 51) 38835 " (c) suppress uniques (unless -dppr-debug is on)" 38836 , Comment 38837 False 38838 (SrcSpan "tests/examples/RealGHC.lhs" 160 1 160 69) 38839 " This combination makes the output stable so we can use in testing" 38840 , Comment 38841 False 38842 (SrcSpan "tests/examples/RealGHC.lhs" 161 1 161 63) 38843 " It's here rather than in PprCore because it calls tidyRules" 38844 , Comment 38845 False 38846 (SrcSpan "tests/examples/RealGHC.lhs" 179 1 179 68) 38847 " | Make a 'SpecInfo' containing a number of 'CoreRule's, suitable" 38848 , Comment 38849 False 38850 (SrcSpan "tests/examples/RealGHC.lhs" 180 1 180 32) 38851 " for putting into an 'IdInfo'" 38852 , Comment 38853 False 38854 (SrcSpan "tests/examples/RealGHC.lhs" 199 1 199 83) 38855 " | Gather all the rules for locally bound identifiers from the supplied bindings" 38856 , Comment 38857 False 38858 (SrcSpan "tests/examples/RealGHC.lhs" 204 5 204 49) 38859 " The rules for an Id come from two places:" 38860 , Comment 38861 False 38862 (SrcSpan "tests/examples/RealGHC.lhs" 205 5 205 54) 38863 " (a) the ones it is born with (idCoreRules fn)" 38864 , Comment 38865 False 38866 (SrcSpan "tests/examples/RealGHC.lhs" 206 5 206 60) 38867 " (b) rules added in subsequent modules (extra_rules)" 38868 , Comment 38869 False 38870 (SrcSpan "tests/examples/RealGHC.lhs" 207 5 207 70) 38871 " PrimOps, for example, are born with a bunch of rules under (a)" 38872 , Comment 38873 False 38874 (SrcSpan "tests/examples/RealGHC.lhs" 213 5 213 77) 38875 " Only PrimOpIds have rules inside themselves, and perhaps more besides" 38876 , Comment 38877 False 38878 (SrcSpan "tests/examples/RealGHC.lhs" 224 1 224 82) 38879 " | Gathers a collection of 'CoreRule's. Maps (the name of) an 'Id' to its rules" 38880 , Comment 38881 False 38882 (SrcSpan "tests/examples/RealGHC.lhs" 226 5 226 36) 38883 " The rules are are unordered;" 38884 , Comment 38885 False 38886 (SrcSpan "tests/examples/RealGHC.lhs" 227 5 227 42) 38887 " we sort out any overlaps on lookup" 38888 , Comment 38889 False 38890 (SrcSpan "tests/examples/RealGHC.lhs" 274 1 274 69) 38891 " | The main rule matching function. Attempts to apply all (active)" 38892 , Comment 38893 False 38894 (SrcSpan "tests/examples/RealGHC.lhs" 275 1 275 64) 38895 " supplied rules to this instance of an application in a given" 38896 , Comment 38897 False 38898 (SrcSpan "tests/examples/RealGHC.lhs" 276 1 276 71) 38899 " context, returning the rule applied and the resulting expression if" 38900 , Comment 38901 False 38902 (SrcSpan "tests/examples/RealGHC.lhs" 277 1 277 15) 38903 " successful." 38904 , Comment 38905 False 38906 (SrcSpan "tests/examples/RealGHC.lhs" 282 1 282 42) 38907 " See Note [Extra args in rule matching]" 38908 , Comment 38909 False 38910 (SrcSpan "tests/examples/RealGHC.lhs" 283 1 283 29) 38911 " See comments on matchRule" 38912 , Comment 38913 False 38914 (SrcSpan "tests/examples/RealGHC.lhs" 285 5 285 54) 38915 " pprTrace \"matchRules\" (ppr fn <+> ppr rules) $" 38916 , Comment 38917 False 38918 (SrcSpan "tests/examples/RealGHC.lhs" 296 24 296 72) 38919 " pprTrace \"match failed\" (ppr r $$ ppr args $$" 38920 , Comment 38921 False 38922 (SrcSpan "tests/examples/RealGHC.lhs" 297 20 297 137) 38923 " ppr [(arg_id, unfoldingTemplate unf) | Var arg_id <- args, let unf = idUnfolding arg_id, isCheapUnfolding unf] )" 38924 , Comment 38925 False 38926 (SrcSpan "tests/examples/RealGHC.lhs" 302 1 302 42) 38927 " All these pairs matched the expression" 38928 , Comment 38929 False 38930 (SrcSpan "tests/examples/RealGHC.lhs" 303 1 303 46) 38931 " Return the pair the the most specific rule" 38932 , Comment 38933 False 38934 (SrcSpan "tests/examples/RealGHC.lhs" 304 1 304 47) 38935 " The (fn,args) is just for overlap reporting" 38936 , Comment 38937 False 38938 (SrcSpan "tests/examples/RealGHC.lhs" 332 5 332 57) 38939 " Actually we should probably include the free vars" 38940 , Comment 38941 False 38942 (SrcSpan "tests/examples/RealGHC.lhs" 333 5 333 48) 38943 " of rule1's args, but I can't be bothered" 38944 , Comment 38945 False 38946 (SrcSpan "tests/examples/RealGHC.lhs" 336 29 336 55) 38947 " Nothing is black listed" 38948 , Comment 38949 False 38950 (SrcSpan "tests/examples/RealGHC.lhs" 342 1 342 52) 38951 " If (matchRule rule args) returns Just (name,rhs)" 38952 , Comment 38953 False 38954 (SrcSpan "tests/examples/RealGHC.lhs" 343 1 343 57) 38955 " then (f args) matches the rule, and the corresponding" 38956 , Comment 38957 False 38958 (SrcSpan "tests/examples/RealGHC.lhs" 344 1 344 24) 38959 " rewritten RHS is rhs" 38960 , Comment 38961 False (SrcSpan "tests/examples/RealGHC.lhs" 345 1 345 3) "" 38962 , Comment 38963 False 38964 (SrcSpan "tests/examples/RealGHC.lhs" 346 1 346 44) 38965 " The bndrs and rhs is occurrence-analysed" 38966 , Comment 38967 False (SrcSpan "tests/examples/RealGHC.lhs" 347 1 347 3) "" 38968 , Comment 38969 False 38970 (SrcSpan "tests/examples/RealGHC.lhs" 348 1 348 12) 38971 " Example" 38972 , Comment 38973 False (SrcSpan "tests/examples/RealGHC.lhs" 349 1 349 3) "" 38974 , Comment 38975 False 38976 (SrcSpan "tests/examples/RealGHC.lhs" 350 1 350 12) 38977 " The rule" 38978 , Comment 38979 False 38980 (SrcSpan "tests/examples/RealGHC.lhs" 351 1 351 52) 38981 " forall f g x. map f (map g x) ==> map (f . g) x" 38982 , Comment 38983 False 38984 (SrcSpan "tests/examples/RealGHC.lhs" 352 1 352 13) 38985 " is stored" 38986 , Comment 38987 False 38988 (SrcSpan "tests/examples/RealGHC.lhs" 353 1 353 23) 38989 " CoreRule \"map/map\"" 38990 , Comment 38991 False 38992 (SrcSpan "tests/examples/RealGHC.lhs" 354 1 354 36) 38993 " [f,g,x] -- tpl_vars" 38994 , Comment 38995 False 38996 (SrcSpan "tests/examples/RealGHC.lhs" 355 1 355 40) 38997 " [f,map g x] -- tpl_args" 38998 , Comment 38999 False 39000 (SrcSpan "tests/examples/RealGHC.lhs" 356 1 356 35) 39001 " map (f.g) x) -- rhs" 39002 , Comment 39003 False (SrcSpan "tests/examples/RealGHC.lhs" 357 1 357 3) "" 39004 , Comment 39005 False 39006 (SrcSpan "tests/examples/RealGHC.lhs" 358 1 358 52) 39007 " Then the call: matchRule the_rule [e1,map e2 e3]" 39008 , Comment 39009 False 39010 (SrcSpan "tests/examples/RealGHC.lhs" 359 1 359 51) 39011 " = Just (\"map/map\", (\\f,g,x -> rhs) e1 e2 e3)" 39012 , Comment 39013 False (SrcSpan "tests/examples/RealGHC.lhs" 360 1 360 3) "" 39014 , Comment 39015 False 39016 (SrcSpan "tests/examples/RealGHC.lhs" 361 1 361 66) 39017 " Any 'surplus' arguments in the input are simply put on the end" 39018 , Comment 39019 False 39020 (SrcSpan "tests/examples/RealGHC.lhs" 362 1 362 18) 39021 " of the output." 39022 , Comment 39023 False 39024 (SrcSpan "tests/examples/RealGHC.lhs" 383 5 383 71) 39025 " We could do this when putting things into the rulebase, I guess" 39026 , Comment 39027 False 39028 (SrcSpan "tests/examples/RealGHC.lhs" 387 1 387 72) 39029 " For a given match template and context, find bindings to wrap around" 39030 , Comment 39031 False 39032 (SrcSpan "tests/examples/RealGHC.lhs" 388 1 388 80) 39033 " the entire result and what should be substituted for each template variable." 39034 , Comment 39035 False 39036 (SrcSpan "tests/examples/RealGHC.lhs" 389 1 389 84) 39037 " Fail if there are two few actual arguments from the target to match the template" 39038 , Comment 39039 False 39040 (SrcSpan "tests/examples/RealGHC.lhs" 390 33 390 56) 39041 " ^ In-scope variables" 39042 , Comment 39043 False 39044 (SrcSpan "tests/examples/RealGHC.lhs" 391 21 391 55) 39045 " ^ Match template type variables" 39046 , Comment 39047 False 39048 (SrcSpan "tests/examples/RealGHC.lhs" 392 25 392 44) 39049 " ^ Match template" 39050 , Comment 39051 False 39052 (SrcSpan "tests/examples/RealGHC.lhs" 393 25 393 78) 39053 " ^ Target; can have more elements than the template" 39054 , Comment 39055 False 39056 (SrcSpan "tests/examples/RealGHC.lhs" 404 5 404 35) 39057 " See Note [Template binders]" 39058 , Comment 39059 False 39060 (SrcSpan "tests/examples/RealGHC.lhs" 409 45 409 75) 39061 " Fail if too few actual args" 39062 , Comment 39063 False 39064 (SrcSpan "tests/examples/RealGHC.lhs" 448 1 448 55) 39065 " These two definitions are not the same as in Subst," 39066 , Comment 39067 False 39068 (SrcSpan "tests/examples/RealGHC.lhs" 449 1 449 63) 39069 " but they simple and direct, and purely local to this module" 39070 , Comment 39071 False (SrcSpan "tests/examples/RealGHC.lhs" 450 1 450 3) "" 39072 , Comment 39073 False 39074 (SrcSpan "tests/examples/RealGHC.lhs" 451 1 451 66) 39075 " * The domain of the TvSubstEnv and IdSubstEnv are the template" 39076 , Comment 39077 False 39078 (SrcSpan "tests/examples/RealGHC.lhs" 452 1 452 38) 39079 " variables passed into the match." 39080 , Comment 39081 False (SrcSpan "tests/examples/RealGHC.lhs" 453 1 453 3) "" 39082 , Comment 39083 False 39084 (SrcSpan "tests/examples/RealGHC.lhs" 454 1 454 71) 39085 " * The (OrdList CoreBind) in a SubstEnv are the bindings floated out" 39086 , Comment 39087 False 39088 (SrcSpan "tests/examples/RealGHC.lhs" 455 1 455 59) 39089 " from nested matches; see the Let case of match, below" 39090 , Comment 39091 False (SrcSpan "tests/examples/RealGHC.lhs" 456 1 456 3) "" 39092 , Comment 39093 False 39094 (SrcSpan "tests/examples/RealGHC.lhs" 464 1 464 57) 39095 " At one stage I tried to match even if there are more" 39096 , Comment 39097 False 39098 (SrcSpan "tests/examples/RealGHC.lhs" 465 1 465 34) 39099 " template args than real args." 39100 , Comment 39101 False 39102 (SrcSpan "tests/examples/RealGHC.lhs" 467 1 467 45) 39103 " I now think this is probably a bad idea." 39104 , Comment 39105 False 39106 (SrcSpan "tests/examples/RealGHC.lhs" 468 1 468 64) 39107 " Should the template (map f xs) match (map g)? I think not." 39108 , Comment 39109 False 39110 (SrcSpan "tests/examples/RealGHC.lhs" 469 1 469 55) 39111 " For a start, in general eta expansion wastes work." 39112 , Comment 39113 False 39114 (SrcSpan "tests/examples/RealGHC.lhs" 470 1 470 17) 39115 " SLPJ July 99" 39116 , Comment 39117 False 39118 (SrcSpan "tests/examples/RealGHC.lhs" 475 25 475 36) 39119 " Template" 39120 , Comment 39121 False 39122 (SrcSpan "tests/examples/RealGHC.lhs" 476 25 476 34) 39123 " Target" 39124 , Comment 39125 False 39126 (SrcSpan "tests/examples/RealGHC.lhs" 479 1 479 55) 39127 " See the notes with Unify.match, which matches types" 39128 , Comment 39129 False 39130 (SrcSpan "tests/examples/RealGHC.lhs" 480 1 480 40) 39131 " Everything is very similar for terms" 39132 , Comment 39133 False 39134 (SrcSpan "tests/examples/RealGHC.lhs" 482 1 482 25) 39135 " Interesting examples:" 39136 , Comment 39137 False 39138 (SrcSpan "tests/examples/RealGHC.lhs" 483 1 483 21) 39139 " Consider matching" 39140 , Comment 39141 False 39142 (SrcSpan "tests/examples/RealGHC.lhs" 484 1 484 32) 39143 " \\x->f against \\f->f" 39144 , Comment 39145 False 39146 (SrcSpan "tests/examples/RealGHC.lhs" 485 1 485 70) 39147 " When we meet the lambdas we must remember to rename f to f' in the" 39148 , Comment 39149 False 39150 (SrcSpan "tests/examples/RealGHC.lhs" 486 1 486 44) 39151 " second expresion. The RnEnv2 does that." 39152 , Comment 39153 False (SrcSpan "tests/examples/RealGHC.lhs" 487 1 487 3) "" 39154 , Comment 39155 False 39156 (SrcSpan "tests/examples/RealGHC.lhs" 488 1 488 21) 39157 " Consider matching" 39158 , Comment 39159 False 39160 (SrcSpan "tests/examples/RealGHC.lhs" 489 1 489 39) 39161 " forall a. \\b->b against \\a->3" 39162 , Comment 39163 False 39164 (SrcSpan "tests/examples/RealGHC.lhs" 490 1 490 65) 39165 " We must rename the \\a. Otherwise when we meet the lambdas we" 39166 , Comment 39167 False 39168 (SrcSpan "tests/examples/RealGHC.lhs" 491 1 491 64) 39169 " might substitute [a/b] in the template, and then erroneously" 39170 , Comment 39171 False 39172 (SrcSpan "tests/examples/RealGHC.lhs" 492 1 492 76) 39173 " succeed in matching what looks like the template variable 'a' against 3." 39174 , Comment 39175 False 39176 (SrcSpan "tests/examples/RealGHC.lhs" 494 1 494 60) 39177 " The Var case follows closely what happens in Unify.match" 39178 , Comment 39179 False 39180 (SrcSpan "tests/examples/RealGHC.lhs" 501 5 501 37) 39181 " Note [Notes in RULE matching]" 39182 , Comment 39183 False 39184 (SrcSpan "tests/examples/RealGHC.lhs" 502 5 502 37) 39185 " ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~" 39186 , Comment 39187 False 39188 (SrcSpan "tests/examples/RealGHC.lhs" 503 5 503 60) 39189 " Look through Notes. In particular, we don't want to" 39190 , Comment 39191 False 39192 (SrcSpan "tests/examples/RealGHC.lhs" 504 5 504 63) 39193 " be confused by InlineMe notes. Maybe we should be more" 39194 , Comment 39195 False 39196 (SrcSpan "tests/examples/RealGHC.lhs" 505 5 505 59) 39197 " careful about profiling notes, but for now I'm just" 39198 , Comment 39199 False 39200 (SrcSpan "tests/examples/RealGHC.lhs" 506 5 506 35) 39201 " riding roughshod over them." 39202 , Comment 39203 False 39204 (SrcSpan "tests/examples/RealGHC.lhs" 507 5 507 56) 39205 "- See Note [Notes in call patterns] in SpecConstr" 39206 , Comment 39207 False 39208 (SrcSpan "tests/examples/RealGHC.lhs" 509 1 509 66) 39209 " Here is another important rule: if the term being matched is a" 39210 , Comment 39211 False 39212 (SrcSpan "tests/examples/RealGHC.lhs" 510 1 510 61) 39213 " variable, we expand it so long as its unfolding is a WHNF" 39214 , Comment 39215 False 39216 (SrcSpan "tests/examples/RealGHC.lhs" 511 1 511 62) 39217 " (Its occurrence information is not necessarily up to date," 39218 , Comment 39219 False 39220 (SrcSpan "tests/examples/RealGHC.lhs" 512 1 512 25) 39221 " so we don't use it.)" 39222 , Comment 39223 False 39224 (SrcSpan "tests/examples/RealGHC.lhs" 519 5 519 53) 39225 " Notice that we look up v2 in the in-scope set" 39226 , Comment 39227 False 39228 (SrcSpan "tests/examples/RealGHC.lhs" 520 5 520 34) 39229 " See Note [Lookup in-scope]" 39230 , Comment 39231 False 39232 (SrcSpan "tests/examples/RealGHC.lhs" 521 5 521 59) 39233 " Remember to apply any renaming first (hence rnOccR)" 39234 , Comment 39235 False 39236 (SrcSpan "tests/examples/RealGHC.lhs" 523 1 523 24) 39237 " Note [Matching lets]" 39238 , Comment 39239 False 39240 (SrcSpan "tests/examples/RealGHC.lhs" 524 1 524 24) 39241 " ~~~~~~~~~~~~~~~~~~~~" 39242 , Comment 39243 False 39244 (SrcSpan "tests/examples/RealGHC.lhs" 525 1 525 40) 39245 " Matching a let-expression. Consider" 39246 , Comment 39247 False 39248 (SrcSpan "tests/examples/RealGHC.lhs" 526 1 526 36) 39249 " RULE forall x. f (g x) = <rhs>" 39250 , Comment 39251 False 39252 (SrcSpan "tests/examples/RealGHC.lhs" 527 1 527 25) 39253 " and target expression" 39254 , Comment 39255 False 39256 (SrcSpan "tests/examples/RealGHC.lhs" 528 1 528 28) 39257 " f (let { w=R } in g E))" 39258 , Comment 39259 False 39260 (SrcSpan "tests/examples/RealGHC.lhs" 529 1 529 49) 39261 " Then we'd like the rule to match, to generate" 39262 , Comment 39263 False 39264 (SrcSpan "tests/examples/RealGHC.lhs" 530 1 530 33) 39265 " let { w=R } in (\\x. <rhs>) E" 39266 , Comment 39267 False 39268 (SrcSpan "tests/examples/RealGHC.lhs" 531 1 531 66) 39269 " In effect, we want to float the let-binding outward, to enable" 39270 , Comment 39271 False 39272 (SrcSpan "tests/examples/RealGHC.lhs" 532 1 532 67) 39273 " the match to happen. This is the WHOLE REASON for accumulating" 39274 , Comment 39275 False 39276 (SrcSpan "tests/examples/RealGHC.lhs" 533 1 533 28) 39277 " bindings in the SubstEnv" 39278 , Comment 39279 False (SrcSpan "tests/examples/RealGHC.lhs" 534 1 534 3) "" 39280 , Comment 39281 False 39282 (SrcSpan "tests/examples/RealGHC.lhs" 535 1 535 26) 39283 " We can only do this if" 39284 , Comment 39285 False 39286 (SrcSpan "tests/examples/RealGHC.lhs" 536 1 536 63) 39287 " (a) Widening the scope of w does not capture any variables" 39288 , Comment 39289 False 39290 (SrcSpan "tests/examples/RealGHC.lhs" 537 1 537 62) 39291 " We use a conservative test: w is not already in scope" 39292 , Comment 39293 False 39294 (SrcSpan "tests/examples/RealGHC.lhs" 538 1 538 53) 39295 " If not, we clone the binders, and substitute" 39296 , Comment 39297 False 39298 (SrcSpan "tests/examples/RealGHC.lhs" 539 1 539 65) 39299 " (b) The free variables of R are not bound by the part of the" 39300 , Comment 39301 False 39302 (SrcSpan "tests/examples/RealGHC.lhs" 540 1 540 56) 39303 " target expression outside the let binding; e.g." 39304 , Comment 39305 False 39306 (SrcSpan "tests/examples/RealGHC.lhs" 541 1 541 35) 39307 " f (\\v. let w = v+1 in g E)" 39308 , Comment 39309 False 39310 (SrcSpan "tests/examples/RealGHC.lhs" 542 1 542 62) 39311 " Here we obviously cannot float the let-binding for w." 39312 , Comment 39313 False (SrcSpan "tests/examples/RealGHC.lhs" 543 1 543 3) "" 39314 , Comment 39315 False 39316 (SrcSpan "tests/examples/RealGHC.lhs" 544 1 544 70) 39317 " You may think rule (a) would never apply, because rule matching is" 39318 , Comment 39319 False 39320 (SrcSpan "tests/examples/RealGHC.lhs" 545 1 545 71) 39321 " mostly invoked from the simplifier, when we have just run substExpr" 39322 , Comment 39323 False 39324 (SrcSpan "tests/examples/RealGHC.lhs" 546 1 546 60) 39325 " over the argument, so there will be no shadowing anyway." 39326 , Comment 39327 False 39328 (SrcSpan "tests/examples/RealGHC.lhs" 547 1 547 65) 39329 " The fly in the ointment is that the forall'd variables of the" 39330 , Comment 39331 False 39332 (SrcSpan "tests/examples/RealGHC.lhs" 548 1 548 40) 39333 " RULE itself are considered in scope." 39334 , Comment 39335 False (SrcSpan "tests/examples/RealGHC.lhs" 549 1 549 3) "" 39336 , Comment 39337 False 39338 (SrcSpan "tests/examples/RealGHC.lhs" 550 1 550 67) 39339 " I though of various cheapo ways to solve this tiresome problem," 39340 , Comment 39341 False 39342 (SrcSpan "tests/examples/RealGHC.lhs" 551 1 551 61) 39343 " but ended up doing the straightforward thing, which is to" 39344 , Comment 39345 False 39346 (SrcSpan "tests/examples/RealGHC.lhs" 552 1 552 63) 39347 " clone the binders if they are in scope. It's tiresome, and" 39348 , Comment 39349 False 39350 (SrcSpan "tests/examples/RealGHC.lhs" 553 1 553 63) 39351 " potentially inefficient, because of the calls to substExpr," 39352 , Comment 39353 False 39354 (SrcSpan "tests/examples/RealGHC.lhs" 554 1 554 51) 39355 " but I don't think it'll happen much in pracice." 39356 , Comment 39357 True 39358 (SrcSpan "tests/examples/RealGHC.lhs" 556 1 569 69) 39359 " Cases to think about\n (let x=y+1 in \\x. (x,x))\n --> let x=y+1 in (\\x1. (x1,x1))\n (\\x. let x = y+1 in (x,x))\n --> let x1 = y+1 in (\\x. (x1,x1)\n (let x=y+1 in (x,x), let x=y-1 in (x,x))\n --> let x=y+1 in let x1=y-1 in ((x,x),(x1,x1))\n\nWatch out!\n (let x=y+1 in let z=x+1 in (z,z)\n --> matches (p,p) but watch out that the use of\n x on z's rhs is OK!\nI'm removing the cloning because that makes the above case\nfail, because the inner let looks as if it has locally-bound vars " 39360 , Comment 39361 True 39362 (SrcSpan "tests/examples/RealGHC.lhs" 586 1 595 3) 39363 "\n (rn_env', bndrs') = mapAccumL rnBndrR rn_env bndrs\n s_prs = [(bndr, Var bndr') | (bndr,bndr') <- zip bndrs bndrs', bndr /= bndr']\n subst = mkSubst (rnInScopeSet rn_env) emptyVarEnv (mkVarEnv s_prs)\n (bind', e2') | null s_prs = (bind, e2)\n | otherwise = (s_bind, substExpr subst e2)\n s_bind = case bind of\n NonRec {} -> NonRec (head bndrs') (head rhss)\n Rec {} -> Rec (bndrs' `zip` map (substExpr subst) rhss)\n" 39364 , Comment 39365 False 39366 (SrcSpan "tests/examples/RealGHC.lhs" 610 1 610 32) 39367 " This rule does eta expansion" 39368 , Comment 39369 False 39370 (SrcSpan "tests/examples/RealGHC.lhs" 611 1 611 38) 39371 " (\\x.M) ~ N iff M ~ N x" 39372 , Comment 39373 False 39374 (SrcSpan "tests/examples/RealGHC.lhs" 612 1 612 53) 39375 " It's important that this is *after* the let rule," 39376 , Comment 39377 False 39378 (SrcSpan "tests/examples/RealGHC.lhs" 613 1 613 43) 39379 " so that (\\x.M) ~ (let y = e in \\y.N)" 39380 , Comment 39381 False 39382 (SrcSpan "tests/examples/RealGHC.lhs" 614 1 614 60) 39383 " does the let thing, and then gets the lam/lam rule above" 39384 , Comment 39385 False 39386 (SrcSpan "tests/examples/RealGHC.lhs" 621 1 621 31) 39387 " Eta expansion the other way" 39388 , Comment 39389 False 39390 (SrcSpan "tests/examples/RealGHC.lhs" 622 1 622 39) 39391 " M ~ (\\y.N) iff M y ~ N" 39392 , Comment 39393 False 39394 (SrcSpan "tests/examples/RealGHC.lhs" 633 45 633 68) 39395 " Alts are both sorted" 39396 , Comment 39397 True 39398 (SrcSpan "tests/examples/RealGHC.lhs" 643 1 667 3) 39399 " REMOVING OLD CODE: I think that the above handling for let is\n better than the stuff here, which looks\n pretty suspicious to me. SLPJ Sept 06\n-- This is an interesting rule: we simply ignore lets in the\n-- term being matched against! The unfolding inside it is (by assumption)\n-- already inside any occurrences of the bound variables, so we'll expand\n-- them when we encounter them. This gives a chance of matching\n-- forall x,y. f (g (x,y))\n-- against\n-- f (let v = (a,b) in g v)\n\nmatch menv subst e1 (Let bind e2)\n = match (menv { me_env = rn_env' }) subst e1 e2\n where\n (rn_env', _bndrs') = mapAccumL rnBndrR (me_env menv) (bindersOf bind)\n -- It's important to do this renaming, so that the bndrs\n -- are brought into the local scope. For example:\n -- Matching\n -- forall f,x,xs. f (x:xs)\n -- against\n -- f (let y = e in (y:[]))\n -- We must not get success with x->y! So we record that y is\n -- locally bound (with rnBndrR), and proceed. The Var case\n -- will fail when trying to bind x->y\n" 39400 , Comment 39401 False 39402 (SrcSpan "tests/examples/RealGHC.lhs" 669 1 669 25) 39403 " Everything else fails" 39404 , Comment 39405 False 39406 (SrcSpan "tests/examples/RealGHC.lhs" 670 26 670 105) 39407 " pprTrace \"Failing at\" ((text \"e1:\" <+> ppr e1) $$ (text \"e2:\" <+> ppr e2)) $" 39408 , Comment 39409 False 39410 (SrcSpan "tests/examples/RealGHC.lhs" 673 1 673 43) 39411 "----------------------------------------" 39412 , Comment 39413 False 39414 (SrcSpan "tests/examples/RealGHC.lhs" 676 25 676 36) 39415 " Template" 39416 , Comment 39417 False 39418 (SrcSpan "tests/examples/RealGHC.lhs" 677 29 677 38) 39419 " Target" 39420 , Comment 39421 False 39422 (SrcSpan "tests/examples/RealGHC.lhs" 683 21 683 44) 39423 " Occurs check failure" 39424 , Comment 39425 False 39426 (SrcSpan "tests/examples/RealGHC.lhs" 684 9 684 61) 39427 " e.g. match forall a. (\\x-> a x) against (\\y. y y)" 39428 , Comment 39429 False 39430 (SrcSpan "tests/examples/RealGHC.lhs" 686 21 686 68) 39431 " No renaming to do on e2, because no free var" 39432 , Comment 39433 False 39434 (SrcSpan "tests/examples/RealGHC.lhs" 687 17 687 54) 39435 " of e2 is in the rnEnvR of the envt" 39436 , Comment 39437 False 39438 (SrcSpan "tests/examples/RealGHC.lhs" 688 9 688 42) 39439 " Note [Matching variable types]" 39440 , Comment 39441 False 39442 (SrcSpan "tests/examples/RealGHC.lhs" 689 9 689 42) 39443 " ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~" 39444 , Comment 39445 False 39446 (SrcSpan "tests/examples/RealGHC.lhs" 690 9 690 52) 39447 " However, we must match the *types*; e.g." 39448 , Comment 39449 False 39450 (SrcSpan "tests/examples/RealGHC.lhs" 691 9 691 46) 39451 " forall (c::Char->Int) (x::Char)." 39452 , Comment 39453 False 39454 (SrcSpan "tests/examples/RealGHC.lhs" 692 9 692 35) 39455 " f (c x) = \"RULE FIRED\"" 39456 , Comment 39457 False 39458 (SrcSpan "tests/examples/RealGHC.lhs" 693 9 693 63) 39459 " We must only match on args that have the right type" 39460 , Comment 39461 False 39462 (SrcSpan "tests/examples/RealGHC.lhs" 694 9 694 79) 39463 " It's actually quite difficult to come up with an example that shows" 39464 , Comment 39465 False 39466 (SrcSpan "tests/examples/RealGHC.lhs" 695 9 695 80) 39467 " you need type matching, esp since matching is left-to-right, so type" 39468 , Comment 39469 False 39470 (SrcSpan "tests/examples/RealGHC.lhs" 696 9 696 77) 39471 " args get matched first. But it's possible (e.g. simplrun008) and" 39472 , Comment 39473 False 39474 (SrcSpan "tests/examples/RealGHC.lhs" 697 9 697 41) 39475 " this is the Right Thing to do" 39476 , Comment 39477 False 39478 (SrcSpan "tests/examples/RealGHC.lhs" 699 25 699 47) 39479 " c.f. match_ty below" 39480 , Comment 39481 False 39482 (SrcSpan "tests/examples/RealGHC.lhs" 708 17 708 83) 39483 " v1 is not a template variable; check for an exact match with e2" 39484 , Comment 39485 False 39486 (SrcSpan "tests/examples/RealGHC.lhs" 716 5 716 26) 39487 " If the template is" 39488 , Comment 39489 False 39490 (SrcSpan "tests/examples/RealGHC.lhs" 717 5 717 38) 39491 " forall x. f x (\\x -> x) = ..." 39492 , Comment 39493 False 39494 (SrcSpan "tests/examples/RealGHC.lhs" 718 5 718 46) 39495 " Then the x inside the lambda isn't the" 39496 , Comment 39497 False 39498 (SrcSpan "tests/examples/RealGHC.lhs" 719 5 719 44) 39499 " template x, so we must rename first!" 39500 , Comment 39501 False 39502 (SrcSpan "tests/examples/RealGHC.lhs" 722 1 722 43) 39503 "----------------------------------------" 39504 , Comment 39505 False 39506 (SrcSpan "tests/examples/RealGHC.lhs" 725 25 725 36) 39507 " Template" 39508 , Comment 39509 False 39510 (SrcSpan "tests/examples/RealGHC.lhs" 726 25 726 34) 39511 " Target" 39512 , Comment 39513 False 39514 (SrcSpan "tests/examples/RealGHC.lhs" 749 1 749 43) 39515 "----------------------------------------" 39516 , Comment 39517 False 39518 (SrcSpan "tests/examples/RealGHC.lhs" 752 25 752 36) 39519 " Template" 39520 , Comment 39521 False 39522 (SrcSpan "tests/examples/RealGHC.lhs" 753 25 753 34) 39523 " Target" 39524 , Comment 39525 False 39526 (SrcSpan "tests/examples/RealGHC.lhs" 811 1 811 67) 39527 " | Report partial matches for rules beginning with the specified" 39528 , Comment 39529 False 39530 (SrcSpan "tests/examples/RealGHC.lhs" 812 1 812 46) 39531 " string for the purposes of error reporting" 39532 , Comment 39533 False 39534 (SrcSpan "tests/examples/RealGHC.lhs" 813 45 813 70) 39535 " ^ Rule activation test" 39536 , Comment 39537 False 39538 (SrcSpan "tests/examples/RealGHC.lhs" 814 49 814 66) 39539 " ^ Rule pattern" 39540 , Comment 39541 False 39542 (SrcSpan "tests/examples/RealGHC.lhs" 815 49 815 71) 39543 " ^ Database of rules" 39544 , Comment 39545 False 39546 (SrcSpan "tests/examples/RealGHC.lhs" 816 49 816 74) 39547 " ^ Bindings to check in" 39548 , Comment 39549 False 39550 (SrcSpan "tests/examples/RealGHC.lhs" 817 49 817 77) 39551 " ^ Resulting check message" 39552 , Comment 39553 False 39554 (SrcSpan "tests/examples/RealGHC.lhs" 837 4 837 61) 39555 " The Bag returned has one SDoc for each call site found" 39556 , Comment 39557 False 39558 (SrcSpan "tests/examples/RealGHC.lhs" 860 1 860 57) 39559 " Produce a report for all rules matching the predicate" 39560 , Comment 39561 False 39562 (SrcSpan "tests/examples/RealGHC.lhs" 861 1 861 57) 39563 " saying why it doesn't match the specified application" 39564 , Comment 39565 False 39566 (SrcSpan "tests/examples/RealGHC.lhs" 872 9 872 70) 39567 " The rules match the pattern, so we want to print something" 39568 , Comment 39569 False 39570 (SrcSpan "tests/examples/RealGHC.lhs" 906 45 906 72) 39571 " Includes template tyvars" 39572 ] 39573 ) 39574