diff --git a/bench/Bench.hs b/bench/Bench.hs
--- a/bench/Bench.hs
+++ b/bench/Bench.hs
@@ -20,6 +20,7 @@
 import Data.Word
 import Control.Monad (when)
 import Control.Applicative
+import Data.Text.Lazy.Builder (toLazyText)
 
 import qualified Data.Time as Time
 import qualified Data.Thyme as Thyme
@@ -54,7 +55,23 @@
       either error id
       . Z.parse (Chronos.zeptoUtf8_YmdHMS Chronos.w3c)
 
+    dmy              = "%d:%m:%y."
+    hms              = "%%H:%M:%S."
+    timePretty       = Time.formatTime Time.defaultTimeLocale
+    thymePretty      = Thyme.formatTime Thyme.defaultTimeLocale
+    chronosPrettyDmy = toLazyText
+      . Chronos.builder_Dmy (Just ':')
+      . Chronos.datetimeDate
+      . Chronos.timeToDatetime
+    chronosPrettyHMS = toLazyText
+      . Chronos.builder_HMS Chronos.SubsecondPrecisionAuto (Just ':')
+      . Chronos.datetimeTime
+      . Chronos.timeToDatetime
 
+  timeTime  <- Time.getCurrentTime
+  thymeTime <- Thyme.getCurrentTime
+  chronosTime <- Chronos.now
+
   string <- return $!! renderIsoTime utcthyme
   bytestring <- return $!! BS8.pack (renderIsoTime utcthyme)
 
@@ -65,6 +82,19 @@
       , bench "Thyme.timeParser"          $ nf thymeAttoparsec   bytestring
       , bench "Chronos.parserUtf8_YmdHMS" $ nf chronosAttoparsec bytestring
       , bench "Chronos.zeptoUtf8_YmdHMS"  $ nf chronosZepto      bytestring
+      ]
+
+    , bgroup "prettyPrint"
+      [ bgroup "dmy"
+        [ bench "Time.formatTime"     $ nf (timePretty dmy)  timeTime
+        , bench "Thyme.formatTime"    $ nf (thymePretty dmy) thymeTime
+        , bench "Chronos.builder_Dmy" $ nf chronosPrettyDmy  chronosTime
+        ]
+      , bgroup "HMS"
+        [ bench "Time.formatTime"     $ nf (timePretty hms)  timeTime
+        , bench "Thyme.formatTime"    $ nf (thymePretty hms) thymeTime
+        , bench "Chronos.builder_HMS" $ nf chronosPrettyHMS  chronosTime
+        ]
       ]
     ]
 
diff --git a/chronos.cabal b/chronos.cabal
--- a/chronos.cabal
+++ b/chronos.cabal
@@ -1,5 +1,5 @@
 name: chronos
-version: 1.0.4
+version: 1.0.5
 synopsis: A performant time library
 description:
   Performance-oriented time library for haskell. The main differences
@@ -44,10 +44,10 @@
       Chronos.Internal.CTimespec
   build-depends:
       base >= 4.9 && < 5
-    , aeson >= 1.1 && < 1.4
+    , aeson >= 1.1 && < 1.5
     , attoparsec >= 0.13 && < 0.14
     , bytestring >= 0.10 && < 0.11
-    , clock >= 0.7 && < 0.8
+    , clock >= 0.7 && < 0.9
     , hashable >= 1.2 && < 1.3
     , primitive >= 0.6 && < 0.7
     , semigroups >= 0.16 && < 0.19
@@ -56,6 +56,7 @@
     , vector >= 0.11 && < 0.13
   default-language:    Haskell2010
   c-sources:           src/cbits/hs-time.c
+  ghc-options: -Wall -O2
 
 test-suite chronos-test
   type:                exitcode-stdio-1.0
@@ -91,6 +92,7 @@
     , thyme
     , time
     , vector
+    , text
   default-language:    Haskell2010
 
 source-repository head
diff --git a/src/Chronos/Internal/CTimespec.hs b/src/Chronos/Internal/CTimespec.hs
--- a/src/Chronos/Internal/CTimespec.hs
+++ b/src/Chronos/Internal/CTimespec.hs
@@ -9,12 +9,11 @@
 import Foreign.C
 
 #ifdef ghcjs_HOST_OS
-
--- foreign import javascript unsafe "Date.now()" currentSeconds :: IO Int64
-
+foreign import javascript unsafe "Date.now()" currentSeconds :: IO Double
 getPosixNanoseconds :: IO Int64
-getPosixNanoseconds = return 0
-
+getPosixNanoseconds = do 
+  x <- currentSeconds 
+  pure $ fromIntegral $ 1000000 * (round x)
 #else
 
 data CTimespec = CTimespec