version 1.13, 2005/11/18 20:56:53 |
version 1.14, 2006/07/25 08:22:32 |
|
|
* and scan back until we hit a <NL><SP> <NL><TAB> or |
* and scan back until we hit a <NL><SP> <NL><TAB> or |
* <NL><NL> |
* <NL><NL> |
*/ |
*/ |
while (lback(curwp->w_dotp) != curbp->b_linep) |
while (lback(curwp->w_dotp) != curbp->b_headp) |
if (llength(lback(curwp->w_dotp)) && |
if (llength(lback(curwp->w_dotp)) && |
lgetc(curwp->w_dotp, 0) != ' ' && |
lgetc(curwp->w_dotp, 0) != ' ' && |
lgetc(curwp->w_dotp, 0) != '.' && |
lgetc(curwp->w_dotp, 0) != '.' && |
|
|
if (llength(lback(curwp->w_dotp)) && |
if (llength(lback(curwp->w_dotp)) && |
lgetc(curwp->w_dotp, 0) == '.') { |
lgetc(curwp->w_dotp, 0) == '.') { |
curwp->w_dotp = lforw(curwp->w_dotp); |
curwp->w_dotp = lforw(curwp->w_dotp); |
if (curwp->w_dotp == curbp->b_linep) { |
if (curwp->w_dotp == curbp->b_headp) { |
/* |
/* |
* beyond end of buffer, |
* beyond end of buffer, |
* cleanup time |
* cleanup time |
|
|
curwp->w_dotp = lforw(curwp->w_dotp); |
curwp->w_dotp = lforw(curwp->w_dotp); |
|
|
/* and scan forword until we hit a <NL><SP> or ... */ |
/* and scan forword until we hit a <NL><SP> or ... */ |
while (curwp->w_dotp != curbp->b_linep) { |
while (curwp->w_dotp != curbp->b_headp) { |
if (llength(curwp->w_dotp) && |
if (llength(curwp->w_dotp) && |
lgetc(curwp->w_dotp, 0) != ' ' && |
lgetc(curwp->w_dotp, 0) != ' ' && |
lgetc(curwp->w_dotp, 0) != '.' && |
lgetc(curwp->w_dotp, 0) != '.' && |
|
|
else |
else |
break; |
break; |
} |
} |
if (curwp->w_dotp == curbp->b_linep) { |
if (curwp->w_dotp == curbp->b_headp) { |
/* beyond end of buffer, cleanup time */ |
/* beyond end of buffer, cleanup time */ |
curwp->w_dotp = lback(curwp->w_dotp); |
curwp->w_dotp = lback(curwp->w_dotp); |
curwp->w_doto = llength(curwp->w_dotp); |
curwp->w_doto = llength(curwp->w_dotp); |