Hello community,

here is the log from the commit of package ghc-semigroups for openSUSE:Factory 
checked in at 2018-05-30 12:13:12
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-semigroups (Old)
 and      /work/SRC/openSUSE:Factory/.ghc-semigroups.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "ghc-semigroups"

Wed May 30 12:13:12 2018 rev:12 rq:607880 version:0.18.4

Changes:
--------
--- /work/SRC/openSUSE:Factory/ghc-semigroups/ghc-semigroups.changes    
2017-09-15 22:11:25.135600770 +0200
+++ /work/SRC/openSUSE:Factory/.ghc-semigroups.new/ghc-semigroups.changes       
2018-05-30 12:27:10.730543618 +0200
@@ -1,0 +2,7 @@
+Mon May 14 17:02:11 UTC 2018 - [email protected]
+
+- Update semigroups to version 0.18.4.
+  * Backport `Semigroup` instances for `Data.Ord.Down` and strict
+    `ST`, which were added in `base-4.11`.
+
+-------------------------------------------------------------------

Old:
----
  semigroups-0.18.3.tar.gz

New:
----
  semigroups-0.18.4.tar.gz

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

Other differences:
------------------
++++++ ghc-semigroups.spec ++++++
--- /var/tmp/diff_new_pack.3pm5Ec/_old  2018-05-30 12:27:11.314523417 +0200
+++ /var/tmp/diff_new_pack.3pm5Ec/_new  2018-05-30 12:27:11.314523417 +0200
@@ -1,7 +1,7 @@
 #
 # spec file for package ghc-semigroups
 #
-# Copyright (c) 2017 SUSE LINUX GmbH, Nuernberg, Germany.
+# Copyright (c) 2018 SUSE LINUX GmbH, Nuernberg, Germany.
 #
 # All modifications and additions to the file contributed by third parties
 # remain the property of their copyright owners, unless otherwise agreed
@@ -18,7 +18,7 @@
 
 %global pkg_name semigroups
 Name:           ghc-%{pkg_name}
-Version:        0.18.3
+Version:        0.18.4
 Release:        0
 Summary:        Anything that associates
 License:        BSD-3-Clause
@@ -62,7 +62,7 @@
 %ghc_pkg_recache
 
 %files -f %{name}.files
-%doc LICENSE
+%license LICENSE
 
 %files devel -f %{name}-devel.files
 %doc CHANGELOG.markdown README.markdown

++++++ semigroups-0.18.3.tar.gz -> semigroups-0.18.4.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/semigroups-0.18.3/.travis.yml 
new/semigroups-0.18.4/.travis.yml
--- old/semigroups-0.18.3/.travis.yml   2017-04-16 18:47:49.000000000 +0200
+++ new/semigroups-0.18.4/.travis.yml   2018-01-30 05:26:43.000000000 +0100
@@ -1,7 +1,15 @@
-# This file has been generated -- see https://github.com/hvr/multi-ghc-travis
+# This Travis job script has been generated by a script via
+#
+#   runghc make_travis_yml_2.hs '-o' '.travis.yml' 
'--irc-channel=irc.freenode.org#haskell-lens' '--no-no-tests-no-bench' 
'--no-installed' 'cabal.project'
+#
+# For more information, see https://github.com/hvr/multi-ghc-travis
+#
 language: c
 sudo: false
 
+git:
+  submodules: false  # whether to recursively clone submodules
+
 notifications:
   irc:
     channels:
@@ -12,100 +20,127 @@
 
 cache:
   directories:
-    - $HOME/.cabsnap
     - $HOME/.cabal/packages
+    - $HOME/.cabal/store
 
 before_cache:
   - rm -fv $HOME/.cabal/packages/hackage.haskell.org/build-reports.log
