git://git.jankratochvil.net
/
captive.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
53453fc
)
+parse also 'object header reference count' of dumped 'FileObject'
author
short
<>
Wed, 13 Aug 2003 08:45:00 +0000
(08:45 +0000)
committer
short
<>
Wed, 13 Aug 2003 08:45:00 +0000
(08:45 +0000)
src/TraceFS/checktrace.pl
patch
|
blob
|
history
diff --git
a/src/TraceFS/checktrace.pl
b/src/TraceFS/checktrace.pl
index
9c1964d
..
61c63e8
100755
(executable)
--- a/
src/TraceFS/checktrace.pl
+++ b/
src/TraceFS/checktrace.pl
@@
-1151,7
+1151,7
@@
while (<>) {
push @{$LastLeave{$ProcessThread}},$Object;
}
elsif (my($FileObject,$FileName,$Flags,$SectionObjectPointer,$SharedCacheMap)=
push @{$LastLeave{$ProcessThread}},$Object;
}
elsif (my($FileObject,$FileName,$Flags,$SectionObjectPointer,$SharedCacheMap)=
- /^FileObject=($hex): FileName=(?:NULL|'(.*)'),Flags=($hex),SectionObjectPointer=($hex),->SharedCacheMap=($hex)/) {
+ /^FileObject=($hex): FileName=(?:NULL|'(.*)'),
(?:ref=[+-]\d+,)?
Flags=($hex),SectionObjectPointer=($hex),->SharedCacheMap=($hex)/) {
my $aref=$EnterLeave{$ProcessThread};
warn "Empty stack during 'data' line" if !($Object=${$aref}[$#$aref]);
my $data={
my $aref=$EnterLeave{$ProcessThread};
warn "Empty stack during 'data' line" if !($Object=${$aref}[$#$aref]);
my $data={