From 430da79e73a74b1df9d610cd81bc7b7a010c1ffa Mon Sep 17 00:00:00 2001
From: Bruce Mitchener <bruce.mitchener@gmail.com>
Date: Sat, 23 Jul 2022 01:54:19 +0700
Subject: [PATCH] Remove a dead store. (#431)

---
 src/sxhash.c | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/sxhash.c b/src/sxhash.c
index bcd3550..94b798a 100644
--- a/src/sxhash.c
+++ b/src/sxhash.c
@@ -65,13 +65,12 @@ LispPTR SX_hash(LispPTR object) {
 static unsigned short sxhash(LispPTR obj) {
   /* unsigned short hashOffset; Not Used */
   unsigned int cell;
-  unsigned typen;
   OneDArray *str;
   switch (SEGMASK & obj) {
     case S_POSITIVE:
     case S_NEGATIVE: return (obj & 0xFFFF);
     default:
-      switch (typen = GetTypeNumber(obj)) {
+      switch (GetTypeNumber(obj)) {
         case TYPE_FIXP: return ((FIXP_VALUE(obj)) & 0xFFFF);
         case TYPE_FLOATP:
           cell = (unsigned int)FIXP_VALUE(obj);