V10/libI77/d/wrtfmt.c
115c115 < for(;; s += i, w1 += 2) --- > for(;; s += i)