links-notation 0.21.1 → 0.21.3

package/src/parser-generated.js

@@ -3,6 +3,9 @@
 // https://peggyjs.org/
 
 
+
+  import { DelimitedReferences } from './quotes.js';
+
 class peg$SyntaxError extends SyntaxError {
   constructor(message, expected, found, location) {
     super(message);
@@ -179,11 +182,11 @@ function peg$parse(input, options) {
 
   const peg$e0 = peg$classExpectation([" ", "\t"], false, false, false);
   const peg$e1 = peg$classExpectation(["\r", "\n"], false, false, false);
-  const peg$e2 = peg$literalExpectation("(", false);
-  const peg$e3 = peg$literalExpectation(")", false);
-  const peg$e4 = peg$literalExpectation(":", false);
-  const peg$e5 = peg$literalExpectation("\"", false);
-  const peg$e6 = peg$anyExpectation();
+  const peg$e2 = peg$anyExpectation();
+  const peg$e3 = peg$literalExpectation("(", false);
+  const peg$e4 = peg$literalExpectation(")", false);
+  const peg$e5 = peg$literalExpectation(":", false);
+  const peg$e6 = peg$literalExpectation("\"", false);
   const peg$e7 = peg$literalExpectation("'", false);
   const peg$e8 = peg$literalExpectation("`", false);
   const peg$e9 = peg$literalExpectation(" ", false);
@@ -197,31 +200,40 @@ function peg$parse(input, options) {
   function peg$f4(fl, list) {    popIndentation(); return [fl].concat(list || []);  }
   function peg$f5(l) {    return l;  }
   function peg$f6(l) {    return l;  }
-  function peg$f7(e, l) {
+  function peg$f7() {    return !unreadableLines.has(lineKey(offset()));  }
+  function peg$f8(e, saved, l) {
+    if (l === null) {
+      // No child line followed the indentation. Forget what looking for one
+      // pushed, so the next line is compared with this line's indentation.
+      indentationStack = saved;
+      return e;
+    }
     return Object.assign({}, e, { children: l });
   }
-  function peg$f8(e) {    return e;  }
-  function peg$f9(l) {    return l;  }
-  function peg$f10(i) {    return { id: i };  }
-  function peg$f11(ml) {    return ml;  }
-  function peg$f12(il) {    return il;  }
-  function peg$f13(sl) {    return sl;  }
+  function peg$f9() {    unreadableLines.add(lineKey(offset())); return false;  }
+  function peg$f10(l) {    return l;  }
+  function peg$f11(i) {    return { id: i };  }
+  function peg$f12(g, rest) {
+    return rest === null ? g : { values: [g].concat(rest) };
+  }
+  function peg$f13() {    return null;  }
   function peg$f14(fl) {    return fl;  }
   function peg$f15(vl) {    return vl;  }
   function peg$f16(body) {
     exitNestedContext();
     return body;
   }
-  function peg$f17(l) {    return { nested: l };  }
-  function peg$f18() {    return { nested: [] };  }
-  function peg$f19() {    return enterNestedContext();  }
-  function peg$f20(value) {    return value;  }
-  function peg$f21(list) {    return list;  }
-  function peg$f22(id, v) {    return { id: id, values: v };  }
-  function peg$f23(v) {    return { values: v };  }
-  function peg$f24(id) {    return { id: id, values: [] };  }
-  function peg$f25(chars) {    return chars.join('');  }
-  function peg$f26() {
+  function peg$f17() {    exitNestedContext(); return false;  }
+  function peg$f18(l) {    return { nested: l };  }
+  function peg$f19() {    return { nested: [] };  }
+  function peg$f20() {    return enterNestedContext();  }
+  function peg$f21(value) {    return value;  }
+  function peg$f22(list) {    return list;  }
+  function peg$f23(id, v) {    return { id: id, values: v };  }
+  function peg$f24(v) {    return { values: v };  }
+  function peg$f25(id) {    return { id: id, values: [] };  }
+  function peg$f26(chars) {    return chars.join('');  }
+  function peg$f27() {
     const pos = offset();
     const result = parseQuotedStringAt(input, pos, '"');
     if (result) {
@@ -231,11 +243,11 @@ function peg$parse(input, options) {
     }
     return false;
   }
-  function peg$f27(chars) {    return parsedValue;  }
-  function peg$f28(c, cs) {    return [c].concat(cs).join('');  }
-  function peg$f29() {    return parsedLength > 1 && (parsedLength--, true);  }
-  function peg$f30(c) {    return c;  }
-  function peg$f31() {
+  function peg$f28(chars) {    return parsedValue;  }
+  function peg$f29(c, cs) {    return [c].concat(cs).join('');  }
+  function peg$f30() {    return parsedLength > 1 && (parsedLength--, true);  }
+  function peg$f31(c) {    return c;  }
+  function peg$f32() {
     const pos = offset();
     const result = parseQuotedStringAt(input, pos, "'");
     if (result) {
@@ -245,11 +257,11 @@ function peg$parse(input, options) {
     }
     return false;
   }
-  function peg$f32(chars) {    return parsedValue;  }
-  function peg$f33(c, cs) {    return [c].concat(cs).join('');  }
-  function peg$f34() {    return parsedLength > 1 && (parsedLength--, true);  }
-  function peg$f35(c) {    return c;  }
-  function peg$f36() {
+  function peg$f33(chars) {    return parsedValue;  }
+  function peg$f34(c, cs) {    return [c].concat(cs).join('');  }
+  function peg$f35() {    return parsedLength > 1 && (parsedLength--, true);  }
+  function peg$f36(c) {    return c;  }
+  function peg$f37() {
     const pos = offset();
     const result = parseQuotedStringAt(input, pos, '`');
     if (result) {
@@ -259,15 +271,16 @@ function peg$parse(input, options) {
     }
     return false;
   }
-  function peg$f37(chars) {    return parsedValue;  }
-  function peg$f38(c, cs) {    return [c].concat(cs).join('');  }
-  function peg$f39() {    return parsedLength > 1 && (parsedLength--, true);  }
-  function peg$f40(c) {    return c;  }
-  function peg$f41(spaces) {    setBaseIndentation(spaces);  }
-  function peg$f42(spaces) {    return normalizeIndentation(spaces) > getCurrentIndentation();  }
-  function peg$f43(spaces) {    pushIndentation(spaces);  }
-  function peg$f44(spaces) {    return checkIndentation(spaces);  }
-  function peg$f45() {    return isInsideNestedContext();  }
+  function peg$f38(chars) {    return parsedValue;  }
+  function peg$f39(c, cs) {    return [c].concat(cs).join('');  }
+  function peg$f40() {    return parsedLength > 1 && (parsedLength--, true);  }
+  function peg$f41(c) {    return c;  }
+  function peg$f42() {    return indentationStack.slice();  }
+  function peg$f43(spaces) {    setBaseIndentation(spaces);  }
+  function peg$f44(spaces) {    return normalizeIndentation(spaces) > getCurrentIndentation();  }
+  function peg$f45(spaces) {    pushIndentation(spaces);  }
+  function peg$f46(spaces) {    return checkIndentation(spaces);  }
+  function peg$f47() {    return isInsideNestedContext();  }
   let peg$currPos = options.peg$currPos | 0;
   let peg$savedPos = peg$currPos;
   const peg$posDetailsCache = [{ line: 1, column: 1 }];
@@ -637,21 +650,39 @@ function peg$parse(input, options) {
   }
 
   function peg$parseelement() {
-    let s0, s1, s2, s3;
+    let s0, s1, s2, s3, s4, s5, s6;
 
     s0 = peg$currPos;
-    s1 = peg$parseanyLink();
+    peg$savedPos = peg$currPos;
+    s1 = peg$f7();
+    if (s1) {
+      s1 = undefined;
+    } else {
+      s1 = peg$FAILED;
+    }
     if (s1 !== peg$FAILED) {
-      s2 = peg$parsePUSH_INDENTATION();
+      s2 = peg$parseanyLink();
       if (s2 !== peg$FAILED) {
-        s3 = peg$parselinks();
-        if (s3 !== peg$FAILED) {
-          peg$savedPos = s0;
-          s0 = peg$f7(s1, s3);
+        s3 = peg$parseSAVE_INDENTATION();
+        s4 = peg$currPos;
+        s5 = peg$parsePUSH_INDENTATION();
+        if (s5 !== peg$FAILED) {
+          s6 = peg$parselinks();
+          if (s6 !== peg$FAILED) {
+            s4 = s6;
+          } else {
+            peg$currPos = s4;
+            s4 = peg$FAILED;
+          }
         } else {
-          peg$currPos = s0;
-          s0 = peg$FAILED;
+          peg$currPos = s4;
+          s4 = peg$FAILED;
+        }
+        if (s4 === peg$FAILED) {
+          s4 = null;
         }
+        peg$savedPos = s0;
+        s0 = peg$f8(s2, s3, s4);
       } else {
         peg$currPos = s0;
         s0 = peg$FAILED;
@@ -662,12 +693,32 @@ function peg$parse(input, options) {
     }
     if (s0 === peg$FAILED) {
       s0 = peg$currPos;
-      s1 = peg$parseanyLink();
+      peg$savedPos = peg$currPos;
+      s1 = peg$f9();
+      if (s1) {
+        s1 = undefined;
+      } else {
+        s1 = peg$FAILED;
+      }
       if (s1 !== peg$FAILED) {
-        peg$savedPos = s0;
-        s1 = peg$f8(s1);
+        if (input.length > peg$currPos) {
+          s2 = input.charAt(peg$currPos);
+          peg$currPos++;
+        } else {
+          s2 = peg$FAILED;
+          if (peg$silentFails === 0) { peg$fail(peg$e2); }
+        }
+        if (s2 !== peg$FAILED) {
+          s1 = [s1, s2];
+          s0 = s1;
+        } else {
+          peg$currPos = s0;
+          s0 = peg$FAILED;
+        }
+      } else {
+        peg$currPos = s0;
+        s0 = peg$FAILED;
       }
-      s0 = s1;
     }
 
     return s0;
@@ -680,7 +731,7 @@ function peg$parse(input, options) {
     s1 = peg$parsenestedGroup();
     if (s1 !== peg$FAILED) {
       peg$savedPos = s0;
-      s1 = peg$f9(s1);
+      s1 = peg$f10(s1);
     }
     s0 = s1;
     if (s0 === peg$FAILED) {
@@ -688,7 +739,7 @@ function peg$parse(input, options) {
       s1 = peg$parsereference();
       if (s1 !== peg$FAILED) {
         peg$savedPos = s0;
-        s1 = peg$f10(s1);
+        s1 = peg$f11(s1);
       }
       s0 = s1;
     }
@@ -700,12 +751,26 @@ function peg$parse(input, options) {
     let s0, s1, s2;
 
     s0 = peg$currPos;
-    s1 = peg$parsenestedGroup();
+    s1 = peg$currPos;
+    peg$silentFails++;
+    if (input.charCodeAt(peg$currPos) === 40) {
+      s2 = peg$c0;
+      peg$currPos++;
+    } else {
+      s2 = peg$FAILED;
+      if (peg$silentFails === 0) { peg$fail(peg$e3); }
+    }
+    peg$silentFails--;
+    if (s2 !== peg$FAILED) {
+      peg$currPos = s1;
+      s1 = undefined;
+    } else {
+      s1 = peg$FAILED;
+    }
     if (s1 !== peg$FAILED) {
-      s2 = peg$parseeol();
+      s2 = peg$parsegroupLink();
       if (s2 !== peg$FAILED) {
-        peg$savedPos = s0;
-        s0 = peg$f11(s1);
+        s0 = s2;
       } else {
         peg$currPos = s0;
         s0 = peg$FAILED;
@@ -716,20 +781,88 @@ function peg$parse(input, options) {
     }
     if (s0 === peg$FAILED) {
       s0 = peg$currPos;
-      s1 = peg$parseindentedIdLink();
+      s1 = peg$currPos;
+      peg$silentFails++;
+      if (input.charCodeAt(peg$currPos) === 40) {
+        s2 = peg$c0;
+        peg$currPos++;
+      } else {
+        s2 = peg$FAILED;
+        if (peg$silentFails === 0) { peg$fail(peg$e3); }
+      }
+      peg$silentFails--;
+      if (s2 === peg$FAILED) {
+        s1 = undefined;
+      } else {
+        peg$currPos = s1;
+        s1 = peg$FAILED;
+      }
       if (s1 !== peg$FAILED) {
+        s2 = peg$parseindentedIdLink();
+        if (s2 === peg$FAILED) {
+          s2 = peg$parsesingleLineAnyLink();
+        }
+        if (s2 !== peg$FAILED) {
+          s0 = s2;
+        } else {
+          peg$currPos = s0;
+          s0 = peg$FAILED;
+        }
+      } else {
+        peg$currPos = s0;
+        s0 = peg$FAILED;
+      }
+    }
+
+    return s0;
+  }
+
+  function peg$parsegroupLink() {
+    let s0, s1, s2;
+
+    s0 = peg$currPos;
+    s1 = peg$parsenestedGroup();
+    if (s1 !== peg$FAILED) {
+      s2 = peg$parsegroupLinkRest();
+      if (s2 !== peg$FAILED) {
         peg$savedPos = s0;
-        s1 = peg$f12(s1);
+        s0 = peg$f12(s1, s2);
+      } else {
+        peg$currPos = s0;
+        s0 = peg$FAILED;
       }
-      s0 = s1;
-      if (s0 === peg$FAILED) {
-        s0 = peg$currPos;
-        s1 = peg$parsesingleLineAnyLink();
-        if (s1 !== peg$FAILED) {
-          peg$savedPos = s0;
-          s1 = peg$f13(s1);
-        }
+    } else {
+      peg$currPos = s0;
+      s0 = peg$FAILED;
+    }
+
+    return s0;
+  }
+
+  function peg$parsegroupLinkRest() {
+    let s0, s1, s2;
+
+    s0 = peg$currPos;
+    s1 = peg$parseeol();
+    if (s1 !== peg$FAILED) {
+      peg$savedPos = s0;
+      s1 = peg$f13();
+    }
+    s0 = s1;
+    if (s0 === peg$FAILED) {
+      s0 = peg$currPos;
+      s1 = [];
+      s2 = peg$parsesingleLineValueAndWhitespace();
+      while (s2 !== peg$FAILED) {
+        s1.push(s2);
+        s2 = peg$parsesingleLineValueAndWhitespace();
+      }
+      s2 = peg$parseeol();
+      if (s2 !== peg$FAILED) {
         s0 = s1;
+      } else {
+        peg$currPos = s0;
+        s0 = peg$FAILED;
       }
     }
 
@@ -784,7 +917,7 @@ function peg$parse(input, options) {
       peg$currPos++;
     } else {
       s1 = peg$FAILED;
-      if (peg$silentFails === 0) { peg$fail(peg$e2); }
+      if (peg$silentFails === 0) { peg$fail(peg$e3); }
     }
     if (s1 !== peg$FAILED) {
       s2 = peg$parseENTER_NESTED_CONTEXT();
@@ -805,6 +938,35 @@ function peg$parse(input, options) {
       peg$currPos = s0;
       s0 = peg$FAILED;
     }
+    if (s0 === peg$FAILED) {
+      s0 = peg$currPos;
+      if (input.charCodeAt(peg$currPos) === 40) {
+        s1 = peg$c0;
+        peg$currPos++;
+      } else {
+        s1 = peg$FAILED;
+        if (peg$silentFails === 0) { peg$fail(peg$e3); }
+      }
+      if (s1 !== peg$FAILED) {
+        peg$savedPos = peg$currPos;
+        s2 = peg$f17();
+        if (s2) {
+          s2 = undefined;
+        } else {
+          s2 = peg$FAILED;
+        }
+        if (s2 !== peg$FAILED) {
+          s1 = [s1, s2];
+          s0 = s1;
+        } else {
+          peg$currPos = s0;
+          s0 = peg$FAILED;
+        }
+      } else {
+        peg$currPos = s0;
+        s0 = peg$FAILED;
+      }
+    }
 
     return s0;
   }
@@ -822,11 +984,11 @@ function peg$parse(input, options) {
         peg$currPos++;
       } else {
         s4 = peg$FAILED;
-        if (peg$silentFails === 0) { peg$fail(peg$e3); }
+        if (peg$silentFails === 0) { peg$fail(peg$e4); }
       }
       if (s4 !== peg$FAILED) {
         peg$savedPos = s0;
-        s0 = peg$f17(s2);
+        s0 = peg$f18(s2);
       } else {
         peg$currPos = s0;
         s0 = peg$FAILED;
@@ -843,11 +1005,11 @@ function peg$parse(input, options) {
         peg$currPos++;
       } else {
         s2 = peg$FAILED;
-        if (peg$silentFails === 0) { peg$fail(peg$e3); }
+        if (peg$silentFails === 0) { peg$fail(peg$e4); }
       }
       if (s2 !== peg$FAILED) {
         peg$savedPos = s0;
-        s0 = peg$f18();
+        s0 = peg$f19();
       } else {
         peg$currPos = s0;
         s0 = peg$FAILED;
@@ -861,7 +1023,7 @@ function peg$parse(input, options) {
     let s0;
 
     peg$savedPos = peg$currPos;
-    s0 = peg$f19();
+    s0 = peg$f20();
     if (s0) {
       s0 = undefined;
     } else {
@@ -879,7 +1041,7 @@ function peg$parse(input, options) {
     s2 = peg$parsereferenceOrLink();
     if (s2 !== peg$FAILED) {
       peg$savedPos = s0;
-      s0 = peg$f20(s2);
+      s0 = peg$f21(s2);
     } else {
       peg$currPos = s0;
       s0 = peg$FAILED;
@@ -904,7 +1066,7 @@ function peg$parse(input, options) {
     }
     if (s1 !== peg$FAILED) {
       peg$savedPos = s0;
-      s1 = peg$f21(s1);
+      s1 = peg$f22(s1);
     }
     s0 = s1;
 
@@ -924,13 +1086,13 @@ function peg$parse(input, options) {
         peg$currPos++;
       } else {
         s4 = peg$FAILED;
-        if (peg$silentFails === 0) { peg$fail(peg$e4); }
+        if (peg$silentFails === 0) { peg$fail(peg$e5); }
       }
       if (s4 !== peg$FAILED) {
         s5 = peg$parsesingleLineValues();
         if (s5 !== peg$FAILED) {
           peg$savedPos = s0;
-          s0 = peg$f22(s2, s5);
+          s0 = peg$f23(s2, s5);
         } else {
           peg$currPos = s0;
           s0 = peg$FAILED;
@@ -954,7 +1116,7 @@ function peg$parse(input, options) {
     s1 = peg$parsesingleLineValues();
     if (s1 !== peg$FAILED) {
       peg$savedPos = s0;
-      s1 = peg$f23(s1);
+      s1 = peg$f24(s1);
     }
     s0 = s1;
 
@@ -973,13 +1135,13 @@ function peg$parse(input, options) {
         peg$currPos++;
       } else {
         s3 = peg$FAILED;
-        if (peg$silentFails === 0) { peg$fail(peg$e4); }
+        if (peg$silentFails === 0) { peg$fail(peg$e5); }
       }
       if (s3 !== peg$FAILED) {
         s4 = peg$parseeol();
         if (s4 !== peg$FAILED) {
           peg$savedPos = s0;
-          s0 = peg$f24(s1);
+          s0 = peg$f25(s1);
         } else {
           peg$currPos = s0;
           s0 = peg$FAILED;
@@ -1023,7 +1185,7 @@ function peg$parse(input, options) {
     }
     if (s1 !== peg$FAILED) {
       peg$savedPos = s0;
-      s1 = peg$f25(s1);
+      s1 = peg$f26(s1);
     }
     s0 = s1;
 
@@ -1055,7 +1217,7 @@ function peg$parse(input, options) {
       peg$currPos++;
     } else {
       s2 = peg$FAILED;
-      if (peg$silentFails === 0) { peg$fail(peg$e5); }
+      if (peg$silentFails === 0) { peg$fail(peg$e6); }
     }
     peg$silentFails--;
     if (s2 !== peg$FAILED) {
@@ -1066,7 +1228,7 @@ function peg$parse(input, options) {
     }
     if (s1 !== peg$FAILED) {
       peg$savedPos = peg$currPos;
-      s2 = peg$f26();
+      s2 = peg$f27();
       if (s2) {
         s2 = undefined;
       } else {
@@ -1076,7 +1238,7 @@ function peg$parse(input, options) {
         s3 = peg$parseconsumeDouble();
         if (s3 !== peg$FAILED) {
           peg$savedPos = s0;
-          s0 = peg$f27(s3);
+          s0 = peg$f28(s3);
         } else {
           peg$currPos = s0;
           s0 = peg$FAILED;
@@ -1102,7 +1264,7 @@ function peg$parse(input, options) {
       peg$currPos++;
     } else {
       s1 = peg$FAILED;
-      if (peg$silentFails === 0) { peg$fail(peg$e6); }
+      if (peg$silentFails === 0) { peg$fail(peg$e2); }
     }
     if (s1 !== peg$FAILED) {
       s2 = [];
@@ -1112,7 +1274,7 @@ function peg$parse(input, options) {
         s3 = peg$parseconsumeDoubleMore();
       }
       peg$savedPos = s0;
-      s0 = peg$f28(s1, s2);
+      s0 = peg$f29(s1, s2);
     } else {
       peg$currPos = s0;
       s0 = peg$FAILED;
@@ -1126,7 +1288,7 @@ function peg$parse(input, options) {
 
     s0 = peg$currPos;
     peg$savedPos = peg$currPos;
-    s1 = peg$f29();
+    s1 = peg$f30();
     if (s1) {
       s1 = undefined;
     } else {
@@ -1138,11 +1300,11 @@ function peg$parse(input, options) {
         peg$currPos++;
       } else {
         s2 = peg$FAILED;
-        if (peg$silentFails === 0) { peg$fail(peg$e6); }
+        if (peg$silentFails === 0) { peg$fail(peg$e2); }
       }
       if (s2 !== peg$FAILED) {
         peg$savedPos = s0;
-        s0 = peg$f30(s2);
+        s0 = peg$f31(s2);
       } else {
         peg$currPos = s0;
         s0 = peg$FAILED;
@@ -1177,7 +1339,7 @@ function peg$parse(input, options) {
     }
     if (s1 !== peg$FAILED) {
       peg$savedPos = peg$currPos;
-      s2 = peg$f31();
+      s2 = peg$f32();
       if (s2) {
         s2 = undefined;
       } else {
@@ -1187,7 +1349,7 @@ function peg$parse(input, options) {
         s3 = peg$parseconsumeSingle();
         if (s3 !== peg$FAILED) {
           peg$savedPos = s0;
-          s0 = peg$f32(s3);
+          s0 = peg$f33(s3);
         } else {
           peg$currPos = s0;
           s0 = peg$FAILED;
@@ -1213,7 +1375,7 @@ function peg$parse(input, options) {
       peg$currPos++;
     } else {
       s1 = peg$FAILED;
-      if (peg$silentFails === 0) { peg$fail(peg$e6); }
+      if (peg$silentFails === 0) { peg$fail(peg$e2); }
     }
     if (s1 !== peg$FAILED) {
       s2 = [];
@@ -1223,7 +1385,7 @@ function peg$parse(input, options) {
         s3 = peg$parseconsumeSingleMore();
       }
       peg$savedPos = s0;
-      s0 = peg$f33(s1, s2);
+      s0 = peg$f34(s1, s2);
     } else {
       peg$currPos = s0;
       s0 = peg$FAILED;
@@ -1237,7 +1399,7 @@ function peg$parse(input, options) {
 
     s0 = peg$currPos;
     peg$savedPos = peg$currPos;
-    s1 = peg$f34();
+    s1 = peg$f35();
     if (s1) {
       s1 = undefined;
     } else {
@@ -1249,11 +1411,11 @@ function peg$parse(input, options) {
         peg$currPos++;
       } else {
         s2 = peg$FAILED;
-        if (peg$silentFails === 0) { peg$fail(peg$e6); }
+        if (peg$silentFails === 0) { peg$fail(peg$e2); }
       }
       if (s2 !== peg$FAILED) {
         peg$savedPos = s0;
-        s0 = peg$f35(s2);
+        s0 = peg$f36(s2);
       } else {
         peg$currPos = s0;
         s0 = peg$FAILED;
@@ -1288,7 +1450,7 @@ function peg$parse(input, options) {
     }
     if (s1 !== peg$FAILED) {
       peg$savedPos = peg$currPos;
-      s2 = peg$f36();
+      s2 = peg$f37();
       if (s2) {
         s2 = undefined;
       } else {
@@ -1298,7 +1460,7 @@ function peg$parse(input, options) {
         s3 = peg$parseconsumeBacktick();
         if (s3 !== peg$FAILED) {
           peg$savedPos = s0;
-          s0 = peg$f37(s3);
+          s0 = peg$f38(s3);
         } else {
           peg$currPos = s0;
           s0 = peg$FAILED;
@@ -1324,7 +1486,7 @@ function peg$parse(input, options) {
       peg$currPos++;
     } else {
       s1 = peg$FAILED;
-      if (peg$silentFails === 0) { peg$fail(peg$e6); }
+      if (peg$silentFails === 0) { peg$fail(peg$e2); }
     }
     if (s1 !== peg$FAILED) {
       s2 = [];
@@ -1334,7 +1496,7 @@ function peg$parse(input, options) {
         s3 = peg$parseconsumeBacktickMore();
       }
       peg$savedPos = s0;
-      s0 = peg$f38(s1, s2);
+      s0 = peg$f39(s1, s2);
     } else {
       peg$currPos = s0;
       s0 = peg$FAILED;
@@ -1348,7 +1510,7 @@ function peg$parse(input, options) {
 
     s0 = peg$currPos;
     peg$savedPos = peg$currPos;
-    s1 = peg$f39();
+    s1 = peg$f40();
     if (s1) {
       s1 = undefined;
     } else {
@@ -1360,11 +1522,11 @@ function peg$parse(input, options) {
         peg$currPos++;
       } else {
         s2 = peg$FAILED;
-        if (peg$silentFails === 0) { peg$fail(peg$e6); }
+        if (peg$silentFails === 0) { peg$fail(peg$e2); }
       }
       if (s2 !== peg$FAILED) {
         peg$savedPos = s0;
-        s0 = peg$f40(s2);
+        s0 = peg$f41(s2);
       } else {
         peg$currPos = s0;
         s0 = peg$FAILED;
@@ -1377,6 +1539,18 @@ function peg$parse(input, options) {
     return s0;
   }
 
+  function peg$parseSAVE_INDENTATION() {
+    let s0, s1;
+
+    s0 = peg$currPos;
+    s1 = '';
+    peg$savedPos = s0;
+    s1 = peg$f42();
+    s0 = s1;
+
+    return s0;
+  }
+
   function peg$parseSET_BASE_INDENTATION() {
     let s0, s1, s2;
 
@@ -1400,7 +1574,7 @@ function peg$parse(input, options) {
       }
     }
     peg$savedPos = s0;
-    s1 = peg$f41(s1);
+    s1 = peg$f43(s1);
     s0 = s1;
 
     return s0;
@@ -1429,7 +1603,7 @@ function peg$parse(input, options) {
       }
     }
     peg$savedPos = peg$currPos;
-    s2 = peg$f42(s1);
+    s2 = peg$f44(s1);
     if (s2) {
       s2 = undefined;
     } else {
@@ -1437,7 +1611,7 @@ function peg$parse(input, options) {
     }
     if (s2 !== peg$FAILED) {
       peg$savedPos = s0;
-      s0 = peg$f43(s1);
+      s0 = peg$f45(s1);
     } else {
       peg$currPos = s0;
       s0 = peg$FAILED;
@@ -1469,7 +1643,7 @@ function peg$parse(input, options) {
       }
     }
     peg$savedPos = peg$currPos;
-    s2 = peg$f44(s1);
+    s2 = peg$f46(s1);
     if (s2) {
       s2 = undefined;
     } else {
@@ -1669,7 +1843,7 @@ function peg$parse(input, options) {
 
     s0 = peg$currPos;
     peg$savedPos = peg$currPos;
-    s1 = peg$f45();
+    s1 = peg$f47();
     if (s1) {
       s1 = undefined;
     } else {
@@ -1683,7 +1857,7 @@ function peg$parse(input, options) {
         peg$currPos++;
       } else {
         s3 = peg$FAILED;
-        if (peg$silentFails === 0) { peg$fail(peg$e3); }
+        if (peg$silentFails === 0) { peg$fail(peg$e4); }
       }
       peg$silentFails--;
       if (s3 !== peg$FAILED) {
@@ -1717,7 +1891,7 @@ function peg$parse(input, options) {
       peg$currPos++;
     } else {
       s1 = peg$FAILED;
-      if (peg$silentFails === 0) { peg$fail(peg$e6); }
+      if (peg$silentFails === 0) { peg$fail(peg$e2); }
     }
     peg$silentFails--;
     if (s1 === peg$FAILED) {
@@ -1803,14 +1977,27 @@ function peg$parse(input, options) {
   // group opens a nested context that starts fresh at indentation level zero,
   // so line breaks and indentation mean the same thing at every depth.
   let contextStack = [];
+  // Lines already found unreadable, keyed by where they start and whether they
+  // are inside a parenthesised group. Reading a line depends on nothing else: a
+  // group starts a fresh indentation context, and indentation only decides
+  // which lines become children, so a line that could not be read once never
+  // can be. A line that does not parse as the first child of the line above it
+  // is tried again as a sibling at every enclosing indentation level, and
+  // without this each of those attempts would read the whole line again.
+  let unreadableLines = new Set();
 
   function resetState() {
     indentationStack = [0];
     baseIndentation = null;
     contextStack = [];
+    unreadableLines = new Set();
     return true;
   }
 
+  function lineKey(position) {
+    return contextStack.length > 0 ? -1 - position : position;
+  }
+
   function enterNestedContext() {
     contextStack.push({ indentationStack, baseIndentation });
     indentationStack = [0];
@@ -1864,87 +2051,18 @@ function peg$parse(input, options) {
     return indentationStack[indentationStack.length - 1];
   }
 
-  // A body written between an even run of delimiters is substantive when it
-  // holds at least one visible character and does not straddle a parenthesis.
-  // An even run can always be read as delimiter pairs enclosing nothing, so the
-  // n-quote reading is only taken when it carries something the pairs cannot.
-  function isSubstantiveBody(content) {
-    let depth = 0;
-    let hasVisible = false;
-
-    for (const c of content) {
-      if (c === '(') {
-        depth++;
-      } else if (c === ')') {
-        depth--;
-        if (depth < 0) {
-          return false;
-        }
-      }
-      if (!/[ \t\n\r]/.test(c)) {
-        hasVisible = true;
-      }
-    }
-
-    return hasVisible && depth === 0;
-  }
+  // Delimited references of this document, each read once however many
+  // alternatives ask for it (see quotes.js for how a reference is read)
+  const delimitedReferences = new DelimitedReferences(input);
 
   // Universal procedural parser for N-quote strings (any N >= 1)
   // Parses from the given position in the input string
-  // A run of an even number of delimiters that does not open a reference with a
-  // substantive body is the empty reference: the shortest reading, a bare
-  // delimiter pair enclosing nothing, wins over a longer n-quote delimiter.
   // Returns { value, length } or null
   function parseQuotedStringAt(inputStr, startPos, quoteChar) {
     if (startPos >= inputStr.length || inputStr[startPos] !== quoteChar) {
       return null;
     }
-
-    // Count opening quotes
-    let quoteCount = 0;
-    let pos = startPos;
-    while (pos < inputStr.length && inputStr[pos] === quoteChar) {
-      quoteCount++;
-      pos++;
-    }
-
-    const isEvenRun = quoteCount % 2 === 0;
-    const emptyReference = isEvenRun ? { value: '', length: quoteCount } : null;
-
-    const closeSeq = quoteChar.repeat(quoteCount);
-    const escapeSeq = quoteChar.repeat(quoteCount * 2);
-
-    let content = '';
-    while (pos < inputStr.length) {
-      // Check for escape sequence (2*N quotes)
-      if (inputStr.substr(pos, escapeSeq.length) === escapeSeq) {
-        content += closeSeq; // 2*N quotes become N quotes
-        pos += escapeSeq.length;
-        continue;
-      }
-
-      // Check for closing sequence (exactly N quotes)
-      if (inputStr.substr(pos, quoteCount) === closeSeq) {
-        // Verify it's exactly N quotes (not followed by more of same char)
-        const afterClose = pos + quoteCount;
-        if (afterClose >= inputStr.length || inputStr[afterClose] !== quoteChar) {
-          // Found valid closing
-          if (isEvenRun && !isSubstantiveBody(content)) {
-            return emptyReference;
-          }
-          return {
-            value: content,
-            length: afterClose - startPos
-          };
-        }
-      }
-
-      // Add character to content
-      content += inputStr[pos];
-      pos++;
-    }
-
-    return emptyReference; // No valid closing found
+    return delimitedReferences.readAt(startPos);
   }
 
   // Global state for passing parsed values between predicate and action