39 static Drauing *currentDr= 0;  /* Drauing from GdNewDrawing or GdGetDrawing */  variable
181   if (!currentDr) return 1;  in GdLandscape()
183   if (currentDr->landscape!=landscape) {  in GdLandscape()
184     currentDr->landscape= landscape;  in GdLandscape()
185     GdDetach(currentDr, 0);  in GdLandscape()
193     drawing= currentDr;  in GdKillDrawing()
207   if (drawing==currentDr) currentDr= 0;  in GdKillDrawing()
216   if (!currentDr) return;  in GdKillSystems()
217   ClearDrawing(currentDr);  in GdKillSystems()
218   Gd_KillRing(currentDr->systems);  in GdKillSystems()
219   currentDr->systems= 0;  in GdKillSystems()
220   currentDr->nSystems= 0;  in GdKillSystems()
229     Drauing *tmpDr= currentDr;  in GdSetDrawing()
233     currentDr= saveDr;   saveDr= tmpDr;  in GdSetDrawing()
240   saveDr= currentDr;  in GdSetDrawing()
245   currentDr= drawing;  in GdSetDrawing()
276   if (!drawing) drawing= currentDr;  in GdClear()
301   if (drawing==currentDr) {  in ClearDrawing()
342   if (!currentDr) return;  in Damage()
360   if (currentDr->damaged) {  in Damage()
361     GpSwallow(&currentDr->damage, box);  in Damage()
363     currentDr->damage= *box;  in Damage()
364     currentDr->damaged= 1;  in Damage()
598   if (!currentDr) return 1;  in GdDraw()
606   if (currentDr->cleared==1) {  in GdDraw()
608     else ClearDrawing(currentDr);  in GdDraw()
610   if (!changesOnly || currentDr->cleared) {  in GdDraw()
612     currentDr->cleared= 0;  in GdDraw()
616   if (currentDr->systems) {  in GdDraw()
619     sys= sys0= currentDr->systems;  in GdDraw()
630   if (currentDr->damaged) {  in GdDraw()
631     damage= &currentDr->damage;  in GdDraw()
632     currentDr->damaged= 0;  in GdDraw()
638   if (!GdBeginDr(currentDr, damage, currentDr->landscape) && changesOnly)  in GdDraw()
642   if (currentDr->systems) {  in GdDraw()
644     sys= sys0= currentDr->systems;  in GdDraw()
656   value|= Gd_DrawRing(currentDr->elements, 0, 0, (GeSystem *)0, 0);  in GdDraw()
671   if (!currentDr || nchars<0) return 1;  in GdLegendBox()
672   lbox= currentDr->legends;  in GdLegendBox()
878   if (!currentDr) return 1;  in GdDrawLegends()
883     lbox= &currentDr->legends[type];  in GdDrawLegends()
891       more= BuildLegends(more, type, currentDr->systems, currentDr->elements,  in GdDrawLegends()
914   if (currentDr)  in MemoryError()
963   Drauing *drawing= currentDr;  in GeAddElement()
1026   if (currentDr->cleared==1) ClearDrawing(currentDr);  in GeGetMesh()
1119   el= currentDr? p_malloc(sizeof(GeLines)) : 0;  in GdLines()
1160   el= currentDr? p_malloc(sizeof(GeDisjoint)) : 0;  in GdDisjoint()
1201   GeText *el= currentDr? p_malloc(sizeof(GeText)) : 0;  in GdText()
1224   if (currentDr->cleared==1) ClearDrawing(currentDr); /* else currentSy */  in GdText()
1246   GeCells *el= currentDr? p_malloc(sizeof(GeCells)) : 0;  in GdCells()
1299   el= currentDr? p_malloc(sizeof(GePolys)) : 0;  in GdFill()
1359   GeMesh *el= currentDr? p_malloc(sizeof(GeMesh)) : 0;  in GdMesh()
1391   GeFill *el= currentDr? p_malloc(sizeof(GeFill)) : 0;  in GdFillMesh()
1451   GeVectors *el= currentDr? p_malloc(sizeof(GeVectors)) : 0;  in GdVectors()
1514         el= currentDr? p_malloc(sizeof(GeLines)) : 0;  in Gd_MakeContours()
1534         el->el.number= con->el.number= currentDr->nElements++;  in Gd_MakeContours()
1564   GeContours *el= currentDr? p_malloc(sizeof(GeContours)) : 0;  in GdContours()
1705   if (!currentDr) return -1;  in GdNewSystem()
1708   if (currentDr->cleared!=2) ClearDrawing(currentDr);  in GdNewSystem()
1709   sysIndex= currentDr->nSystems+1;  in GdNewSystem()
1721     GdElement *prev= currentDr->systems->el.prev;  in GdNewSystem()
1724     sys->el.next= &currentDr->systems->el;  in GdNewSystem()
1725     currentDr->systems->el.prev= &sys->el;  in GdNewSystem()
1728     currentDr->systems= sys;  in GdNewSystem()
1731   currentDr->nSystems++;  in GdNewSystem()
1771   if (!currentDr) return -1;  in GdGetSystem()
1772   if (!currentDr->systems || !currentSy) return 0;  in GdGetSystem()
1775   if (currentDr->cleared==1) ClearDrawing(currentDr);  in GdGetSystem()
1777   sys= sys0= (GdElement *)currentDr->systems;  in GdGetSystem()
1790   if (!currentDr || !currentDr->systems) return E_NONE;  in GdSetSystem()
1793   if (currentDr->cleared==1) ClearDrawing(currentDr);  in GdSetSystem()
1805   sys= currentDr->systems;  in GdSetSystem()
1826   if (!currentDr) return E_NONE;  in GdSetElement()
1828   el= currentSy? currentSy->elements : currentDr->elements;  in GdSetElement()
1859   if (!currentDr || !currentEl || currentEl->ops->type!=E_CONTOURS)  in GdSetContour()
1878   if (!currentDr) return -1;  in GeFindIndex()
1880   el= sys? sys->elements : currentDr->elements;  in GeFindIndex()
1904   if (!currentDr) return -1;  in GdFindSystem()
1907   sys= currentDr->systems;  in GdFindSystem()
1922   if (!currentDr || !currentSy) return 1;  in GdAltTick()
1935   if (!currentDr || !el) return 1;  in GdEdit()
1966   if (!currentDr || !el || currentCn>=0) return 1;  in GdRemove()
1996   } else if (el==currentDr->elements) {  in GdRemove()
1997     if (el->next==el) currentDr->elements= 0;  in GdRemove()
1998     else currentDr->elements= el->next;  in GdRemove()
2008   if (!currentDr || !currentSy) return 1;  in GdGetLimits()
2034   if (!currentDr || !currentSy) return 1;  in GdSetLimits()
2080   if (!currentDr || !currentSy) return 1;  in GdSaveLimits()
2089   if (!currentDr || !currentSy ||  in GdRevertLimits()
2106   if (!currentDr || !currentSy) return 1;  in GdSetPort()
2142   if (!currentDr || !currentSy) return 0;  in GdClearSystem()
2149   sys0= currentDr->systems;  in GdClearSystem()
2150   el0= currentDr->elements;  in GdClearSystem()
2163   currentDr->nElements= nel+1;  in GdClearSystem()