From e5418398480ebe5b490a0564c2c1765d291b37ed Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Thu, 9 Feb 2017 14:07:49 +0100
Subject: [PATCH] fix, gives mercy to two zombified tools

upstream: dmd Z due to version lookup
regression: dfmt Z due to version lookup (78544f3)
---
 src/ce_ddemangle.pas | 2 ++
 src/ce_dfmt.pas      | 2 ++
 2 files changed, 4 insertions(+)

diff --git a/src/ce_ddemangle.pas b/src/ce_ddemangle.pas
index 1c313a45..29865037 100644
--- a/src/ce_ddemangle.pas
+++ b/src/ce_ddemangle.pas
@@ -56,6 +56,8 @@ begin
       ShowWindow:= swoHIDE;
       execute;
       output.Read(s[1], 128);
+      while Running do
+        sleep(1);
     end;
   finally
     free;
diff --git a/src/ce_dfmt.pas b/src/ce_dfmt.pas
index 3536126d..b8a248eb 100644
--- a/src/ce_dfmt.pas
+++ b/src/ce_dfmt.pas
@@ -295,6 +295,8 @@ begin
       majv := Byte(inp[1]) - Byte('0');
       minv := Byte(inp[3]) - Byte('0');
     end;
+    while prc.Running do
+      sleep(1);
 
     prc.Parameters.Clear;
     fDmtWrapper.getParameters(prc.Parameters, majv, minv);