-  - rm -fv $HOME/.cabal/packages/hackage.haskell.org/00-index.tar
+  # remove files that are regenerated by 'cabal update'
+  - rm -fv $HOME/.cabal/packages/hackage.haskell.org/00-index.*
+  - rm -fv $HOME/.cabal/packages/hackage.haskell.org/*.json
+  - rm -fv $HOME/.cabal/packages/hackage.haskell.org/01-index.cache
+  - rm -fv $HOME/.cabal/packages/hackage.haskell.org/01-index.tar
+  - rm -fv $HOME/.cabal/packages/hackage.haskell.org/01-index.tar.idx
+
+  - rm -rfv $HOME/.cabal/packages/head.hackage
 
 matrix:
   include:
-    - env: CABALVER=1.18 GHCVER=7.0.4
-      compiler: ": #GHC 7.0.4"
-      addons: {apt: {packages: [cabal-install-1.18,ghc-7.0.4], sources: 
[hvr-ghc]}}
-    - env: CABALVER=1.18 GHCVER=7.2.2
-      compiler: ": #GHC 7.2.2"
-      addons: {apt: {packages: [cabal-install-1.18,ghc-7.2.2], sources: 
[hvr-ghc]}}
-    - env: CABALVER=1.18 GHCVER=7.4.2
-      compiler: ": #GHC 7.4.2"
-      addons: {apt: {packages: [cabal-install-1.18,ghc-7.4.2], sources: 
[hvr-ghc]}}
-    - env: CABALVER=1.18 GHCVER=7.6.3
-      compiler: ": #GHC 7.6.3"
-      addons: {apt: {packages: [cabal-install-1.18,ghc-7.6.3], sources: 
[hvr-ghc]}}
-    - env: CABALVER=1.18 GHCVER=7.8.4
-      compiler: ": #GHC 7.8.4"
-      addons: {apt: {packages: [cabal-install-1.18,ghc-7.8.4], sources: 
[hvr-ghc]}}
-    - env: CABALVER=1.22 GHCVER=7.10.3
-      compiler: ": #GHC 7.10.3"
-      addons: {apt: {packages: [cabal-install-1.22,ghc-7.10.3], sources: 
[hvr-ghc]}}
-    - env: CABALVER=1.24 GHCVER=8.0.2
-      compiler: ": #GHC 8.0.2"
-      addons: {apt: {packages: [cabal-install-1.24,ghc-8.0.2], sources: 
[hvr-ghc]}}
-    - env: CABALVER=2.0 GHCVER=8.2.1
-      compiler: ": #GHC 8.2.1"
-      addons: {apt: {packages: [cabal-install-2.0,ghc-8.2.1], sources: 
[hvr-ghc]}}
-    - env: CABALVER=head GHCVER=head
-      compiler: ": #GHC head"
-      addons: {apt: {packages: [cabal-install-head,ghc-head], sources: 
[hvr-ghc]}}
+    - compiler: "ghc-7.0.4"
+    # env: TEST=--disable-tests BENCH=--disable-benchmarks
+      addons: {apt: {packages: [ghc-ppa-tools,cabal-install-2.0,ghc-7.0.4], 
sources: [hvr-ghc]}}
+    - compiler: "ghc-7.2.2"
+    # env: TEST=--disable-tests BENCH=--disable-benchmarks
+      addons: {apt: {packages: [ghc-ppa-tools,cabal-install-2.0,ghc-7.2.2], 
sources: [hvr-ghc]}}
+    - compiler: "ghc-7.4.2"
+    # env: TEST=--disable-tests BENCH=--disable-benchmarks
+      addons: {apt: {packages: [ghc-ppa-tools,cabal-install-2.0,ghc-7.4.2], 
sources: [hvr-ghc]}}
+    - compiler: "ghc-7.6.3"
+    # env: TEST=--disable-tests BENCH=--disable-benchmarks
+      addons: {apt: {packages: [ghc-ppa-tools,cabal-install-2.0,ghc-7.6.3], 
sources: [hvr-ghc]}}
+    - compiler: "ghc-7.8.4"
+    # env: TEST=--disable-tests BENCH=--disable-benchmarks
+      addons: {apt: {packages: [ghc-ppa-tools,cabal-install-2.0,ghc-7.8.4], 
sources: [hvr-ghc]}}
+    - compiler: "ghc-7.10.3"
+    # env: TEST=--disable-tests BENCH=--disable-benchmarks
+      addons: {apt: {packages: [ghc-ppa-tools,cabal-install-2.0,ghc-7.10.3], 
sources: [hvr-ghc]}}
+    - compiler: "ghc-8.0.2"
+    # env: TEST=--disable-tests BENCH=--disable-benchmarks
+      addons: {apt: {packages: [ghc-ppa-tools,cabal-install-2.0,ghc-8.0.2], 
sources: [hvr-ghc]}}
+    - compiler: "ghc-8.2.2"
+    # env: TEST=--disable-tests BENCH=--disable-benchmarks
+      addons: {apt: {packages: [ghc-ppa-tools,cabal-install-2.0,ghc-8.2.2], 
sources: [hvr-ghc]}}
+    - compiler: "ghc-8.4.1"
+      env: GHCHEAD=true
+      addons: {apt: {packages: [ghc-ppa-tools,cabal-install-head,ghc-8.4.1], 
sources: [hvr-ghc]}}
+    - compiler: "ghc-head"
+      env: GHCHEAD=true
+      addons: {apt: {packages: [ghc-ppa-tools,cabal-install-head,ghc-head], 
sources: [hvr-ghc]}}
 
   allow_failures:
-    - env: CABALVER=head GHCVER=head
+    - compiler: "ghc-7.0.4"
+    - compiler: "ghc-7.2.2"
+    - compiler: "ghc-8.4.1"
+    - compiler: "ghc-head"
 
 before_install:
- - unset CC
- - export PATH=/opt/ghc/$GHCVER/bin:/opt/cabal/$CABALVER/bin:$PATH
+  - HC=${CC}
+  - HCPKG=${HC/ghc/ghc-pkg}
+  - unset CC
+  - ROOTDIR=$(pwd)
+  - mkdir -p $HOME/.local/bin
+  - "PATH=/opt/ghc/bin:/opt/ghc-ppa-tools/bin:$HOME/local/bin:$PATH"
+  - HCNUMVER=$(( $(${HC} --numeric-version|sed -E 
's/([0-9]+)\.([0-9]+)\.([0-9]+).*/\1 * 10000 + \2 * 100 + \3/') ))
+  - echo $HCNUMVER
 
 install:
