diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,5 +1,11 @@
 # Changelog
 
+## [0.1.0.3] - 2018-06-29
+
+### Changed
+
+- Test suite dependencies bump
+
 ## [0.1.0.2] - 2018-05-12
 
 ### Changed
@@ -16,6 +22,7 @@
 
 ## [0.1] - 2018-03-20
 
+[0.1.0.3]: https://github.com/dzhus/csg/compare/0.1.0.2...0.1.0.3
 [0.1.0.2]: https://github.com/dzhus/csg/compare/0.1.0.1...0.1.0.2
 [0.1.0.1]: https://github.com/dzhus/csg/compare/0.1...0.1.0.1
 [0.1]: https://github.com/dzhus/csg/tree/0.1
diff --git a/csg.cabal b/csg.cabal
--- a/csg.cabal
+++ b/csg.cabal
@@ -1,6 +1,6 @@
 cabal-version: >=1.10
 name: csg
-version: 0.1.0.2
+version: 0.1.0.3
 license: BSD3
 license-file: LICENSE
 maintainer: dima@dzhus.org
@@ -77,7 +77,7 @@
     ghc-options: -Wall -Wcompat -O2 -threaded
     build-depends:
         base <5,
-        doctest <0.16,
+        doctest <0.17,
         doctest-driver-gen <0.3,
         simple-vec3 ==0.4.*
 
diff --git a/src/Data/CSG/Parser.hs b/src/Data/CSG/Parser.hs
--- a/src/Data/CSG/Parser.hs
+++ b/src/Data/CSG/Parser.hs
@@ -242,8 +242,7 @@
 binary op compose = do
   b1 <- uncomposedSolid
   lift (skipSpace *> string op *> skipSpace)
-  b2 <- solid
-  return $ compose b1 b2
+  compose b1 <$> solid
 
 
 -- | Read a stamement which adds a new solid entry to the lookup