资源描述：
《链表抽象数据类型的实现》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、/*线性表抽象数据类型的带头结点单链表实现*/#include#defineOK1#defineERROR0#defineTRUE1#defineFALSE0#defineOVERFLOW-2#defineMAXSIZE100#defineNULL0typedefintstatus;typedefintelemtype;typedefstructlnode{elemtypedata;structlnode*next;}lnode,*linklist;/*初始化*/statusinitlist
2、(linklist*l){*l=(linklist)malloc(sizeof(lnode));if(*l){(*l)->next=NULL;returnOK;}elsereturnOVERFLOW;}/*销毁*/statusdestroylist(linklist*l){linklistp;while(*l){p=*l;*l=(*l)->next;free(p);}returnOK;}/*置空*/statusclearlist(linklist*l){linklistp,q;p=(*l)->next;(*l
3、)->next=NULL;while(p){q=p;p=p->next;free(q);}returnOK;}/*求单链表长度*/intlistlength(linklistl){linklistp;inti=0;p=l->next;while(p){i++;p=p->next;}returni;}/*单链表空否*/statuslistempty(linklistl){if(l->next)returnFALSE;elsereturnTRUE;}/*查找*/intlocateelem(linklistl,el
4、emtypee){inti=0;linklistp;p=l->next;while(p){i++;if(p->data==e)returni;p=p->next;}return0;}/*读第i个元素*/statusgetelem(linklistl,inti,elemtype*e){intj=1;linklistp;p=l->next;while(p&&(jnext;}if(!p
5、
6、(j>i))returnERROR;*e=p->data;returnOK;}/*求前驱元素*/st
7、atuspriorelem(linklistl,elemtypecur_e,elemtype*pre_e){linklistp,q;if(l->next&&(l->next->data==cur_e))returnERROR;q=l->next;p=q->next;while(p&&(p->data!=cur_e)){q=p;p=p->next;}if(!p)returnERROR;*pre_e=q->data;returnOK;}/*求后继元素*/statusnextelem(linklistl,elemt
8、ypecur_e,elemtype*next_e){linklistp;p=l->next;while(p&&(p->data!=cur_e))p=p->next;if(!p)returnERROR;*next_e=p->next->data;returnOK;}/*在第i个位置插入元素e*/statuslistinsert(linklist*l,inti,elemtypee){intj=0;linklistp,s;p=*l;while(p&&jnext;}if(!p
9、
10、(j>i
11、-1))returnERROR;s=(linklist)malloc(sizeof(lnode));s->data=e;s->next=p->next;p->next=s;returnOK;}/*删除第i个元素*/statuslistdelete(linklist*l,inti,elemtype*e){linklistp,q;intj;p=*l;j=0;while(p->next&&jnext;++j;}if(!(p->next)
12、
13、j>i-1)returnERROR;q=p->next
14、;p->next=q->next;*e=q->data;free(q);returnOK;}/*遍历单链表*/statuslisttraverse(linklistl){linklistp;p=l->next;while(p){printf("%d",p->data);p=p->next;}printf("");returnOK;}/*尾插法建立顺序单链表*/statuslistcreate(l
