emacs-module 0.2.1 → 0.2.1.1

raw patch · 4 files changed

+14/−6 lines, 4 filesdep +os-stringdep ~basedep ~filepathPVP ok

version bump matches the API change (PVP)

Dependencies added: os-string

Dependency ranges changed: base, filepath

API changes (from Hackage documentation)

Files

Changelog.md +4/−0
emacs-module.cabal +7/−4
src/Data/Emacs/Module/Raw/Env/TH.hs +2/−2
src/Data/Emacs/Module/SymbolName/TH.hs +1/−0

Changelog.md view

@@ -1,3 +1,7 @@+# 0.2.1.1++- Fix build with GHC 9.10.1+ # 0.2.1  - Expose `make_unibyte_string` as `makeBinaryString`

emacs-module.cabal view

@@ -3,7 +3,7 @@ name:   emacs-module version:-  0.2.1+  0.2.1.1 category: Foreign, Foreign binding  synopsis:@@ -33,18 +33,20 @@   , GHC == 9.4.7   , GHC == 9.6.3   , GHC == 9.8.1+  , GHC == 9.10.1  extra-source-files:   cbits/emacs-module.h -extra-source-files:+extra-doc-files:   Changelog.md   Readme.md  build-type:   Simple -homepage: https://github.com/sergv/emacs-module+homepage:+  https://github.com/sergv/emacs-module  source-repository head   type: git@@ -143,10 +145,11 @@     , bytestring     , deepseq     , exceptions-    , filepath >= 1.4.100+    , filepath >= 1.5     , monad-control     , monad-interleave >= 0.2     , mtl >= 2.3+    , os-string     , primitive     , prettyprinter >= 1.7     , prettyprinter-combinators

src/Data/Emacs/Module/Raw/Env/TH.hs view

@@ -13,7 +13,7 @@  import Control.Monad.IO.Class import Data.Bifunctor-import Data.List (foldl')+import Data.List qualified as L import Foreign.Ptr as Foreign import Language.Haskell.TH @@ -65,7 +65,7 @@         funPtrVar <- newName "funPtr"         [e|liftIO|] `appE` doE           [ bindS (varP funPtrVar) $ peekExpr `appE` ([e| Env.toPtr |] `appE` varE envArg)-          , noBindS $ foldl' appE (varE foreignFuncName) (map varE $ funPtrVar : envArg : otherArgs)+          , noBindS $ L.foldl' appE (varE foreignFuncName) (map varE $ funPtrVar : envArg : otherArgs)           ]   m    <- newName "m"   ret' <- case ret of

src/Data/Emacs/Module/SymbolName/TH.hs view

@@ -6,6 +6,7 @@ -- Maintainer  :  serg.foo@gmail.com ---------------------------------------------------------------------------- +{-# LANGUAGE DataKinds       #-} {-# LANGUAGE MagicHash       #-} {-# LANGUAGE TemplateHaskell #-}