From: Stefan Monnier Date: Sun, 6 Jul 2003 19:29:48 +0000 (+0000) Subject: (sweep_weak_table): Update calls to mark_object. X-Git-Tag: ttn-vms-21-2-B4~9474 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9568e3d87ef915b3546c99eca27f37fe39aabb06;p=emacs.git (sweep_weak_table): Update calls to mark_object. --- diff --git a/src/fns.c b/src/fns.c index 128b332886a..04c6d41ebec 100644 --- a/src/fns.c +++ b/src/fns.c @@ -1,5 +1,5 @@ /* Random utility Lisp functions. - Copyright (C) 1985, 86, 87, 93, 94, 95, 97, 98, 99, 2000, 2001, 2002 + Copyright (C) 1985, 86, 87, 93, 94, 95, 97, 98, 99, 2000, 2001, 02, 2003 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -4748,13 +4748,13 @@ sweep_weak_table (h, remove_entries_p) /* Make sure key and value survive. */ if (!key_known_to_survive_p) { - mark_object (&HASH_KEY (h, i)); + mark_object (HASH_KEY (h, i)); marked = 1; } if (!value_known_to_survive_p) { - mark_object (&HASH_VALUE (h, i)); + mark_object (HASH_VALUE (h, i)); marked = 1; } }