// General LISP Definitions.
//
// File:	lisp.h
// Author:	course
// Version:	3

#ifndef LISP_H
#define LISP_H

#include "const.h"
#include "object.h"
#include "preserve.h"
#include "symbol.h"
#include "cons.h"
#include "fixnum.h"
#include "function.h"
#include "catch.h"
#include "eval.h"

// Input and output streams.  All input and output must
// use these: e.g., as in
//
//	*out << "Hello there!" << endl;
//
extern estream * in;
extern ostream * out;


// Error functions beyond those in basic.h.  Each error
// message is of the general form:
//
//	\nERROR: <s><v>.\n
//
void error (char * s, object * v);


// The top level read eval print loop.  Catches error
// throws to 'TOP-LEVEL.
//
// Silent and stop_on_error modes are for LOAD.
//
// The value of the symbol *TRACE* is saved and restored
// on a caught error throw.
//
void toplevel (bool silent, bool stop_on_error);


#endif // LISP_H