Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-01 - decus/20-0002/stcode.def
There is 1 other file named stcode.def in the archive. Click here to see a list.
COMMENT    VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	DEFINE SALUUO "<>" = <
C00003 ENDMK
C;

DEFINE SALUUO "<>" = <
	DEFINE FLOAT = 2 LSH 27;
	DEFINE FIX = 3 LSH 27;
	DEFINE IOERR = 4 LSH 27;
	DEFINE ERR = 5 LSH 27;
	DEFINE SIXPNT = 6 LSH 27;
	DEFINE ARERR = 7 LSH 27;
	DEFINE RECUUO = 8 LSH 27;
	DEFINE DECPNT = 9 LSH 27;
	DEFINE OCTPNT = 10 LSH 27
>;

DEFINE SALACS "<>" = <
	DEFINE FF = 0;
	DEFINE A = 1;
	DEFINE B = 2;
	DEFINE C = 3;
	DEFINE D = 4;
	DEFINE RF = '12;
	DEFINE LPSA = '13;
	DEFINE TEMP = '14;
	DEFINE USER = '15;
	DEFINE SP = '16;
	DEFINE P ='17
>;