BSD 4_3_Tahoe release

[unix-history] / usr / src / ucb / pascal / pxp / pp.c

diff --git a/usr/src/ucb/pascal/pxp/pp.c b/usr/src/ucb/pascal/pxp/pp.c
index 1efed06..a87752a 100644 (file)
--- a/usr/src/ucb/pascal/pxp/pp.c
+++ b/usr/src/ucb/pascal/pxp/pp.c
@@ -5,7 +5,7 @@
  */
 
 #ifndef lint
  */
 
 #ifndef lint

-static char sccsid[] = "@(#)pp.c       5.1 (Berkeley) 6/5/85";
+static char sccsid[] = "@(#)pp.c       5.3 (Berkeley) 10/16/87";

 #endif not lint
 
 /*
 #endif not lint
 
 /*


@@ -235,7 +235,7 @@ indent1(in)
        if (profile == 0)
                while (i >= 8) {
                        putchar('\t');
        if (profile == 0)
                while (i >= 8) {
                        putchar('\t');

-                       i =- 8;
+                       i -= 8;

                }
        while (i > 0) {
                putchar(' ');
                }
        while (i > 0) {
                putchar(' ');


@@ -284,13 +284,13 @@ ppnumb(s)
 ppgoin(lv)
 {
 
 ppgoin(lv)
 {
 

-       pplev[lv] =+ unit;
+       pplev[lv] += unit;

 }
 
 ppgoout(lv)
 {
 
 }
 
 ppgoout(lv)
 {
 

-       pplev[lv] =- unit;
+       pplev[lv] -= unit;

        if (pplev[lv] < 0)
                panic("pplev");
 }
        if (pplev[lv] < 0)
                panic("pplev");
 }


@@ -344,8 +344,8 @@ putchar(c)
                        flush();
                        break;
                case '\t':
                        flush();
                        break;
                case '\t':

-                       outcol =+ 8;
-                       outcol =& ~07;
+                       outcol += 8;
+                       outcol &= ~07;

                        break;
                case '\b':
                        if (outcol)
                        break;
                case '\b':
                        if (outcol)


@@ -376,7 +376,7 @@ pptab()
 /*
        if (outcol > i + 8) {
                ppnl();
 /*
        if (outcol > i + 8) {
                ppnl();

-               i =+ 8;
+               i += 8;

        }
 */
        do
        }
 */
        do