获取顺序栈的栈顶元素

转至：http://www.nowamagic.net/librarys/veda/detail/2276

获取顺序栈的栈顶元素 GetTop (S,*e)：若栈存在且非空，用e返回S的栈顶元素。参考之前线性表的话，就是设一个存储栈顶的变量 e，然后通过地址传递，用 *e 来保存指针为 top 的数组元素。

函数的设计如下：

/* 若栈不空，则用e返回S的栈顶元素，并返回OK；否则返回ERROR */
Status GetTop(SqStack S,SElemType *e)
{
    if (S.top==-1)
        return ERROR;
    else
        *e=S.data[S.top];
    return OK;
}

判断栈是否为 空：

/* 若栈S为空栈，则返回TRUE，否则返回FALSE */
Status StackEmpty(SqStack S)
{
    if (S.top==-1)
        return TRUE;
    else
        return FALSE;
}

置空栈：

/* 把S置为空栈 */
Status ClearStack(SqStack *S)
{
    S->top=-1;
    return OK;
}