===================================================================
RCS file: /cvsrepo/anoncvs/cvs/src/usr.bin/awk/main.c,v
retrieving revision 1.6
retrieving revision 1.7
diff -c -r1.6 -r1.7
*** src/usr.bin/awk/main.c	1999/04/18 17:06:30	1.6
--- src/usr.bin/awk/main.c	1999/04/20 17:31:30	1.7
***************
*** 1,4 ****
! /*	$OpenBSD: main.c,v 1.6 1999/04/18 17:06:30 millert Exp $	*/
  /****************************************************************
  Copyright (C) Lucent Technologies 1997
  All Rights Reserved
--- 1,4 ----
! /*	$OpenBSD: main.c,v 1.7 1999/04/20 17:31:30 millert Exp $	*/
  /****************************************************************
  Copyright (C) Lucent Technologies 1997
  All Rights Reserved
***************
*** 23,29 ****
  THIS SOFTWARE.
  ****************************************************************/
  
! char	*version = "version 990305";
  
  #define DEBUG
  #include <stdio.h>
--- 23,29 ----
  THIS SOFTWARE.
  ****************************************************************/
  
! char	*version = "version 19990416";
  
  #define DEBUG
  #include <stdio.h>
***************
*** 182,187 ****
--- 182,188 ----
  				yyin = stdin;
  			else if ((yyin = fopen(pfile[curpfile], "r")) == NULL)
  				ERROR "can't open file %s", pfile[curpfile] FATAL;
+ 			lineno = 1;
  		}
  		if ((c = getc(yyin)) != EOF)
  			return c;
***************
*** 190,193 ****
--- 191,202 ----
  		yyin = NULL;
  		curpfile++;
  	}
+ }
+ 
+ char *cursource(void)	/* current source file name */
+ {
+ 	if (npfile > 0)
+ 		return pfile[curpfile];
+ 	else
+ 		return NULL;
  }