diff --git a/src/lisp/interr.c b/src/lisp/interr.c index ecdcbc0a464087d3bd80102a1624f5b565039de2..57e18f204c3f330cc44f45c2f50076581a24786c 100644 --- a/src/lisp/interr.c +++ b/src/lisp/interr.c @@ -174,7 +174,6 @@ debug_print(lispobj object) if ((unsigned long) lisp_string->header == type_SimpleString) { unsigned short int* lisp_chars; int len; - int k; len = lisp_string->length >> 2; lisp_chars = (unsigned short int*) lisp_string->data;