SCCS-vsn: bin/csh/lex.c 5.12
SCCS-vsn: bin/csh/csh.c 5.22
SCCS-vsn: bin/csh/csh.h 5.12
SCCS-vsn: bin/csh/misc.c 5.8
#endif /* not lint */
#ifndef lint
#endif /* not lint */
#ifndef lint
-static char sccsid[] = "@(#)csh.c 5.21 (Berkeley) %G%";
+static char sccsid[] = "@(#)csh.c 5.22 (Berkeley) %G%";
#endif /* not lint */
#include "sh.h"
#endif /* not lint */
#include "sh.h"
*/
if (loginsh || intact || intty && isatty(SHOUT))
setintr = 1;
*/
if (loginsh || intact || intty && isatty(SHOUT))
setintr = 1;
/*
* Save the remaining arguments in argv.
*/
/*
* Save the remaining arguments in argv.
*/
int oonelflg = onelflg;
bool oenterhist = enterhist;
char OHIST = HIST;
int oonelflg = onelflg;
bool oenterhist = enterhist;
char OHIST = HIST;
struct Bin saveB;
sigmask_t omask;
struct Bin saveB;
sigmask_t omask;
*/
if (setintr)
(void) sigsetmask(omask);
*/
if (setintr)
(void) sigsetmask(omask);
if ((my_reenter = setexit()) == 0)
process(0); /* 0 -> blow away on errors */
if ((my_reenter = setexit()) == 0)
process(0); /* 0 -> blow away on errors */
if (enterhist)
HIST = OHIST;
enterhist = oenterhist;
if (enterhist)
HIST = OHIST;
enterhist = oenterhist;
*
* %sccs.include.redist.c%
*
*
* %sccs.include.redist.c%
*
- * @(#)csh.h 5.11 (Berkeley) %G%
+ * @(#)csh.h 5.12 (Berkeley) %G%
bool cantell; /* Is current source tellable ? */
bool cantell; /* Is current source tellable ? */
/*
* Input lines are parsed into doubly linked circular
* lists of words of the following form.
/*
* Input lines are parsed into doubly linked circular
* lists of words of the following form.
-static char sccsid[] = "@(#)lex.c 5.11 (Berkeley) %G%";
+static char sccsid[] = "@(#)lex.c 5.12 (Berkeley) %G%";
#endif
char tbuf[BUFSIZ + 1];
#endif
char tbuf[BUFSIZ + 1];
if (cantell) {
if (fseekp < fbobp || fseekp > feobp) {
fbobp = feobp = fseekp;
if (cantell) {
if (fseekp < fbobp || fseekp > feobp) {
fbobp = feobp = fseekp;
again:
buf = (int) fseekp / BUFSIZ;
again:
buf = (int) fseekp / BUFSIZ;
if (whyles)
return;
sb = (int) (fseekp - 1) / BUFSIZ;
if (whyles)
return;
sb = (int) (fseekp - 1) / BUFSIZ;
-#ifdef notdef
- register struct whyle *wp;
-
-#endif
+#ifdef notdef
+ register struct whyle *wp;
if (!whyles)
return;
#ifdef notdef
/*
* Christos: I don't understand this? both wp and l are local. What is
* this used for? I suspect the author meant fseek = wp->w_start
if (!whyles)
return;
#ifdef notdef
/*
* Christos: I don't understand this? both wp and l are local. What is
* this used for? I suspect the author meant fseek = wp->w_start
+ * This seek/tell stuff needs to be re-written...
*/
for (wp = whyles; wp->w_next; wp = wp->w_next)
continue;
if (wp->w_start > l)
l = wp->w_start;
#endif
*/
for (wp = whyles; wp->w_next; wp = wp->w_next)
continue;
if (wp->w_start > l)
l = wp->w_start;
#endif
}
/* any similarity to bell telephone is purely accidental */
}
/* any similarity to bell telephone is purely accidental */
fseekp = fbobp = feobp = lseek(SHIN, (off_t) 0, L_INCR);
cantell = 1;
}
fseekp = fbobp = feobp = lseek(SHIN, (off_t) 0, L_INCR);
cantell = 1;
}
-static char sccsid[] = "@(#)misc.c 5.7 (Berkeley) %G%";
+static char sccsid[] = "@(#)misc.c 5.8 (Berkeley) %G%";
#endif /* not lint */
#include "sh.h"
#endif /* not lint */
#include "sh.h"
char *
strstr(s, t)
register char *s, *t;
char *
strstr(s, t)
register char *s, *t;
#ifndef SHORT_STRINGS
char *
#ifndef SHORT_STRINGS
char *