diff --git a/src/lisp/print.c b/src/lisp/print.c index 1898fee24c4e61475251efc60cfcde427b35b135..8d79486d2f48ba213e3c70168bfa19b13e422898 100644 --- a/src/lisp/print.c +++ b/src/lisp/print.c @@ -354,7 +354,7 @@ print_struct(lispobj obj) { struct instance *instance = (struct instance *) PTR(obj); int i; - char buffer[16]; + char buffer[32]; print_obj("type: ", ((struct instance *) PTR(obj))->slots[0]); for (i = 1; i < HeaderValue(instance->header); i++) {