From 101fac5c1e1a3ec5ba4f17e8d33e8dce2e3b1d41 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Fri, 30 Oct 2015 22:24:40 -0400
Subject: [PATCH] repair scope-propagtion cache yet again

Commit 352a5dd2d5 effectively reverted the repair
of d719c06e00.

Merge to v6.3
---
 racket/src/racket/src/hash.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/racket/src/racket/src/hash.c b/racket/src/racket/src/hash.c
index 92f123b318..b7fd3672aa 100644
--- a/racket/src/racket/src/hash.c
+++ b/racket/src/racket/src/hash.c
@@ -2956,7 +2956,7 @@ static int hamt_equal_entries(int stype, void *eql_data,
 #define HAMT_ELEMENT_OF hamt_eq_element_match_of
 #define HAMT_ELEMENT_OF_COLLISION hamt_eq_element_match_of_collision
 #define HAMT_EQUAL_ENTRIES(stype, eql_data, k1, v1, k2, v2) (SAME_OBJ(k1, k2) && SAME_OBJ(v1, v2))
-#define HAMT_IF_VAL(v, n) n
+#define HAMT_IF_VAL(v, n) v
 #define HAMT_USE_FUEL(n) /* empty */
 #include "hamt_subset.inc"