packages feed

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

SCase60.hs:(13,15)-(17,9): Splicing expression
    ghc-internal:GHC.Internal.TH.Quote.quoteExp
      sCase
      " xs of\n\
      \                []         -> 0\n\
      \                y : _ | y .== 5 -> 100\n\
      \                _ : ys     -> t ys\n\
      \       "
  ======>
    ite
      (Data.SBV.List.null xs) 0
      (ite
         ((.&&)
            (sNot (Data.SBV.List.null xs))
            ((\ y _ -> y .== 5)
               (Data.SBV.List.head xs) (Data.SBV.List.tail xs)))
         ((\ y _ -> const 100 y)
            (Data.SBV.List.head xs) (Data.SBV.List.tail xs))
         ((\ _ ys -> t ys) (Data.SBV.List.head xs) (Data.SBV.List.tail xs)))