perm filename STCODE.DEF[NEW,AIL] blob sn#408230 filedate 1979-01-08 generic text, type C, neo UTF8
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
>;