diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,3 +1,7 @@
+## 0.1.1
+
+* Add mockSrcFromRaml to print mock-handler
+
 ## 0.1.0
 
 * First Release
diff --git a/Yesod/Raml/Mock.hs b/Yesod/Raml/Mock.hs
--- a/Yesod/Raml/Mock.hs
+++ b/Yesod/Raml/Mock.hs
@@ -7,6 +7,7 @@
 module Yesod.Raml.Mock (
   parseRamlMockFile
 , mockFromRaml
+, mockSrcFromRaml
 ) where
 
 import Yesod.Raml.Routes
@@ -16,6 +17,7 @@
 import Yesod.Core
 import Data.Char(toLower)
 import Language.Haskell.TH.Syntax
+import Language.Haskell.TH.Ppr
 import Yesod.Raml.Type
 import Yesod.Raml.Parser ()
 import Yesod.Routes.TH.Types
@@ -42,6 +44,11 @@
       decs <-  forM routes handlerFromRoute
       return $ concat decs
 
+mockSrcFromRaml ::  Raml ->  IO String
+mockSrcFromRaml raml = do
+  v <-  runQ $ mockFromRaml raml
+  return $ show $ ppr v
+
 handlerFromRoute ::  RouteEx ->  Q [Dec]
 handlerFromRoute RouteEx{..} = do
   decs <-  forM re_methods (handlerFromRoute' re_pieces re_handler)
@@ -98,6 +105,7 @@
     typeList [] v =  v
     typeList (x:xs) v = (AppT (AppT ArrowT (ConT x)) (typeList xs v))
     wildPs xs = map (\_ ->  WildP) xs
+
 
 argsFromPiecies ::  [Piece String] ->  [Name]
 argsFromPiecies [] = []
diff --git a/yesod-raml-mock.cabal b/yesod-raml-mock.cabal
--- a/yesod-raml-mock.cabal
+++ b/yesod-raml-mock.cabal
@@ -1,5 +1,5 @@
 name:                yesod-raml-mock
-version:             0.1.0
+version:             0.1.1
 synopsis:            A mock-handler generator library from RAML.
 description:         A mock-handler generator library from RAML.
 license:             MIT