diff --git a/Shakefile.hs b/Shakefile.hs
--- a/Shakefile.hs
+++ b/Shakefile.hs
@@ -36,8 +36,8 @@
   -- | sanity
   --
   fake "." pats "sanity" $ const $
-    need [ fakeFile "build-error", fakeFile "lint" ]
+    need [ "build-error", "lint" ]
 
   -- | Default things to run.
   --
-  want [ fakeFile "sanity", fakeFile "format" ]
+  want [ "sanity", "format" ]
diff --git a/preamble.cabal b/preamble.cabal
--- a/preamble.cabal
+++ b/preamble.cabal
@@ -1,5 +1,5 @@
 name:                  preamble
-version:               0.0.32
+version:               0.0.33
 synopsis:              Yet another prelude.
 description:           A prelude built on basic-prelude.
 homepage:              https://github.com/swift-nav/preamble
diff --git a/src/Preamble/Stats.hs b/src/Preamble/Stats.hs
--- a/src/Preamble/Stats.hs
+++ b/src/Preamble/Stats.hs
@@ -10,6 +10,8 @@
   , statsHistogram
   , statsTimer
   , statsSet
+  , statsIncrement
+  , statsDecrement
   ) where
 
 import Network.Socket.ByteString
@@ -42,3 +44,9 @@
 
 statsSet :: (MonadStatsCtx c m, Show a) => Text -> a -> Tags -> m ()
 statsSet = stats "s"
+
+statsIncrement :: MonadStatsCtx c m => Text -> Tags -> m ()
+statsIncrement name = stats "c" name (1 :: Int)
+
+statsDecrement :: MonadStatsCtx c m => Text -> Tags -> m ()
+statsDecrement name = stats "c" name (-1 :: Int)