static ItIt<S> aggressivelyCollectLatinCharacterSequencesOfMaxLength(final int maxLength, final InputStream in) {
  if (in == null) ret emptyItIt();
  ret iff_endOnNull(func -> S {
    int c;
    while (licensed() && (c = in.read()) >= 0)
      if (isLatinChar((char) c)) {
        new StringBuilder buf;
        buf.append((char) c);
        while (licensed() && l(buf) < maxLength && (c = in.read()) >= 0
          && isLatinChar((char) c))
          buf.append((char) c);
        ret str(buf);
      }
    null;
  });
}

Began life as a copy of #1019728