From 318237c3b31980e275684f8f0b06573b57d90bab Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Wed, 23 Jun 2021 06:41:16 -0700 Subject: long-suffix: fix crash reproducing on Cygwin. * stream.c (long_suffix): Remove stray wcspbrk(dot, psc) call from the body of loop, which sometimes occurs when dot is null. It may have been optimized away, so I didn't notice. --- stream.c | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/stream.c b/stream.c index 89870eb3..1c965c8c 100644 --- a/stream.c +++ b/stream.c @@ -5060,10 +5060,8 @@ val long_suffix(val name, val alt_in) { const wchar_t *sl; - while (dot && (sl = wcspbrk(dot, psc)) && sl[1]) { + while (dot && (sl = wcspbrk(dot, psc)) && sl[1]) dot = wcschr(sl + 1, '.'); - sl = wcspbrk(dot, psc); - } if (!dot || (sl && sl[1])) { return default_null_arg(alt_in); -- cgit v1.2.3