/* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */

/*
  $Header: /var/lib/cvsd/repos/CSRG/43BSD/contrib/B/src/bint/b3env.h,v 1.1.1.1 2018/04/24 16:12:54 root Exp $
*/

/* environments and context */

value* lookup();
bool in_env();
value* envassoc();

extern env curnv; extern value r_names, *bndtgs;
extern literal cntxt, resexp; extern value uname;
extern intlet lino;
extern intlet f_lino;

extern context read_context;

extern envtab prmnvtab;
extern envchain prmnvchain;
extern env prmnv;

/* Procedure sv_context(); */
/* Procedure set_context(); */
/* Procedure initenv(); */
/* Procedure re_env(); */
/* Procedure setprmnv(); */
/* Procedure extbnd_tags(); */
/* Procedure e_replace(); */
/* Procedure e_delete(); */