Quick Search:

Mode

Context

Displaying 3 lines of context. None | Less | More | Full

Other Diffs

Ignore

Blank Lines Whitespace: Expand:

Diff

1.157
 
1.158
 
MAIN:ragge:20070207174637
 
pftn.c
_>359359          */
 360360         if (blevel == slev || class == EXTERN || class == FORTRAN ||
 361361             class == UFORTRAN) {
<>362 -                uerror("redeclaration of %s", p->sname);
 363 -                return;
  362+                if (ISSTR(class) && !ISSTR(p->sclass)) {
  363+                        uerror("redeclaration of %s", p->sname);
  364+                        return;
  365+                }
364366         }
 365367         q->n_sp = p = hide(p);
 366368 
     
 !
14411443                 p = l;
 14421444         }
 14431445 
<>1444 -        if (p && p->n_op == TYPE) {
  1446+ag:     if (p && p->n_op == TYPE) {
14451447                 if (p->n_left == NIL) {
 14461448 #ifdef CHAR_UNSIGNED
 14471449                         if (p->n_type == CHAR)
     
 !
14521454 uni:                    p->n_lval = class;
 14531455                         p->n_qual = qual >> TSHIFT;
 14541456                         return p;
<> 1457+                } else if (p->n_left->n_op == QUALIFIER) {
  1458+                        qual |= p->n_left->n_type;
  1459+                        l = p->n_left;
  1460+                        p->n_left = l->n_left;
  1461+                        nfree(l);
  1462+                        goto ag;
<_14551463                 } else if (ISSTR(p->n_type)) {
 14561464                         /* Save node; needed for return */
 14571465                         sp = p;
FishEye: Open Source License registered to PCC.
Your maintenance has expired. You can renew your license at http://www.atlassian.com/fisheye/renew
Atlassian FishEye, CVS analysis. (Version:1.6.3 Build:build-336 2008-11-04) - Administration - Page generated 2014-10-02 16:36 +0200