packages feed

sbv-14.0: SBVTestSuite/TestSuite/CompileTests/SCase/SCase61.stderr

SCase61.hs:(11,14)-(15,8): Splicing expression
    ghc-internal:GHC.Internal.TH.Quote.quoteExp
      sCase
      " m of\n\
      \               Nothing        -> 0\n\
      \               Just x | x .> 5 -> x * 2\n\
      \               Just x         -> x\n\
      \      "
  ======>
    ite
      (Data.SBV.Maybe.isNothing m) 0
      (ite
         ((.&&)
            (Data.SBV.Maybe.isJust m)
            ((\ x -> x .> 5) (Data.SBV.Maybe.getJust_1 m)))
         ((\ x -> x * 2) (Data.SBV.Maybe.getJust_1 m))
         ((\ x -> x) (Data.SBV.Maybe.getJust_1 m)))