scanner: fix bug with indent at start of node.

[ocean] / csrc / scanner.mdc

diff --git a/csrc/scanner.mdc b/csrc/scanner.mdc
index 21ec828c1d36dea273cabe05c3a3dce3844c29a2..80adb2a3ad1f7b1684af3ee7fb1f77006492c7a0 100644 (file)
--- a/csrc/scanner.mdc
+++ b/csrc/scanner.mdc
@@ -854,7 +854,8 @@ information and return one token.
                    state->indent_level < sizeof(state->indent_sizes)-1) {
                        state->indent_level += 1;
                        state->indent_sizes[state->indent_level] = state_indent(state);
-                       state->delayed_lines -= 1;
+                       if (state->delayed_lines)
+                               state->delayed_lines -= 1;
                        tk.num = TK_in;
                        return tk;
                }