GitLab

Andreas Klebinger pushed to branch wip/andreask/t26425_test at Glasgow Haskell Compiler / GHC

Commits:

400a475e
by Andreas Klebinger at 2025-10-04T13:21:25+02:00
```
Add a perf test for #26425
```

2 changed files:

+ testsuite/tests/perf/compiler/T26425.hs
testsuite/tests/perf/compiler/all.T

Changes:

testsuite/tests/perf/compiler/T26425.hs

 +{-# LANGUAGE OverloadedStrings #-}
++
 +module Reproducer (strToInt) where
++
 +import qualified Data.Text as T
++
 +{- This program results in a nested chain of join points and cases which tests
 +   primarily OccAnal and Unfolding performance.
 +-}
++
 +strToInt :: T.Text -> Maybe Int
 +strToInt txt = case txt of
 +    "0" -> Just 0
 +    "1" -> Just 1
 +    "2" -> Just 2
 +    "3" -> Just 3
 +    "4" -> Just 4
 +    "5" -> Just 5
 +    "6" -> Just 6
 +    "7" -> Just 7
 +    "8" -> Just 8
 +    "9" -> Just 9
 +    "10" -> Just 10
 +    "11" -> Just 11
 +    "12" -> Just 12
 +    "13" -> Just 13
 +    "14" -> Just 14
 +    "15" -> Just 15
 +    "16" -> Just 16
 +    "17" -> Just 17
 +    "18" -> Just 18
 +    "19" -> Just 19
 +    "20" -> Just 20
 +    "21" -> Just 21
 +    "22" -> Just 22
 +    "23" -> Just 23
 +    "24" -> Just 24
 +    "25" -> Just 25
 +    "26" -> Just 26
 +    "27" -> Just 27
 +    "28" -> Just 28
 +    "29" -> Just 29
 +    "30" -> Just 30
 +    "31" -> Just 31
 +    "32" -> Just 32
 +    "33" -> Just 33
 +    "34" -> Just 34
 +    "35" -> Just 35
 +    "36" -> Just 36
 +    "37" -> Just 37
 +    "38" -> Just 38
 +    "39" -> Just 39
 +    "40" -> Just 40
 +    "41" -> Just 41
 +    "42" -> Just 42
 +    "43" -> Just 43
 +    "44" -> Just 44
 +    "45" -> Just 45
 +    "46" -> Just 46
 +    "47" -> Just 47
 +    "48" -> Just 48
 +    "49" -> Just 49
 +    "50" -> Just 50
 +    "51" -> Just 51
 +    "52" -> Just 52
 +    "53" -> Just 53
 +    "54" -> Just 54
 +    "55" -> Just 55
 +    "56" -> Just 56
 +    "57" -> Just 57
 +    "58" -> Just 58
 +    "59" -> Just 59
 +    "60" -> Just 60
 +    "61" -> Just 61
 +    "62" -> Just 62
 +    "63" -> Just 63
 +    "64" -> Just 64
 +    "65" -> Just 65
 +    "66" -> Just 66
 +    "67" -> Just 67
 +    "68" -> Just 68
 +    "69" -> Just 69
 +    "70" -> Just 70
 +    "71" -> Just 71
 +    "72" -> Just 72
 +    "73" -> Just 73
 +    "74" -> Just 74
 +    "75" -> Just 75
 +    "76" -> Just 76
 +    "77" -> Just 77
 +    "78" -> Just 78
 +    "79" -> Just 79
 +    "80" -> Just 80
 +    "81" -> Just 81
 +    "82" -> Just 82
 +    "83" -> Just 83
 +    "84" -> Just 84
 +    "85" -> Just 85
 +    "86" -> Just 86
 +    "87" -> Just 87
 +    "88" -> Just 88
 +    "89" -> Just 89
 +    "90" -> Just 90
 +    "91" -> Just 91
 +    "92" -> Just 92
 +    "93" -> Just 93
 +    "94" -> Just 94
 +    "95" -> Just 95
 +    "96" -> Just 96
 +    "97" -> Just 97
 +    "98" -> Just 98
 +    "99" -> Just 99
 +    "100" -> Just 100
 +    "101" -> Just 101
 +    "102" -> Just 102
 +    "103" -> Just 103
 +    "104" -> Just 104
 +    "105" -> Just 105
 +    "106" -> Just 106
 +    "107" -> Just 107
 +    "108" -> Just 108
 +    "109" -> Just 109
 +    "110" -> Just 110
 +    "111" -> Just 111
 +    "112" -> Just 112
 +    "113" -> Just 113
 +    "114" -> Just 114
 +    "115" -> Just 115
 +    "116" -> Just 116
 +    "117" -> Just 117
 +    "118" -> Just 118
 +    "119" -> Just 119
 +    "120" -> Just 120
 +    "121" -> Just 121
 +    "122" -> Just 122
 +    "123" -> Just 123
 +    "124" -> Just 124
 +    "125" -> Just 125
 +    "126" -> Just 126
 +    "127" -> Just 127
 +    "128" -> Just 128
 +    "129" -> Just 129
 +    "130" -> Just 130
 +    "131" -> Just 131
 +    "132" -> Just 132
 +    "133" -> Just 133
 +    "134" -> Just 134
 +    "135" -> Just 135
 +    "136" -> Just 136
 +    "137" -> Just 137
 +    "138" -> Just 138
 +    "139" -> Just 139
 +    "140" -> Just 140
 +    "141" -> Just 141
 +    "142" -> Just 142
 +    "143" -> Just 143
 +    "144" -> Just 144
 +    "145" -> Just 145
 +    "146" -> Just 146
 +    "147" -> Just 147
 +    "148" -> Just 148
 +    "149" -> Just 149
 +    "150" -> Just 150
 +    "151" -> Just 151
 +    "152" -> Just 152
 +    "153" -> Just 153
 +    "154" -> Just 154
 +    "155" -> Just 155
 +    "156" -> Just 156
 +    "157" -> Just 157
 +    "158" -> Just 158
 +    "159" -> Just 159
 +    "160" -> Just 160
 +    "161" -> Just 161
 +    "162" -> Just 162
 +    "163" -> Just 163
 +    "164" -> Just 164
 +    "165" -> Just 165
 +    "166" -> Just 166
 +    "167" -> Just 167
 +    "168" -> Just 168
 +    "169" -> Just 169
 +    "170" -> Just 170
 +    "171" -> Just 171
 +    "172" -> Just 172
 +    "173" -> Just 173
 +    "174" -> Just 174
 +    "175" -> Just 175
 +    "176" -> Just 176
 +    "177" -> Just 177
 +    "178" -> Just 178
 +    "179" -> Just 179
 +    "180" -> Just 180
 +    "181" -> Just 181
 +    "182" -> Just 182
 +    "183" -> Just 183
 +    "184" -> Just 184
 +    "185" -> Just 185
 +    "186" -> Just 186
 +    "187" -> Just 187
 +    "188" -> Just 188
 +    "189" -> Just 189
 +    "190" -> Just 190
 +    "191" -> Just 191
 +    "192" -> Just 192
 +    "193" -> Just 193
 +    "194" -> Just 194
 +    "195" -> Just 195
 +    "196" -> Just 196
 +    "197" -> Just 197
 +    "198" -> Just 198
 +    "199" -> Just 199
 +    "200" -> Just 200
 +    "201" -> Just 201
 +    "202" -> Just 202
 +    "203" -> Just 203
 +    "204" -> Just 204
 +    "205" -> Just 205
 +    "206" -> Just 206
 +    "207" -> Just 207
 +    "208" -> Just 208
 +    "209" -> Just 209
 +    "210" -> Just 210
 +    "211" -> Just 211
 +    "212" -> Just 212
 +    "213" -> Just 213
 +    "214" -> Just 214
 +    "215" -> Just 215
 +    "216" -> Just 216
 +    "217" -> Just 217
 +    "218" -> Just 218
 +    "219" -> Just 219
 +    "220" -> Just 220
 +    "221" -> Just 221
 +    "222" -> Just 222
 +    "223" -> Just 223
 +    "224" -> Just 224
 +    "225" -> Just 225
 +    "226" -> Just 226
 +    "227" -> Just 227
 +    "228" -> Just 228
 +    "229" -> Just 229
 +    "230" -> Just 230
 +    "231" -> Just 231
 +    "232" -> Just 232
 +    "233" -> Just 233
 +    "234" -> Just 234
 +    "235" -> Just 235
 +    "236" -> Just 236
 +    "237" -> Just 237
 +    "238" -> Just 238
 +    "239" -> Just 239
 +    "240" -> Just 240
 +    "241" -> Just 241
 +    "242" -> Just 242
 +    "243" -> Just 243
 +    "244" -> Just 244
 +    "245" -> Just 245
 +    "246" -> Just 246
 +    "247" -> Just 247
 +    "248" -> Just 248
 +    "249" -> Just 249
 +    "250" -> Just 250
 +    "251" -> Just 251
 +    "252" -> Just 252
 +    "253" -> Just 253
 +    "254" -> Just 254
 +    "255" -> Just 255
 +    "256" -> Just 256
 +    "257" -> Just 257
 +    "258" -> Just 258
 +    "259" -> Just 259
 +    "260" -> Just 260
 +    "261" -> Just 261
 +    "262" -> Just 262
 +    "263" -> Just 263
 +    "264" -> Just 264
 +    "265" -> Just 265
 +    "266" -> Just 266
 +    "267" -> Just 267
 +    "268" -> Just 268
 +    "269" -> Just 269
 +    "270" -> Just 270
 +    "271" -> Just 271
 +    "272" -> Just 272
 +    "273" -> Just 273
 +    "274" -> Just 274
 +    "275" -> Just 275
 +    "276" -> Just 276
 +    "277" -> Just 277
 +    "278" -> Just 278
 +    "279" -> Just 279
 +    "280" -> Just 280
 +    "281" -> Just 281
 +    "282" -> Just 282
 +    "283" -> Just 283
 +    "284" -> Just 284
 +    "285" -> Just 285
 +    "286" -> Just 286
 +    "287" -> Just 287
 +    "288" -> Just 288
 +    "289" -> Just 289
 +    "290" -> Just 290
 +    "291" -> Just 291
 +    "292" -> Just 292
 +    "293" -> Just 293
 +    "294" -> Just 294
 +    "295" -> Just 295
 +    "296" -> Just 296
 +    "297" -> Just 297
 +    "298" -> Just 298
 +    "299" -> Just 299
 +    "300" -> Just 300
 +    "301" -> Just 301
 +    "302" -> Just 302
 +    "303" -> Just 303
 +    "304" -> Just 304
 +    "305" -> Just 305
 +    "306" -> Just 306
 +    "307" -> Just 307
 +    "308" -> Just 308
 +    "309" -> Just 309
 +    "310" -> Just 310
 +    "311" -> Just 311
 +    "312" -> Just 312
 +    "313" -> Just 313
 +    "314" -> Just 314
 +    "315" -> Just 315
 +    "316" -> Just 316
 +    "317" -> Just 317
 +    "318" -> Just 318
 +    "319" -> Just 319
 +    "320" -> Just 320
 +    "321" -> Just 321
 +    "322" -> Just 322
 +    "323" -> Just 323
 +    "324" -> Just 324
 +    "325" -> Just 325
 +    "326" -> Just 326
 +    "327" -> Just 327
 +    "328" -> Just 328
 +    "329" -> Just 329
 +    "330" -> Just 330
 +    "331" -> Just 331
 +    "332" -> Just 332
 +    "333" -> Just 333
 +    "334" -> Just 334
 +    "335" -> Just 335
 +    "336" -> Just 336
 +    "337" -> Just 337
 +    "338" -> Just 338
 +    "339" -> Just 339
 +    "340" -> Just 340
 +    "341" -> Just 341
 +    "342" -> Just 342
 +    "343" -> Just 343
 +    "344" -> Just 344
 +    "345" -> Just 345
 +    "346" -> Just 346
 +    "347" -> Just 347
 +    "348" -> Just 348
 +    "349" -> Just 349
 +    "350" -> Just 350
 +    "351" -> Just 351
 +    "352" -> Just 352
 +    "353" -> Just 353
 +    "354" -> Just 354
 +    "355" -> Just 355
 +    "356" -> Just 356
 +    "357" -> Just 357
 +    "358" -> Just 358
 +    "359" -> Just 359
 +    "360" -> Just 360
 +    "361" -> Just 361
 +    "362" -> Just 362
 +    "363" -> Just 363
 +    "364" -> Just 364
 +    "365" -> Just 365
 +    "366" -> Just 366
 +    "367" -> Just 367
 +    "368" -> Just 368
 +    "369" -> Just 369
 +    "370" -> Just 370
 +    "371" -> Just 371
 +    "372" -> Just 372
 +    "373" -> Just 373
 +    "374" -> Just 374
 +    "375" -> Just 375
 +    "376" -> Just 376
 +    "377" -> Just 377
 +    "378" -> Just 378
 +    "379" -> Just 379
 +    "380" -> Just 380
 +    "381" -> Just 381
 +    "382" -> Just 382
 +    "383" -> Just 383
 +    "384" -> Just 384
 +    "385" -> Just 385
 +    "386" -> Just 386
 +    "387" -> Just 387
 +    "388" -> Just 388
 +    "389" -> Just 389
 +    "390" -> Just 390
 +    "391" -> Just 391
 +    "392" -> Just 392
 +    "393" -> Just 393
 +    "394" -> Just 394
 +    "395" -> Just 395
 +    "396" -> Just 396
 +    "397" -> Just 397
 +    "398" -> Just 398
 +    "399" -> Just 399
 +    "400" -> Just 400
 +    "401" -> Just 401
 +    "402" -> Just 402
 +    "403" -> Just 403
 +    "404" -> Just 404
 +    "405" -> Just 405
 +    "406" -> Just 406
 +    "407" -> Just 407
 +    "408" -> Just 408
 +    "409" -> Just 409
 +    "410" -> Just 410
 +    "411" -> Just 411
 +    "412" -> Just 412
 +    "413" -> Just 413
 +    "414" -> Just 414
 +    "415" -> Just 415
 +    "416" -> Just 416
 +    "417" -> Just 417
 +    "418" -> Just 418
 +    "419" -> Just 419
 +    "420" -> Just 420
 +    "421" -> Just 421
 +    "422" -> Just 422
 +    "423" -> Just 423
 +    "424" -> Just 424
 +    "425" -> Just 425
 +    "426" -> Just 426
 +    "427" -> Just 427
 +    "428" -> Just 428
 +    "429" -> Just 429
 +    "430" -> Just 430
 +    "431" -> Just 431
 +    "432" -> Just 432
 +    "433" -> Just 433
 +    "434" -> Just 434
 +    "435" -> Just 435
 +    "436" -> Just 436
 +    "437" -> Just 437
 +    "438" -> Just 438
 +    "439" -> Just 439
 +    "440" -> Just 440
 +    "441" -> Just 441
 +    "442" -> Just 442
 +    "443" -> Just 443
 +    "444" -> Just 444
 +    "445" -> Just 445
 +    "446" -> Just 446
 +    "447" -> Just 447
 +    "448" -> Just 448
 +    "449" -> Just 449
 +    "450" -> Just 450
 +    "451" -> Just 451
 +    "452" -> Just 452
 +    "453" -> Just 453
 +    "454" -> Just 454
 +    "455" -> Just 455
 +    "456" -> Just 456
 +    "457" -> Just 457
 +    "458" -> Just 458
 +    "459" -> Just 459
 +    "460" -> Just 460
 +    "461" -> Just 461
 +    "462" -> Just 462
 +    "463" -> Just 463
 +    "464" -> Just 464
 +    "465" -> Just 465
 +    "466" -> Just 466
 +    "467" -> Just 467
 +    "468" -> Just 468
 +    "469" -> Just 469
 +    "470" -> Just 470
 +    "471" -> Just 471
 +    "472" -> Just 472
 +    "473" -> Just 473
 +    "474" -> Just 474
 +    "475" -> Just 475
 +    "476" -> Just 476
 +    "477" -> Just 477
 +    "478" -> Just 478
 +    "479" -> Just 479
 +    "480" -> Just 480
 +    "481" -> Just 481
 +    "482" -> Just 482
 +    "483" -> Just 483
 +    "484" -> Just 484
 +    "485" -> Just 485
 +    "486" -> Just 486
 +    "487" -> Just 487
 +    "488" -> Just 488
 +    "489" -> Just 489
 +    "490" -> Just 490
 +    "491" -> Just 491
 +    "492" -> Just 492
 +    "493" -> Just 493
 +    "494" -> Just 494
 +    "495" -> Just 495
 +    "496" -> Just 496
 +    "497" -> Just 497
 +    "498" -> Just 498
 +    "499" -> Just 499
 +    "500" -> Just 500
 +    "501" -> Just 501
 +    "502" -> Just 502
 +    "503" -> Just 503
 +    "504" -> Just 504
 +    "505" -> Just 505
 +    "506" -> Just 506
 +    "507" -> Just 507
 +    "508" -> Just 508
 +    "509" -> Just 509
 +    "510" -> Just 510
 +    "511" -> Just 511
 +    "512" -> Just 512
 +    "513" -> Just 513
 +    "514" -> Just 514
 +    "515" -> Just 515
 +    "516" -> Just 516
 +    "517" -> Just 517
 +    "518" -> Just 518
 +    "519" -> Just 519
 +    "520" -> Just 520
 +    "521" -> Just 521
 +    "522" -> Just 522
 +    "523" -> Just 523
 +    "524" -> Just 524
 +    "525" -> Just 525
 +    "526" -> Just 526
 +    "527" -> Just 527
 +    "528" -> Just 528
 +    "529" -> Just 529
 +    "530" -> Just 530
 +    "531" -> Just 531
 +    "532" -> Just 532
 +    "533" -> Just 533
 +    "534" -> Just 534
 +    "535" -> Just 535
 +    "536" -> Just 536
 +    "537" -> Just 537
 +    "538" -> Just 538
 +    "539" -> Just 539
 +    "540" -> Just 540
 +    "541" -> Just 541
 +    "542" -> Just 542
 +    "543" -> Just 543
 +    "544" -> Just 544
 +    "545" -> Just 545
 +    "546" -> Just 546
 +    "547" -> Just 547
 +    "548" -> Just 548
 +    "549" -> Just 549
 +    "550" -> Just 550
 +    "551" -> Just 551
 +    "552" -> Just 552
 +    "553" -> Just 553
 +    "554" -> Just 554
 +    "555" -> Just 555
 +    "556" -> Just 556
 +    "557" -> Just 557
 +    "558" -> Just 558
 +    "559" -> Just 559
 +    "560" -> Just 560
 +    "561" -> Just 561
 +    "562" -> Just 562
 +    "563" -> Just 563
 +    "564" -> Just 564
 +    "565" -> Just 565
 +    "566" -> Just 566
 +    "567" -> Just 567
 +    "568" -> Just 568
 +    "569" -> Just 569
 +    "570" -> Just 570
 +    "571" -> Just 571
 +    "572" -> Just 572
 +    "573" -> Just 573
 +    "574" -> Just 574
 +    "575" -> Just 575
 +    "576" -> Just 576
 +    "577" -> Just 577
 +    "578" -> Just 578
 +    "579" -> Just 579
 +    "580" -> Just 580
 +    "581" -> Just 581
 +    "582" -> Just 582
 +    "583" -> Just 583
 +    "584" -> Just 584
 +    "585" -> Just 585
 +    "586" -> Just 586
 +    "587" -> Just 587
 +    "588" -> Just 588
 +    "589" -> Just 589
 +    "590" -> Just 590
 +    "591" -> Just 591
 +    "592" -> Just 592
 +    "593" -> Just 593
 +    "594" -> Just 594
 +    "595" -> Just 595
 +    "596" -> Just 596
 +    "597" -> Just 597
 +    "598" -> Just 598
 +    "599" -> Just 599
 +    "600" -> Just 600
 +    "601" -> Just 601
 +    "602" -> Just 602
 +    "603" -> Just 603
 +    "604" -> Just 604
 +    "605" -> Just 605
 +    "606" -> Just 606
 +    "607" -> Just 607
 +    "608" -> Just 608
 +    "609" -> Just 609
 +    "610" -> Just 610
 +    "611" -> Just 611
 +    "612" -> Just 612
 +    "613" -> Just 613
 +    "614" -> Just 614
 +    "615" -> Just 615
 +    "616" -> Just 616
 +    "617" -> Just 617
 +    "618" -> Just 618
 +    "619" -> Just 619
 +    "620" -> Just 620
 +    "621" -> Just 621
 +    "622" -> Just 622
 +    "623" -> Just 623
 +    "624" -> Just 624
 +    "625" -> Just 625
 +    "626" -> Just 626
 +    "627" -> Just 627
 +    "628" -> Just 628
 +    "629" -> Just 629
 +    "630" -> Just 630
 +    "631" -> Just 631
 +    "632" -> Just 632
 +    "633" -> Just 633
 +    "634" -> Just 634
 +    "635" -> Just 635
 +    "636" -> Just 636
 +    "637" -> Just 637
 +    "638" -> Just 638
 +    "639" -> Just 639
 +    "640" -> Just 640
 +    "641" -> Just 641
 +    "642" -> Just 642
 +    "643" -> Just 643
 +    "644" -> Just 644
 +    "645" -> Just 645
 +    "646" -> Just 646
 +    "647" -> Just 647
 +    "648" -> Just 648
 +    "649" -> Just 649
 +    "650" -> Just 650
 +    _ -> Nothing

testsuite/tests/perf/compiler/all.T

@@ -792,3 +792,8 @@ test('interpreter_steplocal',
       ],
       ghci_script,
       ['interpreter_steplocal.script'])
++
 +test ('T26425',
 +      [ collect_compiler_stats('all',5) ],
 +      compile,
 +      ['-O'])