From f0d46570a42bd08210739eb32dbd25f4e2141a3c Mon Sep 17 00:00:00 2001
From: Catherine Tower <catherine@towernet.dev>
Date: Sun, 27 Feb 2022 14:15:34 -0800
Subject: [PATCH] Add missing break statement to cl_hash_table_test

Without the break statement an error is signalled for any hash table with a
custom test function
---
 src/c/hash.d | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/c/hash.d b/src/c/hash.d
index f580b72f5..c42c61690 100644
--- a/src/c/hash.d
+++ b/src/c/hash.d
@@ -1239,7 +1239,7 @@ cl_hash_table_test(cl_object ht)
   case ecl_htt_equal:   output = @'equal';  break;
   case ecl_htt_equalp:  output = @'equalp'; break;
   case ecl_htt_pack:    output = @'equal';  break;
-  case ecl_htt_generic: output = ht->hash.generic_test;
+  case ecl_htt_generic: output = ht->hash.generic_test; break;
   default: FEerror("hash-table-test: unknown test.", 0);
   }
   @(return output);