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

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

#undef Procedure
#define Procedure int

Procedure v_formal(); 
Procedure l_formal();

extern parsetree pc; /* 'Program counter', current parsetree node */
extern parsetree next; /* Next parsetree node (changed by jumps) */
extern bool report; /* 'Condition code register', outcome of last test */

extern bool noloc; /* Set while evaluating (as opposed to locating)
			formal parameters of HOW'TOs */