| 687 | } |
| 688 | |
| 689 | void sleftv::Copy(leftv source) |
| 690 | { |
| 691 | Init(); |
| 692 | rtyp=source->Typ(); |
| 693 | void *d=source->Data(); |
| 694 | if(!errorreported) |
| 695 | { |
| 696 | if (rtyp==BUCKET_CMD) |
| 697 | { |
| 698 | rtyp=POLY_CMD; |
| 699 | data=(void*)pCopy(sBucketPeek((sBucket_pt)d)); |
| 700 | } |
| 701 | else |
| 702 | data=s_internalCopy(rtyp,d); |
| 703 | if ((source->attribute!=NULL)||(source->e!=NULL)) |
| 704 | attribute=source->CopyA(); |
| 705 | flag=source->flag; |
| 706 | if (source->next!=NULL) |
| 707 | { |
| 708 | next=(leftv)omAllocBin(sleftv_bin); |
| 709 | next->Copy(source->next); |
| 710 | } |
| 711 | } |
| 712 | } |
| 713 | |
| 714 | void * sleftv::CopyD(int t) |
| 715 | { |
no test coverage detected