OpenCores
URL https://opencores.org/ocsvn/System09/System09/trunk

Subversion Repositories System09

[/] [System09/] [trunk/] [Tools/] [as09/] [output.c] - Diff between revs 74 and 83

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 74 Rev 83
/*
/*
 *  stable --- prints the symbol table in alphabetical order
 *  stable --- prints the symbol table in alphabetical order
 */
 */
stable(ptr)
stable(ptr)
 
 
struct nlist *ptr;
struct nlist *ptr;
{
{
  if (ptr != NULL)
  if (ptr != NULL)
    {
    {
      stable (ptr->Lnext);
      stable (ptr->Lnext);
        printf ("%-10s %04X\n",ptr->name,ptr->def);
        printf ("%-10s %04X\n",ptr->name,ptr->def);
      stable (ptr->Rnext);
      stable (ptr->Rnext);
    }
    }
}
}
/*
/*
 *  cross  --  prints the cross reference table
 *  cross  --  prints the cross reference table
 */
 */
cross(point)
cross(point)
 
 
struct nlist *point;
struct nlist *point;
{
{
struct link *tp;
struct link *tp;
int i = 1;
int i = 1;
  if (point != NULL)
  if (point != NULL)
    {
    {
      cross (point->Lnext);
      cross (point->Lnext);
        printf ("%-10s %04X *",point->name,point->def);
        printf ("%-10s %04X *",point->name,point->def);
         tp = point->L_list;
         tp = point->L_list;
          while (tp != NULL)
          while (tp != NULL)
           {
           {
             if (i++>10)
             if (i++>10)
              {
              {
               i=1;
               i=1;
               printf("\n                      ");
               printf("\n                      ");
              }
              }
              printf ("%04d ",tp->L_num);
              printf ("%04d ",tp->L_num);
               tp = tp->next;
               tp = tp->next;
           }
           }
         printf ("\n");
         printf ("\n");
      cross (point->Rnext);
      cross (point->Rnext);
    }
    }
}
}
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.