#define TRUE 1
#define FALSE 0
#define OK 1
#define ERROR 0
#define INFEASIBLE -1
#define OVERFLOW -2
#define STACK_INIT_SIZE 100
#define STACKINCREMENT 10
#include<stdio.h>
#include<stdlib.h>
#include<malloc.h>
typedef char SElemtype;
typedef struct{
SElemtype *base;
SElemtype *top;
int stacksize;
}SqStack;
int InitStack(SqStack *S){ //構造一個空棧S
(*S).base=(SElemtype )malloc(STACK_INIT_SIZE

sizeof(SElemtype));
if(!(*S).base){
exit(OVERFLOW); //儲存分配失敗
}
else (*S).top=(*S).base;
(*S).stacksize=STACK_INIT_SIZE;
return OK;
}
int GetTop(SqStack S,SElemtype *e){ //若棧不空，則用e返回S的棧頂元素，並返回OK；否則返回ERROR
if(S.baseS.top){
return ERROR;
}
else e=(S.top-1);
return OK;
}
int Push(SqStack *S,SElemtype e){ // 插入元素e為新的棧頂元素
if((*S).top-(*S).base>=(*S).stacksize){ //棧滿，追加儲存空間
(*S).base=(SElemtype *)realloc((*S).base,((*S).stacksize+STACKINCREMENT)*sizeof(SElemtype));
if(!(*S).base){
exit(OVERFLOW); //儲存分配失敗
}
(*S).top=(*S).base+(*S).stacksize;
(*S).stacksize+=STACKINCREMENT;
}
*((*S).top)++=e;
return OK;
}
int Pop(SqStack *S,SElemtype *e){ //若棧不空，則刪除S的棧頂元素，用e返回其值，並返回OK；否則返回ERROR
if((*S).top(*S).base){
return ERROR;
}
e=–(S).top;
return OK;
}
int StackLength(SqStack S){ //返回S的元素個數，即棧的長度
return S.top-S.base;
}
int VisitStack(SqStack S){ //從棧底到棧頂依次對棧中每個元素遍歷
for(int i=1;i<=StackLength(S);i++){
printf("%d \n",(S.base));
S.base++;
}
return OK;
}
int ClearStack(SqStack *S){ //把S置為空棧
(*S).base=(*S).top;
}
int DestroyStack(SqStack *S){ //銷燬棧S，S不再存在
free((*S).base);
(*S).base=(*S).top=NULL;
(*S).stacksize=0;
return OK;
}
int EmptyStack(SqStack S){ //若棧S為空棧，則返回TRUE，否則返回FALSE
if(S.baseS.top){
return TRUE;
}
else return FALSE;
}
void check(){
SqStack S;
SElemtype ch[80],*p,e;
if(InitStack(&S)){
printf(“請輸入表示式:\n”);
gets(ch);
p=ch;
while(*p){
switch(*p){
case ‘(’:
case ‘[’:Push(&S,*p);
p++;
break;
case ‘)’:
case ‘]’:if(!EmptyStack(S)){
Pop(&S,&e);
if(*p’)’&&e!=’(’||*p==’]’&&e!=’[’){
printf(“左右括號不匹配\n”);
exit(ERROR);
}
else {
p++;
break;
}
}
else {
printf(“缺乏左括號\n”);
exit(ERROR);
}
default:p++;
}
if(EmptyStack(S)){
printf(“括號匹配\n”);
}
else {
printf(“缺乏左括號\n”);
}
}
}
}
void main()
{
check();
}