- - cabal --version
- - echo "$(ghc --version) [$(ghc --print-project-git-commit-id 2> /dev/null || 
echo '?')]"
- - if [ -f $HOME/.cabal/packages/hackage.haskell.org/00-index.tar.gz ];
-   then
-     zcat $HOME/.cabal/packages/hackage.haskell.org/00-index.tar.gz >
-          $HOME/.cabal/packages/hackage.haskell.org/00-index.tar;
-   fi
- - travis_retry cabal update -v
- - sed -i 's/^jobs:/-- jobs:/' ${HOME}/.cabal/config
- - cabal install --only-dependencies --enable-tests --enable-benchmarks --dry 
-v > installplan.txt
- - sed -i -e '1,/^Resolving /d' installplan.txt; cat installplan.txt
-
-# check whether current requested install-plan matches cached package-db 
snapshot
- - if diff -u installplan.txt $HOME/.cabsnap/installplan.txt;
-   then
-     echo "cabal build-cache HIT";
-     rm -rfv .ghc;
-     cp -a $HOME/.cabsnap/ghc $HOME/.ghc;
-     cp -a $HOME/.cabsnap/lib $HOME/.cabsnap/share $HOME/.cabsnap/bin 
$HOME/.cabal/;
-   else
-     echo "cabal build-cache MISS";
-     rm -rf $HOME/.cabsnap;
-     mkdir -p $HOME/.ghc $HOME/.cabal/lib $HOME/.cabal/share $HOME/.cabal/bin;
-     cabal install -j --only-dependencies --enable-tests --enable-benchmarks;
-   fi
-
-# snapshot package-db on cache miss
- - if [ ! -d $HOME/.cabsnap ];
-   then
-      echo "snapshotting package-db to build-cache";
-      mkdir $HOME/.cabsnap;
-      cp -a $HOME/.ghc $HOME/.cabsnap/ghc;
-      cp -a $HOME/.cabal/lib $HOME/.cabal/share $HOME/.cabal/bin 
installplan.txt $HOME/.cabsnap/;
-   fi
+  - cabal --version
+  - echo "$(${HC} --version) [$(${HC} --print-project-git-commit-id 2> 
/dev/null || echo '?')]"
+  - BENCH=${BENCH---enable-benchmarks}
+  - TEST=${TEST---enable-tests}
+  - HADDOCK=${HADDOCK-true}
+  - INSTALLED=${INSTALLED-true}
+  - GHCHEAD=${GHCHEAD-false}
+  - travis_retry cabal update -v
+  - "sed -i.bak 's/^jobs:/-- jobs:/' ${HOME}/.cabal/config"
+  - rm -fv cabal.project cabal.project.local
+  # Overlay Hackage Package Index for GHC HEAD: 
https://github.com/hvr/head.hackage
+  - |
+    if $GHCHEAD; then
+      sed -i.bak 's/-- allow-newer:.*/allow-newer: *:base, *:template-haskell, 
*:ghc, *:Cabal/' ${HOME}/.cabal/config
+
+      echo 'repository head.hackage'                                           
             >> ${HOME}/.cabal/config
