/*
  Stop the interpreter
  Tiny abstraction to eliminate a global variable
  JBS 15 June 1994
*/

#ifndef _STOP_

#define _STOP_

#include "types.h"

extern bool stop;

#define quit()          stop=1
#define set_stop(x)     stop=(x)
#define stopped()       (stop)

#endif

