commas           8168 src/simh/scp.c int32 d, digit, ndigits, commas = 0;
commas           8190 src/simh/scp.c         commas = (ndigits - 1)/3;
commas           8193 src/simh/scp.c         for (digit=1; digit<=commas; digit++)
commas           8195 src/simh/scp.c         d = d - commas;
commas           8215 src/simh/scp.c         if ((MAX_WIDTH - (ndigits + commas)) < d)
commas           8216 src/simh/scp.c             d = MAX_WIDTH - (ndigits + commas);