/* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1984. */
/* $Header: /var/lib/cvsd/repos/CSRG/43BSD/contrib/B/src/bsmall/b2env.h,v 1.1.1.1 2018/04/24 16:12:54 root Exp $ */

/* environments and context */

/* Procedure sv_context(); */
/* Procedure set_context(); */
/* Procedure initenv(); */
/* Procedure re_env(); */
/* Procedure setprmnv(); */
/* Procedure extbnd_tags(); */
/* Procedure restore_env(); */
value* lookup();
/* Procedure e_replace(); */
/* Procedure e_delete(); */
bool in_env();
value* envassoc();

extern env curnv; extern value *bndtgs;
extern literal cntxt, resexp; extern value uname; extern literal utype;
extern intlet cur_ilev, lino; extern txptr tx, ceol;

extern context read_context;
extern context how_context;