diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -1,6 +1,7 @@
 # shake-language-c
 
-[![Build Status](https://travis-ci.org/samplecount/shake-language-c.svg?branch=develop)](https://travis-ci.org/samplecount/shake-language-c)
+[![Hackage version](https://img.shields.io/hackage/v/shake-language-c.svg?style=flat)](https://hackage.haskell.org/package/shake-language-c)
+[![Build Status](https://img.shields.io/travis/samplecount/shake-language-c.svg?style=flat&branch=develop)](https://travis-ci.org/samplecount/shake-language-c)
 
 **shake-language-c** is a cross-platform build system based on the [Shake](https://github.com/ndmitchell/shake) Haskell library. The focus is on cross-compilation of *C*, *C++* and *Objective C* source code to various target platforms. Currently supported target platforms are *iOS*, *Android NDK*, *Google Portable Native Client*, *MacOS X*, *Linux* and *Windows* (*MinGW*). Supported host platforms are *MacOS X*, *Linux* and *Windows*.
 
@@ -29,7 +30,7 @@
 
       lib <- staticLibrary toolChain
               ("build" </> toBuildPrefix target </> "libexample.a")
-              (return $ 
+              (return $
                    append compilerFlags [(Just Cpp, ["-std=c++11"])]
                >>> append compilerFlags [(Nothing, ["-O3"])]
                >>> append userIncludes ["include"] )
diff --git a/shake-language-c.cabal b/shake-language-c.cabal
--- a/shake-language-c.cabal
+++ b/shake-language-c.cabal
@@ -13,7 +13,7 @@
 -- limitations under the License.
 
 Name:         shake-language-c
-Version:      0.8.3
+Version:      0.8.4
 Synopsis:     Utilities for cross-compiling with Shake
 Description:  This library provides <http://hackage.haskell.org/package/shake Shake> utilities for cross-compiling @C@, @C++@ and @ObjC@ code for various target platforms. Currently supported target platforms are Android, iOS, Linux, MacOS X, Windows\/MinGW and Google Portable Native Client (PNaCl). Supported host platforms are MacOS X, Linux and Windows.
 Category:     Development
diff --git a/src/Development/Shake/Language/C/Host/Linux.hs b/src/Development/Shake/Language/C/Host/Linux.hs
--- a/src/Development/Shake/Language/C/Host/Linux.hs
+++ b/src/Development/Shake/Language/C/Host/Linux.hs
@@ -25,7 +25,7 @@
 -- | Get host architecture.
 getHostArch :: IO Arch
 getHostArch = do
-    arch <- fmap (head.lines) $ readProcess "arch" [] ""
+    arch <- fmap (head.lines) $ readProcess "uname" ["-m"] ""
     return $ case arch of
         "i386" -> X86 I386
         "i686" -> X86 I686