version 1.6, 2001/05/24 03:05:25 |
version 1.7, 2002/02/14 14:24:21 |
|
|
* <NL><NL> |
* <NL><NL> |
*/ |
*/ |
while (lback(curwp->w_dotp) != curbp->b_linep) |
while (lback(curwp->w_dotp) != curbp->b_linep) |
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) != '.' && |
&& lgetc(curwp->w_dotp, 0) != '\t') |
lgetc(curwp->w_dotp, 0) != '\t') |
curwp->w_dotp = lback(curwp->w_dotp); |
curwp->w_dotp = lback(curwp->w_dotp); |
else { |
else { |
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_linep) { |
/* |
/* |
|
|
|
|
/* 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_linep) { |
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) != '.' && |
&& lgetc(curwp->w_dotp, 0) != '\t') |
lgetc(curwp->w_dotp, 0) != '\t') |
curwp->w_dotp = lforw(curwp->w_dotp); |
curwp->w_dotp = lforw(curwp->w_dotp); |
else |
else |
break; |
break; |
|
|
if ((c = lgetc(curwp->w_dotp, curwp->w_doto)) != ' ' && c != '\t') |
if ((c = lgetc(curwp->w_dotp, curwp->w_doto)) != ' ' && c != '\t') |
do { |
do { |
(void)backchar(FFRAND, 1); |
(void)backchar(FFRAND, 1); |
} while ((c = lgetc(curwp->w_dotp, curwp->w_doto)) != ' ' |
} while ((c = lgetc(curwp->w_dotp, curwp->w_doto)) != ' ' && |
&& c != '\t' && curwp->w_doto > 0); |
c != '\t' && curwp->w_doto > 0); |
|
|
if (curwp->w_doto == 0) |
if (curwp->w_doto == 0) |
do { |
do { |
(void)forwchar(FFRAND, 1); |
(void)forwchar(FFRAND, 1); |
} while ((c = lgetc(curwp->w_dotp, curwp->w_doto)) != ' ' |
} while ((c = lgetc(curwp->w_dotp, curwp->w_doto)) != ' ' && |
&& c != '\t' && curwp->w_doto < llength(curwp->w_dotp)); |
c != '\t' && curwp->w_doto < llength(curwp->w_dotp)); |
|
|
(void)delwhite(FFRAND, 1); |
(void)delwhite(FFRAND, 1); |
(void)lnewline(); |
(void)lnewline(); |