ghc-lib-parser-ex 9.2.1.0 → 9.2.1.1
raw patch · 3 files changed
+23/−1 lines, 3 files
Files
- ChangeLog.md +6/−0
- ghc-lib-parser-ex.cabal +1/−1
- src/Language/Haskell/GhclibParserEx/GHC/Hs/Expr.hs +16/−0
ChangeLog.md view
@@ -1,5 +1,11 @@ # Changelog for ghc-lib-parser-ex +## 9.2.1.1 released+- Update to `ghc-lib-parser-9.2.4.20220527`++## 0.20220701 released+- Update to `ghc-lib-parser-0.20220701`+ ## 9.2.1.0 released - The Cabal flag `auto` now defaults to `False`: - When `auto` has the value `False`:
ghc-lib-parser-ex.cabal view
@@ -1,6 +1,6 @@ cabal-version: 1.18 name: ghc-lib-parser-ex-version: 9.2.1.0+version: 9.2.1.1 description: Please see the README on GitHub at <https://github.com/shayne-fletcher/ghc-lib-parser-ex#readme> homepage: https://github.com/shayne-fletcher/ghc-lib-parser-ex#readme bug-reports: https://github.com/shayne-fletcher/ghc-lib-parser-ex/issues
src/Language/Haskell/GhclibParserEx/GHC/Hs/Expr.hs view
@@ -60,7 +60,11 @@ isAnyApp x = isApp x || isOpApp x isLexeme = \case (L _ HsVar{}) -> True; (L _ HsOverLit{}) -> True; (L _ HsLit{}) -> True; _ -> False isLambda = \case (L _ HsLam{}) -> True; _ -> False+#if defined (GHCLIB_API_HEAD)+isQuasiQuoteExpr = \case (L _ (HsUntypedSplice _ HsQuasiQuote{})) -> True; _ -> False+#else isQuasiQuoteExpr = \case (L _ (HsSpliceE _ HsQuasiQuote{})) -> True; _ -> False+#endif isQuasiQuote = isQuasiQuoteExpr -- Backwards compat. isDotApp = \case (L _ (OpApp _ _ op _)) -> isDot op; _ -> False isTypeApp = \case (L _ HsAppType{}) -> True; _ -> False@@ -84,9 +88,14 @@ isLCase = \case (L _ HsLamCase{}) -> True; _ -> False isOverLabel = \case (L _ HsOverLabel{}) -> True; _ -> False +#if defined (GHCLIB_API_HEAD)+isQuasiQuoteSplice :: HsUntypedSplice GhcPs -> Bool+#else isQuasiQuoteSplice :: HsSplice GhcPs -> Bool+#endif isQuasiQuoteSplice = \case HsQuasiQuote{} -> True; _ -> False + #if defined (GHCLIB_API_HEAD) || defined (GHCLIB_API_904) || defined(GHCLIB_API_902) || defined (GHCLIB_API_901) isStrictMatch :: HsMatchContext GhcPs -> Bool #else@@ -165,7 +174,14 @@ _ -> False isSpliceDecl :: HsExpr GhcPs -> Bool+#if defined (GHCLIB_API_HEAD)+isSpliceDecl = \case+ HsTypedSplice{} -> True+ HsUntypedSplice{} -> True+ _ -> False+#else isSpliceDecl = \case HsSpliceE{} -> True; _ -> False+#endif isMultiIf :: HsExpr GhcPs -> Bool isMultiIf = \case HsMultiIf{} -> True; _ -> False