| 612 | } |
| 613 | } |
| 614 | static void iiCallLibProcEnd(idhdl save_ringhdl, ring save_ring) |
| 615 | { |
| 616 | if ((currRing!=NULL) |
| 617 | &&(currRing!=save_ring)) |
| 618 | { |
| 619 | idhdl hh=IDROOT; |
| 620 | idhdl prev=NULL; |
| 621 | while((hh!=currRingHdl) && (hh!=NULL)) { prev=hh; hh=hh->next; } |
| 622 | if ((hh!=NULL)&&(strcmp(IDID(hh)," tmpRing")==0)) |
| 623 | { |
| 624 | rDecRefCnt(currRing); |
| 625 | if (prev==NULL) IDROOT=hh->next; |
| 626 | else prev->next=hh->next; |
| 627 | omFree((ADDRESS)IDID(hh)); |
| 628 | omFreeBin((ADDRESS)hh, idrec_bin); |
| 629 | } |
| 630 | } |
| 631 | currRingHdl=save_ringhdl; |
| 632 | currRing=save_ring; |
| 633 | } |
| 634 | |
| 635 | void* iiCallLibProc1(const char*n, void *arg, int arg_type, BOOLEAN &err) |
| 636 | { |
no test coverage detected