reworked compatible to fix a bug dealing with var parameters
[unix-history] / usr / src / usr.bin / pascal / pdx / machine.h
/* Copyright (c) 1982 Regents of the University of California */
/* static char sccsid[] = "@(#)machine.h 1.3 %G%"; */
/*
* Definitions for the machine module.
*
* This module has the low level machine interface. This consists
* mostly of dealing with machine instructions and also setting
* and unsetting breakpoints.
*/
ADDRESS pc; /* current program counter */
LINENO curline; /* line number associated with pc */
SYM *curfunc; /* pointer to active function symbol */
short errnum; /* current error number */
setbp(); /* set a breakpoint */
unsetbp(); /* unset a breakpoint */
BOOLEAN isbperr(); /* test if a breakpoint has occurred */
printerror(); /* print out an execution error message */
ADDRESS nextaddr(); /* address of next line to be executed */
BOOLEAN isendofproc(); /* test if address is at end of procedure */
printinst(), printninst(); /* print the instruction at a given address */
printdata(), printndata(); /* print the contents of a given data address */