diff --git a/modules/src/input/inp_pkg.spec b/modules/src/input/inp_pkg.spec
index 69c2248e6..9e6dee060 100644
--- a/modules/src/input/inp_pkg.spec
+++ b/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
diff --git a/modules/src/input/input.3 b/modules/src/input/input.3
index da7806527..8342beb75 100644
--- a/modules/src/input/input.3
+++ b/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.