Commit 18ac7625 authored by Erick's avatar Erick

Fix: length of a circular list loops in message error

parent b0ffc82a
...@@ -22,7 +22,7 @@ ...@@ -22,7 +22,7 @@
* *
* Author: Erick Gallesio [eg@kaolin.unice.fr] * Author: Erick Gallesio [eg@kaolin.unice.fr]
* Creation date: ??-Oct-1993 21:37 * Creation date: ??-Oct-1993 21:37
* Last file update: 5-Oct-2018 18:08 (eg) * Last file update: 27-Nov-2018 17:22 (eg)
*/ */
#include "stklos.h" #include "stklos.h"
...@@ -293,7 +293,7 @@ doc> ...@@ -293,7 +293,7 @@ doc>
int len = STk_int_length(l); int len = STk_int_length(l);
if (len >= 0) return MAKE_INT(len); if (len >= 0) return MAKE_INT(len);
STk_error("length of ~S is not calculable", l); STk_error("length of ~W is not calculable", l);
return STk_void; /* never reached */ return STk_void; /* never reached */
} }
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment