xml-hamlet: Couldn't match expected type ‘ArgPat’ with actual type ‘Pat’, with ghc-9.10

[jwaldmann]

with ghc-9.10.1-alpha-1, and head.hackage of 2024-03-15T20:19:59Z

[2 of 2] Compiling Text.Hamlet.XML  ( Text/Hamlet/XML.hs, dist/build/Text/Hamlet/XML.o, dist/build/Text/Hamlet/XML.dyn_o )
                                                                 
Text/Hamlet/XML.hs:154:21: error: [GHC-83865]
    • Couldn't match expected type ‘ArgPat’ with actual type ‘Pat’
    • In the expression: pat 
      In the first argument of ‘LamE’, namely ‘[pat]’
      In the expression: LamE [pat] inside'  
    |                                                                                                                             
154 |     let lam = LamE [pat] inside'
    |                     ^^^          
...

see https://gitlab.haskell.org/ghc/ghc/-/blob/master/libraries/template-haskell/changelog.md?ref_type=heads#anchor-22200 ("Added new data type ArgPat with two constructors")