DS_work2

代码

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
void GList_copy(GList L, GList &N)
{
//非空表则进入
if(L)
{
N = new GLNode;
if(!N) //未分配空间
{
exit(OVERFLOW);
}
N->tag = L->tag; //复制标志位
if(L->tag==ATOM) //如果是原子
{
N->atom = L->atom;
}
else //复制表头
{
GList_copy(L->hp, N->hp);
}
if(!(L->tp)) //表尾为空,则递归完表
{
N->tp=NULL;
}
else //复制表尾
{
GList_copy(L->tp, N->tp);
}
}
}
Your browser is out-of-date!

Update your browser to view this website correctly. Update my browser now

×