From def25d140d3e36097fd1596e3100ee105aa7add3 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Sat, 7 May 2016 18:41:19 -0700 Subject: Redundant addr in printed rep of string-input-stream. * stream.c (string_in_get_prop): Do not format stream address into name; the general stream_print_op already adds that. --- stream.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'stream.c') diff --git a/stream.c b/stream.c index 4c6e3584..358c6eac 100644 --- a/stream.c +++ b/stream.c @@ -1573,7 +1573,7 @@ static val string_in_get_prop(val stream, val ind) struct string_in *s = coerce(struct string_in *, stream->co.handle); struct strm_ops *ops = coerce(struct strm_ops *, stream->co.ops); val name = static_str(ops->name); - return format(nil, lit("~a ~s ~p"), name, s->string, stream, nao); + return format(nil, lit("~a ~s"), name, s->string, nao); } return nil; -- cgit v1.2.3