2 files changed, 7 insertions, 0 deletions
diff --git a/ChangeLog b/ChangeLog
index dfc522aa..6526a9e8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,11 @@
 2011-11-04  Kaz Kylheku  <kaz@kylheku.com>
 
+	* hash.c (ll_hash): Added a break in the case that handles
+	pointer hashing of identity-equal objects. Without this, if the
+	pointer size is not 4 or 8, we fall through to the next case.
+
+2011-11-04  Kaz Kylheku  <kaz@kylheku.com>
+
 	* txr.c (help): Change year from 2009 to 2011.
 
 2011-11-03  Kaz Kylheku  <kaz@kylheku.com>
diff --git a/hash.c b/hash.c
index 7dbabacd..8ee7a072 100644
--- a/hash.c
+++ b/hash.c
@@ -108,6 +108,7 @@ static cnum ll_hash(val obj)
     case 8: default:
       return (((cnum) obj) & NUM_MAX) >> 5;
     }
+    break;
   case FUN:
     return ((cnum) obj->f.f.interp_fun + ll_hash(obj->f.env)) & NUM_MAX;
   case VEC: