// Preserve Stack Code.
//
// File:        preserve.cc
// Author:      course
// Version:     1

#include "preserve.h"

// Preserve stack.

object * preserve_stack::stack [PRESERVE_STACK_SIZE];
object ** preserve_stack::current;
object ** preserve_stack::end;

// Initialize preserve stack.
//
void preserve_stack::initialize()
{
    current	= stack;
    end	= stack + PRESERVE_STACK_SIZE;

    for (object ** p = stack; p < end; )
	* p ++ = NULL;
}

// Claim fatal preserve stack over/underflow error.
//
void preserve_stack::overflow()
    { error ("Preserve stack overflow"); }
void preserve_stack::underflow()
    { error ("Preserve stack underflow"); }