mes: More informative error reporting for number asserts.

[mes.git] / src / mes.c

diff --git a/src/mes.c b/src/mes.c
index 603ace0c674100eb31ed156181ddff1c6306eff7..743e298fe5303b01d7e1b510e82c5564bb29a1e4 100644 (file)
--- a/src/mes.c
+++ b/src/mes.c
@@ -160,6 +160,7 @@ struct scm scm_symbol_write = {TSYMBOL, "write",0};
 struct scm scm_symbol_display = {TSYMBOL, "display",0};
 
 struct scm scm_symbol_throw = {TSYMBOL, "throw",0};
+struct scm scm_symbol_not_a_number = {TSYMBOL, "not-a-number",0};
 struct scm scm_symbol_not_a_pair = {TSYMBOL, "not-a-pair",0};
 struct scm scm_symbol_system_error = {TSYMBOL, "system-error",0};
 struct scm scm_symbol_wrong_number_of_args = {TSYMBOL, "wrong-number-of-args",0};