{ Copyright (C) 1981 by Bell Laboratories, Inc., and Whitesmiths Ltd. } { editvar -- variables for edit } var buf : array [0..MAXLINES] of buftype; line1 : integer; { first line number } line2 : integer; { second line number } nlines : integer; { # of line numbers specified } curln : integer; { current line -- value of dot } lastln : integer; { last line -- value of $ } pat : string; { pattern } lin : string; { input line } savefile : string; { remembered file name }