home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / b / b.lha / B / src / bint / b3int.h < prev    next >
Encoding:
C/C++ Source or Header  |  1988-11-24  |  542 b   |  24 lines
  1. /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
  2.  
  3. /*
  4.   $Header: b3int.h,v 1.4 85/08/22 16:44:13 timo Exp $
  5. */
  6.  
  7. /* Interpreter */
  8.  
  9. value evalthread();
  10. /* Procedure execthread(); */
  11.  
  12. value pop();
  13. /* Procedure push(); */
  14.  
  15. extern bool tracing;
  16.  
  17. #define Thread(t) *Branch(t, Nbranches(t)) /* Next instruction */
  18. #define Thread2(t) *Branch(t, Nbranches(t)+1) /* Alternate next instr. or flag */
  19.  
  20. #define Stop ((parsetree)zero) /* Legal stop */
  21. #define Halt NilTree /* Illegal stop (loose end of code) */
  22.  
  23. extern int call_level;
  24.