/[ascend]/trunk/base/generic/compiler/visitinst.c
ViewVC logotype

Diff of /trunk/base/generic/compiler/visitinst.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 187 by johnpye, Wed Nov 30 05:53:20 2005 UTC revision 188 by johnpye, Mon Jan 16 07:47:02 2006 UTC
# Line 443  static void SlowVisitTree(struct Instanc Line 443  static void SlowVisitTree(struct Instanc
443          }          }
444        }        }
445        if (nullchildren) {        if (nullchildren) {
446          FPRINTF(ASCERR,"Found %u NULL children of ",nullchildren);          error_reporter_start(ASC_PROG_ERR,__FILE__,__LINE__);
447            FPRINTF(ASCERR,"Found %u NULL children of '",nullchildren);
448          WriteInstanceName(ASCERR,inst,NULL);          WriteInstanceName(ASCERR,inst,NULL);
449          FPRINTF(ASCERR,".\n");          FPRINTF(ASCERR,"'.\n");
450            error_reporter_end_flush();
451        }        }
452      }      }
453      if (depth) (*proc)(inst);       /* Apply on way up, if bottom up.*/      if (depth) (*proc)(inst);       /* Apply on way up, if bottom up.*/

Legend:
Removed from v.187  
changed lines
  Added in v.188

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22