Function stripErlang

src/resolution/strip-comments.ts:486–528

* Erlang: `%` starts a line comment unless it sits inside a `"string"`, a * `'quoted atom'`, or is the character literal `$%`. Strings and quoted atoms * are left intact (a behaviour callback name can be a quoted atom); only the * comment text is blanked.

(src: string)

 * comment text is blanked.
 */
function stripErlang(src: string): string {
  const out = src.split('');
  let i = 0;
  const n = src.length;

  while (i < n) {
    const c = src[i];

    if (c === '"' || c === "'") {
      const quote = c;
      i++;
      while (i < n && src[i] !== quote) {
        if (src[i] === '\\' && i + 1 < n) {
          i += 2;
          continue;
        }
        i++;
      }
      if (i < n) i++;
      continue;
    }

    // Character literal: `$x`, `$\n`, `$%` — the next char (or escape) is data.
    if (c === '$') {
      i++;
      if (i < n && src[i] === '\\') i++;
      i++;
      continue;
    }

    if (c === '%') {
      let end = i;
      while (end < n && src[end] !== '\n') end++;
      blankRange(out, i, end, src);
      i = end;
      continue;
    }

    i++;
  }

  return out.join('');
}