diff --git a/src/client/signal.ml b/src/client/signal.ml index 691cc6f8..91e9e332 100644 --- a/src/client/signal.ml +++ b/src/client/signal.ml @@ -9,7 +9,9 @@ module Converter = struct let resource_to_string ~encoder ~ctor ~enc resource = let encoder = match encoder with - | Some e -> e + | Some e -> + Pbrt.Encoder.reset e; + e | None -> Pbrt.Encoder.create () in let x = ctor resource in