From 05e66120efdce7d1bb0aab9cb94568c7bae22dd5 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Sat, 3 Jan 2009 17:58:20 +0000 Subject: [PATCH] look up owner table after call to custodian_to_owner_set svn: r12991 --- src/mzscheme/gc2/mem_account.c | 1 + 1 file changed, 1 insertion(+) diff --git a/src/mzscheme/gc2/mem_account.c b/src/mzscheme/gc2/mem_account.c index 74bc79e794..67eb15fe33 100644 --- a/src/mzscheme/gc2/mem_account.c +++ b/src/mzscheme/gc2/mem_account.c @@ -466,6 +466,7 @@ static void BTC_do_accounting(NewGC *gc) if (parent) { int powner = custodian_to_owner_set(gc, parent); + owner_table = gc->owner_table; owner_table[powner]->memory_use += owner_table[owner]->memory_use; }