aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPekka Enberg <penberg@kernel.org>2010-08-29 13:03:55 +0300
committerLinus Torvalds <torvalds@linux-foundation.org>2010-08-29 08:15:23 -0700
commit0f05e53f99c07afcd4fa8040c8631bc3caf4de56 (patch)
treeed8cacec4d5dbd214a91a8d1bad76b2290fd265a
parent3246438f7350ad080355b9031e9ea4b3925a34bf (diff)
downloaduemacs-0f05e53f99c07afcd4fa8040c8631bc3caf4de56.tar.gz
uemacs: Fix return statements
Return statement is not a function so remove superfluous use of parenthesis. Cc: Thiago Farina <tfransosi@gmail.com> Signed-off-by: Pekka Enberg <penberg@kernel.org> Signed-off-by: Linus Torvalds <torvalds@linux-foundation.org>
-rw-r--r--ansi.c4
-rw-r--r--basic.c6
-rw-r--r--bind.c78
-rw-r--r--buffer.c72
-rw-r--r--crypt.c6
-rw-r--r--display.c34
-rw-r--r--eval.c272
-rw-r--r--exec.c98
-rw-r--r--file.c88
-rw-r--r--fileio.c34
-rw-r--r--ibmpc.c8
-rw-r--r--input.c52
-rw-r--r--isearch.c40
-rw-r--r--line.c74
-rw-r--r--lock.c26
-rw-r--r--main.c48
-rw-r--r--pklock.c2
-rw-r--r--posix.c2
-rw-r--r--random.c154
-rw-r--r--region.c36
-rw-r--r--search.c60
-rw-r--r--spawn.c86
-rw-r--r--tcap.c4
-rw-r--r--termio.c24
-rw-r--r--vmsvt.c2
-rw-r--r--vt52.c4
-rw-r--r--window.c82
-rw-r--r--word.c124
28 files changed, 760 insertions, 760 deletions
diff --git a/ansi.c b/ansi.c
index 8e70757..57dac03 100644
--- a/ansi.c
+++ b/ansi.c
@@ -176,7 +176,7 @@ void ansirev(int state)
/* Change screen resolution. */
int ansicres()
{
- return (TRUE);
+ return TRUE;
}
/* Change pallette settings. */
@@ -252,7 +252,7 @@ void ansikclose(void)
int fnclabel(int f, int n)
{
/* On machines with no function keys...don't bother. */
- return (TRUE);
+ return TRUE;
}
#endif
#endif
diff --git a/basic.c b/basic.c
index 8acce79..d651805 100644
--- a/basic.c
+++ b/basic.c
@@ -68,7 +68,7 @@ int backchar(int f, int n)
while (n--) {
if (curwp->w_doto == 0) {
if ((lp = lback(curwp->w_dotp)) == curbp->b_linep)
- return (FALSE);
+ return FALSE;
curwp->w_dotp = lp;
curwp->w_doto = llength(lp);
curwp->w_flag |= WFMOVE;
@@ -100,7 +100,7 @@ int forwchar(int f, int n)
while (n--) {
if (curwp->w_doto == llength(curwp->w_dotp)) {
if (curwp->w_dotp == curbp->b_linep)
- return (FALSE);
+ return FALSE;
curwp->w_dotp = lforw(curwp->w_dotp);
curwp->w_doto = 0;
curwp->w_flag |= WFMOVE;
@@ -125,7 +125,7 @@ int gotoline(int f, int n)
if ((status =
mlreply("Line to GOTO: ", arg, NSTRING)) != TRUE) {
mlwrite("(Aborted)");
- return (status);
+ return status;
}
n = atoi(arg);
}
diff --git a/bind.c b/bind.c
index 0281aea..cc20f7d 100644
--- a/bind.c
+++ b/bind.c
@@ -29,18 +29,18 @@ int help(int f, int n)
fname = flook(pathname[1], FALSE);
if (fname == NULL) {
mlwrite("(Help file is not online)");
- return (FALSE);
+ return FALSE;
}
}
/* split the current window to make room for the help stuff */
if (splitwind(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
if (bp == NULL) {
/* and read the stuff in */
if (getfile(fname, FALSE) == FALSE)
- return (FALSE);
+ return FALSE;
} else
swbuffer(bp);
@@ -52,7 +52,7 @@ int help(int f, int n)
wp->w_flag |= WFMODE;
wp = wp->w_wndp;
}
- return (TRUE);
+ return TRUE;
}
int deskey(int f, int n)
@@ -78,7 +78,7 @@ int deskey(int f, int n)
/* output the command sequence */
ostring(ptr);
- return (TRUE);
+ return TRUE;
}
/*
@@ -102,7 +102,7 @@ int bindtokey(int f, int n)
kfunc = getname();
if (kfunc == NULL) {
mlwrite("(No such function)");
- return (FALSE);
+ return FALSE;
}
ostring(" ");
@@ -157,7 +157,7 @@ int bindtokey(int f, int n)
/* if we run out of binding room, bitch */
if (ktp >= &keytab[NBINDS]) {
mlwrite("Binding table FULL!");
- return (FALSE);
+ return FALSE;
}
ktp->k_code = c; /* add keycode */
@@ -166,7 +166,7 @@ int bindtokey(int f, int n)
ktp->k_code = 0;
ktp->k_fp = NULL;
}
- return (TRUE);
+ return TRUE;
}
/*
@@ -195,9 +195,9 @@ int unbindkey(int f, int n)
/* if it isn't bound, bitch */
if (unbindchar(c) == FALSE) {
mlwrite("(Key not bound)");
- return (FALSE);
+ return FALSE;
}
- return (TRUE);
+ return TRUE;
}
@@ -225,7 +225,7 @@ int unbindchar(int c)
/* if it isn't bound, bitch */
if (!found)
- return (FALSE);
+ return FALSE;
/* save the pointer and scan to the end of the table */
sktp = ktp;
@@ -240,7 +240,7 @@ int unbindchar(int c)
/* null out the last one */
ktp->k_code = 0;
ktp->k_fp = NULL;
- return (TRUE);
+ return TRUE;
}
/* describe bindings
@@ -251,7 +251,7 @@ int desbind(int f, int n)
#if APROP
{
buildlist(TRUE, "");
- return (TRUE);
+ return TRUE;
}
int apro(int f, int n)
@@ -261,9 +261,9 @@ int apro(int f, int n)
status = mlreply("Apropos string: ", mstring, NSTRING - 1);
if (status != TRUE)
- return (status);
+ return status;
- return (buildlist(FALSE, mstring));
+ return buildlist(FALSE, mstring);
}
/*
@@ -284,13 +284,13 @@ int buildlist(int type, char *mstring)
/* split the current window to make room for the binding list */
if (splitwind(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
/* and get a buffer for it */
bp = bfind("*Binding list*", TRUE, 0);
if (bp == NULL || bclear(bp) == FALSE) {
mlwrite("Can not display binding list");
- return (FALSE);
+ return FALSE;
}
/* let us know this is in progress */
@@ -346,7 +346,7 @@ int buildlist(int type, char *mstring)
/* and add it as a line into the buffer */
if (linstr(outseq) != TRUE)
- return (FALSE);
+ return FALSE;
cpos = 0; /* and clear the line */
}
@@ -358,7 +358,7 @@ int buildlist(int type, char *mstring)
outseq[cpos++] = '\n';
outseq[cpos] = 0;
if (linstr(outseq) != TRUE)
- return (FALSE);
+ return FALSE;
}
fail: /* and on to the next name */
@@ -375,7 +375,7 @@ int buildlist(int type, char *mstring)
wp = wp->w_wndp;
}
mlwrite(""); /* clear the mode line */
- return (TRUE);
+ return TRUE;
}
#if APROP
@@ -408,12 +408,12 @@ int strinc(char *source, char *sub)
/* yes, return a success */
if (*tp == 0)
- return (TRUE);
+ return TRUE;
/* no, onward */
sp++;
}
- return (FALSE);
+ return FALSE;
}
#endif
@@ -430,7 +430,7 @@ unsigned int getckey(int mflag)
/* check to see if we are executing a command line */
if (clexec) {
macarg(tok); /* get the next token */
- return (stock(tok));
+ return stock(tok);
}
/* or the normal way */
@@ -438,7 +438,7 @@ unsigned int getckey(int mflag)
c = get1key();
else
c = getcmd();
- return (c);
+ return c;
}
/*
@@ -458,10 +458,10 @@ int startup(char *sfname)
/* if it isn't around, don't sweat it */
if (fname == NULL)
- return (TRUE);
+ return TRUE;
/* otherwise, execute the sucker */
- return (dofile(fname));
+ return dofile(fname);
}
/*
@@ -493,7 +493,7 @@ char *flook(char *fname, int hflag)
/* and try it out */
if (ffropen(fspec) == FIOSUC) {
ffclose();
- return (fspec);
+ return fspec;
}
}
}
@@ -502,7 +502,7 @@ char *flook(char *fname, int hflag)
/* always try the current directory first */
if (ffropen(fname) == FIOSUC) {
ffclose();
- return (fname);
+ return fname;
}
#if ENVFUNC
/* get the PATH variable */
@@ -524,7 +524,7 @@ char *flook(char *fname, int hflag)
/* and try it out */
if (ffropen(fspec) == FIOSUC) {
ffclose();
- return (fspec);
+ return fspec;
}
if (*path == PATHCHR)
@@ -540,11 +540,11 @@ char *flook(char *fname, int hflag)
/* and try it out */
if (ffropen(fspec) == FIOSUC) {
ffclose();
- return (fspec);
+ return fspec;
}
}
- return (NULL); /* no such luck */
+ return NULL; /* no such luck */
}
/*
@@ -601,12 +601,12 @@ int (*getbind(int c))(int, int)
ktp = &keytab[0]; /* Look in key table. */
while (ktp->k_fp != NULL) {
if (ktp->k_code == c)
- return (ktp->k_fp);
+ return ktp->k_fp;
++ktp;
}
/* no such binding */
- return (NULL);
+ return NULL;
}
/*
@@ -622,10 +622,10 @@ char *getfname(fn_t func)
nptr = &names[0];
while (nptr->n_func != NULL) {
if (nptr->n_func == func)
- return (nptr->n_name);
+ return nptr->n_name;
++nptr;
}
- return (NULL);
+ return NULL;
}
/*
@@ -642,10 +642,10 @@ int (*fncmatch(char *fname)) (int, int)
ffp = &names[0];
while (ffp->n_func != NULL) {
if (strcmp(fname, ffp->n_name) == 0)
- return (ffp->n_func);
+ return ffp->n_func;
++ffp;
}
- return (NULL);
+ return NULL;
}
/*
@@ -696,7 +696,7 @@ unsigned int stock(char *keyname)
/* the final sequence... */
c |= *keyname;
- return (c);
+ return c;
}
/*
@@ -712,5 +712,5 @@ char *transbind(char *skey)
if (bindname == NULL)
bindname = "ERROR";
- return (bindname);
+ return bindname;
}
diff --git a/buffer.c b/buffer.c
index f0bfe43..15ff057 100644
--- a/buffer.c
+++ b/buffer.c
@@ -27,10 +27,10 @@ int usebuffer(int f, int n)
char bufn[NBUFN];
if ((s = mlreply("Use buffer: ", bufn, NBUFN)) != TRUE)
- return (s);
+ return s;
if ((bp = bfind(bufn, TRUE, 0)) == NULL)
- return (FALSE);
- return (swbuffer(bp));
+ return FALSE;
+ return swbuffer(bp);
}
/*
@@ -47,7 +47,7 @@ int nextbuffer(int f, int n)
if (f == FALSE)
n = 1;
if (n < 1)
- return (FALSE);
+ return FALSE;
bbp = curbp;
while (n-- > 0) {
@@ -63,14 +63,14 @@ int nextbuffer(int f, int n)
/* don't get caught in an infinite loop! */
if (bp == bbp)
- return (FALSE);
+ return FALSE;
}
bbp = bp;
}
- return (swbuffer(bp));
+ return swbuffer(bp);
}
/*
@@ -104,7 +104,7 @@ int swbuffer(struct buffer *bp)
curwp->w_markp = bp->b_markp;
curwp->w_marko = bp->b_marko;
cknewwindow();
- return (TRUE);
+ return TRUE;
}
wp = wheadp; /* Look for old. */
while (wp != NULL) {
@@ -118,7 +118,7 @@ int swbuffer(struct buffer *bp)
wp = wp->w_wndp;
}
cknewwindow();
- return (TRUE);
+ return TRUE;
}
/*
@@ -136,12 +136,12 @@ int killbuffer(int f, int n)
char bufn[NBUFN];
if ((s = mlreply("Kill buffer: ", bufn, NBUFN)) != TRUE)
- return (s);
+ return s;
if ((bp = bfind(bufn, FALSE, 0)) == NULL) /* Easy if unknown. */
- return (TRUE);
+ return TRUE;
if (bp->b_flag & BFINVS) /* Deal with special buffers */
- return (TRUE); /* by doing nothing. */
- return (zotbuf(bp));
+ return TRUE; /* by doing nothing. */
+ return zotbuf(bp);
}
/*
@@ -155,10 +155,10 @@ int zotbuf(struct buffer *bp)
if (bp->b_nwnd != 0) { /* Error if on screen. */
mlwrite("Buffer is being displayed");
- return (FALSE);
+ return FALSE;
}
if ((s = bclear(bp)) != TRUE) /* Blow text away. */
- return (s);
+ return s;
free((char *) bp->b_linep); /* Release header line. */
bp1 = NULL; /* Find the header. */
bp2 = bheadp;
@@ -172,7 +172,7 @@ int zotbuf(struct buffer *bp)
else
bp1->b_bufp = bp2;
free((char *) bp); /* Release buffer block */
- return (TRUE);
+ return TRUE;
}
/*
@@ -188,7 +188,7 @@ int namebuffer(int f, int n)
/* prompt for and get the new buffer name */
ask:if (mlreply("Change buffer name to: ", bufn, NBUFN) !=
TRUE)
- return (FALSE);
+ return FALSE;
/* and check for duplicates */
bp = bheadp;
@@ -204,7 +204,7 @@ int namebuffer(int f, int n)
strcpy(curbp->b_bname, bufn); /* copy buffer name to structure */
curwp->w_flag |= WFMODE; /* make mode line replot */
mlerase();
- return (TRUE);
+ return TRUE;
}
/*
@@ -224,10 +224,10 @@ int listbuffers(int f, int n)
int s;
if ((s = makelist(f)) != TRUE)
- return (s);
+ return s;
if (blistp->b_nwnd == 0) { /* Not on screen yet. */
if ((wp = wpopup()) == NULL)
- return (FALSE);
+ return FALSE;
bp = wp->w_bufp;
if (--bp->b_nwnd == 0) {
bp->b_dotp = wp->w_dotp;
@@ -250,7 +250,7 @@ int listbuffers(int f, int n)
}
wp = wp->w_wndp;
}
- return (TRUE);
+ return TRUE;
}
/*
@@ -280,12 +280,12 @@ int makelist(int iflag)
blistp->b_flag &= ~BFCHG; /* Don't complain! */
if ((s = bclear(blistp)) != TRUE) /* Blow old text away */
- return (s);
+ return s;
strcpy(blistp->b_fname, "");
if (addline("ACT MODES Size Buffer File") == FALSE
|| addline("--- ----- ---- ------ ----") ==
FALSE)
- return (FALSE);
+ return FALSE;
bp = bheadp; /* For all buffers */
/* build line to report global mode settings */
@@ -303,7 +303,7 @@ int makelist(int iflag)
*cp1++ = '.';
strcpy(cp1, " Global Modes");
if (addline(line) == FALSE)
- return (FALSE);
+ return FALSE;
/* output the list of buffers */
while (bp != NULL) {
@@ -367,10 +367,10 @@ int makelist(int iflag)
}
*cp1 = 0; /* Add to the buffer. */
if (addline(line) == FALSE)
- return (FALSE);
+ return FALSE;
bp = bp->b_bufp;
}
- return (TRUE); /* All done */
+ return TRUE; /* All done */
}
void ltoa(char *buf, int width, long num)
@@ -400,7 +400,7 @@ int addline(char *text)
ntext = strlen(text);
if ((lp = lalloc(ntext)) == NULL)
- return (FALSE);
+ return FALSE;
for (i = 0; i < ntext; ++i)
lputc(lp, i, text[i]);
blistp->b_linep->l_bp->l_fp = lp; /* Hook onto the end */
@@ -409,7 +409,7 @@ int addline(char *text)
lp->l_fp = blistp->b_linep;
if (blistp->b_dotp == blistp->b_linep) /* If "." is at the end */
blistp->b_dotp = lp; /* move it to new line */
- return (TRUE);
+ return TRUE;
}
/*
@@ -430,10 +430,10 @@ int anycb(void)
while (bp != NULL) {
if ((bp->b_flag & BFINVS) == 0
&& (bp->b_flag & BFCHG) != 0)
- return (TRUE);
+ return TRUE;
bp = bp->b_bufp;
}
- return (FALSE);
+ return FALSE;
}
/*
@@ -452,15 +452,15 @@ struct buffer *bfind(char *bname, int cflag, int bflag)
bp = bheadp;
while (bp != NULL) {
if (strcmp(bname, bp->b_bname) == 0)
- return (bp);
+ return bp;
bp = bp->b_bufp;
}
if (cflag != FALSE) {
if ((bp = (struct buffer *)malloc(sizeof(struct buffer))) == NULL)
- return (NULL);
+ return NULL;
if ((lp = lalloc(0)) == NULL) {
free((char *) bp);
- return (NULL);
+ return NULL;
}
/* find the place in the list to insert this buffer */
if (bheadp == NULL || strcmp(bheadp->b_bname, bname) > 0) {
@@ -498,7 +498,7 @@ struct buffer *bfind(char *bname, int cflag, int bflag)
lp->l_fp = lp;
lp->l_bp = lp;
}
- return (bp);
+ return bp;
}
/*
@@ -519,7 +519,7 @@ int bclear(struct buffer *bp)
if ((bp->b_flag & BFINVS) == 0 /* Not scratch buffer. */
&& (bp->b_flag & BFCHG) != 0 /* Something changed */
&& (s = mlyesno("Discard changes")) != TRUE)
- return (s);
+ return s;
bp->b_flag &= ~BFCHG; /* Not changed */
while ((lp = lforw(bp->b_linep)) != bp->b_linep)
lfree(lp);
@@ -527,7 +527,7 @@ int bclear(struct buffer *bp)
bp->b_doto = 0;
bp->b_markp = NULL; /* Invalidate "mark" */
bp->b_marko = 0;
- return (TRUE);
+ return TRUE;
}
/*
@@ -539,5 +539,5 @@ int unmark(int f, int n)
{
curbp->b_flag &= ~BFCHG;
curwp->w_flag |= WFMODE;
- return (TRUE);
+ return TRUE;
}
diff --git a/crypt.c b/crypt.c
index 89c3a25..5f11ff5 100644
--- a/crypt.c
+++ b/crypt.c
@@ -34,7 +34,7 @@ int set_encryption_key(int f, int n)
status = mlreply("Encryption String: ", key, NPAT - 1);
disinp = odisinp;
if (status != TRUE)
- return (status);
+ return status;
/* and encrypt it */
myencrypt((char *) NULL, 0);
@@ -43,7 +43,7 @@ int set_encryption_key(int f, int n)
/* and save it off */
strcpy(curbp->b_key, key);
mlwrite(" "); /* clear it off the bottom line */
- return (TRUE);
+ return TRUE;
}
/**********
@@ -214,7 +214,7 @@ static int mod95(int val)
val -= 95;
while (val < 0)
val += 95;
- return (val);
+ return val;
}
#else
static void myennocrypt(void)
diff --git a/display.c b/display.c
index deb54a5..317980e 100644
--- a/display.c
+++ b/display.c
@@ -242,7 +242,7 @@ static void vteeol(void)
int upscreen(int f, int n)
{
update(TRUE);
- return (TRUE);
+ return TRUE;
}
#if SCROLLCODE
@@ -264,11 +264,11 @@ int update(int force)
#if TYPEAH && ! PKCODE
if (force == FALSE && typahead())
- return (TRUE);
+ return TRUE;
#endif
#if VISMAC == 0
if (force == FALSE && kbdmode == PLAY)
- return (TRUE);
+ return TRUE;
#endif
displaying = TRUE;
@@ -352,7 +352,7 @@ int update(int force)
while (chg_width || chg_height)
newscreensize(chg_height, chg_width);
#endif
- return (TRUE);
+ return TRUE;
}
/*
@@ -395,7 +395,7 @@ static int reframe(struct window *wp)
break;
}
#endif
- return (TRUE);
+ return TRUE;
}
/* if we are at the end of the file, reframe */
@@ -441,7 +441,7 @@ static int reframe(struct window *wp)
wp->w_linep = lp;
wp->w_flag |= WFHARD;
wp->w_flag &= ~WFFORCE;
- return (TRUE);
+ return TRUE;
}
/*
@@ -657,7 +657,7 @@ int updupd(int force)
if ((vp1->v_flag & VFCHG) != 0) {
#if TYPEAH && ! PKCODE
if (force == FALSE && typahead())
- return (TRUE);
+ return TRUE;
#endif
#if MEMMAP && ! SCROLLCODE
updateline(i, vp1);
@@ -666,7 +666,7 @@ int updupd(int force)
#endif
}
}
- return (TRUE);
+ return TRUE;
}
#if SCROLLCODE
@@ -774,7 +774,7 @@ static int scrolls(int inserts)
}
#endif
if (2 * count < abs(from - to))
- return (FALSE);
+ return FALSE;
scrscroll(from, to, count);
for (i = 0; i < count; i++) {
vpp = pscreen[to + i];
@@ -805,9 +805,9 @@ static int scrolls(int inserts)
vscreen[i]->v_flag |= VFCHG;
}
#endif
- return (TRUE);
+ return TRUE;
}
- return (FALSE);
+ return FALSE;
}
/* move the "count" lines starting at "from" to "to" */
@@ -827,7 +827,7 @@ static int texttest(int vrow, int prow)
struct video *vpv = vscreen[vrow]; /* virtual screen image */
struct video *vpp = pscreen[prow]; /* physical screen image */
- return (!memcmp(vpv->v_text, vpp->v_text, term.t_ncol));
+ return !memcmp(vpv->v_text, vpp->v_text, term.t_ncol);
}
/*
@@ -838,8 +838,8 @@ static int endofline(char *s, int n)
int i;
for (i = n - 1; i >= 0; i--)
if (s[i] != ' ')
- return (i + 1);
- return (0);
+ return i + 1;
+ return 0;
}
#endif /* SCROLLCODE */
@@ -1009,7 +1009,7 @@ static int updateline(int row, struct video *vp1, struct video *vp2)
vp1->v_fcolor = vp1->v_rfcolor;
vp1->v_bcolor = vp1->v_rbcolor;
#endif
- return (TRUE);
+ return TRUE;
}
#endif
@@ -1028,7 +1028,7 @@ static int updateline(int row, struct video *vp1, struct video *vp2)
/* if both lines are the same, no update needs to be done */
if (cp1 == &vp1->v_text[term.t_ncol]) {
vp1->v_flag &= ~VFCHG; /* flag this line is changed */
- return (TRUE);
+ return TRUE;
}
/* find out if there is a match on the right */
@@ -1074,7 +1074,7 @@ static int updateline(int row, struct video *vp1, struct video *vp2)
TTrev(FALSE);
#endif
vp1->v_flag &= ~VFCHG; /* flag this line as updated */
- return (TRUE);
+ return TRUE;
#endif
}
#endif
diff --git a/eval.c b/eval.c
index 8d685f2..1e5635a 100644
--- a/eval.c
+++ b/eval.c
@@ -46,22 +46,22 @@ char *gtfun(char *fname)
/* return errorm on a bad reference */
if (fnum == ARRAY_SIZE(funcs))
- return (errorm);
+ return errorm;
/* if needed, retrieve the first argument */
if (funcs[fnum].f_type >= MONAMIC) {
if ((status = macarg(arg1)) != TRUE)
- return (errorm);
+ return errorm;
/* if needed, retrieve the second argument */
if (funcs[fnum].f_type >= DYNAMIC) {
if ((status = macarg(arg2)) != TRUE)
- return (errorm);
+ return errorm;
/* if needed, retrieve the third argument */
if (funcs[fnum].f_type >= TRINAMIC)
if ((status = macarg(arg3)) != TRUE)
- return (errorm);
+ return errorm;
}
}
@@ -69,22 +69,22 @@ char *gtfun(char *fname)
/* and now evaluate it! */
switch (fnum) {
case UFADD:
- return (itoa(atoi(arg1) + atoi(arg2)));
+ return itoa(atoi(arg1) + atoi(arg2));
case UFSUB:
- return (itoa(atoi(arg1) - atoi(arg2)));
+ return itoa(atoi(arg1) - atoi(arg2));
case UFTIMES:
- return (itoa(atoi(arg1) * atoi(arg2)));
+ return itoa(atoi(arg1) * atoi(arg2));
case UFDIV:
- return (itoa(atoi(arg1) / atoi(arg2)));
+ return itoa(atoi(arg1) / atoi(arg2));
case UFMOD:
- return (itoa(atoi(arg1) % atoi(arg2)));
+ return itoa(atoi(arg1) % atoi(arg2));
case UFNEG:
- return (itoa(-atoi(arg1)));
+ return itoa(-atoi(arg1));
case UFCAT:
strcpy(result, arg1);
- return (strcat(result, arg2));
+ return strcat(result, arg2);
case UFLEFT:
- return (strncpy(result, arg1, atoi(arg2)));
+ return strncpy(result, arg1, atoi(arg2));
case UFRIGHT:
return (strcpy(result,
&arg1[(strlen(arg1) - atoi(arg2))]));
@@ -92,73 +92,73 @@ char *gtfun(char *fname)
return (strncpy(result, &arg1[atoi(arg2) - 1],
atoi(arg3)));
case UFNOT:
- return (ltos(stol(arg1) == FALSE));
+ return ltos(stol(arg1) == FALSE);
case UFEQUAL:
- return (ltos(atoi(arg1) == atoi(arg2)));
+ return ltos(atoi(arg1) == atoi(arg2));
case UFLESS:
- return (ltos(atoi(arg1) < atoi(arg2)));
+ return ltos(atoi(arg1) < atoi(arg2));
case UFGREATER:
- return (ltos(atoi(arg1) > atoi(arg2)));
+ return ltos(atoi(arg1) > atoi(arg2));
case UFSEQUAL:
- return (ltos(strcmp(arg1, arg2) == 0));
+ return ltos(strcmp(arg1, arg2) == 0);
case UFSLESS:
- return (ltos(strcmp(arg1, arg2) < 0));
+ return ltos(strcmp(arg1, arg2) < 0);
case UFSGREAT:
- return (ltos(strcmp(arg1, arg2) > 0));
+ return ltos(strcmp(arg1, arg2) > 0);
case UFIND:
- return (strcpy(result, getval(arg1)));
+ return strcpy(result, getval(arg1));
case UFAND:
- return (ltos(stol(arg1) && stol(arg2)));
+ return ltos(stol(arg1) && stol(arg2));
case UFOR:
- return (ltos(stol(arg1) || stol(arg2)));
+ return ltos(stol(arg1) || stol(arg2));
case UFLENGTH:
- return (itoa(strlen(arg1)));
+ return itoa(strlen(arg1));
case UFUPPER:
- return (mkupper(arg1));
+ return mkupper(arg1);
case UFLOWER:
- return (mklower(arg1));
+ return mklower(arg1);
case UFTRUTH:
- return (ltos(atoi(arg1) == 42));
+ return ltos(atoi(arg1) == 42);
case UFASCII:
- return (itoa((int) arg1[0]));
+ return itoa((int) arg1[0]);
case UFCHR:
result[0] = atoi(arg1);
result[1] = 0;
- return (result);
+ return result;
case UFGTKEY:
result[0] = tgetc();
result[1] = 0;
- return (result);
+ return result;
case UFRND:
- return (itoa((ernd() % abs(atoi(arg1))) + 1));
+ return itoa((ernd() % abs(atoi(arg1))) + 1);
case UFABS:
- return (itoa(abs(atoi(arg1))));
+ return itoa(abs(atoi(arg1)));
case UFSINDEX:
- return (itoa(sindex(arg1, arg2)));
+ return itoa(sindex(arg1, arg2));
case UFENV:
#if ENVFUNC
tsp = getenv(arg1);
- return (tsp == NULL ? "" : tsp);
+ return tsp == NULL ? "" : tsp;
#else
- return ("");
+ return "";
#endif
case UFBIND:
- return (transbind(arg1));
+ return transbind(arg1);
case UFEXIST:
- return (ltos(fexist(arg1)));
+ return ltos(fexist(arg1));
case UFFIND:
tsp = flook(arg1, TRUE);
- return (tsp == NULL ? "" : tsp);
+ return tsp == NULL ? "" : tsp;
case UFBAND:
- return (itoa(atoi(arg1) & atoi(arg2)));
+ return itoa(atoi(arg1) & atoi(arg2));
case UFBOR:
- return (itoa(atoi(arg1) | atoi(arg2)));
+ return itoa(atoi(arg1) | atoi(arg2));
case UFBXOR:
- return (itoa(atoi(arg1) ^ atoi(arg2)));
+ return itoa(atoi(arg1) ^ atoi(arg2));
case UFBNOT:
- return (itoa(~atoi(arg1)));
+ return itoa(~atoi(arg1));
case UFXLATE:
- return (xlat(arg1, arg2, arg3));
+ return xlat(arg1, arg2, arg3);
}
exit(-11); /* never should get here */
@@ -177,13 +177,13 @@ char *gtusr(char *vname)
/* scan the list looking for the user var name */
for (vnum = 0; vnum < MAXVARS; vnum++) {
if (uv[vnum].u_name[0] == 0)
- return (errorm);
+ return errorm;
if (strcmp(vname, uv[vnum].u_name) == 0)
- return (uv[vnum].u_value);
+ return uv[vnum].u_value;
}
/* return errorm if we run off the end */
- return (errorm);
+ return errorm;
}
extern char *getkill(void);
@@ -209,109 +209,109 @@ char *gtenv(char *vname)
char *ename = getenv(vname);
if (ename != NULL)
- return (ename);
+ return ename;
else
- return (errorm);
+ return errorm;
}
#else
- return (errorm);
+ return errorm;
#endif
/* otherwise, fetch the appropriate value */
switch (vnum) {
case EVFILLCOL:
- return (itoa(fillcol));
+ return itoa(fillcol);
case EVPAGELEN:
- return (itoa(term.t_nrow + 1));
+ return itoa(term.t_nrow + 1);
case EVCURCOL:
- return (itoa(getccol(FALSE)));
+ return itoa(getccol(FALSE));
case EVCURLINE:
- return (itoa(getcline()));
+ return itoa(getcline());
case EVRAM:
- return (itoa((int) (envram / 1024l)));
+ return itoa((int) (envram / 1024l));
case EVFLICKER:
- return (ltos(flickcode));
+ return ltos(flickcode);
case EVCURWIDTH:
- return (itoa(term.t_ncol));
+ return itoa(term.t_ncol);
case EVCBUFNAME:
- return (curbp->b_bname);
+ return curbp->b_bname;
case EVCFNAME:
- return (curbp->b_fname);
+ return curbp->b_fname;
case EVSRES:
- return (sres);
+ return sres;
case EVDEBUG:
- return (ltos(macbug));
+ return ltos(macbug);
case EVSTATUS:
- return (ltos(cmdstatus));
+ return ltos(cmdstatus);
case EVPALETTE:
- return (palstr);
+ return palstr;
case EVASAVE:
- return (itoa(gasave));
+ return itoa(gasave);
case EVACOUNT:
- return (itoa(gacount));
+ return itoa(gacount);
case EVLASTKEY:
- return (itoa(lastkey));
+ return itoa(lastkey);
case EVCURCHAR:
return (curwp->w_dotp->l_used ==
curwp->w_doto ? itoa('\n') :
itoa(lgetc(curwp->w_dotp, curwp->w_doto)));
case EVDISCMD:
- return (ltos(discmd));
+ return ltos(discmd);
case EVVERSION:
- return (VERSION);
+ return VERSION;
case EVPROGNAME:
- return (PROGRAM_NAME_LONG);
+ return PROGRAM_NAME_LONG;
case EVSEED:
- return (itoa(seed));
+ return itoa(seed);
case EVDISINP:
- return (ltos(disinp));
+ return ltos(disinp);
case EVWLINE:
- return (itoa(curwp->w_ntrows));
+ return itoa(curwp->w_ntrows);
case EVCWLINE:
- return (itoa(getwpos()));
+ return itoa(getwpos());
case EVTARGET:
saveflag = lastflag;
- return (itoa(curgoal));
+ return itoa(curgoal);
case EVSEARCH:
- return (pat);
+ return pat;
case EVREPLACE:
- return (rpat);
+ return rpat;
case EVMATCH:
- return ((patmatch == NULL) ? "" : patmatch);
+ return (patmatch == NULL) ? "" : patmatch;
case EVKILL:
- return (getkill());
+ return getkill();
case EVCMODE:
- return (itoa(curbp->b_mode));
+ return itoa(curbp->b_mode);
case EVGMODE:
- return (itoa(gmode));
+ return itoa(gmode);
case EVTPAUSE:
- return (itoa(term.t_pause));
+ return itoa(term.t_pause);
case EVPENDING:
#if TYPEAH
- return (ltos(typahead()));
+ return ltos(typahead());
#else
- return (falsem);
+ return falsem;
#endif
case EVLWIDTH:
- return (itoa(llength(curwp->w_dotp)));
+ return itoa(llength(curwp->w_dotp));
case EVLINE:
- return (getctext());
+ return getctext();
case EVGFLAGS:
- return (itoa(gflags));
+ return itoa(gflags);
case EVRVAL:
- return (itoa(rval));
+ return itoa(rval);
case EVTAB:
- return (itoa(tabmask + 1));
+ return itoa(tabmask + 1);
case EVOVERLAP:
- return (itoa(overlap));
+ return itoa(overlap);
case EVSCROLLCOUNT:
- return (itoa(scrollcount));
+ return itoa(scrollcount);
#if SCROLLCODE
case EVSCROLL:
- return (ltos(term.t_scroll != NULL));
+ return ltos(term.t_scroll != NULL);
#else
case EVSCROLL:
- return (ltos(0));
+ return ltos(0);
#endif
}
exit(-12); /* again, we should never get here */
@@ -338,7 +338,7 @@ char *getkill(void)
}
/* and return the constructed value */
- return (value);
+ return value;
}
/*
@@ -362,7 +362,7 @@ int setvar(int f, int n)
if (clexec == FALSE) {
status = mlreply("Variable to set: ", &var[0], NVSIZE);
if (status != TRUE)
- return (status);
+ return status;
} else { /* macro line argument */
/* grab token and skip it */
execstr = token(execstr, var, NVSIZE + 1);
@@ -374,7 +374,7 @@ int setvar(int f, int n)
/* if its not legal....bitch */
if (vd.v_type == -1) {
mlwrite("%%No such variable as '%s'", var);
- return (FALSE);
+ return FALSE;
}
/* get the value for that variable */
@@ -383,7 +383,7 @@ int setvar(int f, int n)
else {
status = mlreply("Value: ", &value[0], NSTRING);
if (status != TRUE)
- return (status);
+ return status;
}
/* and set the appropriate value */
@@ -438,7 +438,7 @@ int setvar(int f, int n)
#endif
/* and return it */
- return (status);
+ return status;
}
/*
@@ -526,7 +526,7 @@ int svar(VDESC *var, char *value)
free(uv[vnum].u_value);
sp = malloc(strlen(value) + 1);
if (sp == NULL)
- return (FALSE);
+ return FALSE;
strcpy(sp, value);
uv[vnum].u_value = sp;
break;
@@ -672,7 +672,7 @@ int svar(VDESC *var, char *value)
}
break;
}
- return (status);
+ return status;
}
/*
@@ -710,7 +710,7 @@ char *itoa(int i)
*(--sp) = '-'; /* and install the minus sign */
}
- return (sp);
+ return sp;
}
/*
@@ -727,33 +727,33 @@ int gettyp(char *token)
/* no blanks!!! */
if (c == 0)
- return (TKNUL);
+ return TKNUL;
/* a numeric literal? */
if (c >= '0' && c <= '9')
- return (TKLIT);
+ return TKLIT;
switch (c) {
case '"':
- return (TKSTR);
+ return TKSTR;
case '!':
- return (TKDIR);
+ return TKDIR;
case '@':
- return (TKARG);
+ return TKARG;
case '#':
- return (TKBUF);
+ return TKBUF;
case '$':
- return (TKENV);
+ return TKENV;
case '%':
- return (TKVAR);
+ return TKVAR;
case '&':
- return (TKFUN);
+ return TKFUN;
case '*':
- return (TKLBL);
+ return TKLBL;
default:
- return (TKCMD);
+ return TKCMD;
}
}
@@ -772,7 +772,7 @@ char *getval(char *token)
switch (gettyp(token)) {
case TKNUL:
- return ("");
+ return "";
case TKARG: /* interactive argument */
strcpy(token, getval(&token[1]));
@@ -781,8 +781,8 @@ char *getval(char *token)
status = getstring(token, buf, NSTRING, ctoec('\n'));
discmd = distmp;
if (status == ABORT)
- return (errorm);
- return (buf);
+ return errorm;
+ return buf;
case TKBUF: /* buffer contents fetch */
@@ -790,7 +790,7 @@ char *getval(char *token)
strcpy(token, getval(&token[1]));
bp = bfind(token, FALSE, 0);
if (bp == NULL)
- return (errorm);
+ return errorm;
/* if the buffer is displayed, get the window
vars instead of the buffer vars */
@@ -801,7 +801,7 @@ char *getval(char *token)
/* make sure we are not at the end */
if (bp->b_linep == bp->b_dotp)
- return (errorm);
+ return errorm;
/* grab the line as an argument */
blen = bp->b_dotp->l_used - bp->b_doto;
@@ -822,26 +822,26 @@ char *getval(char *token)
}
/* and return the spoils */
- return (buf);
+ return buf;
case TKVAR:
- return (gtusr(token + 1));
+ return gtusr(token + 1);
case TKENV:
- return (gtenv(token + 1));
+ return gtenv(token + 1);
case TKFUN:
- return (gtfun(token + 1));
+ return gtfun(token + 1);
case TKDIR:
- return (errorm);
+ return errorm;
case TKLBL:
- return (errorm);
+ return errorm;
case TKLIT:
- return (token);
+ return token;
case TKSTR:
- return (token + 1);
+ return token + 1;
case TKCMD:
- return (token);
+ return token;
}
- return (errorm);
+ return errorm;
}
/*
@@ -853,12 +853,12 @@ int stol(char *val)
{
/* check for logical values */
if (val[0] == 'F')
- return (FALSE);
+ return FALSE;
if (val[0] == 'T')
- return (TRUE);
+ return TRUE;
/* check for numeric truth (!= 0) */
- return ((atoi(val) != 0));
+ return (atoi(val) != 0);
}
/*
@@ -869,9 +869,9 @@ int stol(char *val)
char *ltos(int val)
{
if (val)
- return (truem);
+ return truem;
else
- return (falsem);
+ return falsem;
}
/*
@@ -889,7 +889,7 @@ char *mkupper(char *str)
*sp += 'A' - 'a';
++sp;
}
- return (str);
+ return str;
}
/*
@@ -907,7 +907,7 @@ char *mklower(char *str)
*sp += 'a' - 'A';
++sp;
}
- return (str);
+ return str;
}
/*
@@ -915,7 +915,7 @@ char *mklower(char *str)
*/
int abs(int x)
{
- return (x < 0 ? -x : x);
+ return x < 0 ? -x : x;
}
/*
@@ -924,7 +924,7 @@ int abs(int x)
int ernd(void)
{
seed = abs(seed * 1721 + 10007);
- return (seed);
+ return seed;
}
/*
@@ -954,12 +954,12 @@ int sindex(char *source, char *pattern)
/* was it a match? */
if (*cp == 0)
- return ((int) (sp - source) + 1);
+ return (int) (sp - source) + 1;
++sp;
}
/* no match at all.. */
- return (0);
+ return 0;
}
/*
@@ -998,5 +998,5 @@ char *xlat(char *source, char *lookup, char *trans)
/* terminate and return the result */
*rp = 0;
- return (result);
+ return result;
}
diff --git a/exec.c b/exec.c
index d9ac6f9..5e41272 100644
--- a/exec.c
+++ b/exec.c
@@ -29,7 +29,7 @@ int namedcmd(int f, int n)
kfunc = getname();
if (kfunc == NULL) {
mlwrite("(No such function)");
- return (FALSE);
+ return FALSE;
}
/* and then execute the command */
@@ -50,10 +50,10 @@ int execcmd(int f, int n)
/* get the line wanted */
if ((status = mlreply(": ", cmdstr, NSTRING)) != TRUE)
- return (status);
+ return status;
execlevel = 0;
- return (docmd(cmdstr));
+ return docmd(cmdstr);
}
/*
@@ -81,7 +81,7 @@ int docmd(char *cline)
/* if we are scanning and not executing..go back here */
if (execlevel)
- return (TRUE);
+ return TRUE;
oldestr = execstr; /* save last ptr to string to execute */
execstr = cline; /* and set this one as current */
@@ -94,7 +94,7 @@ int docmd(char *cline)
if ((status = macarg(tkn)) != TRUE) { /* and grab the first token */
execstr = oldestr;
- return (status);
+ return status;
}
/* process leadin argument */
@@ -106,7 +106,7 @@ int docmd(char *cline)
/* and now get the command to execute */
if ((status = macarg(tkn)) != TRUE) {
execstr = oldestr;
- return (status);
+ return status;
}
}
@@ -114,7 +114,7 @@ int docmd(char *cline)
if ((fnc = fncmatch(tkn)) == NULL) {
mlwrite("(No such Function)");
execstr = oldestr;
- return (FALSE);
+ return FALSE;
}
/* save the arguments and go execute the command */
@@ -124,7 +124,7 @@ int docmd(char *cline)
cmdstatus = status; /* save the status */
clexec = oldcle; /* restore clexec flag */
execstr = oldestr;
- return (status);
+ return status;
}
/*
@@ -199,7 +199,7 @@ char *token(char *src, char *tok, int size)
if (*src)
++src;
*tok = 0;
- return (src);
+ return src;
}
/*
@@ -216,7 +216,7 @@ int macarg(char *tok)
clexec = TRUE; /* get the argument */
status = nextarg("", tok, NSTRING, ctoec('\n'));
clexec = savcle; /* restore execution mode */
- return (status);
+ return status;
}
/*
@@ -232,14 +232,14 @@ int nextarg(char *prompt, char *buffer, int size, int terminator)
{
/* if we are interactive, go get it! */
if (clexec == FALSE)
- return (getstring(prompt, buffer, size, terminator));
+ return getstring(prompt, buffer, size, terminator);
/* grab token and advance past */
execstr = token(execstr, buffer, size);
/* evaluate it */
strcpy(buffer, getval(buffer));
- return (TRUE);
+ return TRUE;
}
/*
@@ -258,13 +258,13 @@ int storemac(int f, int n)
/* must have a numeric argument to this function */
if (f == FALSE) {
mlwrite("No macro specified");
- return (FALSE);
+ return FALSE;
}
/* range check the macro number */
if (n < 1 || n > 40) {
mlwrite("Macro number out of range");
- return (FALSE);
+ return FALSE;
}
/* construct the macro buffer name */
@@ -275,7 +275,7 @@ int storemac(int f, int n)
/* set up the new macro buffer */
if ((bp = bfind(bname, TRUE, BFINVS)) == NULL) {
mlwrite("Can not create macro");
- return (FALSE);
+ return FALSE;
}
/* and make sure it is empty */
@@ -284,7 +284,7 @@ int storemac(int f, int n)
/* and set the macro store pointers to it */
mstore = TRUE;
bstore = bp;
- return (TRUE);
+ return TRUE;
}
#if PROC
@@ -304,12 +304,12 @@ int storeproc(int f, int n)
/* a numeric argument means its a numbered macro */
if (f == TRUE)
- return (storemac(f, n));
+ return storemac(f, n);
/* get the name of the procedure */
if ((status =
mlreply("Procedure name: ", &bname[1], NBUFN - 2)) != TRUE)
- return (status);
+ return status;
/* construct the macro buffer name */
bname[0] = '*';
@@ -318,7 +318,7 @@ int storeproc(int f, int n)
/* set up the new macro buffer */
if ((bp = bfind(bname, TRUE, BFINVS)) == NULL) {
mlwrite("Can not create macro");
- return (FALSE);
+ return FALSE;
}
/* and make sure it is empty */
@@ -327,7 +327,7 @@ int storeproc(int f, int n)
/* and set the macro store pointers to it */
mstore = TRUE;
bstore = bp;
- return (TRUE);
+ return TRUE;
}
/*
@@ -345,7 +345,7 @@ int execproc(int f, int n)
/* find out what buffer the user wants to execute */
if ((status =
mlreply("Execute procedure: ", &bufn[1], NBUFN)) != TRUE)
- return (status);
+ return status;
/* construct the buffer name */
bufn[0] = '*';
@@ -354,14 +354,14 @@ int execproc(int f, int n)
/* find the pointer to that buffer */
if ((bp = bfind(bufn, FALSE, 0)) == NULL) {
mlwrite("No such procedure");
- return (FALSE);
+ return FALSE;
}
/* and now execute it as asked */
while (n-- > 0)
if ((status = dobuf(bp)) != TRUE)
- return (status);
- return (TRUE);
+ return status;
+ return TRUE;
}
#endif
@@ -379,19 +379,19 @@ int execbuf(int f, int n)
/* find out what buffer the user wants to execute */
if ((status = mlreply("Execute buffer: ", bufn, NBUFN)) != TRUE)
- return (status);
+ return status;
/* find the pointer to that buffer */
if ((bp = bfind(bufn, FALSE, 0)) == NULL) {
mlwrite("No such buffer");
- return (FALSE);
+ return FALSE;
}
/* and now execute it as asked */
while (n-- > 0)
if ((status = dobuf(bp)) != TRUE)
- return (status);
- return (TRUE);
+ return status;
+ return TRUE;
}
/*
@@ -472,7 +472,7 @@ int dobuf(struct buffer *bp)
failexit:freewhile
(scanner);
freewhile(whlist);
- return (FALSE);
+ return FALSE;
}
whtemp->w_begin = lp;
whtemp->w_type = BTWHILE;
@@ -539,7 +539,7 @@ int dobuf(struct buffer *bp)
if ((einit = eline = malloc(linlen + 1)) == NULL) {
mlwrite("%%Out of Memory during macro execution");
freewhile(whlist);
- return (FALSE);
+ return FALSE;
}
strncpy(eline, lp->l_text, linlen);
eline[linlen] = 0; /* make sure it ends */
@@ -597,7 +597,7 @@ int dobuf(struct buffer *bp)
if ((c = get1key()) == abortc) {
mlforce("(Macro aborted)");
freewhile(whlist);
- return (FALSE);
+ return FALSE;
}
if (c == metac)
@@ -619,7 +619,7 @@ int dobuf(struct buffer *bp)
if (dirnum == NUMDIRS) {
mlwrite("%%Unknown Directive");
freewhile(whlist);
- return (FALSE);
+ return FALSE;
}
/* service only the !ENDM macro here */
@@ -640,7 +640,7 @@ int dobuf(struct buffer *bp)
if ((mp = lalloc(linlen)) == NULL) {
mlwrite
("Out of memory while storing macro");
- return (FALSE);
+ return FALSE;
}
/* copy the text into the new line */
@@ -708,7 +708,7 @@ int dobuf(struct buffer *bp)
mlwrite
("%%Internal While loop error");
freewhile(whlist);
- return (FALSE);
+ return FALSE;
}
/* reset the line pointer back.. */
@@ -749,7 +749,7 @@ int dobuf(struct buffer *bp)
}
mlwrite("%%No such label");
freewhile(whlist);
- return (FALSE);
+ return FALSE;
}
goto onward;
@@ -777,7 +777,7 @@ int dobuf(struct buffer *bp)
mlwrite
("%%Internal While loop error");
freewhile(whlist);
- return (FALSE);
+ return FALSE;
}
/* reset the line pointer back.. */
@@ -815,7 +815,7 @@ int dobuf(struct buffer *bp)
free(einit);
execlevel = 0;
freewhile(whlist);
- return (status);
+ return status;
}
onward: /* on to the next line */
@@ -826,7 +826,7 @@ int dobuf(struct buffer *bp)
eexec: /* exit the current function */
execlevel = 0;
freewhile(whlist);
- return (TRUE);
+ return TRUE;
}
/*
@@ -856,7 +856,7 @@ int execfile(int f, int n)
if ((status =
mlreply("File to execute: ", fname, NSTRING - 1)) != TRUE)
- return (status);
+ return status;
#if 1
/* look up the path for the file */
@@ -864,15 +864,15 @@ int execfile(int f, int n)
/* if it isn't around */
if (fspec == NULL)
- return (FALSE);
+ return FALSE;
#endif
/* otherwise, execute it */
while (n-- > 0)
if ((status = dofile(fspec)) != TRUE)
- return (status);
+ return status;
- return (TRUE);
+ return TRUE;
}
/*
@@ -892,7 +892,7 @@ int dofile(char *fname)
makename(bname, fname); /* derive the name of the buffer */
unqname(bname); /* make sure we don't stomp things */
if ((bp = bfind(bname, TRUE, 0)) == NULL) /* get the needed buffer */
- return (FALSE);
+ return FALSE;
bp->b_mode = MDVIEW; /* mark the buffer as read only */
cb = curbp; /* save the old buffer */
@@ -900,18 +900,18 @@ int dofile(char *fname)
/* and try to read in the file to execute */
if ((status = readin(fname, FALSE)) != TRUE) {
curbp = cb; /* restore the current buffer */
- return (status);
+ return status;
}
/* go execute it! */
curbp = cb; /* restore the current buffer */
if ((status = dobuf(bp)) != TRUE)
- return (status);
+ return status;
/* if not displayed, remove the now unneeded buffer and exit */
if (bp->b_nwnd == 0)
zotbuf(bp);
- return (TRUE);
+ return TRUE;
}
/*
@@ -934,14 +934,14 @@ int cbuf(int f, int n, int bufnum)
/* find the pointer to that buffer */
if ((bp = bfind(bufname, FALSE, 0)) == NULL) {
mlwrite("Macro not defined");
- return (FALSE);
+ return FALSE;
}
/* and now execute it as asked */
while (n-- > 0)
if ((status = dobuf(bp)) != TRUE)
- return (status);
- return (TRUE);
+ return status;
+ return TRUE;
}
int cbuf1(int f, int n)
diff --git a/file.c b/file.c
index d17bae9..43c0f2c 100644
--- a/file.c
+++ b/file.c
@@ -26,10 +26,10 @@ int fileread(int f, int n)
char fname[NFILEN];
if (restflag) /* don't allow this command if restricted */
- return (resterr());
+ return resterr();
if ((s = mlreply("Read file: ", fname, NFILEN)) != TRUE)
- return (s);
- return (readin(fname, TRUE));
+ return s;
+ return readin(fname, TRUE);
}
/*
@@ -45,14 +45,14 @@ int insfile(int f, int n)
char fname[NFILEN];
if (restflag) /* don't allow this command if restricted */
- return (resterr());
+ return resterr();
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if ((s = mlreply("Insert file: ", fname, NFILEN)) != TRUE)
- return (s);
+ return s;
if ((s = ifile(fname)) != TRUE)
- return (s);
- return (reposition(TRUE, -1));
+ return s;
+ return reposition(TRUE, -1);
}
/*
@@ -70,10 +70,10 @@ int filefind(int f, int n)
int s; /* status return */
if (restflag) /* don't allow this command if restricted */
- return (resterr());
+ return resterr();
if ((s = mlreply("Find file: ", fname, NFILEN)) != TRUE)
- return (s);
- return (getfile(fname, TRUE));
+ return s;
+ return getfile(fname, TRUE);
}
int viewfile(int f, int n)
@@ -83,9 +83,9 @@ int viewfile(int f, int n)
struct window *wp; /* scan for windows that need updating */
if (restflag) /* don't allow this command if restricted */
- return (resterr());
+ return resterr();
if ((s = mlreply("View file: ", fname, NFILEN)) != TRUE)
- return (s);
+ return s;
s = getfile(fname, FALSE);
if (s) { /* if we succeed, put it in view mode */
curwp->w_bufp->b_mode |= MDVIEW;
@@ -97,7 +97,7 @@ int viewfile(int f, int n)
wp = wp->w_wndp;
}
}
- return (s);
+ return s;
}
#if CRYPT
@@ -113,7 +113,7 @@ static int resetkey(void)
if (curbp->b_key[0] == 0) {
s = set_encryption_key(FALSE, 0);
if (s != TRUE)
- return (s);
+ return s;
}
/* let others know... */
@@ -129,7 +129,7 @@ static int resetkey(void)
myencrypt(curbp->b_key, strlen(curbp->b_key));
}
- return (TRUE);
+ return TRUE;
}
#endif
@@ -162,7 +162,7 @@ int getfile(char *fname, int lockfl)
curwp->w_flag |= WFMODE | WFHARD;
cknewwindow();
mlwrite("(Old buffer)");
- return (TRUE);
+ return TRUE;
}
}
makename(bname, fname); /* New buffer name. */
@@ -170,7 +170,7 @@ int getfile(char *fname, int lockfl)
/* old buffer name conflict code */
s = mlreply("Buffer name: ", bname, NBUFN);
if (s == ABORT) /* ^G to just quit */
- return (s);
+ return s;
if (s == FALSE) { /* CR to clobber it */
makename(bname, fname);
break;
@@ -178,7 +178,7 @@ int getfile(char *fname, int lockfl)
}
if (bp == NULL && (bp = bfind(bname, TRUE, 0)) == NULL) {
mlwrite("Cannot create buffer");
- return (FALSE);
+ return FALSE;
}
if (--curbp->b_nwnd == 0) { /* Undisplay. */
curbp->b_dotp = curwp->w_dotp;
@@ -228,17 +228,17 @@ int readin(char *fname, int lockfl)
goto out;
}
#else
- return (ABORT);
+ return ABORT;
#endif
#endif
#if CRYPT
s = resetkey();
if (s != TRUE)
- return (s);
+ return s;
#endif
bp = curbp; /* Cheap. */
if ((s = bclear(bp)) != TRUE) /* Might be old. */
- return (s);
+ return s;
bp->b_flag &= ~(BFINVS | BFCHG);
strcpy(bp->b_fname, fname);
@@ -310,12 +310,12 @@ int readin(char *fname, int lockfl)
}
}
if (s == FIOERR || s == FIOFNF) /* False if error. */
- return (FALSE);
+ return FALSE;
#if 0
if (s == ABORT)
- return (ABORT);
+ return ABORT;
#endif
- return (TRUE);
+ return TRUE;
}
/*
@@ -398,9 +398,9 @@ int filewrite(int f, int n)
char fname[NFILEN];
if (restflag) /* don't allow this command if restricted */
- return (resterr());
+ return resterr();
if ((s = mlreply("Write file: ", fname, NFILEN)) != TRUE)
- return (s);
+ return s;
if ((s = writeout(fname)) == TRUE) {
strcpy(curbp->b_fname, fname);
curbp->b_flag &= ~BFCHG;
@@ -411,7 +411,7 @@ int filewrite(int f, int n)
wp = wp->w_wndp;
}
}
- return (s);
+ return s;
}
/*
@@ -428,19 +428,19 @@ int filesave(int f, int n)
int s;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if ((curbp->b_flag & BFCHG) == 0) /* Return, no changes. */
- return (TRUE);
+ return TRUE;
if (curbp->b_fname[0] == 0) { /* Must have a name. */
mlwrite("No file name");
- return (FALSE);
+ return FALSE;
}
/* complain about truncated files */
if ((curbp->b_flag & BFTRUNC) != 0) {
if (mlyesno("Truncated file ... write it out") == FALSE) {
mlwrite("(Aborted)");
- return (FALSE);
+ return FALSE;
}
}
@@ -453,7 +453,7 @@ int filesave(int f, int n)
wp = wp->w_wndp;
}
}
- return (s);
+ return s;
}
/*
@@ -473,14 +473,14 @@ int writeout(char *fn)
#if CRYPT
s = resetkey();
if (s != TRUE)
- return (s);
+ return s;
#endif
/* turn off ALL keyboard translation in case we get a dos error */
TTkclose();
if ((s = ffwopen(fn)) != FIOSUC) { /* Open writes message. */
TTkopen();
- return (FALSE);
+ return FALSE;
}
mlwrite("(Writing...)"); /* tell us were writing */
lp = lforw(curbp->b_linep); /* First line. */
@@ -503,8 +503,8 @@ int writeout(char *fn)
ffclose(); /* if a write error. */
TTkopen();
if (s != FIOSUC) /* Some sort of error. */
- return (FALSE);
- return (TRUE);
+ return FALSE;
+ return TRUE;
}
/*
@@ -523,9 +523,9 @@ int filename(int f, int n)
char fname[NFILEN];
if (restflag) /* don't allow this command if restricted */
- return (resterr());
+ return resterr();
if ((s = mlreply("Name: ", fname, NFILEN)) == ABORT)
- return (s);
+ return s;
if (s == FALSE)
strcpy(curbp->b_fname, "");
else
@@ -537,7 +537,7 @@ int filename(int f, int n)
wp = wp->w_wndp;
}
curbp->b_mode &= ~MDVIEW; /* no longer read only mode */
- return (TRUE);
+ return TRUE;
}
/*
@@ -565,14 +565,14 @@ int ifile(char *fname)
goto out;
if (s == FIOFNF) { /* File not found. */
mlwrite("(No such file)");
- return (FALSE);
+ return FALSE;
}
mlwrite("(Inserting file)");
#if CRYPT
s = resetkey();
if (s != TRUE)
- return (s);
+ return s;
#endif
/* back up a line and save the mark here */
curwp->w_dotp = lback(curwp->w_dotp);
@@ -632,6 +632,6 @@ int ifile(char *fname)
curbp->b_marko = curwp->w_marko;
if (s == FIOERR) /* False if error. */
- return (FALSE);
- return (TRUE);
+ return FALSE;
+ return TRUE;
}
diff --git a/fileio.c b/fileio.c
index 52b63b2..bab566e 100644
--- a/fileio.c
+++ b/fileio.c
@@ -20,9 +20,9 @@ static int eofflag; /* end-of-file flag */
int ffropen(char *fn)
{
if ((ffp = fopen(fn, "r")) == NULL)
- return (FIOFNF);
+ return FIOFNF;
eofflag = FALSE;
- return (FIOSUC);
+ return FIOSUC;
}
/*
@@ -40,9 +40,9 @@ int ffwopen(char *fn)
if ((ffp = fopen(fn, "w")) == NULL) {
#endif
mlwrite("Cannot open file for writing");
- return (FIOERR);
+ return FIOERR;
}
- return (FIOSUC);
+ return FIOSUC;
}
/*
@@ -64,12 +64,12 @@ int ffclose(void)
#if V7 | USG | BSD | (MSDOS & (MSC | TURBO))
if (fclose(ffp) != FALSE) {
mlwrite("Error closing file");
- return (FIOERR);
+ return FIOERR;
}
- return (FIOSUC);
+ return FIOSUC;
#else
fclose(ffp);
- return (FIOSUC);
+ return FIOSUC;
#endif
}
@@ -102,10 +102,10 @@ int ffputline(char *buf, int nbuf)
if (ferror(ffp)) {
mlwrite("Write I/O error");
- return (FIOERR);
+ return FIOERR;
}
- return (FIOSUC);
+ return FIOSUC;
}
/*
@@ -122,7 +122,7 @@ int ffgetline(void)
/* if we are at the end...return it */
if (eofflag)
- return (FIOEOF);
+ return FIOEOF;
/* dump fline if it ended up too big */
if (flen > NSTRING) {
@@ -133,7 +133,7 @@ int ffgetline(void)
/* if we don't have an fline, allocate one */
if (fline == NULL)
if ((fline = malloc(flen = NSTRING)) == NULL)
- return (FIOMEM);
+ return FIOMEM;
/* read the line in */
#if PKCODE
@@ -166,7 +166,7 @@ int ffgetline(void)
if (i >= flen) {
if ((tmpline =
malloc(flen + NSTRING)) == NULL)
- return (FIOMEM);
+ return FIOMEM;
strncpy(tmpline, fline, flen);
flen += NSTRING;
free(fline);
@@ -182,13 +182,13 @@ int ffgetline(void)
if (c == EOF) {
if (ferror(ffp)) {
mlwrite("File read error");
- return (FIOERR);
+ return FIOERR;
}
if (i != 0)
eofflag = TRUE;
else
- return (FIOEOF);
+ return FIOEOF;
}
/* terminate and decrypt the string */
@@ -197,7 +197,7 @@ int ffgetline(void)
if (cryptflag)
myencrypt(fline, strlen(fline));
#endif
- return (FIOSUC);
+ return FIOSUC;
}
/*
@@ -214,9 +214,9 @@ int fexist(char *fname)
/* if it fails, just return false! */
if (fp == NULL)
- return (FALSE);
+ return FALSE;
/* otherwise, close it and report true */
fclose(fp);
- return (TRUE);
+ return TRUE;
}
diff --git a/ibmpc.c b/ibmpc.c
index 22b9ddd..ab16a03 100644
--- a/ibmpc.c
+++ b/ibmpc.c
@@ -348,11 +348,11 @@ static int scinit(int type)
/* if we have nothing to do....don't do it */
if (dtype == type)
- return (TRUE);
+ return TRUE;
/* if we try to switch to EGA and there is none, don't */
if (type == CDEGA && egaexist != TRUE)
- return (FALSE);
+ return FALSE;
/* if we had the EGA open... close it */
if (dtype == CDEGA)
@@ -395,7 +395,7 @@ static int scinit(int type)
addr.laddr = scadd + (long) (NCOL * i * 2);
scptr[i] = addr.paddr;
}
- return (TRUE);
+ return TRUE;
}
/* getboard: Determine which type of display board is attached.
@@ -425,7 +425,7 @@ int getboard(void)
rg.x.bx = 0xff10;
int86(0x10, &rg, &rg); /* If EGA, bh=0-1 and bl=0-3 */
egaexist = !(rg.x.bx & 0xfefc); /* Yes, it's EGA */
- return (type);
+ return type;
}
/* init the computer to work with the EGA */
diff --git a/input.c b/input.c
index b6a5ccb..154c2c9 100644
--- a/input.c
+++ b/input.c
@@ -44,13 +44,13 @@ int mlyesno(char *prompt)
c = tgetc();
if (c == ectoc(abortc)) /* Bail out! */
- return (ABORT);
+ return ABORT;
if (c == 'y' || c == 'Y')
- return (TRUE);
+ return TRUE;
if (c == 'n' || c == 'N')
- return (FALSE);
+ return FALSE;
}
}
@@ -64,12 +64,12 @@ int mlyesno(char *prompt)
int mlreply(char *prompt, char *buf, int nbuf)
{
- return (nextarg(prompt, buf, nbuf, ctoec('\n')));
+ return nextarg(prompt, buf, nbuf, ctoec('\n'));
}
int mlreplyt(char *prompt, char *buf, int nbuf, int eolchar)
{
- return (nextarg(prompt, buf, nbuf, eolchar));
+ return nextarg(prompt, buf, nbuf, eolchar);
}
/*
@@ -83,7 +83,7 @@ int ectoc(int c)
c = c & ~(CONTROL | 0x40);
if (c & SPEC)
c = c & 255;
- return (c);
+ return c;
}
/*
@@ -95,7 +95,7 @@ int ctoec(int c)
{
if (c >= 0x00 && c <= 0x1F)
c = CONTROL | (c + '@');
- return (c);
+ return c;
}
/*
@@ -120,7 +120,7 @@ fn_t getname(void)
if (clexec) {
if (macarg(buf) != TRUE)
return NULL;
- return (fncmatch(&buf[0]));
+ return fncmatch(&buf[0]);
}
/* build a name string from the keyboard */
@@ -132,7 +132,7 @@ fn_t getname(void)
buf[cpos] = 0;
/* and match it off */
- return (fncmatch(&buf[0]));
+ return fncmatch(&buf[0]);
} else if (c == ectoc(abortc)) { /* Bell, abort */
ctrlg(FALSE, 0);
@@ -178,7 +178,7 @@ fn_t getname(void)
while (*sp)
TTputc(*sp++);
TTflush();
- return (ffp->n_func);
+ return ffp->n_func;
} else {
/* << << << << << << << << << << << << << << << << << */
/* try for a partial match against the list */
@@ -258,7 +258,7 @@ int tgetc(void)
/* if there is some left... */
if (kbdptr < kbdend)
- return ((int) *kbdptr++);
+ return (int) *kbdptr++;
/* at the end of last repitition? */
if (--kbdrep < 1) {
@@ -271,7 +271,7 @@ int tgetc(void)
/* reset the macro to the begining for the next rep */
kbdptr = &kbdm[0];
- return ((int) *kbdptr++);
+ return (int) *kbdptr++;
}
}
@@ -294,7 +294,7 @@ int tgetc(void)
}
/* and finally give the char back */
- return (c);
+ return c;
}
/* GET1KEY: Get one keystroke. The only prefixs legal here
@@ -313,13 +313,13 @@ int get1key(void)
c = tgetc();
if (c >= 0x00 && c <= 0x1F) /* control key? */
c = CONTROL | (c + '@');
- return (SPEC | c);
+ return SPEC | c;
}
#endif
if (c >= 0x00 && c <= 0x1F) /* C0 control -> C- */
c = CONTROL | (c + '@');
- return (c);
+ return c;
}
/* GETCMD: Get a command from the keyboard. Process all applicable
@@ -348,12 +348,12 @@ int getcmd(void)
handle_CSI:
c = get1key();
if (c >= 'A' && c <= 'D')
- return (SPEC | c | cmask);
+ return SPEC | c | cmask;
if (c >= 'E' && c <= 'z' && c != 'i' && c != 'c')
- return (SPEC | c | cmask);
+ return SPEC | c | cmask;
d = get1key();
if (d == '~') /* ESC [ n ~ P.K. */
- return (SPEC | c | cmask);
+ return SPEC | c | cmask;
switch (c) { /* ESC [ n n ~ P.K. */
case '1':
c = d + 32;
@@ -376,7 +376,7 @@ handle_CSI:
} else if (c == 'c') /* ESC key P.K. */
c = get1key();
else
- return (SPEC | c | cmask);
+ return SPEC | c | cmask;
}
#endif
#if VT220
@@ -389,7 +389,7 @@ handle_CSI:
c ^= DIFCASE;
if (c >= 0x00 && c <= 0x1F) /* control key */
c = CONTROL | (c + '@');
- return (META | c);
+ return META | c;
}
#if PKCODE
else if (c == metac) {
@@ -404,7 +404,7 @@ handle_CSI:
c ^= DIFCASE;
if (c >= 0x00 && c <= 0x1F) /* control key */
c = CONTROL | (c + '@');
- return (META | c);
+ return META | c;
}
#endif
@@ -425,11 +425,11 @@ handle_CSI:
c -= 0x20;
if (c >= 0x00 && c <= 0x1F) /* control key */
c = CONTROL | (c + '@');
- return (CTLX | c);
+ return CTLX | c;
}
/* otherwise, just return it */
- return (c);
+ return c;
}
/* A more generalized prompt/reply function allowing the caller
@@ -492,9 +492,9 @@ int getstring(char *prompt, char *buf, int nbuf, int eolchar)
/* if we default the buffer, return FALSE */
if (buf[0] == 0)
- return (FALSE);
+ return FALSE;
- return (TRUE);
+ return TRUE;
}
/* change from command form back to character form */
@@ -504,7 +504,7 @@ int getstring(char *prompt, char *buf, int nbuf, int eolchar)
/* Abort the input? */
ctrlg(FALSE, 0);
TTflush();
- return (ABORT);
+ return ABORT;
} else if ((c == 0x7F || c == 0x08) && quotef == FALSE) {
/* rubout/erase */
if (cpos != 0) {
diff --git a/isearch.c b/isearch.c
index 32e1c15..cefd70f 100644
--- a/isearch.c
+++ b/isearch.c
@@ -75,7 +75,7 @@ int risearch(int f, int n)
#if PKCODE
matchlen = strlen(pat);
#endif
- return (TRUE);
+ return TRUE;
}
/*
@@ -107,7 +107,7 @@ int fisearch(int f, int n)
#if PKCODE
matchlen = strlen(pat);
#endif
- return (TRUE);
+ return TRUE;
}
/*
@@ -193,11 +193,11 @@ int isearch(int f, int n)
/* Most cases here change the search */
if (expc == metac) /* Want to quit searching? */
- return (TRUE); /* Quit searching now */
+ return TRUE; /* Quit searching now */
switch (c) { /* dispatch on the input char */
case IS_ABORT: /* If abort search request */
- return (FALSE); /* Quit searching again */
+ return FALSE; /* Quit searching again */
case IS_REVERSE: /* If backward search */
case IS_FORWARD: /* If forward search */
@@ -225,7 +225,7 @@ int isearch(int f, int n)
case IS_BACKSP: /* If a backspace: */
case IS_RUBOUT: /* or if a Rubout: */
if (cmd_offset <= 1) /* Anything to delete? */
- return (TRUE); /* No, just exit */
+ return TRUE; /* No, just exit */
--cmd_offset; /* Back up over the Rubout */
cmd_buff[--cmd_offset] = '\0'; /* Yes, delete last char */
curwp->w_dotp = curline; /* Reset the line pointer */
@@ -240,7 +240,7 @@ int isearch(int f, int n)
default: /* All other chars */
if (c < ' ') { /* Is it printable? *//* Nope. */
reeat(c); /* Re-eat the char */
- return (TRUE); /* And return the last status */
+ return TRUE; /* And return the last status */
}
} /* Switch */
@@ -249,7 +249,7 @@ int isearch(int f, int n)
pat[cpos++] = c; /* put the char in the buffer */
if (cpos >= NPAT) { /* too many chars in string? *//* Yup. Complain about it */
mlwrite("? Search string too long");
- return (TRUE); /* Return an error */
+ return TRUE; /* Return an error */
}
pat[cpos] = 0; /* null terminate the buffer */
col = echo_char(c, col); /* Echo the character */
@@ -293,7 +293,7 @@ int checknext(char chr, char *patrn, int dir) /* Check next character in search
if (curoff == llength(curline)) { /* If at end of line */
curline = lforw(curline); /* Skip to the next line */
if (curline == curbp->b_linep)
- return (FALSE); /* Abort if at end of buffer */
+ return FALSE; /* Abort if at end of buffer */
curoff = 0; /* Start at the beginning of the line */
buffchar = '\n'; /* And say the next char is NL */
} else
@@ -303,9 +303,9 @@ int checknext(char chr, char *patrn, int dir) /* Check next character in search
curwp->w_doto = curoff; /* to the matched character */
curwp->w_flag |= WFMOVE; /* Say that we've moved */
}
- return (status); /* And return the status */
+ return status; /* And return the status */
} else /* Else, if reverse search: */
- return (match_pat(patrn)); /* See if we're in the right place */
+ return match_pat(patrn); /* See if we're in the right place */
}
/*
@@ -335,7 +335,7 @@ int scanmore(char *patrn, int dir) /* search forward or back for a pattern
TTflush(); /* see that the feep feeps */
}
- return (sts); /* else, don't even try */
+ return sts; /* else, don't even try */
}
/*
@@ -368,14 +368,14 @@ int match_pat(char *patrn) /* See if the pattern string matches string at "."
curline = lforw(curline); /* Skip to the next line */
curoff = 0; /* Start at the beginning of the line */
if (curline == curbp->b_linep)
- return (FALSE); /* Abort if at end of buffer */
+ return FALSE; /* Abort if at end of buffer */
buffchar = '\n'; /* And say the next char is NL */
} else
buffchar = lgetc(curline, curoff++); /* Get the next char */
if (!eq(buffchar, patrn[i])) /* Is it what we're looking for? */
- return (FALSE); /* Nope, just punt it then */
+ return FALSE; /* Nope, just punt it then */
}
- return (TRUE); /* Everything matched? Let's celebrate */
+ return TRUE; /* Everything matched? Let's celebrate */
}
/*
@@ -394,7 +394,7 @@ int promptpattern(char *prompt)
if (!clexec) {
mlwrite(tpat);
}
- return (strlen(tpat));
+ return strlen(tpat);
}
/*
@@ -439,7 +439,7 @@ static int echo_char(int c, int col)
} else
TTputc(c); /* Otherwise, output raw char */
TTflush(); /* Flush the output */
- return (++col); /* return the new column no */
+ return ++col; /* return the new column no */
}
/*
@@ -456,7 +456,7 @@ int get_char(void)
if (cmd_reexecute >= 0) /* Is there an offset? */
if ((c = cmd_buff[cmd_reexecute++]) != 0)
- return (c); /* Yes, return any character */
+ return c; /* Yes, return any character */
/* We're not re-executing (or aren't any more). Try for a real char */
@@ -464,12 +464,12 @@ int get_char(void)
update(FALSE); /* Pretty up the screen */
if (cmd_offset >= CMDBUFLEN - 1) { /* If we're getting too big ... */
mlwrite("? command too long"); /* Complain loudly and bitterly */
- return (metac); /* And force a quit */
+ return metac; /* And force a quit */
}
c = get1key(); /* Get the next character */
cmd_buff[cmd_offset++] = c; /* Save the char for next time */
cmd_buff[cmd_offset] = '\0'; /* And terminate the buffer */
- return (c); /* Return the character */
+ return c; /* Return the character */
}
/*
@@ -486,7 +486,7 @@ int uneat(void)
term.t_getchar = saved_get_char; /* restore the routine address */
c = eaten_char; /* Get the re-eaten char */
eaten_char = -1; /* Clear the old char */
- return (c); /* and return the last char */
+ return c; /* and return the last char */
}
void reeat(int c)
diff --git a/line.c b/line.c
index c41e045..e7f1279 100644
--- a/line.c
+++ b/line.c
@@ -34,11 +34,11 @@ struct line *lalloc(int used)
size = NBLOCK; /* line is for type-in. */
if ((lp = (struct line *)malloc(sizeof(struct line) + size)) == NULL) {
mlwrite("(OUT OF MEMORY)");
- return (NULL);
+ return NULL;
}
lp->l_size = size;
lp->l_used = used;
- return (lp);
+ return lp;
}
/*
@@ -119,7 +119,7 @@ int insspace(int f, int n)
{
linsert(n, ' ');
backchar(f, n);
- return (TRUE);
+ return TRUE;
}
/*
@@ -143,7 +143,7 @@ int linstr(char *instr)
}
instr++;
}
- return (status);
+ return status;
}
/*
@@ -168,16 +168,16 @@ int linsert(int n, int c)
struct window *wp;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
lchange(WFEDIT);
lp1 = curwp->w_dotp; /* Current line */
if (lp1 == curbp->b_linep) { /* At the end: special */
if (curwp->w_doto != 0) {
mlwrite("bug: linsert");
- return (FALSE);
+ return FALSE;
}
if ((lp2 = lalloc(n)) == NULL) /* Allocate new line */
- return (FALSE);
+ return FALSE;
lp3 = lp1->l_bp; /* Previous line */
lp3->l_fp = lp2; /* Link in */
lp2->l_fp = lp1;
@@ -187,12 +187,12 @@ int linsert(int n, int c)
lp2->l_text[i] = c;
curwp->w_dotp = lp2;
curwp->w_doto = n;
- return (TRUE);
+ return TRUE;
}
doto = curwp->w_doto; /* Save for later. */
if (lp1->l_used + n > lp1->l_size) { /* Hard: reallocate */
if ((lp2 = lalloc(lp1->l_used + n)) == NULL)
- return (FALSE);
+ return FALSE;
cp1 = &lp1->l_text[0];
cp2 = &lp2->l_text[0];
while (cp1 != &lp1->l_text[doto])
@@ -231,7 +231,7 @@ int linsert(int n, int c)
}
wp = wp->w_wndp;
}
- return (TRUE);
+ return TRUE;
}
/*
@@ -245,7 +245,7 @@ int lowrite(int c)
(lgetc(curwp->w_dotp, curwp->w_doto) != '\t' ||
((curwp->w_doto) & tabmask) == tabmask))
ldelete(1L, FALSE);
- return (linsert(1, c));
+ return linsert(1, c);
}
/*
@@ -269,7 +269,7 @@ int lover(char *ostr)
}
ostr++;
}
- return (status);
+ return status;
}
/*
@@ -290,7 +290,7 @@ int lnewline(void)
struct window *wp;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
#if SCROLLCODE
lchange(WFHARD | WFINS);
#else
@@ -299,7 +299,7 @@ int lnewline(void)
lp1 = curwp->w_dotp; /* Get the address and */
doto = curwp->w_doto; /* offset of "." */
if ((lp2 = lalloc(doto)) == NULL) /* New first half line */
- return (FALSE);
+ return FALSE;
cp1 = &lp1->l_text[0]; /* Shuffle text around */
cp2 = &lp2->l_text[0];
while (cp1 != &lp1->l_text[doto])
@@ -330,7 +330,7 @@ int lnewline(void)
}
wp = wp->w_wndp;
}
- return (TRUE);
+ return TRUE;
}
/*
@@ -352,12 +352,12 @@ int ldelete(long n, int kflag)
struct window *wp;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
while (n != 0) {
dotp = curwp->w_dotp;
doto = curwp->w_doto;
if (dotp == curbp->b_linep) /* Hit end of buffer. */
- return (FALSE);
+ return FALSE;
chunk = dotp->l_used - doto; /* Size of chunk. */
if (chunk > n)
chunk = n;
@@ -369,7 +369,7 @@ int ldelete(long n, int kflag)
#endif
if (ldelnewline() == FALSE
|| (kflag != FALSE && kinsert('\n') == FALSE))
- return (FALSE);
+ return FALSE;
--n;
continue;
}
@@ -379,7 +379,7 @@ int ldelete(long n, int kflag)
if (kflag != FALSE) { /* Kill? */
while (cp1 != cp2) {
if (kinsert(*cp1) == FALSE)
- return (FALSE);
+ return FALSE;
++cp1;
}
cp1 = &dotp->l_text[doto];
@@ -403,7 +403,7 @@ int ldelete(long n, int kflag)
}
n -= chunk;
}
- return (TRUE);
+ return TRUE;
}
/*
@@ -430,7 +430,7 @@ char *getctext(void)
while (size--)
*dp++ = *sp++;
*dp = 0;
- return (rline);
+ return rline;
}
/*
@@ -446,14 +446,14 @@ int putctext(char *iline)
/* delete the current line */
curwp->w_doto = 0; /* starting at the beginning of the line */
if ((status = killtext(TRUE, 1)) != TRUE)
- return (status);
+ return status;
/* insert the new line */
if ((status = linstr(iline)) != TRUE)
- return (status);
+ return status;
status = lnewline();
backline(TRUE, 1);
- return (status);
+ return status;
}
/*
@@ -475,13 +475,13 @@ int ldelnewline(void)
struct window *wp;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
lp1 = curwp->w_dotp;
lp2 = lp1->l_fp;
if (lp2 == curbp->b_linep) { /* At the buffer end. */
if (lp1->l_used == 0) /* Blank line. */
lfree(lp1);
- return (TRUE);
+ return TRUE;
}
if (lp2->l_used <= lp1->l_size - lp1->l_used) {
cp1 = &lp1->l_text[lp1->l_used];
@@ -506,10 +506,10 @@ int ldelnewline(void)
lp1->l_fp = lp2->l_fp;
lp2->l_fp->l_bp = lp1;
free((char *) lp2);
- return (TRUE);
+ return TRUE;
}
if ((lp3 = lalloc(lp1->l_used + lp2->l_used)) == NULL)
- return (FALSE);
+ return FALSE;
cp1 = &lp1->l_text[0];
cp2 = &lp3->l_text[0];
while (cp1 != &lp1->l_text[lp1->l_used])
@@ -541,7 +541,7 @@ int ldelnewline(void)
}
free((char *) lp1);
free((char *) lp2);
- return (TRUE);
+ return TRUE;
}
/*
@@ -582,7 +582,7 @@ int kinsert(int c)
/* check to see if we need a new chunk */
if (kused >= KBLOCK) {
if ((nchunk = (struct kill *)malloc(sizeof(struct kill))) == NULL)
- return (FALSE);
+ return FALSE;
if (kbufh == NULL) /* set head ptr if first time */
kbufh = nchunk;
if (kbufp != NULL) /* point the current to this new one */
@@ -594,7 +594,7 @@ int kinsert(int c)
/* and now insert the character */
kbufp->d_chunk[kused++] = c;
- return (TRUE);
+ return TRUE;
}
/*
@@ -610,12 +610,12 @@ int yank(int f, int n)
struct kill *kp; /* pointer into kill buffer */
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if (n < 0)
- return (FALSE);
+ return FALSE;
/* make sure there is something to yank */
if (kbufh == NULL)
- return (TRUE); /* not an error, just nothing */
+ return TRUE; /* not an error, just nothing */
/* for each time.... */
while (n--) {
@@ -629,14 +629,14 @@ int yank(int f, int n)
while (i--) {
if ((c = *sp++) == '\n') {
if (lnewline() == FALSE)
- return (FALSE);
+ return FALSE;
} else {
if (linsert(1, c) == FALSE)
- return (FALSE);
+ return FALSE;
}
}
kp = kp->d_next;
}
}
- return (TRUE);
+ return TRUE;
}
diff --git a/lock.c b/lock.c
index 64e81be..dce53a7 100644
--- a/lock.c
+++ b/lock.c
@@ -31,20 +31,20 @@ int lockchk(char *fname)
if (numlocks > 0)
for (i = 0; i < numlocks; ++i)
if (strcmp(fname, lname[i]) == 0)
- return (TRUE);
+ return TRUE;
/* if we have a full locking table, bitch and leave */
if (numlocks == NLOCKS) {
mlwrite("LOCK ERROR: Lock table full");
- return (ABORT);
+ return ABORT;
}
/* next, try to lock it */
status = lock(fname);
if (status == ABORT) /* file is locked, no override */
- return (ABORT);
+ return ABORT;
if (status == FALSE) /* locked, overriden, dont add to table */
- return (TRUE);
+ return TRUE;
/* we have now locked it, add it to our table */
lname[++numlocks - 1] = (char *) malloc(strlen(fname) + 1);
@@ -52,12 +52,12 @@ int lockchk(char *fname)
undolock(fname); /* free the lock */
mlwrite("Cannot lock, out of memory");
--numlocks;
- return (ABORT);
+ return ABORT;
}
/* everthing is cool, add it to the table */
strcpy(lname[numlocks - 1], fname);
- return (TRUE);
+ return TRUE;
}
/*
@@ -78,7 +78,7 @@ int lockrel(void)
free(lname[i]);
}
numlocks = 0;
- return (status);
+ return status;
}
/*
@@ -99,12 +99,12 @@ int lock(char *fname)
/* attempt to lock the file */
locker = dolock(fname);
if (locker == NULL) /* we win */
- return (TRUE);
+ return TRUE;
/* file failed...abort */
if (strncmp(locker, "LOCK", 4) == 0) {
lckerror(locker);
- return (ABORT);
+ return ABORT;
}
/* someone else has it....override? */
@@ -113,9 +113,9 @@ int lock(char *fname)
strcat(msg, ", override?");
status = mlyesno(msg); /* ask them */
if (status == TRUE)
- return (FALSE);
+ return FALSE;
else
- return (ABORT);
+ return ABORT;
}
/*
@@ -132,11 +132,11 @@ int unlock(char *fname)
/* unclock and return */
locker = undolock(fname);
if (locker == NULL)
- return (TRUE);
+ return TRUE;
/* report the error and come back */
lckerror(locker);
- return (FALSE);
+ return FALSE;
}
/*
diff --git a/main.c b/main.c
index 4a5487d..2e53c2c 100644
--- a/main.c
+++ b/main.c
@@ -313,7 +313,7 @@ int main(int argc, char **argv)
#if CALLED
/* if we were called as a subroutine and want to leave, do so */
if (eexitflag)
- return (eexitval);
+ return eexitval;
#endif
/* execute the "command" macro...normally null */
@@ -494,7 +494,7 @@ int execute(int c, int f, int n)
thisflag = 0;
status = (*execfunc) (f, n);
lastflag = thisflag;
- return (status);
+ return status;
}
/*
@@ -523,7 +523,7 @@ int execute(int c, int f, int n)
#endif
if (n <= 0) { /* Fenceposts. */
lastflag = 0;
- return (n < 0 ? FALSE : TRUE);
+ return n < 0 ? FALSE : TRUE;
}
thisflag = 0; /* For the future. */
@@ -561,12 +561,12 @@ int execute(int c, int f, int n)
}
lastflag = thisflag;
- return (status);
+ return status;
}
TTbeep();
mlwrite("(Key not bound)"); /* complain */
lastflag = 0; /* Fake last flags. */
- return (FALSE);
+ return FALSE;
}
/*
@@ -594,13 +594,13 @@ int quickexit(int f, int n)
#endif
if ((status = filesave(f, n)) != TRUE) {
curbp = oldcb; /* restore curbp */
- return (status);
+ return status;
}
}
bp = bp->b_bufp; /* on to the next buffer */
}
quit(f, n); /* conditionally quit */
- return (TRUE);
+ return TRUE;
}
static void emergencyexit(int signr)
@@ -638,7 +638,7 @@ int quit(int f, int n)
exit(GOOD);
}
mlwrite("");
- return (s);
+ return s;
}
/*
@@ -650,13 +650,13 @@ int ctlxlp(int f, int n)
{
if (kbdmode != STOP) {
mlwrite("%%Macro already active");
- return (FALSE);
+ return FALSE;
}
mlwrite("(Start macro)");
kbdptr = &kbdm[0];
kbdend = kbdptr;
kbdmode = RECORD;
- return (TRUE);
+ return TRUE;
}
/*
@@ -667,13 +667,13 @@ int ctlxrp(int f, int n)
{
if (kbdmode == STOP) {
mlwrite("%%Macro not active");
- return (FALSE);
+ return FALSE;
}
if (kbdmode == RECORD) {
mlwrite("(End macro)");
kbdmode = STOP;
}
- return (TRUE);
+ return TRUE;
}
/*
@@ -685,14 +685,14 @@ int ctlxe(int f, int n)
{
if (kbdmode != STOP) {
mlwrite("%%Macro already active");
- return (FALSE);
+ return FALSE;
}
if (n <= 0)
- return (TRUE);
+ return TRUE;
kbdrep = n; /* remember how many times to execute */
kbdmode = PLAY; /* start us in play mode */
kbdptr = &kbdm[0]; /* at the beginning */
- return (TRUE);
+ return TRUE;
}
/*
@@ -705,7 +705,7 @@ int ctrlg(int f, int n)
TTbeep();
kbdmode = STOP;
mlwrite("(Aborted)");
- return (ABORT);
+ return ABORT;
}
/*
@@ -716,38 +716,38 @@ int rdonly(void)
{
TTbeep();
mlwrite("(Key illegal in VIEW mode)");
- return (FALSE);
+ return FALSE;
}
int resterr(void)
{
TTbeep();
mlwrite("(That command is RESTRICTED)");
- return (FALSE);
+ return FALSE;
}
/* user function that does NOTHING */
int nullproc(int f, int n)
{
- return (TRUE);
+ return TRUE;
}
/* dummy function for binding to meta prefix */
int metafn(int f, int n)
{
- return (TRUE);
+ return TRUE;
}
/* dummy function for binding to control-x prefix */
int cex(int f, int n)
{
- return (TRUE);
+ return TRUE;
}
/* dummy function for binding to universal-argument */
int unarg(int f, int n)
{
- return (TRUE);
+ return TRUE;
}
/***** Compiler specific Library functions ****/
@@ -781,7 +781,7 @@ unsigned nbytes; /* # of bytes to allocate */
#endif
}
- return (mp);
+ return mp;
}
release(mp)
@@ -869,7 +869,7 @@ int cexit(int status)
#if CALLED
eexitflag = TRUE; /* flag a program exit */
eexitval = status;
- return (status);
+ return status;
#else
#undef exit
exit(status);
diff --git a/pklock.c b/pklock.c
index 2801228..dc30b76 100644
--- a/pklock.c
+++ b/pklock.c
@@ -28,7 +28,7 @@
int gethostname(char *name, int namelen)
{
- return (sysinfo(SI_HOSTNAME, name, namelen));
+ return sysinfo(SI_HOSTNAME, name, namelen);
}
#endif
diff --git a/posix.c b/posix.c
index 92db090..dbc6486 100644
--- a/posix.c
+++ b/posix.c
@@ -130,7 +130,7 @@ int ttputc(int c)
}
}
fputc(c, stdout);
- return (TRUE);
+ return TRUE;
}
/*
diff --git a/random.c b/random.c
index 835da16..da95b1d 100644
--- a/random.c
+++ b/random.c
@@ -20,7 +20,7 @@ int setfillcol(int f, int n)
{
fillcol = n;
mlwrite("(Fill column is %d)", n);
- return (TRUE);
+ return TRUE;
}
/*
@@ -92,7 +92,7 @@ int showcpos(int f, int n)
mlwrite("Line %d/%d Col %d/%d Char %D/%D (%d%%) char = 0x%x",
predlines + 1, numlines + 1, col, ecol,
predchars, numchars, ratio, curchar);
- return (TRUE);
+ return TRUE;
}
int getcline(void)
@@ -114,7 +114,7 @@ int getcline(void)
}
/* and return the resulting count */
- return (numlines + 1);
+ return numlines + 1;
}
/*
@@ -134,7 +134,7 @@ int getccol(int bflg)
++col;
++col;
}
- return (col);
+ return col;
}
/*
@@ -171,7 +171,7 @@ int setccol(int pos)
curwp->w_doto = i;
/* and tell weather we made it */
- return (col >= pos);
+ return col >= pos;
}
/*
@@ -189,19 +189,19 @@ int twiddle(int f, int n)
int cr;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
dotp = curwp->w_dotp;
doto = curwp->w_doto;
if (doto == llength(dotp) && --doto < 0)
- return (FALSE);
+ return FALSE;
cr = lgetc(dotp, doto);
if (--doto < 0)
- return (FALSE);
+ return FALSE;
cl = lgetc(dotp, doto);
lputc(dotp, doto + 0, cr);
lputc(dotp, doto + 1, cl);
lchange(WFEDIT);
- return (TRUE);
+ return TRUE;
}
/*
@@ -216,19 +216,19 @@ int quote(int f, int n)
int c;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
c = tgetc();
if (n < 0)
- return (FALSE);
+ return FALSE;
if (n == 0)
- return (TRUE);
+ return TRUE;
if (c == '\n') {
do {
s = lnewline();
} while (s == TRUE && --n);
- return (s);
+ return s;
}
- return (linsert(n, c));
+ return linsert(n, c);
}
/*
@@ -241,14 +241,14 @@ int quote(int f, int n)
int insert_tab(int f, int n)
{
if (n < 0)
- return (FALSE);
+ return FALSE;
if (n == 0 || n > 1) {
tabsize = n;
- return (TRUE);
+ return TRUE;
}
if (!tabsize)
- return (linsert(1, '\t'));
- return (linsert(tabsize - (getccol(FALSE) % tabsize), ' '));
+ return linsert(1, '\t');
+ return linsert(tabsize - (getccol(FALSE) % tabsize), ' ');
}
#if AEDIT
@@ -262,7 +262,7 @@ int detab(int f, int n)
int inc; /* increment to next line [sgn(n)] */
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if (f == FALSE)
n = 1;
@@ -291,7 +291,7 @@ int detab(int f, int n)
curwp->w_doto = 0; /* to the begining of the line */
thisflag &= ~CFCPCN; /* flag that this resets the goal column */
lchange(WFEDIT); /* yes, we have made at least an edit */
- return (TRUE);
+ return TRUE;
}
/*
@@ -307,7 +307,7 @@ int entab(int f, int n)
char cchar; /* current character */
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if (f == FALSE)
n = 1;
@@ -365,7 +365,7 @@ int entab(int f, int n)
curwp->w_doto = 0; /* to the begining of the line */
thisflag &= ~CFCPCN; /* flag that this resets the goal column */
lchange(WFEDIT); /* yes, we have made at least an edit */
- return (TRUE);
+ return TRUE;
}
/*
@@ -381,7 +381,7 @@ int trim(int f, int n)
int inc; /* increment to next line [sgn(n)] */
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if (f == FALSE)
n = 1;
@@ -408,7 +408,7 @@ int trim(int f, int n)
}
lchange(WFEDIT);
thisflag &= ~CFCPCN; /* flag that this resets the goal column */
- return (TRUE);
+ return TRUE;
}
#endif
@@ -423,18 +423,18 @@ int openline(int f, int n)
int s;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if (n < 0)
- return (FALSE);
+ return FALSE;
if (n == 0)
- return (TRUE);
+ return TRUE;
i = n; /* Insert newlines. */
do {
s = lnewline();
} while (s == TRUE && --i);
if (s == TRUE) /* Then back up overtop */
s = backchar(f, n); /* of them all. */
- return (s);
+ return s;
}
/*
@@ -446,14 +446,14 @@ int insert_newline(int f, int n)
int s;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if (n < 0)
- return (FALSE);
+ return FALSE;
/* if we are in C mode and this is a default <NL> */
if (n == 1 && (curbp->b_mode & MDCMOD) &&
curwp->w_dotp != curbp->b_linep)
- return (cinsert());
+ return cinsert();
/*
* If a newline was typed, fill column is defined, the argument is non-
@@ -468,12 +468,12 @@ int insert_newline(int f, int n)
/* insert some lines */
while (n--) {
if ((s = lnewline()) != TRUE)
- return (s);
+ return s;
#if SCROLLCODE
curwp->w_flag |= WFINS;
#endif
}
- return (TRUE);
+ return TRUE;
}
int cinsert(void)
@@ -502,7 +502,7 @@ int cinsert(void)
/* put in the newline */
if (lnewline() == FALSE)
- return (FALSE);
+ return FALSE;
/* and the saved indentation */
linstr(ichar);
@@ -514,7 +514,7 @@ int cinsert(void)
#if SCROLLCODE
curwp->w_flag |= WFINS;
#endif
- return (TRUE);
+ return TRUE;
}
#if NBRACE
@@ -540,7 +540,7 @@ int insbrace(int n, int c)
for (i = curwp->w_doto - 1; i >= 0; --i) {
ch = lgetc(curwp->w_dotp, i);
if (ch != ' ' && ch != '\t')
- return (linsert(n, c));
+ return linsert(n, c);
}
/* chercher le caractere oppose correspondant */
@@ -555,7 +555,7 @@ int insbrace(int n, int c)
oc = '(';
break;
default:
- return (FALSE);
+ return FALSE;
}
oldlp = curwp->w_dotp;
@@ -583,7 +583,7 @@ int insbrace(int n, int c)
if (count != 0) { /* no match */
curwp->w_dotp = oldlp;
curwp->w_doto = oldoff;
- return (linsert(n, c));
+ return linsert(n, c);
}
curwp->w_doto = 0; /* debut de ligne */
@@ -609,7 +609,7 @@ int insbrace(int n, int c)
}
/* and insert the required brace(s) */
- return (linsert(n, c));
+ return linsert(n, c);
}
#else
@@ -628,13 +628,13 @@ int insbrace(int n, int c)
/* if we are at the beginning of the line, no go */
if (curwp->w_doto == 0)
- return (linsert(n, c));
+ return linsert(n, c);
/* scan to see if all space before this is white space */
for (i = curwp->w_doto - 1; i >= 0; --i) {
ch = lgetc(curwp->w_dotp, i);
if (ch != ' ' && ch != '\t')
- return (linsert(n, c));
+ return linsert(n, c);
}
/* delete back first */
@@ -645,7 +645,7 @@ int insbrace(int n, int c)
backdel(FALSE, 1);
/* and insert the required brace(s) */
- return (linsert(n, c));
+ return linsert(n, c);
}
#endif
@@ -656,13 +656,13 @@ int inspound(void)
/* if we are at the beginning of the line, no go */
if (curwp->w_doto == 0)
- return (linsert(1, '#'));
+ return linsert(1, '#');
/* scan to see if all space before this is white space */
for (i = curwp->w_doto - 1; i >= 0; --i) {
ch = lgetc(curwp->w_dotp, i);
if (ch != ' ' && ch != '\t')
- return (linsert(1, '#'));
+ return linsert(1, '#');
}
/* delete back first */
@@ -670,7 +670,7 @@ int inspound(void)
backdel(FALSE, 1);
/* and insert the required pound */
- return (linsert(1, '#'));
+ return linsert(1, '#');
}
/*
@@ -688,7 +688,7 @@ int deblank(int f, int n)
long nld;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
lp1 = curwp->w_dotp;
while (llength(lp1) == 0 && (lp2 = lback(lp1)) != curbp->b_linep)
lp1 = lp2;
@@ -697,10 +697,10 @@ int deblank(int f, int n)
while ((lp2 = lforw(lp2)) != curbp->b_linep && llength(lp2) == 0)
++nld;
if (nld == 0)
- return (TRUE);
+ return TRUE;
curwp->w_dotp = lforw(lp1);
curwp->w_doto = 0;
- return (ldelete(nld, FALSE));
+ return ldelete(nld, FALSE);
}
/*
@@ -718,9 +718,9 @@ int indent(int f, int n)
int i;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if (n < 0)
- return (FALSE);
+ return FALSE;
while (n--) {
nicol = 0;
for (i = 0; i < llength(curwp->w_dotp); ++i) {
@@ -734,9 +734,9 @@ int indent(int f, int n)
if (lnewline() == FALSE
|| ((i = nicol / 8) != 0 && linsert(i, '\t') == FALSE)
|| ((i = nicol % 8) != 0 && linsert(i, ' ') == FALSE))
- return (FALSE);
+ return FALSE;
}
- return (TRUE);
+ return TRUE;
}
/*
@@ -748,15 +748,15 @@ int indent(int f, int n)
int forwdel(int f, int n)
{
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if (n < 0)
- return (backdel(f, -n));
+ return backdel(f, -n);
if (f != FALSE) { /* Really a kill. */
if ((lastflag & CFKILL) == 0)
kdelete();
thisflag |= CFKILL;
}
- return (ldelete((long) n, f));
+ return ldelete((long) n, f);
}
/*
@@ -770,9 +770,9 @@ int backdel(int f, int n)
int s;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if (n < 0)
- return (forwdel(f, -n));
+ return forwdel(f, -n);
if (f != FALSE) { /* Really a kill. */
if ((lastflag & CFKILL) == 0)
kdelete();
@@ -780,7 +780,7 @@ int backdel(int f, int n)
}
if ((s = backchar(f, n)) == TRUE)
s = ldelete((long) n, f);
- return (s);
+ return s;
}
/*
@@ -797,7 +797,7 @@ int killtext(int f, int n)
long chunk;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if ((lastflag & CFKILL) == 0) /* Clear kill buffer if */
kdelete(); /* last wasn't a kill. */
thisflag |= CFKILL;
@@ -813,15 +813,15 @@ int killtext(int f, int n)
nextp = lforw(curwp->w_dotp);
while (--n) {
if (nextp == curbp->b_linep)
- return (FALSE);
+ return FALSE;
chunk += llength(nextp) + 1;
nextp = lforw(nextp);
}
} else {
mlwrite("neg kill");
- return (FALSE);
+ return FALSE;
}
- return (ldelete(chunk, TRUE));
+ return ldelete(chunk, TRUE);
}
/*
@@ -912,7 +912,7 @@ int adjustmode(int kind, int global)
status = mlreply(prompt, cbuf, NPAT - 1);
if (status != TRUE)
- return (status);
+ return status;
/* make it uppercase */
@@ -954,7 +954,7 @@ int adjustmode(int kind, int global)
curwp->w_flag |= WFCOLR;
#endif
mlerase();
- return (TRUE);
+ return TRUE;
}
}
@@ -976,12 +976,12 @@ int adjustmode(int kind, int global)
if (global == 0)
upmode();
mlerase(); /* erase the junk */
- return (TRUE);
+ return TRUE;
}
}
mlwrite("No such mode!");
- return (FALSE);
+ return FALSE;
}
/*
@@ -993,7 +993,7 @@ int adjustmode(int kind, int global)
int clrmes(int f, int n)
{
mlforce("");
- return (TRUE);
+ return TRUE;
}
/*
@@ -1012,7 +1012,7 @@ int writemsg(int f, int n)
if ((status =
mlreply("Message to write: ", buf, NPAT - 1)) != TRUE)
- return (status);
+ return status;
/* expand all '%' to "%%" so mlwrite won't expect arguments */
sp = buf;
@@ -1026,7 +1026,7 @@ int writemsg(int f, int n)
/* write the message out */
mlforce(nbuf);
- return (TRUE);
+ return TRUE;
}
#if CFENCE
@@ -1083,7 +1083,7 @@ int getfence(int f, int n)
break;
default:
TTbeep();
- return (FALSE);
+ return FALSE;
}
/* set up for scan */
@@ -1118,14 +1118,14 @@ int getfence(int f, int n)
else
forwchar(FALSE, 1);
curwp->w_flag |= WFMOVE;
- return (TRUE);
+ return TRUE;
}
/* restore the current position */
curwp->w_dotp = oldlp;
curwp->w_doto = oldoff;
TTbeep();
- return (FALSE);
+ return FALSE;
}
#endif
@@ -1193,7 +1193,7 @@ int fmatch(int ch)
/* restore the current position */
curwp->w_dotp = oldlp;
curwp->w_doto = oldoff;
- return (TRUE);
+ return TRUE;
}
/*
@@ -1211,7 +1211,7 @@ int istring(int f, int n)
status =
mlreplyt("String to insert<META>: ", tstring, NPAT, metac);
if (status != TRUE)
- return (status);
+ return status;
if (f == FALSE)
n = 1;
@@ -1221,7 +1221,7 @@ int istring(int f, int n)
/* insert it */
while (n-- && (status = linstr(tstring)));
- return (status);
+ return status;
}
/*
@@ -1239,7 +1239,7 @@ int ovstring(int f, int n)
status =
mlreplyt("String to overwrite<META>: ", tstring, NPAT, metac);
if (status != TRUE)
- return (status);
+ return status;
if (f == FALSE)
n = 1;
@@ -1249,5 +1249,5 @@ int ovstring(int f, int n)
/* insert it */
while (n-- && (status = lover(tstring)));
- return (status);
+ return status;
}
diff --git a/region.c b/region.c
index 22193ae..80b28e7 100644
--- a/region.c
+++ b/region.c
@@ -26,15 +26,15 @@ int killregion(int f, int n)
struct region region;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if ((s = getregion(&region)) != TRUE)
- return (s);
+ return s;
if ((lastflag & CFKILL) == 0) /* This is a kill type */
kdelete(); /* command, so do magic */
thisflag |= CFKILL; /* kill buffer stuff. */
curwp->w_dotp = region.r_linep;
curwp->w_doto = region.r_offset;
- return (ldelete(region.r_size, TRUE));
+ return ldelete(region.r_size, TRUE);
}
/*
@@ -51,7 +51,7 @@ int copyregion(int f, int n)
struct region region;
if ((s = getregion(&region)) != TRUE)
- return (s);
+ return s;
if ((lastflag & CFKILL) == 0) /* Kill type command. */
kdelete();
thisflag |= CFKILL;
@@ -60,17 +60,17 @@ int copyregion(int f, int n)
while (region.r_size--) {
if (loffs == llength(linep)) { /* End of line. */
if ((s = kinsert('\n')) != TRUE)
- return (s);
+ return s;
linep = lforw(linep);
loffs = 0;
} else { /* Middle of line. */
if ((s = kinsert(lgetc(linep, loffs))) != TRUE)
- return (s);
+ return s;
++loffs;
}
}
mlwrite("(region copied)");
- return (TRUE);
+ return TRUE;
}
/*
@@ -90,9 +90,9 @@ int lowerregion(int f, int n)
struct region region;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if ((s = getregion(&region)) != TRUE)
- return (s);
+ return s;
lchange(WFHARD);
linep = region.r_linep;
loffs = region.r_offset;
@@ -107,7 +107,7 @@ int lowerregion(int f, int n)
++loffs;
}
}
- return (TRUE);
+ return TRUE;
}
/*
@@ -127,9 +127,9 @@ int upperregion(int f, int n)
struct region region;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if ((s = getregion(&region)) != TRUE)
- return (s);
+ return s;
lchange(WFHARD);
linep = region.r_linep;
loffs = region.r_offset;
@@ -144,7 +144,7 @@ int upperregion(int f, int n)
++loffs;
}
}
- return (TRUE);
+ return TRUE;
}
/*
@@ -167,7 +167,7 @@ int getregion(struct region *rp)
if (curwp->w_markp == NULL) {
mlwrite("No mark set in this window");
- return (FALSE);
+ return FALSE;
}
if (curwp->w_dotp == curwp->w_markp) {
rp->r_linep = curwp->w_dotp;
@@ -180,7 +180,7 @@ int getregion(struct region *rp)
rp->r_size =
(long) (curwp->w_doto - curwp->w_marko);
}
- return (TRUE);
+ return TRUE;
}
blp = curwp->w_dotp;
bsize = (long) curwp->w_doto;
@@ -193,7 +193,7 @@ int getregion(struct region *rp)
rp->r_linep = curwp->w_dotp;
rp->r_offset = curwp->w_doto;
rp->r_size = fsize + curwp->w_marko;
- return (TRUE);
+ return TRUE;
}
fsize += llength(flp) + 1;
}
@@ -204,10 +204,10 @@ int getregion(struct region *rp)
rp->r_linep = blp;
rp->r_offset = curwp->w_marko;
rp->r_size = bsize - curwp->w_marko;
- return (TRUE);
+ return TRUE;
}
}
}
mlwrite("Bug: lost mark");
- return (FALSE);
+ return FALSE;
}
diff --git a/search.c b/search.c
index f06d196..3e0e2b0 100644
--- a/search.c
+++ b/search.c
@@ -89,7 +89,7 @@ int forwsearch(int f, int n)
* Otherwise proceed by asking for the search string.
*/
if (n < 0)
- return (backsearch(f, -n));
+ return backsearch(f, -n);
/* Ask the user for the text of a pattern. If the
* response is TRUE (responses other than FALSE are
@@ -117,7 +117,7 @@ int forwsearch(int f, int n)
else
mlwrite("Not found");
}
- return (status);
+ return status;
}
/*
@@ -132,7 +132,7 @@ int forwhunt(int f, int n)
int status = TRUE;
if (n < 0) /* search backwards */
- return (backhunt(f, -n));
+ return backhunt(f, -n);
/* Make sure a pattern exists, or that we didn't switch
* into MAGIC mode until after we entered the pattern.
@@ -170,7 +170,7 @@ int forwhunt(int f, int n)
else
mlwrite("Not found");
- return (status);
+ return status;
}
/*
@@ -189,7 +189,7 @@ int backsearch(int f, int n)
* Otherwise proceed by asking for the search string.
*/
if (n < 0)
- return (forwsearch(f, -n));
+ return forwsearch(f, -n);
/* Ask the user for the text of a pattern. If the
* response is TRUE (responses other than FALSE are
@@ -218,7 +218,7 @@ int backsearch(int f, int n)
else
mlwrite("Not found");
}
- return (status);
+ return status;
}
/*
@@ -234,7 +234,7 @@ int backhunt(int f, int n)
int status = TRUE;
if (n < 0)
- return (forwhunt(f, -n));
+ return forwhunt(f, -n);
/* Make sure a pattern exists, or that we didn't switch
* into MAGIC mode until after we entered the pattern.
@@ -272,7 +272,7 @@ int backhunt(int f, int n)
else
mlwrite("Not found");
- return (status);
+ return status;
}
#if MAGIC
@@ -579,7 +579,7 @@ int eq(unsigned char bc, unsigned char pc)
pc ^= DIFCASE;
}
- return (bc == pc);
+ return bc == pc;
}
/*
@@ -631,7 +631,7 @@ static int readpattern(char *prompt, char *apat, int srch)
} else if (status == FALSE && apat[0] != 0) /* Old one */
status = TRUE;
- return (status);
+ return status;
}
/*
@@ -686,7 +686,7 @@ void rvstrcpy(char *rvstr, char *str)
*/
int sreplace(int f, int n)
{
- return (replaces(FALSE, f, n));
+ return replaces(FALSE, f, n);
}
/*
@@ -697,7 +697,7 @@ int sreplace(int f, int n)
*/
int qreplace(int f, int n)
{
- return (replaces(TRUE, f, n));
+ return replaces(TRUE, f, n);
}
/*
@@ -724,12 +724,12 @@ static int replaces(int kind, int f, int n)
int lastoff; /* offset (for 'u' query option) */
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
/* Check for negative repetitions.
*/
if (f && n < 0)
- return (FALSE);
+ return FALSE;
/* Ask the user for the text of a pattern.
*/
@@ -737,12 +737,12 @@ static int replaces(int kind, int f, int n)
FALSE ? "Replace" : "Query replace"),
&pat[0], TRUE))
!= TRUE)
- return (status);
+ return status;
/* Ask for the replacement string.
*/
if ((status = readpattern("with", &rpat[0], FALSE)) == ABORT)
- return (status);
+ return status;
/* Find the length of the replacement string.
*/
@@ -860,7 +860,7 @@ static int replaces(int kind, int f, int n)
#endif
status = delins(rlength, patmatch, FALSE);
if (status != TRUE)
- return (status);
+ return status;
/* Record one less substitution,
* backup, save our place, and
@@ -880,7 +880,7 @@ static int replaces(int kind, int f, int n)
case BELL: /* abort! and stay */
mlwrite("Aborted!");
- return (FALSE);
+ return FALSE;
default: /* bitch and beep */
TTbeep();
@@ -900,7 +900,7 @@ static int replaces(int kind, int f, int n)
*/
status = delins(matchlen, &rpat[0], TRUE);
if (status != TRUE)
- return (status);
+ return status;
/* Save our position, since we may
* undo this.
@@ -916,7 +916,7 @@ static int replaces(int kind, int f, int n)
/* And report the results.
*/
mlwrite("%d substitutions", numsub);
- return (TRUE);
+ return TRUE;
}
/*
@@ -952,7 +952,7 @@ int delins(int dlength, char *instr, int use_meta)
#endif
status = linstr(instr);
- return (status);
+ return status;
}
/*
@@ -999,11 +999,11 @@ int expandp(char *srcstr, char *deststr, int maxlength)
if (maxlength < 4) {
*deststr++ = '$';
*deststr = '\0';
- return (FALSE);
+ return FALSE;
}
}
*deststr = '\0';
- return (TRUE);
+ return TRUE;
}
/*
@@ -1024,7 +1024,7 @@ int boundry(struct line *curline, int curoff, int dir)
border = (curoff == 0) &&
(lback(curline) == curbp->b_linep);
}
- return (border);
+ return border;
}
/*
@@ -1064,7 +1064,7 @@ static int nextch(struct line **pcurline, int *pcuroff, int dir)
*pcurline = curline;
*pcuroff = curoff;
- return (c);
+ return c;
}
#if MAGIC
@@ -1187,7 +1187,7 @@ static int mcstr(void)
mcclear();
}
- return (status);
+ return status;
}
/*
@@ -1365,7 +1365,7 @@ static int mceq(int bc, MC *mt)
} /* End of switch. */
- return (result);
+ return result;
}
extern BITMAP clearbits(void);
@@ -1403,7 +1403,7 @@ static int cclmake(char **ppatptr, MC *mcptr)
if ((ochr = *patptr) == MC_ECCL) {
mlwrite("%%No characters in character class");
- return (FALSE);
+ return FALSE;
} else {
if (ochr == MC_ESC)
ochr = *++patptr;
@@ -1461,7 +1461,7 @@ static int biteq(int bc, BITMAP cclmap)
if (bc >= HICHAR)
return FALSE;
- return ((*(cclmap + (bc >> 3)) & BIT(bc & 7)) ? TRUE : FALSE);
+ return (*(cclmap + (bc >> 3)) & BIT(bc & 7)) ? TRUE : FALSE;
}
/*
@@ -1476,7 +1476,7 @@ static BITMAP clearbits(void)
for (j = 0; j < HIBYTE; j++)
*cclmap++ = 0;
- return (cclstart);
+ return cclstart;
}
/*
diff --git a/spawn.c b/spawn.c
index 8516a3d..1286ba3 100644
--- a/spawn.c
+++ b/spawn.c
@@ -49,7 +49,7 @@ int spawncli(int f, int n)
/* don't allow this command if restricted */
if (restflag)
- return (resterr());
+ return resterr();
#if VMS
movecursor(term.t_nrow, 0); /* In last line. */
@@ -61,7 +61,7 @@ int spawncli(int f, int n)
mlputs("\r\n(Returning from DCL)\r\n");
TTflush();
sleep(1);
- return (TRUE);
+ return TRUE;
#endif
#if MSDOS & (MSC | TURBO)
movecursor(term.t_nrow, 0); /* Seek to last line. */
@@ -70,7 +70,7 @@ int spawncli(int f, int n)
shellprog("");
TTkopen();
sgarbf = TRUE;
- return (TRUE);
+ return TRUE;
#endif
#if V7 | USG | BSD
movecursor(term.t_nrow, 0); /* Seek to last line. */
@@ -98,7 +98,7 @@ int spawncli(int f, int n)
chg_height = term.t_nrow + 1;
term.t_nrow = term.t_ncol = 0;
#endif
- return (TRUE);
+ return TRUE;
#endif
}
@@ -114,7 +114,7 @@ int bktoshell(int f, int n)
kill(pid,SIGTSTP);
******************************/
kill(0, SIGTSTP);
- return (TRUE);
+ return TRUE;
}
void rtfrmshell(void)
@@ -137,11 +137,11 @@ int spawn(int f, int n)
/* don't allow this command if restricted */
if (restflag)
- return (resterr());
+ return resterr();
#if VMS
if ((s = mlreply("!", line, NLINE)) != TRUE)
- return (s);
+ return s;
movecursor(term.t_nrow, 0);
TTflush();
s = sys(line); /* Run the command. */
@@ -151,11 +151,11 @@ int spawn(int f, int n)
tgetc();
}
sgarbf = TRUE;
- return (s);
+ return s;
#endif
#if MSDOS
if ((s = mlreply("!", line, NLINE)) != TRUE)
- return (s);
+ return s;
movecursor(term.t_nrow, 0);
TTkclose();
shellprog(line);
@@ -166,11 +166,11 @@ int spawn(int f, int n)
tgetc();
}
sgarbf = TRUE;
- return (TRUE);
+ return TRUE;
#endif
#if V7 | USG | BSD
if ((s = mlreply("!", line, NLINE)) != TRUE)
- return (s);
+ return s;
TTflush();
TTclose(); /* stty to old modes */
TTkclose();
@@ -186,7 +186,7 @@ int spawn(int f, int n)
}
TTkopen();
sgarbf = TRUE;
- return (TRUE);
+ return TRUE;
#endif
}
@@ -203,23 +203,23 @@ int execprg(int f, int n)
/* don't allow this command if restricted */
if (restflag)
- return (resterr());
+ return resterr();
#if VMS
if ((s = mlreply("!", line, NLINE)) != TRUE)
- return (s);
+ return s;
TTflush();
s = sys(line); /* Run the command. */
mlputs("\r\n\n(End)"); /* Pause. */
TTflush();
tgetc();
sgarbf = TRUE;
- return (s);
+ return s;
#endif
#if MSDOS
if ((s = mlreply("$", line, NLINE)) != TRUE)
- return (s);
+ return s;
movecursor(term.t_nrow, 0);
TTkclose();
execprog(line);
@@ -230,12 +230,12 @@ int execprg(int f, int n)
tgetc();
}
sgarbf = TRUE;
- return (TRUE);
+ return TRUE;
#endif
#if V7 | USG | BSD
if ((s = mlreply("!", line, NLINE)) != TRUE)
- return (s);
+ return s;
TTputc('\n'); /* Already have '\r' */
TTflush();
TTclose(); /* stty to old modes */
@@ -246,7 +246,7 @@ int execprg(int f, int n)
TTflush();
while ((s = tgetc()) != '\r' && s != ' ');
sgarbf = TRUE;
- return (TRUE);
+ return TRUE;
#endif
}
@@ -272,7 +272,7 @@ int pipecmd(int f, int n)
/* don't allow this command if restricted */
if (restflag)
- return (resterr());
+ return resterr();
#if MSDOS
if ((tmp = getenv("TMP")) == NULL
@@ -290,12 +290,12 @@ int pipecmd(int f, int n)
#if VMS
mlwrite("Not available under VMS");
- return (FALSE);
+ return FALSE;
#endif
/* get the command to pipe in */
if ((s = mlreply("@", line, NLINE)) != TRUE)
- return (s);
+ return s;
/* get rid of the command output buffer if it exists */
if ((bp = bfind(bname, FALSE, 0)) != FALSE) {
@@ -318,7 +318,7 @@ int pipecmd(int f, int n)
}
if (zotbuf(bp) != TRUE)
- return (FALSE);
+ return FALSE;
}
#if MSDOS
strcat(line, " >>");
@@ -349,15 +349,15 @@ int pipecmd(int f, int n)
#endif
if (s != TRUE)
- return (s);
+ return s;
/* split the current window to make room for the command output */
if (splitwind(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
/* and read the stuff in */
if (getfile(filnam, FALSE) == FALSE)
- return (FALSE);
+ return FALSE;
/* make this window in VIEW mode, update all mode lines */
curwp->w_bufp->b_mode |= MDVIEW;
@@ -369,7 +369,7 @@ int pipecmd(int f, int n)
/* and get rid of the temporary file */
unlink(filnam);
- return (TRUE);
+ return TRUE;
}
/*
@@ -389,19 +389,19 @@ int filter_buffer(int f, int n)
/* don't allow this command if restricted */
if (restflag)
- return (resterr());
+ return resterr();
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
#if VMS
mlwrite("Not available under VMS");
- return (FALSE);
+ return FALSE;
#endif
/* get the filter name and its args */
if ((s = mlreply("#", line, NLINE)) != TRUE)
- return (s);
+ return s;
/* setup the proper file names */
bp = curbp;
@@ -412,7 +412,7 @@ int filter_buffer(int f, int n)
if (writeout(filnam1) != TRUE) {
mlwrite("(Cannot write filter file)");
strcpy(bp->b_fname, tmpnam);
- return (FALSE);
+ return FALSE;
}
#if MSDOS
strcat(line, " <fltinp >fltout");
@@ -442,7 +442,7 @@ int filter_buffer(int f, int n)
strcpy(bp->b_fname, tmpnam);
unlink(filnam1);
unlink(filnam2);
- return (s);
+ return s;
}
/* reset file name */
@@ -452,7 +452,7 @@ int filter_buffer(int f, int n)
/* and get rid of the temporary file */
unlink(filnam1);
unlink(filnam2);
- return (TRUE);
+ return TRUE;
}
#if VMS
@@ -473,7 +473,7 @@ int sys(char *cmd)
status = SYS$QIOW(EFN, iochan, IO$_SETMODE, iosb, 0, 0,
oldmode, sizeof(oldmode), 0, 0, 0, 0);
if (status != SS$_NORMAL || (iosb[0] & 0xFFFF) != SS$_NORMAL)
- return (FALSE);
+ return FALSE;
cdscp = NULL; /* Assume DCL. */
if (cmd != NULL) { /* Build descriptor. */
cdsc.dsc$a_pointer = cmd;
@@ -488,10 +488,10 @@ int sys(char *cmd)
status = SYS$QIOW(EFN, iochan, IO$_SETMODE, iosb, 0, 0,
newmode, sizeof(newmode), 0, 0, 0, 0);
if (status != SS$_NORMAL || (iosb[0] & 0xFFFF) != SS$_NORMAL)
- return (FALSE);
+ return FALSE;
if ((substatus & STS$M_SUCCESS) == 0) /* Command failed. */
- return (FALSE);
- return (TRUE);
+ return FALSE;
+ return TRUE;
}
#endif
@@ -518,7 +518,7 @@ int shellprog(char *cmd)
/* get name of system shell */
if ((shell = getenv("COMSPEC")) == NULL) {
- return (FALSE); /* No shell located */
+ return FALSE; /* No shell located */
}
/* trim leading whitespace off the command */
@@ -536,9 +536,9 @@ int shellprog(char *cmd)
comline[strlen(comline)] = swchar;
strcat(comline, "c ");
strcat(comline, cmd);
- return (execprog(comline));
+ return execprog(comline);
} else
- return (execprog(shell));
+ return execprog(shell);
}
/*
@@ -583,7 +583,7 @@ int execprog(char *cmd)
if ((sp = flook(strcat(prog, ".exe"), TRUE)) == NULL) {
strcpy(&prog[strlen(prog) - 4], ".com");
if ((sp = flook(prog, TRUE)) == NULL)
- return (FALSE);
+ return FALSE;
}
strcpy(prog, sp);
@@ -616,6 +616,6 @@ int execprog(char *cmd)
rval = -_doserrno; /* failed child call */
#endif
#endif
- return ((rval < 0) ? FALSE : TRUE);
+ return (rval < 0) ? FALSE : TRUE;
}
#endif
diff --git a/tcap.c b/tcap.c
index 68e8b1a..d2665a5 100644
--- a/tcap.c
+++ b/tcap.c
@@ -271,7 +271,7 @@ static void tcaprev(int state)
static int tcapcres(char *res)
{ /* change screen resolution */
- return (TRUE);
+ return TRUE;
}
#if SCROLLCODE
@@ -362,7 +362,7 @@ static void putpad(char *str)
static int fnclabel(int f, int n)
{
/* on machines with no function keys...don't bother */
- return (TRUE);
+ return TRUE;
}
#endif
#else
diff --git a/termio.c b/termio.c
index 3588256..9a8d760 100644
--- a/termio.c
+++ b/termio.c
@@ -370,7 +370,7 @@ ttgetc()
nibuf = (iosb[0] >> 16) + (iosb[1] >> 16);
}
}
- return (ibuf[ibufi++] & 0xFF); /* Allow multinational */
+ return ibuf[ibufi++] & 0xFF; /* Allow multinational */
#endif
#if MSDOS & (MSC | TURBO)
@@ -380,18 +380,18 @@ ttgetc()
if (nxtchar >= 0) {
c = nxtchar;
nxtchar = -1;
- return (c);
+ return c;
}
/* call the dos to get a char */
rg.h.ah = 7; /* dos Direct Console Input call */
intdos(&rg, &rg);
c = rg.h.al; /* grab the char */
- return (c & 255);
+ return c & 255;
#endif
#if V7 | BSD
- return (255 & fgetc(stdin)); /* 8BIT P.K. */
+ return 255 & fgetc(stdin); /* 8BIT P.K. */
#endif
#if USG
@@ -403,7 +403,7 @@ ttgetc()
kbdpoll = FALSE;
while (read(0, &kbdq, 1) != 1);
}
- return (kbdq & 255);
+ return kbdq & 255;
#endif
}
@@ -416,35 +416,35 @@ typahead()
{
#if MSDOS & (MSC | TURBO)
if (kbhit() != 0)
- return (TRUE);
+ return TRUE;
else
- return (FALSE);
+ return FALSE;
#endif
#if BSD
int x; /* holds # of pending chars */
- return ((ioctl(0, FIONREAD, &x) < 0) ? 0 : x);
+ return (ioctl(0, FIONREAD, &x) < 0) ? 0 : x;
#endif
#if PKCODE & VMS
- return (ibufi < nibuf);
+ return ibufi < nibuf;
#endif
#if USG
if (!kbdqp) {
if (!kbdpoll && fcntl(0, F_SETFL, kbdflgs | O_NDELAY) < 0)
- return (FALSE);
+ return FALSE;
#if PKCODE
kbdpoll = 1;
#endif
kbdqp = (1 == read(0, &kbdq, 1));
}
- return (kbdqp);
+ return kbdqp;
#endif
#if !UNIX & !VMS & !MSDOS
- return (FALSE);
+ return FALSE;
#endif
}
#endif
diff --git a/vmsvt.c b/vmsvt.c
index 9593f9d..cb1d6fd 100644
--- a/vmsvt.c
+++ b/vmsvt.c
@@ -497,7 +497,7 @@ fnclabel(f, n) /* label a function key */
int f, n; /* default flag, numeric argument [unused] */
{
/* on machines with no function keys...don't bother */
- return (TRUE);
+ return TRUE;
}
#endif
diff --git a/vt52.c b/vt52.c
index 594171f..aacd747 100644
--- a/vt52.c
+++ b/vt52.c
@@ -112,7 +112,7 @@ int status; /* TRUE = reverse video, FALSE = normal video */
vt52cres()
{ /* change screen resolution - (not here though) */
- return (TRUE);
+ return TRUE;
}
spal()
@@ -172,7 +172,7 @@ int f, n; /* default flag, numeric argument [unused] */
{
/* on machines with no function keys...don't bother */
- return (TRUE);
+ return TRUE;
}
#endif
#endif
diff --git a/window.c b/window.c
index eb05197..deb7b0c 100644
--- a/window.c
+++ b/window.c
@@ -22,7 +22,7 @@ int reposition(int f, int n)
n = 0;
curwp->w_force = n;
curwp->w_flag |= WFFORCE;
- return (TRUE);
+ return TRUE;
}
/*
@@ -38,7 +38,7 @@ int redraw(int f, int n)
curwp->w_flag |= WFFORCE;
}
- return (TRUE);
+ return TRUE;
}
/*
@@ -78,7 +78,7 @@ int nextwind(int f, int n)
wp = wp->w_wndp;
} else {
mlwrite("Window number out of range");
- return (FALSE);
+ return FALSE;
}
} else if ((wp = curwp->w_wndp) == NULL)
wp = wheadp;
@@ -86,7 +86,7 @@ int nextwind(int f, int n)
curbp = wp->w_bufp;
cknewwindow();
upmode();
- return (TRUE);
+ return TRUE;
}
/*
@@ -101,7 +101,7 @@ int prevwind(int f, int n)
/* if we have an argument, we mean the nth window from the bottom */
if (f)
- return (nextwind(f, -n));
+ return nextwind(f, -n);
wp1 = wheadp;
wp2 = curwp;
@@ -116,7 +116,7 @@ int prevwind(int f, int n)
curbp = wp1->w_bufp;
cknewwindow();
upmode();
- return (TRUE);
+ return TRUE;
}
/*
@@ -128,7 +128,7 @@ int prevwind(int f, int n)
*/
int mvdnwind(int f, int n)
{
- return (mvupwind(f, -n));
+ return mvupwind(f, -n);
}
/*
@@ -158,7 +158,7 @@ int mvupwind(int f, int n)
for (i = 0; i < curwp->w_ntrows; ++i) {
if (lp == curwp->w_dotp)
- return (TRUE);
+ return TRUE;
if (lp == curbp->b_linep)
break;
lp = lforw(lp);
@@ -172,7 +172,7 @@ int mvupwind(int f, int n)
curwp->w_dotp = lp;
curwp->w_doto = 0;
- return (TRUE);
+ return TRUE;
}
/*
@@ -220,7 +220,7 @@ int onlywind(int f, int n)
curwp->w_ntrows = term.t_nrow - 1;
curwp->w_linep = lp;
curwp->w_flag |= WFMODE | WFHARD;
- return (TRUE);
+ return TRUE;
}
/*
@@ -238,7 +238,7 @@ int delwind(int f, int n)
/* if there is only one window, don't delete it */
if (wheadp->w_wndp == NULL) {
mlwrite("Can not delete this window");
- return (FALSE);
+ return FALSE;
}
/* find window before curwp in linked list */
@@ -262,7 +262,7 @@ int delwind(int f, int n)
wp = wp->w_wndp;
}
if (wp == NULL)
- return (FALSE);
+ return FALSE;
wp->w_toprow = 0;
wp->w_ntrows += target;
} else {
@@ -274,7 +274,7 @@ int delwind(int f, int n)
wp = wp->w_wndp;
}
if (wp == NULL)
- return (FALSE);
+ return FALSE;
wp->w_ntrows += 1 + curwp->w_ntrows;
}
@@ -295,7 +295,7 @@ int delwind(int f, int n)
curbp = wp->w_bufp;
cknewwindow();
upmode();
- return (TRUE);
+ return TRUE;
}
/*
@@ -319,11 +319,11 @@ int splitwind(int f, int n)
if (curwp->w_ntrows < 3) {
mlwrite("Cannot split a %d line window", curwp->w_ntrows);
- return (FALSE);
+ return FALSE;
}
if ((wp = (struct window *)malloc(sizeof(struct window))) == NULL) {
mlwrite("(OUT OF MEMORY)");
- return (FALSE);
+ return FALSE;
}
++curbp->b_nwnd; /* Displayed twice. */
wp->w_bufp = curbp;
@@ -380,7 +380,7 @@ int splitwind(int f, int n)
wp->w_linep = lp; /* if necessary. */
curwp->w_flag |= WFMODE | WFHARD;
wp->w_flag |= WFMODE | WFHARD;
- return (TRUE);
+ return TRUE;
}
/*
@@ -396,10 +396,10 @@ int enlargewind(int f, int n)
int i;
if (n < 0)
- return (shrinkwind(f, -n));
+ return shrinkwind(f, -n);
if (wheadp->w_wndp == NULL) {
mlwrite("Only one window");
- return (FALSE);
+ return FALSE;
}
if ((adjwp = curwp->w_wndp) == NULL) {
adjwp = wheadp;
@@ -408,7 +408,7 @@ int enlargewind(int f, int n)
}
if (adjwp->w_ntrows <= n) {
mlwrite("Impossible change");
- return (FALSE);
+ return FALSE;
}
if (curwp->w_wndp == adjwp) { /* Shrink below. */
lp = adjwp->w_linep;
@@ -432,7 +432,7 @@ int enlargewind(int f, int n)
curwp->w_flag |= WFMODE | WFHARD;
adjwp->w_flag |= WFMODE | WFHARD;
#endif
- return (TRUE);
+ return TRUE;
}
/*
@@ -447,10 +447,10 @@ int shrinkwind(int f, int n)
int i;
if (n < 0)
- return (enlargewind(f, -n));
+ return enlargewind(f, -n);
if (wheadp->w_wndp == NULL) {
mlwrite("Only one window");
- return (FALSE);
+ return FALSE;
}
if ((adjwp = curwp->w_wndp) == NULL) {
adjwp = wheadp;
@@ -459,7 +459,7 @@ int shrinkwind(int f, int n)
}
if (curwp->w_ntrows <= n) {
mlwrite("Impossible change");
- return (FALSE);
+ return FALSE;
}
if (curwp->w_wndp == adjwp) { /* Grow below. */
lp = adjwp->w_linep;
@@ -484,7 +484,7 @@ int shrinkwind(int f, int n)
curwp->w_flag |= WFMODE | WFHARD;
adjwp->w_flag |= WFMODE | WFHARD;
#endif
- return (TRUE);
+ return TRUE;
}
/*
@@ -498,16 +498,16 @@ int resize(int f, int n)
/* must have a non-default argument, else ignore call */
if (f == FALSE)
- return (TRUE);
+ return TRUE;
/* find out what to do */
clines = curwp->w_ntrows;
/* already the right size? */
if (clines == n)
- return (TRUE);
+ return TRUE;
- return (enlargewind(TRUE, n - clines));
+ return enlargewind(TRUE, n - clines);
}
/*
@@ -521,11 +521,11 @@ struct window *wpopup(void)
if (wheadp->w_wndp == NULL /* Only 1 window */
&& splitwind(FALSE, 0) == FALSE) /* and it won't split */
- return (NULL);
+ return NULL;
wp = wheadp; /* Find window to use */
while (wp != NULL && wp == curwp)
wp = wp->w_wndp;
- return (wp);
+ return wp;
}
int scrnextup(int f, int n)
@@ -533,7 +533,7 @@ int scrnextup(int f, int n)
nextwind(FALSE, 1);
backpage(f, n);
prevwind(FALSE, 1);
- return (TRUE);
+ return TRUE;
}
int scrnextdw(int f, int n)
@@ -541,13 +541,13 @@ int scrnextdw(int f, int n)
nextwind(FALSE, 1);
forwpage(f, n);
prevwind(FALSE, 1);
- return (TRUE);
+ return TRUE;
}
int savewnd(int f, int n)
{ /* save ptr to current window */
swindow = curwp;
- return (TRUE);
+ return TRUE;
}
int restwnd(int f, int n)
@@ -561,13 +561,13 @@ int restwnd(int f, int n)
curwp = wp;
curbp = wp->w_bufp;
upmode();
- return (TRUE);
+ return TRUE;
}
wp = wp->w_wndp;
}
mlwrite("(No such window exists)");
- return (FALSE);
+ return FALSE;
}
/*
@@ -590,11 +590,11 @@ int newsize(int f, int n)
/* make sure it's in range */
if (n < 3 || n > term.t_mrow + 1) {
mlwrite("%%Screen size out of range");
- return (FALSE);
+ return FALSE;
}
if (term.t_nrow == n - 1)
- return (TRUE);
+ return TRUE;
else if (term.t_nrow < n - 1) {
/* go to the last window */
@@ -655,7 +655,7 @@ int newsize(int f, int n)
/* screen is garbage */
term.t_nrow = n - 1;
sgarbf = TRUE;
- return (TRUE);
+ return TRUE;
}
/*
@@ -675,7 +675,7 @@ int newwidth(int f, int n)
/* make sure it's in range */
if (n < 10 || n > term.t_mcol) {
mlwrite("%%Screen width out of range");
- return (FALSE);
+ return FALSE;
}
/* otherwise, just re-width it (no big deal) */
@@ -691,7 +691,7 @@ int newwidth(int f, int n)
}
sgarbf = TRUE;
- return (TRUE);
+ return TRUE;
}
int getwpos(void)
@@ -708,7 +708,7 @@ int getwpos(void)
}
/* and return the value */
- return (sline);
+ return sline;
}
void cknewwindow(void)
diff --git a/word.c b/word.c
index 119e4ac..1f318b0 100644
--- a/word.c
+++ b/word.c
@@ -30,7 +30,7 @@ int wrapword(int f, int n)
/* backup from the <NL> 1 char */
if (!backchar(0, 1))
- return (FALSE);
+ return FALSE;
/* back up until we aren't in a word,
make sure there is a break in the line */
@@ -39,28 +39,28 @@ int wrapword(int f, int n)
&& (c != '\t')) {
cnt++;
if (!backchar(0, 1))
- return (FALSE);
+ return FALSE;
/* if we make it to the beginning, start a new line */
if (curwp->w_doto == 0) {
gotoeol(FALSE, 0);
- return (lnewline());
+ return lnewline();
}
}
/* delete the forward white space */
if (!forwdel(0, 1))
- return (FALSE);
+ return FALSE;
/* put in a end of line */
if (!lnewline())
- return (FALSE);
+ return FALSE;
/* and past the first word */
while (cnt-- > 0) {
if (forwchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
}
- return (TRUE);
+ return TRUE;
}
/*
@@ -71,20 +71,20 @@ int wrapword(int f, int n)
int backword(int f, int n)
{
if (n < 0)
- return (forwword(f, -n));
+ return forwword(f, -n);
if (backchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
while (n--) {
while (inword() == FALSE) {
if (backchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
}
while (inword() != FALSE) {
if (backchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
}
}
- return (forwchar(FALSE, 1));
+ return forwchar(FALSE, 1);
}
/*
@@ -94,19 +94,19 @@ int backword(int f, int n)
int forwword(int f, int n)
{
if (n < 0)
- return (backword(f, -n));
+ return backword(f, -n);
while (n--) {
while (inword() == TRUE) {
if (forwchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
}
while (inword() == FALSE) {
if (forwchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
}
}
- return (TRUE);
+ return TRUE;
}
/*
@@ -119,13 +119,13 @@ int upperword(int f, int n)
int c;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if (n < 0)
- return (FALSE);
+ return FALSE;
while (n--) {
while (inword() == FALSE) {
if (forwchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
}
while (inword() != FALSE) {
c = lgetc(curwp->w_dotp, curwp->w_doto);
@@ -139,10 +139,10 @@ int upperword(int f, int n)
lchange(WFHARD);
}
if (forwchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
}
}
- return (TRUE);
+ return TRUE;
}
/*
@@ -155,13 +155,13 @@ int lowerword(int f, int n)
int c;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if (n < 0)
- return (FALSE);
+ return FALSE;
while (n--) {
while (inword() == FALSE) {
if (forwchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
}
while (inword() != FALSE) {
c = lgetc(curwp->w_dotp, curwp->w_doto);
@@ -175,10 +175,10 @@ int lowerword(int f, int n)
lchange(WFHARD);
}
if (forwchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
}
}
- return (TRUE);
+ return TRUE;
}
/*
@@ -192,13 +192,13 @@ int capword(int f, int n)
int c;
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if (n < 0)
- return (FALSE);
+ return FALSE;
while (n--) {
while (inword() == FALSE) {
if (forwchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
}
if (inword() != FALSE) {
c = lgetc(curwp->w_dotp, curwp->w_doto);
@@ -212,7 +212,7 @@ int capword(int f, int n)
lchange(WFHARD);
}
if (forwchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
while (inword() != FALSE) {
c = lgetc(curwp->w_dotp, curwp->w_doto);
#if PKCODE
@@ -226,11 +226,11 @@ int capword(int f, int n)
lchange(WFHARD);
}
if (forwchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
}
}
}
- return (TRUE);
+ return TRUE;
}
/*
@@ -248,11 +248,11 @@ int delfword(int f, int n)
/* don't allow this command if we are in read only mode */
if (curbp->b_mode & MDVIEW)
- return (rdonly());
+ return rdonly();
/* ignore the command if there is a negative argument */
if (n < 0)
- return (FALSE);
+ return FALSE;
/* Clear the kill buffer if last command wasn't a kill */
if ((lastflag & CFKILL) == 0)
@@ -269,7 +269,7 @@ int delfword(int f, int n)
/* get us into a word.... */
while (inword() == FALSE) {
if (forwchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
++size;
}
@@ -277,7 +277,7 @@ int delfword(int f, int n)
/* skip one word, no whitespace! */
while (inword() == TRUE) {
if (forwchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
++size;
}
} else {
@@ -287,14 +287,14 @@ int delfword(int f, int n)
/* if we are at EOL; skip to the beginning of the next */
while (curwp->w_doto == llength(curwp->w_dotp)) {
if (forwchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
++size;
}
/* move forward till we are at the end of the word */
while (inword() == TRUE) {
if (forwchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
++size;
}
@@ -302,7 +302,7 @@ int delfword(int f, int n)
if (n != 0)
while (inword() == FALSE) {
if (forwchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
++size;
}
}
@@ -320,7 +320,7 @@ int delfword(int f, int n)
/* restore the original position and delete the words */
curwp->w_dotp = dotp;
curwp->w_doto = doto;
- return (ldelete(size, TRUE));
+ return ldelete(size, TRUE);
}
/*
@@ -334,11 +334,11 @@ int delbword(int f, int n)
/* don't allow this command if we are in read only mode */
if (curbp->b_mode & MDVIEW)
- return (rdonly());
+ return rdonly();
/* ignore the command if there is a nonpositive argument */
if (n <= 0)
- return (FALSE);
+ return FALSE;
/* Clear the kill buffer if last command wasn't a kill */
if ((lastflag & CFKILL) == 0)
@@ -346,12 +346,12 @@ int delbword(int f, int n)
thisflag |= CFKILL; /* this command is a kill */
if (backchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
size = 0;
while (n--) {
while (inword() == FALSE) {
if (backchar(FALSE, 1) == FALSE)
- return (FALSE);
+ return FALSE;
++size;
}
while (inword() != FALSE) {
@@ -361,8 +361,8 @@ int delbword(int f, int n)
}
}
if (forwchar(FALSE, 1) == FALSE)
- return (FALSE);
- bckdel:return (ldelete(size, TRUE));
+ return FALSE;
+ bckdel:return ldelete(size, TRUE);
}
/*
@@ -374,19 +374,19 @@ int inword(void)
int c;
if (curwp->w_doto == llength(curwp->w_dotp))
- return (FALSE);
+ return FALSE;
c = lgetc(curwp->w_dotp, curwp->w_doto);
#if PKCODE
if (isletter(c))
#else
if (c >= 'a' && c <= 'z')
- return (TRUE);
+ return TRUE;
if (c >= 'A' && c <= 'Z')
#endif
- return (TRUE);
+ return TRUE;
if (c >= '0' && c <= '9')
- return (TRUE);
- return (FALSE);
+ return TRUE;
+ return FALSE;
}
#if WORDPRO
@@ -410,10 +410,10 @@ int fillpara(int f, int n)
char wbuf[NSTRING]; /* buffer for current word */
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if (fillcol == 0) { /* no fill column set */
mlwrite("No fill column set");
- return (FALSE);
+ return FALSE;
}
#if PKCODE
justflag = FALSE;
@@ -484,7 +484,7 @@ int fillpara(int f, int n)
}
/* and add a last newline for the end of our new paragraph */
lnewline();
- return (TRUE);
+ return TRUE;
}
#if PKCODE
@@ -507,17 +507,17 @@ int justpara(int f, int n)
int leftmarg; /* left marginal */
if (curbp->b_mode & MDVIEW) /* don't allow this command if */
- return (rdonly()); /* we are in read only mode */
+ return rdonly(); /* we are in read only mode */
if (fillcol == 0) { /* no fill column set */
mlwrite("No fill column set");
- return (FALSE);
+ return FALSE;
}
justflag = TRUE;
leftmarg = curwp->w_doto;
if (leftmarg + 10 > fillcol) {
leftmarg = 0;
mlwrite("Column too narrow");
- return (FALSE);
+ return FALSE;
}
/* record the pointer to the line just past the EOP */
@@ -593,7 +593,7 @@ int justpara(int f, int n)
curwp->w_doto = llength(curwp->w_dotp);
justflag = FALSE;
- return (TRUE);
+ return TRUE;
}
#endif
@@ -622,12 +622,12 @@ int killpara(int f, int n)
/* and delete it */
if ((status = killregion(FALSE, 1)) != TRUE)
- return (status);
+ return status;
/* and clean up the 2 extra lines */
ldelete(2L, TRUE);
}
- return (TRUE);
+ return TRUE;
}
@@ -655,7 +655,7 @@ int wordcount(int f, int n)
/* make sure we have a region to count */
if ((status = getregion(&region)) != TRUE)
- return (status);
+ return status;
lp = region.r_linep;
offset = region.r_offset;
size = region.r_size;
@@ -701,6 +701,6 @@ int wordcount(int f, int n)
mlwrite("Words %D Chars %D Lines %d Avg chars/word %f",
nwords, nchars, nlines + 1, avgch);
- return (TRUE);
+ return TRUE;
}
#endif