/* 栈函数库：
   提供对一个整数（很容易改成其他类型）栈的
   最简单操作。 */

typedef int stack_data;

extern void stack_init();
/* 初始化本函数库。
   请在调用其他函数之前先调用本函数。*/

extern void stack_clear();
/* 清除栈上的所有元素。*/

extern int stack_empty();
/* 若栈为空则返回 1，否则返回 0。*/

extern void stack_push(stack_data d);
/* 将d的值压栈。*/

extern stack_data stack_pop();
/* 返回栈顶的值并删除栈顶元素，
   若栈为空
   则返回无用信息。*/

此函数库的实现代码文件如下：

#include "stack.h"
#include 

/* 栈函数库：
   提供对一个整数栈的最简单操作。*/

struct stack_rec
{
    stack_data data;
    struct stack_rec *next;
};

struct stack_rec *top=NULL;

void stack_init()
/* 初始化本函数库。
   请在调用其他函数之前先调用本函数。*/
{
    top=NULL;
}

void stack_clear()
/* 清除栈上的所有元素。*/
{
    stack_data x;

    while (!stack_empty())
    x=stack_pop();
}

int stack_empty()
/* 若栈为空则返回1，否则返回0。*/
{
    if (top==NULL)
        return(1);
    else
        return(0);
}

void stack_push(stack_data d)
/* 将d的值压栈。*/
{
    struct stack_rec *temp;
    temp=
  (struct stack_rec *)malloc(sizeof(struct stack_rec));
    temp->data=d;
    temp->next=top;
    top=temp;
}

stack_data stack_pop()
/* 返回栈顶的值并删除栈顶元素，
   若栈为空
   则返回无用信息。*/
{
    struct stack_rec *temp;
    stack_data d=0;
    if (top!=NULL)
    {
        d=top->data;
        temp=top;
        top=top->next;
        free(temp);
    }
    return(d);
}

请注意，这个函数库是如何进行信息隐藏的：单从头文件上无法看出栈的实现是用的数组、指针、文件或什么其他方式。还要注意NULL的使用。NULL是在stdio.h中定义的，所以使用指针的代码几乎总是要包含stdio.h。NULL即零。