/*----->*	getlin.com	-line buffer for input files.
	*/
common /getlin/ptr,lun,buf
integer ptr		#pointer to current character position
integer	lun		#current logical unit number
byte buf(INBUFSIZE)	#buffer containing line