diff --git a/json-pointer.cabal b/json-pointer.cabal
--- a/json-pointer.cabal
+++ b/json-pointer.cabal
@@ -1,7 +1,7 @@
 name:
   json-pointer
 version:
-  0.1
+  0.1.1
 synopsis:
   JSON Pointer parsing and interpretation utilities
 description:
diff --git a/library/JSONPointer/Model.hs b/library/JSONPointer/Model.hs
--- a/library/JSONPointer/Model.hs
+++ b/library/JSONPointer/Model.hs
@@ -8,6 +8,7 @@
 
 import JSONPointer.Prelude hiding (or)
 import qualified Data.Attoparsec.Text
+import qualified Data.Text
 
 
 -- |
@@ -23,6 +24,11 @@
   {-# INLINE mappend #-}
   mappend (JSONPointer fn1) (JSONPointer fn2) =
     JSONPointer $ \handler -> fn1 handler <> fn2 handler
+
+instance Show JSONPointer where
+  showsPrec _ (JSONPointer impl) =
+    appEndo $
+    impl (\_ text -> Endo (showString "/" . showString (Data.Text.unpack text)))
 
 -- |
 -- Given a JSON Pointer specification and a function,