1 files changed, 4 insertions, 2 deletions
diff --git a/cli/cli_pickle.cpp b/cli/cli_pickle.cpp
index e7f51ff9..46a5f31d 100644
--- a/cli/cli_pickle.cpp
+++ b/cli/cli_pickle.cpp
@@ -271,13 +271,15 @@ command(int argc, char *argv[])
         }
 
         trace::Call *call;
-        while ((call = parser.parse_call())) {
+        bool delCall;
+        while ((call = parser.parse_call(delCall))) {
             if (calls.contains(*call)) {
                 writer.begin();
                 visitor.visit(call);
                 writer.end();
             }
-            delete call;
+            if(delCall)
+                delete call;
         }
     }