Added ChPushBack

diff --git a/modules/src/input/inp_pkg.spec b/modules/src/input/inp_pkg.spec
index 69c2248..9e6dee0 100644 (file)
--- 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 da78065..8342beb 100644 (file)
--- 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.