/[ascend]/trunk/ascend/compiler/linkinst.c
ViewVC logotype

Diff of /trunk/ascend/compiler/linkinst.c

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

revision 2687 by jpye, Wed Dec 12 12:39:25 2012 UTC revision 2688 by jpye, Mon Mar 4 08:11:49 2013 UTC
# Line 76  void ChangeRelationPointers(struct Insta Line 76  void ChangeRelationPointers(struct Insta
76    assert(rel!=NULL);    assert(rel!=NULL);
77    assert(rel->t==REL_INST);    assert(rel->t==REL_INST);
78    AssertMemory(rel);    AssertMemory(rel);
 #if 0  
   char *temp;  
 #endif  
79    if (RELN_INST(rel)->ptr!=NULL) {    if (RELN_INST(rel)->ptr!=NULL) {
80      /* FIXME: ChangeRelationPointers needs verification. all rel types have the rel->varlist that needs repair, then each rel type has specifics to fix up. */      /* FIXME: ChangeRelationPointers needs verification. all rel types have the rel->varlist that needs repair, then each rel type has specifics to fix up. */
81      switch (RELN_INST(rel)->type) {      switch (RELN_INST(rel)->type) {
# Line 89  void ChangeRelationPointers(struct Insta Line 86  void ChangeRelationPointers(struct Insta
86        ModifyGlassBoxRelPointers(rel,RELN_INST(rel)->ptr,old,new);        ModifyGlassBoxRelPointers(rel,RELN_INST(rel)->ptr,old,new);
87        return;        return;
88      case e_blackbox:      case e_blackbox:
89  #if 0  #if 1
90        temp = WriteInstanceNameString(old,NULL);        CONSOLE_DEBUG("MODIFY BLACK BOX POINTERS on rel = %p: old instance %p new %p",rel,old,new);
       CONSOLE_DEBUG("MODIFY BLACK BOX POINTERS old = '%s'",temp);  
       ASC_FREE(temp);  
91  #endif  #endif
92        ModifyBlackBoxRelPointers(rel,RELN_INST(rel)->ptr,old,new);        ModifyBlackBoxRelPointers(rel,RELN_INST(rel)->ptr,old,new);
93        return;        return;

Legend:
Removed from v.2687  
changed lines
  Added in v.2688

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