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

Subversion Repositories sc2v

[/] [sc2v/] [trunk/] [src/] [sc2v_step2.c] - Diff between revs 20 and 22

Go to most recent revision | Show entire file | Details | Blame | View Log

Rev 20 Rev 22
Line 132... Line 132...
  );
  );
  return;
  return;
}
}
 
 
void
void
RegOutputs (PortNode * list)
RegOutputs (PortNode * list, InstanceNode *instances)
{
{
 
 
  PortNode *pll;
  PortNode *pll;
  SGLIB_LIST_MAP_ON_ELEMENTS (PortNode, list, pll, next,
  SGLIB_LIST_MAP_ON_ELEMENTS (PortNode, list, pll, next,
  {
  {
        if (strcmp (pll->tipo, "output") == 0)
        if (strcmp (pll->tipo, "output") == 0)
        {
        {
 
         if(!IsWire(pll->name,instances)){
          printf ("reg ");
          printf ("reg ");
          if (pll->size != 0 && pll->size != 1)
          if (pll->size != 0 && pll->size != 1)
          {
          {
            printf ("[%d:0] ", (-1 + pll->size));}
            printf ("[%d:0] ", (-1 + pll->size));}
            printf ("%s;\n", pll->name);}
            printf ("%s;\n", pll->name);}
          }
          }
 
         }
  );
  );
  return;
  return;
}
}
 
 
void
void
Line 436... Line 438...
{
{
 
 
  EnumeratesNode *ell;
  EnumeratesNode *ell;
  int i = 0;
  int i = 0;
 
 
  SGLIB_LIST_REVERSE(EnumeratesNode, list, next);
 
 
 
  printf ("parameter  %s = 0", list->name);
  printf ("parameter  %s = 0", list->name);
 
 
  if(list->next!=NULL)
 
    list=list->next;
 
 
 
  if(list->next!=NULL){
  if(list->next!=NULL){
 
    list=list->next;
        printf(",\n");
        printf(",\n");
        i=1;
        i=1;
    SGLIB_LIST_MAP_ON_ELEMENTS (EnumeratesNode,list, ell,next,
    SGLIB_LIST_MAP_ON_ELEMENTS (EnumeratesNode,list, ell,next,
    {
    {
      if(ell->next==NULL)
      if(ell->next==NULL)

powered by: WebSVN 2.1.0

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