utah rcsid 1.3 87/04/17 21:32:02: Oops -- we still want to clobber constant

conversions...

SCCS-vsn: old/pcc/ccom.tahoe/local.c 1.7

diff --git a/usr/src/old/pcc/ccom.tahoe/local.c b/usr/src/old/pcc/ccom.tahoe/local.c
index 1a37876..826f876 100644 (file)
--- a/usr/src/old/pcc/ccom.tahoe/local.c
+++ b/usr/src/old/pcc/ccom.tahoe/local.c
@@ -1,5 +1,5 @@
 #ifndef lint
 #ifndef lint

-static char sccsid[] = "@(#)local.c    1.6 (Berkeley) %G%";
+static char sccsid[] = "@(#)local.c    1.7 (Berkeley) %G%";

 #endif
 
 # include "pass1.h"
 #endif
 
 # include "pass1.h"


@@ -145,10 +145,12 @@ clocal(p) register NODE *p; {
 #ifdef notdef
                else if (tlen(p) == tlen(p->in.left))
                        goto inherit;
 #ifdef notdef
                else if (tlen(p) == tlen(p->in.left))
                        goto inherit;

+#else
+               else break;
+#endif

                /* clobber conversion */
                p->in.op = FREE;
                return( p->in.left );  /* conversion gets clobbered */
                /* clobber conversion */
                p->in.op = FREE;
                return( p->in.left );  /* conversion gets clobbered */

-#endif

                break;
 
        case QUEST:     /* the right side should be COLON */
                break;
 
        case QUEST:     /* the right side should be COLON */