+      echo '   url: http://head.hackage.haskell.org/'                          
             >> ${HOME}/.cabal/config
+      echo '   secure: True'                                                   
             >> ${HOME}/.cabal/config
+      echo '   root-keys: 
07c59cb65787dedfaef5bd5f987ceb5f7e5ebf88b904bbd4c5cbdeb2ff71b740' >> 
${HOME}/.cabal/config
+      echo '              
2e8555dde16ebd8df076f1a8ef13b8f14c66bad8eafefd7d9e37d0ed711821fb' >> 
${HOME}/.cabal/config
+      echo '              
8f79fd2389ab2967354407ec852cbe73f2e8635793ac446d09461ffb99527f6e' >> 
${HOME}/.cabal/config
+      echo '   key-threshold: 3'                                               
             >> ${HOME}/.cabal.config
+
+      cabal new-update head.hackage -v
+    fi
+  - grep -Ev -- '^\s*--' ${HOME}/.cabal/config | grep -Ev '^\s*$'
+  - "printf 'packages: \".\"\\n' > cabal.project"
+  - cat cabal.project
+  - if [ -f "./configure.ac" ]; then
+      (cd "." && autoreconf -i);
+    fi
+  - rm -f cabal.project.freeze
+  - cabal new-build -w ${HC} ${TEST} ${BENCH} --project-file="cabal.project" 
--dep -j2 all
+  - rm -rf "."/.ghc.environment.* "."/dist
+  - DISTDIR=$(mktemp -d /tmp/dist-test.XXXX)
 
 # Here starts the actual work to be performed for the package under test;
 # any command which exits with a non-zero exit code causes the build to fail.
 script:
- - if [ -f configure.ac ]; then autoreconf -i; fi
- - cabal configure --enable-tests --enable-benchmarks -v2  # -v2 provides 
useful information for debugging
- - cabal build   # this builds all libraries and executables (including 
tests/benchmarks)
- - cabal test
- - cabal check
- - cabal sdist   # tests that a source-distribution can be generated
-
-# Check that the resulting source distribution can be built & installed.
-# If there are no other `.tar.gz` files in `dist`, this can be even simpler:
-# `cabal install --force-reinstalls dist/*-*.tar.gz`
- - SRC_TGZ=$(cabal info . | awk '{print $2;exit}').tar.gz &&
-   (cd dist && cabal install --force-reinstalls "$SRC_TGZ")
+  # test that source-distributions can be generated
+  - (cd "." && cabal sdist)
+  - mv "."/dist/semigroups-*.tar.gz ${DISTDIR}/
+  - cd ${DISTDIR} || false
+  - find . -maxdepth 1 -name '*.tar.gz' -exec tar -xvf '{}' \;
+  - "printf 'packages: semigroups-*/*.cabal\\n' > cabal.project"
+  - cat cabal.project
+
+
+  # build & run tests, build benchmarks
+  - cabal new-build -w ${HC} ${TEST} ${BENCH} all
+
+  # cabal check
+  - (cd semigroups-* && cabal check)
+
+  # haddock
+  - rm -rf ./dist-newstyle
+  - if $HADDOCK; then cabal new-haddock -w ${HC} ${TEST} ${BENCH} all; else 
echo "Skipping haddock generation";fi
 
