From dbe9c30721cec0dd7fc2d017bf2e050129e759f2 Mon Sep 17 00:00:00 2001
From: short <>
Date: Wed, 13 Aug 2003 08:39:25 +0000
Subject: [PATCH] +debug dump CcFlushCache() catch of Lsn.

---
 src/TraceFS/checktrace.pl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/TraceFS/checktrace.pl b/src/TraceFS/checktrace.pl
index 1869469..9c1964d 100755
--- a/src/TraceFS/checktrace.pl
+++ b/src/TraceFS/checktrace.pl
@@ -767,6 +767,9 @@ my($LogHandle,$Lsn)=@_;
 
 	$Object->{"LogHandle"}=$LogHandle;
 	$Object->{"Lsn"}=$Lsn;
+
+	my $obj=${$EnterLeave}[$#$EnterLeave-1];
+	warn "FLUSH" if $obj->{"by"} eq "CcFlushCache";
 }
 
 my $LogHandle_static;
-- 
1.8.3.1