diff options
Diffstat (limited to 'stage-2.awk')
| -rw-r--r-- | stage-2.awk | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stage-2.awk b/stage-2.awk index 2e85ece..46cba76 100644 --- a/stage-2.awk +++ b/stage-2.awk @@ -14,9 +14,9 @@ BEGIN { if (match($0, /^ *[0-9]* *Constance *Ring *[0-9]* *$/)) { if (prev != "") { print prev - } else { - extra_nl = 1 } + extra_nl = 1 + getline $0 = "" prev = "" @@ -31,9 +31,9 @@ BEGIN { # printf "m='%s'\n", m u = match(m, /^[^A-Za-z]*[A-Z].*/) # printf "u=%d, l=%d", u, l -# printf "u=%d, RSTART=%d, RLENGTH=%d, ", u, RSTART, RLENGTH +# printf "RSTART=%d, RLENGTH=%d, ", u, RSTART, RLENGTH l = match(m, /^[^A-Za-z]*[a-z]/) -# printf "l=%d, RSTART=%d, RLENGTH=%d", l, RSTART, RLENGTH +# printf "RSTART=%d, RLENGTH=%d\n", l, RSTART, RLENGTH if (u > l) { printf "\n", prev } |