head     1.1;
access   ;
symbols  ;
locks    ; strict;
comment  @# @;


1.1
date     86.03.11.12.46.32;  author root;  state Exp;
branches ;
next     ;


desc
@initial checkin for release 3.04
@



1.1
log
@Initial revision
@
text
@#! /bin/sh
#
# $Header$
#
# $Log$
#
ed - lex.yy.c <<!
/input/s/getc(yyin)/efgetc/
/yylex/+1a
if(pushlex)
	if(pushlex==1)
		{
		pushlex = 2;
		yylval.ival = 0;
		return(EOS);
		}
	else	{
		pushlex = 0;
		if(rket == 2)
			rket = 1;
		else	RETL(prevv,prevl);
		}
if(rket > 0)
	{
	if(rket==1)
		{
		rket = 2;
		RET(RBRACK);
		}
	else	{
		rket = 0;
		RET(EOS);
		}
	}
if(eofneed) return(0);
if(forcerr) return(-1);
.
w
q
!
@
