Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-03 - decus/20-0078/maint/rtsymb.mac
There is 1 other file named rtsymb.mac in the archive. Click here to see a list.
	TITLE	RTSYMBOL VALUES

	SEARCH	SIMMAC,SIMMCR

	IF2,<END>
	DEFINE XX(NA,VAL,S1,EN)<
	PRINTX NA	VAL	S1	EN
>
	DEFINE X(ROUT,S,DUM,N)<
	IFNB <N>,<XX(ROUT,\ROUT,S,N)>
	IFB  <N>,<XX(ROUT,\ROUT,S,.'ROUT)>
>
	DEFINE Y(PROT,SEG,S,F)<
	XX(PROT,\PROT,SEG,.'PROT)
>
	PRINTX SYMBOL	VALUE	SEG	ENTRY
	PRINTX ------------------------------
	RTSYMBOLS
	END