Clear aliases and evals on error in btoeof

SCCS-vsn: bin/csh/lex.c 5.21

diff --git a/usr/src/bin/csh/lex.c b/usr/src/bin/csh/lex.c
index dcc9d43..ab9f46e 100644 (file)
--- a/usr/src/bin/csh/lex.c
+++ b/usr/src/bin/csh/lex.c
@@ -6,7 +6,7 @@
  */
 
 #ifndef lint
  */
 
 #ifndef lint

-static char sccsid[] = "@(#)lex.c      5.20 (Berkeley) %G%";
+static char sccsid[] = "@(#)lex.c      5.21 (Berkeley) %G%";

 #endif /* not lint */
 
 #include <sys/types.h>
 #endif /* not lint */
 
 #include <sys/types.h>


@@ -1519,7 +1519,12 @@ void
 btoeof()
 {
     (void) lseek(SHIN, (off_t) 0, L_XTND);
 btoeof()
 {
     (void) lseek(SHIN, (off_t) 0, L_XTND);

+    aret = F_SEEK;

     fseekp = feobp;
     fseekp = feobp;

+    alvec = NULL;
+    alvecp = NULL;
+    evalvec = NULL;
+    evalp = NULL;

     wfree();
     bfree();
 }
     wfree();
     bfree();
 }