+# REGENDATA 
["-o",".travis.yml","--irc-channel=irc.freenode.org#haskell-lens","--no-no-tests-no-bench","--no-installed","cabal.project"]
 # EOF
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/semigroups-0.18.3/CHANGELOG.markdown 
new/semigroups-0.18.4/CHANGELOG.markdown
--- old/semigroups-0.18.3/CHANGELOG.markdown    2017-04-16 18:47:49.000000000 
+0200
+++ new/semigroups-0.18.4/CHANGELOG.markdown    2018-01-30 05:26:43.000000000 
+0100
@@ -1,3 +1,8 @@
+0.18.4 [2018.01.29]
+-------------------
+* Backport `Semigroup` instances for `Data.Ord.Down` and strict `ST`, which 
were
+  added in `base-4.11`.
+
 0.18.3
 ------
 * Add `Semigroup` instance for `IO`, as well as for `Event` and `Lifetime` from
@@ -79,7 +84,7 @@
 
 0.15.1
 ------
-* Nathan van Doorn fixed a number of embarassing bugs in the `Enum` instances.
+* Nathan van Doorn fixed a number of embarrassing bugs in the `Enum` instances.
 
 0.15
 ----
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/semigroups-0.18.3/README.markdown 
new/semigroups-0.18.4/README.markdown
--- old/semigroups-0.18.3/README.markdown       2017-04-16 18:47:49.000000000 
+0200
+++ new/semigroups-0.18.4/README.markdown       2018-01-30 05:26:43.000000000 
+0100
@@ -7,7 +7,7 @@
 
 More formally, a semigroup is an algebraic structure consisting of a set 
together with an associative binary operation. A semigroup generalizes a monoid 
in that there might not exist an identity element. It also (originally) 
generalized a group (a monoid with all inverses) to a type where every element 
did not have to have an inverse, thus the name semigroup.
 
-Semigroups appear all over the place, except in the Haskell Prelude, so they 
are packaged here.
+`Data.Semigroup` and `Data.List.NonEmpty` were added to `base` as of 4.9.0.0. 
This package now offers a backwards-compatible API and some tools for deriving 
semigroups with generics.
 
 Contact Information
 -------------------
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/semigroups-0.18.3/semigroups.cabal 
new/semigroups-0.18.4/semigroups.cabal
--- old/semigroups-0.18.3/semigroups.cabal      2017-04-16 18:47:49.000000000 
+0200
+++ new/semigroups-0.18.4/semigroups.cabal      2018-01-30 05:26:43.000000000 
+0100
@@ -1,6 +1,6 @@
 name:          semigroups
 category:      Algebra, Data, Data Structures, Math
-version:       0.18.3
+version:       0.18.4
 license:       BSD3
 cabal-version: >= 1.10
 license-file:  LICENSE
@@ -15,6 +15,15 @@
     In mathematics, a semigroup is an algebraic structure consisting of a set 
together with an associative binary operation. A semigroup generalizes a monoid 
in that there might not exist an identity element. It also (originally) 
generalized a group (a monoid with all inverses) to a type where every element 
did not have to have an inverse, thus the name semigroup.
 build-type:    Simple
 extra-source-files: .travis.yml README.markdown CHANGELOG.markdown
