Added ChPushBack

modules/src/input/inp_pkg.spec

@@ -20,6 +20,7 @@
 
 #define	LoadChar(dest)	((dest = *_ipp++) || (dest = loadbuf()))
 #define	PushBack()	(--_ipp)
+#define ChPushBack(ch)	(*--_ipp = (ch))
 
 /*	EOF may be defined as -1 in most programs but the character -1 may
 	be expanded to the int -1 which causes troubles at the indexing in

modules/src/input/input.3

@@ -10,6 +10,10 @@ module for compilers
 .PP
 .B PushBack()
 .PP
+.B ChPushBack(ch)
+.br
+.B int ch;
+.PP
 .B int InsertFile(filename, table, result)
 .br
 .B char *filename;
@@ -94,6 +98,9 @@ which is defined in \fIinp_pkg.spec\fR, is returned.
 The macro \fIPushBack\fR pushes the last character read back onto the
 input stream.
 .PP
+The macro \fIChPushBack\fR inserts the character \fIch\fP into the
+input stream.
+.PP
 The routine \fIInsertFile\fR suspends input from the current input stream.
 The next input characters will be obtained from the specified file
 \fIfilename\fR.