From bd7353298e507631fe916f0e28ec8cca26d36ca7 Mon Sep 17 00:00:00 2001
From: Jan Nieuwenhuizen <janneke@gnu.org>
Date: Sun, 10 Nov 2019 13:55:35 +0100
Subject: [PATCH] hash-table: use erro iso assert...

---
 src/hash.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/hash.c b/src/hash.c
index 3aa41368..877674f6 100644
--- a/src/hash.c
+++ b/src/hash.c
@@ -211,7 +211,7 @@ make_hash_table (struct scm *x)              /*:((arity . n)) */
   if (x->type == TPAIR)
     {
       x = x->car;
-      assert_msg (x->type == TNUMBER, "x->type == TNUMBER");
+      assert_number ("make-hash-table size", x);
       size = x->value;
     }
   return make_hash_table_ (size);