diff options
author | Petter Rodhelind <petter.rodhelind@gmail.com> | 2017-11-06 15:19:40 +0100 |
---|---|---|
committer | Petter Rodhelind <petter.rodhelind@gmail.com> | 2017-11-06 15:19:40 +0100 |
commit | a8c75a106f5d6e283c6b23e2592207ee5d5bce29 (patch) | |
tree | 6869c3e18b920b2b71e0ad02430c0d0c50cac741 /src/cmd/acme/ecmd.c | |
parent | f25f90ea3332df18129558fd246f7b5d4c80b4d8 (diff) | |
parent | 3d6e5cb56a6249e7f3001091fe81c171cd501319 (diff) | |
download | plan9port-a8c75a106f5d6e283c6b23e2592207ee5d5bce29.tar.gz plan9port-a8c75a106f5d6e283c6b23e2592207ee5d5bce29.tar.bz2 plan9port-a8c75a106f5d6e283c6b23e2592207ee5d5bce29.zip |
Merge remote-tracking branch 'upstream/master'
Diffstat (limited to 'src/cmd/acme/ecmd.c')
-rw-r--r-- | src/cmd/acme/ecmd.c | 66 |
1 files changed, 49 insertions, 17 deletions
diff --git a/src/cmd/acme/ecmd.c b/src/cmd/acme/ecmd.c index 9bedae4c..ef92e339 100644 --- a/src/cmd/acme/ecmd.c +++ b/src/cmd/acme/ecmd.c @@ -661,15 +661,16 @@ pipe_cmd(Text *t, Cmd *cp) } long -nlcount(Text *t, long q0, long q1) +nlcount(Text *t, long q0, long q1, long *pnr) { - long nl; + long nl, start; Rune *buf; int i, nbuf; buf = fbufalloc(); nbuf = 0; i = nl = 0; + start = q0; while(q0 < q1){ if(i == nbuf){ nbuf = q1-q0; @@ -678,24 +679,44 @@ nlcount(Text *t, long q0, long q1) bufread(&t->file->b, q0, buf, nbuf); i = 0; } - if(buf[i++] == '\n') + if(buf[i++] == '\n') { + start = q0+1; nl++; + } q0++; } fbuffree(buf); + if(pnr != nil) + *pnr = q0 - start; return nl; } +enum { + PosnLine = 0, + PosnChars = 1, + PosnLineChars = 2, +}; + void -printposn(Text *t, int charsonly) +printposn(Text *t, int mode) { - long l1, l2; + long l1, l2, r1, r2; if (t != nil && t->file != nil && t->file->name != nil) warning(nil, "%.*S:", t->file->nname, t->file->name); - if(!charsonly){ - l1 = 1+nlcount(t, 0, addr.r.q0); - l2 = l1+nlcount(t, addr.r.q0, addr.r.q1); + + switch(mode) { + case PosnChars: + warning(nil, "#%d", addr.r.q0); + if(addr.r.q1 != addr.r.q0) + warning(nil, ",#%d", addr.r.q1); + warning(nil, "\n"); + return; + + default: + case PosnLine: + l1 = 1+nlcount(t, 0, addr.r.q0, nil); + l2 = l1+nlcount(t, addr.r.q0, addr.r.q1, nil); /* check if addr ends with '\n' */ if(addr.r.q1>0 && addr.r.q1>addr.r.q0 && textreadc(t, addr.r.q1-1)=='\n') --l2; @@ -704,32 +725,43 @@ printposn(Text *t, int charsonly) warning(nil, ",%lud", l2); warning(nil, "\n"); return; + + case PosnLineChars: + l1 = 1+nlcount(t, 0, addr.r.q0, &r1); + l2 = l1+nlcount(t, addr.r.q0, addr.r.q1, &r2); + if(l2 == l1) + r2 += r1; + warning(nil, "%lud+#%d", l1, r1); + if(l2 != l1) + warning(nil, ",%lud+#%d", l2, r2); + warning(nil, "\n"); + return; } - warning(nil, "#%d", addr.r.q0); - if(addr.r.q1 != addr.r.q0) - warning(nil, ",#%d", addr.r.q1); - warning(nil, "\n"); } int eq_cmd(Text *t, Cmd *cp) { - int charsonly; + int mode; switch(cp->u.text->n){ case 0: - charsonly = FALSE; + mode = PosnLine; break; case 1: if(cp->u.text->r[0] == '#'){ - charsonly = TRUE; + mode = PosnChars; + break; + } + if(cp->u.text->r[0] == '+'){ + mode = PosnLineChars; break; } default: - SET(charsonly); + SET(mode); editerror("newline expected"); } - printposn(t, charsonly); + printposn(t, mode); return TRUE; } |