code review 4633043: 8l/ld: Further adjustments for a port of Go to Plan 9 n...

src/cmd/8l/pass.c

 // Inferno utils/8l/pass.c
 // http://code.google.com/p/inferno-os/source/browse/utils/8l/pass.c
 //
 //      Copyright © 1994-1999 Lucent Technologies Inc.  All rights reserved.
 //      Portions Copyright © 1995-1997 C H Forsyth (forsyth@terzarima.net)
 //      Portions Copyright © 1997-1999 Vita Nuova Limited
 //      Portions Copyright © 2000-2007 Vita Nuova Holdings Limited (www.vitanuova.com)
 //      Portions Copyright © 2004,2006 Bruce Ellis
 //      Portions Copyright © 2005-2007 C H Forsyth (forsyth@terzarima.net)
 //      Revisions Copyright © 2000-2007 Lucent Technologies Inc. and others
@@ skipping 396 matching lines @@
         for(cursym = textp; cursym != nil; cursym = cursym->next) {
                 if(cursym->text == nil || cursym->text->link == nil)
                         continue;
 
                 p = cursym->text;
                 autoffset = p->to.offset;
                 if(autoffset < 0)
                         autoffset = 0;
 
                 q = P;
-                q1 = P;
                 if(pmorestack != P)
                 if(!(p->from.scale & NOSPLIT)) {
                         p = appendp(p); // load g into CX
                         switch(HEADTYPE) {
                         case Hwindows:
                                 p->as = AMOVL;
                                 p->from.type = D_INDIR+D_FS;
                                 p->from.offset = 0x2c;
                                 p->to.type = D_CX;
 
@@ skipping 221 matching lines @@
                 } else
                         while(*s >= '0' && *s <= '7')
                                 n = n*8 + *s++ - '0';
         } else
                 while(*s >= '0' && *s <= '9')
                         n = n*10 + *s++ - '0';
         if(f)
                 n = -n;
         return n;
 }