Hello community,

here is the log from the commit of package hdevtools for openSUSE:Factory 
checked in at 2016-06-14 23:08:20
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/hdevtools (Old)
 and      /work/SRC/openSUSE:Factory/.hdevtools.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "hdevtools"

Changes:
--------
--- /work/SRC/openSUSE:Factory/hdevtools/hdevtools.changes      2016-05-17 
17:15:53.000000000 +0200
+++ /work/SRC/openSUSE:Factory/.hdevtools.new/hdevtools.changes 2016-06-14 
23:08:24.000000000 +0200
@@ -1,0 +2,6 @@
+Sun Jun 12 11:44:24 UTC 2016 - [email protected]
+
+- update to 0.1.3.2
+* Added GHC 8.0.x support
+
+-------------------------------------------------------------------

Old:
----
  hdevtools-0.1.3.1.tar.gz

New:
----
  hdevtools-0.1.3.2.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ hdevtools.spec ++++++
--- /var/tmp/diff_new_pack.ggcjvc/_old  2016-06-14 23:08:25.000000000 +0200
+++ /var/tmp/diff_new_pack.ggcjvc/_new  2016-06-14 23:08:25.000000000 +0200
@@ -16,9 +16,8 @@
 #
 
 
-%global debug_package %{nil}
 Name:           hdevtools
-Version:        0.1.3.1
+Version:        0.1.3.2
 Release:        0
 Summary:        Persistent GHC powered background server for FAST haskell 
development tools
 License:        MIT

++++++ hdevtools-0.1.3.1.tar.gz -> hdevtools-0.1.3.2.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/hdevtools-0.1.3.1/CHANGELOG.md 
new/hdevtools-0.1.3.2/CHANGELOG.md
--- old/hdevtools-0.1.3.1/CHANGELOG.md  2016-05-13 14:29:31.000000000 +0200
+++ new/hdevtools-0.1.3.2/CHANGELOG.md  2016-06-10 21:11:40.000000000 +0200
@@ -1,5 +1,9 @@
 # Changelog
 
+## 0.1.3.2 - 2016-06-09
+
+ * Added GHC 8.0.x support
+
 ## 0.1.3.1 - 2016-05-13
 
  * Added support for new Cabal versions
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/hdevtools-0.1.3.1/hdevtools.cabal 
new/hdevtools-0.1.3.2/hdevtools.cabal
--- old/hdevtools-0.1.3.1/hdevtools.cabal       2016-05-13 14:22:19.000000000 
+0200
+++ new/hdevtools-0.1.3.2/hdevtools.cabal       2016-06-10 21:11:45.000000000 
+0200
@@ -1,5 +1,5 @@
 name:                hdevtools
-version:             0.1.3.1
+version:             0.1.3.2
 synopsis:            Persistent GHC powered background server for FAST haskell 
development tools
 license:             MIT
 license-file:        LICENSE
@@ -83,6 +83,10 @@
   if impl(ghc >= 7.7)
     build-depends:     Cabal >= 1.18
 
-  if impl(ghc >= 7.9)
+  if impl(ghc >= 7.9 && < 8.0)
     build-depends:     Cabal >= 1.22,
                        bin-package-db
+
+  if impl(ghc >= 8.0)
+    build-depends:     Cabal >= 1.24,
+                       ghc-boot >= 8.0
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/hdevtools-0.1.3.1/src/CommandLoop.hs 
new/hdevtools-0.1.3.2/src/CommandLoop.hs
--- old/hdevtools-0.1.3.1/src/CommandLoop.hs    2016-05-13 14:20:29.000000000 
+0200
+++ new/hdevtools-0.1.3.2/src/CommandLoop.hs    2016-06-09 21:54:48.000000000 
+0200
@@ -20,6 +20,9 @@
 import System.FilePath (takeDirectory)
 import qualified ErrUtils
 import qualified Exception (ExceptionMonad)
