Bell 32V development

[unix-history] / usr / src / cmd / ratfor / r1.c

diff --git a/usr/src/cmd/ratfor/r1.c b/usr/src/cmd/ratfor/r1.c
index 2f1d7a5..b43b8c0 100644 (file)
--- a/usr/src/cmd/ratfor/r1.c
+++ b/usr/src/cmd/ratfor/r1.c
@@ -251,7 +251,6 @@ forstat(p1) int p1; {
                outcode(bp);
                outdon();
        }
                outcode(bp);
                outdon();
        }

-       transfer = 0;

        outgoto(p1);
        indent--;
        putcom("endfor");
        outgoto(p1);
        indent--;
        putcom("endfor");