MCPcopy Create free account
hub / github.com/Singular/Singular / iiCallLibProcBegin

Function iiCallLibProcBegin

Singular/iplib.cc:597–613  ·  view source on GitHub ↗

Source from the content-addressed store, hash-verified

595 return FALSE;
596}
597static void iiCallLibProcBegin()
598{
599 idhdl tmp_ring=NULL;
600 if (currRing!=NULL)
601 {
602 if ((currRingHdl!=NULL) && (IDRING(currRingHdl)!=currRing))
603 {
604 // clean up things depending on currRingHdl:
605 sLastPrinted.CleanUp(IDRING(currRingHdl));
606 sLastPrinted.Init();
607 }
608 // need to define a ring-hdl for currRingHdl
609 tmp_ring=enterid(" tmpRing",myynest,RING_CMD,&IDROOT,FALSE);
610 IDRING(tmp_ring)=rIncRefCnt(currRing);
611 rSetHdl(tmp_ring);
612 }
613}
614static void iiCallLibProcEnd(idhdl save_ringhdl, ring save_ring)
615{
616 if ((currRing!=NULL)

Callers 2

iiCallLibProc1Function · 0.85
ii_CallLibProcMFunction · 0.85

Calls 5

enteridFunction · 0.85
rIncRefCntFunction · 0.85
rSetHdlFunction · 0.85
CleanUpMethod · 0.80
InitMethod · 0.45

Tested by

no test coverage detected