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

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

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

revision 2687 by jpye, Wed Dec 12 06:04:23 2012 UTC revision 2688 by jpye, Mon Mar 4 08:11:49 2013 UTC
# Line 101  void DestroyExtCall(struct ExtCallNode * Line 101  void DestroyExtCall(struct ExtCallNode *
101        len2 = gl_length(branch);        len2 = gl_length(branch);
102        for (c2=len2;c2>=1;c2--) {        for (c2=len2;c2>=1;c2--) {
103      if ( (ptr = (struct Instance *)gl_fetch(branch,c2)) !=NULL)      if ( (ptr = (struct Instance *)gl_fetch(branch,c2)) !=NULL)
104          CONSOLE_DEBUG("Remove relation...");
105        RemoveRelation(ptr,relinst);        RemoveRelation(ptr,relinst);
106        }        }
107        gl_destroy(branch);        gl_destroy(branch);

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

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