From 02b92c13ddc90621854d27f2c1091cc607f0cdfc Mon Sep 17 00:00:00 2001 From: John van Groningen Date: Wed, 22 Nov 2006 14:06:47 +0000 Subject: [PATCH] fix bug in size of bits2 array in previous revision --- HeapProfile/ShowHeapProfile.icl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/HeapProfile/ShowHeapProfile.icl b/HeapProfile/ShowHeapProfile.icl index f13540b..c56a834 100644 --- a/HeapProfile/ShowHeapProfile.icl +++ b/HeapProfile/ShowHeapProfile.icl @@ -265,7 +265,8 @@ compute_sizes_by_node_kind :: !.Header .Descriptors !*{#Char} !{#Char} {#Char} { compute_sizes_by_node_kind header descriptors heap heap2 data text stack #! size_heap=size heap; bits1=allocate_bit_array size_heap; - bits2=allocate_bit_array size_heap; + #! size_heap2=size heap2; + bits2=allocate_bit_array size_heap2; = size_stack descriptors 0 NilSizeByNodeKind bits1 bits2 heap; where stack_size=size stack; -- GitLab