+tested-with:   GHC == 7.0.4
+             , GHC == 7.2.2
+             , GHC == 7.4.2
+             , GHC == 7.6.3
+             , GHC == 7.8.4
+             , GHC == 7.10.3
+             , GHC == 8.0.2
+             , GHC == 8.2.2
+             , GHC == 8.4.1
 
 source-repository head
   type: git
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/semigroups-0.18.3/src-ghc7/Data/List/NonEmpty.hs 
new/semigroups-0.18.4/src-ghc7/Data/List/NonEmpty.hs
--- old/semigroups-0.18.3/src-ghc7/Data/List/NonEmpty.hs        2017-04-16 
18:47:49.000000000 +0200
+++ new/semigroups-0.18.4/src-ghc7/Data/List/NonEmpty.hs        2018-01-30 
05:26:43.000000000 +0100
@@ -629,6 +629,7 @@
   | n > 0  = xs List.!! (n - 1)
   | otherwise = error "NonEmpty.!! negative argument"
 {-# INLINE (!!) #-}
+infixl 9 !!
 
 -- | The 'zip' function takes two streams and returns a stream of
 -- corresponding pairs.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/semigroups-0.18.3/src-ghc7/Data/Semigroup.hs 
new/semigroups-0.18.4/src-ghc7/Data/Semigroup.hs
--- old/semigroups-0.18.3/src-ghc7/Data/Semigroup.hs    2017-04-16 
18:47:49.000000000 +0200
+++ new/semigroups-0.18.4/src-ghc7/Data/Semigroup.hs    2018-01-30 
05:26:43.000000000 +0100
@@ -114,9 +114,15 @@
 import Control.Applicative
 import Control.Monad
 import Control.Monad.Fix
+import qualified Control.Monad.ST as Strict
 import qualified Data.Monoid as Monoid
 import Data.List.NonEmpty
-#if MIN_VERSION_base(4,4,0) && !defined(mingw32_HOST_OS) && 
!defined(ghcjs_HOST_OS)
+#if MIN_VERSION_base(4,6,0)
+import Data.Ord (Down(..))
+#else
+import GHC.Exts (Down(..))
+#endif
+#if MIN_VERSION_base(4,4,0) && !defined(mingw32_HOST_OS) && 
!defined(ghcjs_HOST_OS) && !defined(ETA_VERSION)
 import GHC.Event
 #endif
 
@@ -238,13 +244,19 @@
       f x y
         | even y = f (x <> x) (y `quot` 2)
         | y == 1 = x
-        | otherwise = g (x <> x) (pred y  `quot` 2) x
+        | otherwise = g (x <> x) (y `quot` 2) x        -- See Note [Half of y 
- 1]
       g x y z
         | even y = g (x <> x) (y `quot` 2) z
         | y == 1 = x <> z
-        | otherwise = g (x <> x) (pred y `quot` 2) (x <> z)
+        | otherwise = g (x <> x) (y `quot` 2) (x <> z) -- See Note [Half of y 
- 1]
   {-# INLINE stimes #-}
 
+{- Note [Half of y - 1]
+   ~~~~~~~~~~~~~~~~~~~~~
+   Since y is guaranteed to be odd and positive here,
+   half of y - 1 can be computed as y `quot` 2, optimising subtraction away.
+-}
+
 -- | A generalization of 'Data.List.cycle' to an arbitrary 'Semigroup'.
 -- May fail to terminate for some values in some semigroups.
 cycle1 :: Semigroup m => m -> m
@@ -352,6 +364,14 @@
 #endif
   stimes n (Product a) = Product (a ^ n)
 
+instance Semigroup a => Semigroup (Down a) where
+#ifdef USE_COERCE
+  (<>) = coerce ((<>) :: a -> a -> a)
+#else
+  Down a <> Down b = Down (a <> b)
+#endif
+  stimes n (Down a) = Down (stimes n a)
+
 -- | This is a valid definition of 'stimes' for a 'Monoid'.
 --
 -- Unlike the default definition of 'stimes', it is defined for 0
@@ -365,11 +385,11 @@
       f x y
         | even y = f (x `mappend` x) (y `quot` 2)
         | y == 1 = x
-        | otherwise = g (x `mappend` x) (pred y  `quot` 2) x
+        | otherwise = g (x `mappend` x) (y  `quot` 2) x              -- See 
Note [Half of y - 1]
       g x y z
         | even y = g (x `mappend` x) (y `quot` 2) z
         | y == 1 = x `mappend` z
-        | otherwise = g (x `mappend` x) (pred y `quot` 2) (x `mappend` z)
+        | otherwise = g (x `mappend` x) (y `quot` 2) (x `mappend` z) -- See 
Note [Half of y - 1]
 
 -- | This is a valid definition of 'stimes' for an idempotent 'Monoid'.
 --
@@ -1212,7 +1232,14 @@
 instance Semigroup a => Semigroup (IO a) where
     (<>) = liftA2 (<>)
 
-#if !defined(mingw32_HOST_OS) && !defined(ghcjs_HOST_OS)
+instance Semigroup a => Semigroup (Strict.ST s a) where
+#if MIN_VERSION_base(4,4,0)
+    (<>) = liftA2 (<>)
+#else
+    (<>) = liftM2 (<>) -- No Applicative instance for ST on GHC 7.0
+#endif
+
+#if !defined(mingw32_HOST_OS) && !defined(ghcjs_HOST_OS) && 
!defined(ETA_VERSION)
 # if MIN_VERSION_base(4,4,0)
 instance Semigroup Event where
     (<>) = mappend


Reply via email to