1. /* 删除在L中第i个数据元素e */
    2. Status ListDelete(StaticLinkList L, int i)
    3. {
    4.     int j, k;
    6.     if (i < 1 || i > ListLength(L))
    7.         return ERROR;
    9.     k = MAX_SIZE - 1;
    10.     for (j = 1; j <= i - 1; j++)
    11.         k = L[k].cur;
    13.     j = L[k].cur;
    14.     L[k].cur = L[j].cur;
    16.     Free_SSL(L, j);
    18.     return OK;
    19. }
    1. /* 将下标为k的空闲结点回收到备用链表 */
    2. void Free_SSL(StaticLinkList space, int k)
    3. {
    4.     /* 把第一个元素cur值赋给要删除的分量cur */
    5.     space[k].cur = space[0].cur;    
    7.     /* 把要删除的分量下标赋值给第一个元素的cur */
    8.     space[0].cur = k;               
    9. }
    1. /* 初始条件：静态链表L已存在。操作结果：返回L中数据元素个数 */
    2. int ListLength(StaticLinkList L)
    3. {
    4.     int j = 0;
    5.     int i = L[MAXSIZE - 1].cur;
    7.     while (i){
    8.         i = L[i].cur;
    9.         j++;
    10.     }
    12.     return j;
    13. }