Example #1
0
File: astree.c Project: mtnash/oc
static void dump_astree_rec (FILE *outfile, astree root, int depth) {
   astree child = NULL;
   if (root == NULL) return;
   assert (is_astree (root));
   //fprintf (outfile, "%*s%s ", depth * 3, "", root->lexinfo);
   dump_node (outfile, root, depth);
   fprintf (outfile, "\n");
   for (child = root->first; child != NULL; child = child->next) {
      dump_astree_rec (outfile, child, depth + 1);
   }
}
Example #2
0
static void dump_astree_rec (FILE* outfile, astree* root,
                             int depth) {
   if (root == NULL) return;
   dump_node (outfile, root);
   fprintf (outfile, "\n");
   for (size_t child = 0; child < root->children.size();
        ++child) {
      dump_astree_rec (outfile, root->children[child],
                       depth + 1);
   }
}
Example #3
0
static void dump_astree_rec (FILE *outfile, astree root, int depth) {
   astree child = NULL;
   if (root == NULL) return;
   assert (is_astree (root));
   const char *tname = get_yytname(root->symbol);
   if (strstr (tname, "TOK_") == tname) tname += 4;
   if(depth == 0){
   fprintf (outfile, "%*s%s \"%s\" %d.%d.%03d ", depth * 3, "",
    tname, root->lexinfo, root->filenr, root->linenr, root->offset);
   }
   else{
     int i;
     for(i =0 ; i < depth; ++i){
         fprintf(outfile, "%*s ", 1, "|");
     }
     fprintf (outfile, "%s \"%s\" %d.%d.%03d ", tname, root->lexinfo,
              root->filenr, root->linenr, root->offset);
   }
//   dump_node (outfile, root, depth);
   fprintf (outfile, "\n");
   for (child = root->first; child != NULL; child = child->next) {
      dump_astree_rec (outfile, child, depth + 1);
   }
}
Example #4
0
void dump_astree (FILE* outfile, astree* root) {
   dump_astree_rec (outfile, root, 0);
   fflush (NULL);
}