RCS header

changed display style of non-printings from ^x to \0xx

1 files changed, 9 insertions, 8 deletions

diff --git a/yylex.c b/yylex.c
index 8e26254..cebf756 100644
--- a/yylex.c
+++ b/yylex.c
@@ -1,8 +1,5 @@
 /* yylex - scanner front-end for flex */
 
-#include "flexdef.h"
-#include "parse.h"
-
 /*
  * Copyright (c) 1987, the University of California
  * 
@@ -15,6 +12,14 @@
  * public, are made available for use by anyone.
  */
 
+#include "flexdef.h"
+#include "parse.h"
+
+#ifndef lint
+static char rcsid[] =
+    "@(#) $Header$ (LBL)";
+#endif
+
 /* yylex - scan for a regular expression token
  *
  * synopsis
@@ -183,12 +188,8 @@ int yylex()
 		    case 29:
 		    case 30:
 		    case 31:
-			fprintf( stderr, "^%c", 'A' + yylval - 1 );
-			break;
-
 		    case 127:
-			(void) putc( '^', stderr );
-			(void) putc( '@', stderr );
+			fprintf( stderr, "\\%.3o", yylval );
 			break;
 
 		    default: