From a44c07da80b164d99491c1d63cbbaa0bc0c4dd7e Mon Sep 17 00:00:00 2001
From: ttsiodras <ttsiodras@129961e7-ef38-4bb5-a8f7-c9a525a55882>
Date: Wed, 14 Apr 2010 14:16:55 +0000
Subject: [PATCH] Maxime workaround for backdoor accesses

git-svn-id: https://tecsw.estec.esa.int/svn/taste/trunk/po-hi-ada@463 129961e7-ef38-4bb5-a8f7-c9a525a55882
---
 src/polyorb_hi-thread_interrogators.adb | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/polyorb_hi-thread_interrogators.adb b/src/polyorb_hi-thread_interrogators.adb
index 58bb305..53e1946 100644
--- a/src/polyorb_hi-thread_interrogators.adb
+++ b/src/polyorb_hi-thread_interrogators.adb
@@ -766,7 +766,10 @@ package body PolyORB_HI.Thread_Interrogators is
          --  sending, not receiving.
 
          Most_Recent_Values (PT) := P;
-         Time_Stamps (PT) := T;
+         -- Time_Stamps (PT) := T;
+         -- Maxime workaround for backdoor accesses
+         Time_Stamps (PT) := Ada.Real_time.clock;
+
       end Store_Out;
 
       -----------
-- 
GitLab