+#if __GLASGOW_HASKELL__ >= 800
+import qualified DynFlags
+#endif
 import qualified GHC
 import qualified GHC.Paths
 import qualified Outputable
@@ -255,7 +258,14 @@
 
 
 
-#if __GLASGOW_HASKELL__ >= 706
+#if __GLASGOW_HASKELL__ >= 800
+logAction :: IORef State -> ClientSend -> GHC.DynFlags -> DynFlags.WarnReason 
-> GHC.Severity -> GHC.SrcSpan -> Outputable.PprStyle -> ErrUtils.MsgDoc -> IO 
()
+logAction state clientSend dflags _ severity srcspan style msg =
+    let out = Outputable.renderWithStyle dflags fullMsg style
+        _ = severity
+    in logActionSend state clientSend severity out
+    where fullMsg = ErrUtils.mkLocMessage severity srcspan msg
+#elif __GLASGOW_HASKELL__ >= 706
 logAction :: IORef State -> ClientSend -> GHC.DynFlags -> GHC.Severity -> 
GHC.SrcSpan -> Outputable.PprStyle -> ErrUtils.MsgDoc -> IO ()
 logAction state clientSend dflags severity srcspan style msg =
     let out = Outputable.renderWithStyle dflags fullMsg style
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/hdevtools-0.1.3.1/src/FindSymbol.hs 
new/hdevtools-0.1.3.2/src/FindSymbol.hs
--- old/hdevtools-0.1.3.1/src/FindSymbol.hs     2015-12-18 15:38:26.000000000 
+0100
+++ new/hdevtools-0.1.3.2/src/FindSymbol.hs     2016-06-09 21:54:48.000000000 
+0200
@@ -30,7 +30,12 @@
    -- or errors to stdout for the loaded source files, we're only
    -- interested in the module graph of the loaded targets
    dynFlags <- GHC.getSessionDynFlags
-   _        <- GHC.setSessionDynFlags dynFlags { GHC.log_action = \_ _ _ _ _ 
-> return () }
+   _        <- GHC.setSessionDynFlags dynFlags { GHC.log_action = \_ _ _ _ _ ->
+#if __GLASGOW_HASKELL__ >= 800
+                                                 return . return $ () }
+#else
+                                                 return () }
+#endif
 
    fileMods <- concat <$> mapM (findSymbolInFile symbol) files
 
@@ -74,6 +79,12 @@
                   . PKG.pkgIdMap
                   . GHC.pkgState
                   <$> GHC.getSessionDynFlags
+#elif __GLASGOW_HASKELL__ >= 800
+      exposedModuleNames = do
+        dynFlags <- GHC.getSessionDynFlags
+        pkgConfigs <- liftIO $ fmap concat
+          . (fmap . fmap) snd . PKG.readPackageConfigs $ dynFlags
+        return $ map exposedName (concatMap exposedModules pkgConfigs)
 #else
       exposedModuleNames = do
         dynFlags <- GHC.getSessionDynFlags
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/hdevtools-0.1.3.1/src/Info.hs 
new/hdevtools-0.1.3.2/src/Info.hs
--- old/hdevtools-0.1.3.1/src/Info.hs   2015-12-18 15:38:26.000000000 +0100
+++ new/hdevtools-0.1.3.2/src/Info.hs   2016-06-09 21:54:48.000000000 +0200
@@ -176,7 +176,10 @@
 pretty :: GHC.Type -> String
 pretty =
 #endif
-#if __GLASGOW_HASKELL__ >= 708
+#if __GLASGOW_HASKELL__ >= 800
+    Pretty.renderStyle
+      Pretty.style{ Pretty.lineLength = 0, Pretty.mode = Pretty.OneLineMode }
+#elif __GLASGOW_HASKELL__ >= 708
     Pretty.showDoc Pretty.OneLineMode 0
 #else
     Pretty.showDocWith Pretty.OneLineMode


Reply via email to