auto-extract 0.1.0.1 → 0.1.1.0
raw patch · 4 files changed
+15/−7 lines, 4 filesdep ~ghcPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: ghc
API changes (from Hackage documentation)
Files
- CHANGELOG.md +5/−0
- auto-extract.cabal +3/−3
- src/AutoExtract/GhcFacade.hs +2/−4
- src/AutoExtract/Renamer.hs +5/−0
CHANGELOG.md view
@@ -1,5 +1,10 @@ # Revision history for auto-extract +## 0.1.1.0 -- 2026-05-12++* Support GHC 9.14+* Drop support for 9.6+ ## 0.1.0.1 -- 2026-02-03 * Fixed a bug that resulted in needing whitespace before the '('.
auto-extract.cabal view
@@ -1,6 +1,6 @@ cabal-version: 3.0 name: auto-extract-version: 0.1.0.1+version: 0.1.1.0 license: BSD-3-Clause license-file: LICENSE synopsis: Extract code segment to top level function@@ -11,7 +11,7 @@ build-type: Simple extra-doc-files: CHANGELOG.md README.md-tested-with: GHC == 9.12.1, GHC == 9.10.1, GHC == 9.8.1, GHC == 9.6.1+tested-with: GHC == 9.14.1, GHC == 9.12.1, GHC == 9.10.1, GHC == 9.8.1 source-repository head type: git@@ -29,7 +29,7 @@ AutoExtract.Parser -- other-extensions: build-depends: base < 5,- ghc >= 9.6 && < 9.13,+ ghc >= 9.8 && < 9.15, containers, syb, bytestring < 0.13,
src/AutoExtract/GhcFacade.hs view
@@ -32,8 +32,6 @@ import GHC.Types.Name.Ppr as Ghc #if MIN_VERSION_ghc(9,8,0) import GHC.Driver.DynFlags as Ghc-#else-import GHC.Driver.Session as Ghc #endif #if MIN_VERSION_ghc(9,10,0)@@ -51,7 +49,7 @@ -> Ghc.NoAnn ann => Ghc.EpAnn ann diffLine rowOffset colOffset = Ghc.EpAnn (Ghc.EpaDelta (Ghc.DifferentLine rowOffset colOffset) []) Ghc.noAnn Ghc.emptyComments-#elif MIN_VERSION_ghc(9,6,0)+#elif MIN_VERSION_ghc(9,8,0) -> Monoid ann => Ghc.SrcAnn ann diffLine rowOffset colOffset = Ghc.SrcSpanAnn@@ -69,7 +67,7 @@ #if MIN_VERSION_ghc(9,10,0) :: Ghc.NoAnn ann => Ghc.EpAnn ann anchorD1 = Ghc.EpAnn EP.d1 Ghc.noAnn Ghc.emptyComments-#elif MIN_VERSION_ghc(9,6,0)+#elif MIN_VERSION_ghc(9,8,0) :: Monoid ann => Ghc.SrcAnn ann -- blarg
src/AutoExtract/Renamer.hs view
@@ -68,8 +68,13 @@ Ghc.noComments #endif (Ghc.noLocA acc)+#if MIN_VERSION_ghc(9,14,0)+ (Ghc.noLocA $ Ghc.HsVar Ghc.noExtField (Ghc.noLocA (Ghc.noUserRdr arg))))+ (Ghc.HsVar Ghc.noExtField (Ghc.noLocA (Ghc.noUserRdr topLvlName)))+#else (Ghc.noLocA $ Ghc.HsVar Ghc.noExtField (Ghc.noLocA arg))) (Ghc.HsVar Ghc.noExtField (Ghc.noLocA topLvlName))+#endif args in W.writer (newExpr, ([newBind], [(topLvlName, args)]))