From 9d02e5e1120d36fb2c4284187de99e19d434dc98 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Tue, 31 May 2022 19:12:01 -0700 Subject: streams: use ~a for self string. * stream.c (parse_mode, open_file, open_fileno): Since self is a string, use ~a to print it, or else quotes will appear. --- stream.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/stream.c b/stream.c index be6262b1..e0916d18 100644 --- a/stream.c +++ b/stream.c @@ -1604,7 +1604,7 @@ struct stdio_mode parse_mode(val mode_str, struct stdio_mode m_dfl, val self) { struct stdio_mode m = do_parse_mode(mode_str, m_dfl, self); if (m.malformed) - uw_throwf(file_error_s, lit("~s: invalid mode string ~s"), self, + uw_throwf(file_error_s, lit("~a: invalid mode string ~s"), self, mode_str, nao); return m; } @@ -4261,7 +4261,7 @@ again: return make_gzio_stream(f, -1, path, m.write); #else - uw_ethrowf(file_error_s, lit("~s: not built with zlib support"), + uw_ethrowf(file_error_s, lit("~a: not built with zlib support"), self, nao); #endif } @@ -4303,7 +4303,7 @@ val open_fileno(val fd, val mode_str) return make_gzio_stream(f, fdn, format(nil, lit("fd ~d"), fd, nao), m.write); #else - uw_ethrowf(file_error_s, lit("~s: not built with zlib support"), + uw_ethrowf(file_error_s, lit("~a: not built with zlib support"), self, nao); #endif } -- cgit v1.2.3