获取顺序栈的栈顶元素

转至：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;
}