tracing 0.0.7.3 → 0.0.7.4

raw patch · 2 files changed

+17/−3 lines, 2 filesPVP: minor bump suggested

API additions: PVP suggests at least a minor version bump

API changes (from Hackage documentation)

Files

• src/Monitor/Tracing/Zipkin.hs +16/−2
• tracing.cabal +1/−1

@@ -30,7 +30,7 @@    -- * Custom metadata   -- ** Tags-  tag, addTag, addInheritedTag, addProducerKind,+  tag, addTag, addInheritedTag, addConsumerKind, addProducerKind,   -- ** Annotations   -- | Annotations are similar to tags, but timestamped.   annotate, annotateAt,@@ -175,6 +175,16 @@ addTag key val bldr =   bldr { builderTags = Map.insert (publicKeyPrefix <> key) (JSON.toJSON val) (builderTags bldr) } +-- | Adds a consumer kind tag to a builder. This is a convenience method to use with 'rootSpanWith',+-- for example:+--+-- > rootSpanWith addConsumerKind alwaysSampled "root" $ action+--+-- Use this method if you want to create a root consumer span. Otherwise use 'consumerSpanWith' to+-- create a sub span with consumer kind.+addConsumerKind :: Builder -> Builder+addConsumerKind = addTag kindKey consumerKindValue+ -- | Adds a producer kind tag to a builder. This is a convenience method to use with 'rootSpanWith', -- for example: --@@ -349,6 +359,10 @@ kindKey :: Key kindKey = "z.k" +-- Value that indicates a consumer span kind.+consumerKindValue :: Text+consumerKindValue = "CONSUMER"+ -- Value that indicates a producer span kind. producerKindValue :: Text producerKindValue = "PRODUCER"@@ -407,7 +421,7 @@ consumerSpanWith :: MonadTrace m => (Builder -> Builder) -> B3 -> m a -> m a consumerSpanWith f b3 =   let endo = Endo $ \bldr -> f $ bldr { builderReferences = Set.singleton (ChildOf $ b3SpanID b3) }-  in incomingSpan "CONSUMER" b3 endo+  in incomingSpan consumerKindValue b3 endo  -- | Information about a hosted service, included in spans and visible in the Zipkin UI. data Endpoint = Endpoint

@@ -1,7 +1,7 @@ cabal-version: 2.0  name: tracing-version: 0.0.7.3+version: 0.0.7.4 synopsis: Distributed tracing description:   An OpenTracing-compliant, simple, and extensible distributed tracing library.