direct.u

操作系统SunOS 4.1.3版本的源码

	jtierr der1 cstat;	dnop tioe tilsw halt;		titoreg;	rcslsw ptr1;
	call idle1;		dnop tioe timsw halt;		titoreg;	rcsmsw ptr1;
routine c.ddivab 001010111101 	dnop enra loaddp halt;          regtoti;        rcsmsw imm2;
        ;                       dnop enra loaddp halt;          regtoti;        rcslsw imm2;
	;			ddivab enrb loaddp halt;	regtoti;	rcsmsw ptr3;
	;			ddivab enrb loaddp halt;	regtoti;	rcslsw ptr3;	lpreg!1
	;			dnop;				regtotmp;	rcslsw ptr1;
	;			dnop halt;			;		;
	;			dnop;				;		;
	;			dnop;				;		;
	;			dnop;				;		;
	;			dmul;				;		;
	;			dmul halt;			;		ptr1;
	jtierr der1 cstat;	dnop tioe tilsw halt;		titoreg;	rcslsw ptr1;
	call idle1;		dnop tioe timsw halt;		titoreg;	rcsmsw ptr1;
|*
|*              Weitek Single Precision Multiply Instructions
|*
routine c.smul 001010000010 	enra halt;			regtoti;	rcssp imm2;
	;			smul enrb halt;			regtoti;	rcssp ptr3;
        call csafin;            smul halt;			regtotmp;	rcssp ptr1;
routine c.smwa 001010000110 	enra halt;			regtoti;	rcssp imm2;
	;			smwa enrb halt;			regtoti;	rcssp ptr3;
        call csafin;            smwa halt;			regtotmp;	rcssp ptr1;
routine c.smwb 001010001010 	enra halt;			regtoti;	rcssp imm2;
	;			smwb enrb halt;			regtoti;	rcssp ptr3;
        call csafin;            smwb halt;			regtotmp;	rcssp ptr1;
routine c.smwab 001010001110 	enra halt;			regtoti;	rcssp imm2;
	;			smwab enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwab halt;			regtotmp;	rcssp ptr1;
routine c.smma 001010010010 	enra halt;			regtoti;	rcssp imm2;
	;			smma enrb halt;			regtoti;	rcssp ptr3;
        call csafin;            smma halt;			regtotmp;	rcssp ptr1;
routine c.smmb 001010010110 	enra halt;			regtoti;	rcssp imm2;
	;			smmb enrb halt;			regtoti;	rcssp ptr3;
        call csafin;            smmb halt;			regtotmp;	rcssp ptr1;
routine c.smmab 001010011010 	enra halt;			regtoti;	rcssp imm2;
	;			smmab enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smmab halt;			regtotmp;	rcssp ptr1;
routine c.smn 001010011110 	enra halt;			regtoti;	rcssp imm2;
	;			smn enrb halt;			regtoti;	rcssp ptr3;
        call csafin;            smn halt;			regtotmp;	rcssp ptr1;
routine c.smwan 001010100010 	enra halt;			regtoti;	rcssp imm2;
	;			smwan enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwan halt;			regtotmp;	rcssp ptr1;
routine c.smwbn 001010100110 	enra halt;			regtoti;	rcssp imm2;
	;			smwbn enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwbn halt;			regtotmp;	rcssp ptr1;
routine c.smwabn 001010101010 	enra halt;			regtoti;	rcssp imm2;
	;			smwabn enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwabn halt;			regtotmp;	rcssp ptr1;
routine c.smman 001010101110 	enra halt;			regtoti;	rcssp imm2;
	;			smman enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smman halt;			regtotmp;	rcssp ptr1;
routine c.smmbn 001010110010 	enra halt;			regtoti;	rcssp imm2;
	;			smmbn enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smmbn halt;			regtotmp;	rcssp ptr1;
routine c.smmabn 001010110110 	enra halt;			regtoti;	rcssp imm2;
	;			smmabn enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smmabn halt;			regtotmp;	rcssp ptr1;
routine c.smwama 001010111010 	enra halt;			regtoti;	rcssp imm2;
	;			smwama enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwama halt;			regtotmp;	rcssp ptr1;
routine c.smwamb 001010111110 	enra halt;			regtoti;	rcssp imm2;
	;			smwamb enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwamb halt;			regtotmp;	rcssp ptr1;
routine c.smwamab 001011000010 	enra halt;			regtoti;	rcssp imm2;
	;			smwamab enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwamab halt;			regtotmp;	rcssp ptr1;
routine c.smwbma 001011000110 	enra halt;			regtoti;	rcssp imm2;
	;			smwbma enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwbma halt;			regtotmp;	rcssp ptr1;
routine c.smwbmb 001011001010 	enra halt;			regtoti;	rcssp imm2;
	;			smwbmb enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwbmb halt;			regtotmp;	rcssp ptr1;
routine c.smwbmab 001011001110 	enra halt;			regtoti;	rcssp imm2;
	;			smwbmab enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwbmab halt;			regtotmp;	rcssp ptr1;
routine c.smwabma 001011010010 	enra halt;			regtoti;	rcssp imm2;
	;			smwabma enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwabma halt;			regtotmp;	rcssp ptr1;
routine c.smwabmb 001011010110 	enra halt;			regtoti;	rcssp imm2;
	;			smwabmb enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwabmb halt;			regtotmp;	rcssp ptr1;
routine c.smwabmab 001011011010	enra halt;			regtoti;	rcssp imm2;
	;			smwabmab enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwabmab halt;			regtotmp;	rcssp ptr1;
routine c.smwaman 001011011110 	enra halt;			regtoti;	rcssp imm2;
	;			smwaman enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwaman halt;			regtotmp;	rcssp ptr1;
routine c.smwambn 001011100010 	enra halt;			regtoti;	rcssp imm2;
	;			smwambn enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwambn halt;			regtotmp;	rcssp ptr1;
routine c.smwamabn 001011100110	enra halt;			regtoti;	rcssp imm2;
	;			smwamabn enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwamabn halt;			regtotmp;	rcssp ptr1;
routine c.smwbman 001011101010 	enra halt;			regtoti;	rcssp imm2;
	;			smwbman enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwbman halt;			regtotmp;	rcssp ptr1;
routine c.smwbmbn 001011101110 	enra halt;			regtoti;	rcssp imm2;
	;			smwbmbn enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwbmbn halt;			regtotmp;	rcssp ptr1;
routine c.smwbmabn 001011110010	enra halt;			regtoti;	rcssp imm2;
	;			smwbmabn enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwbmabn halt;			regtotmp;	rcssp ptr1;
routine c.smwabman 001011110110	enra halt;			regtoti;	rcssp imm2;
	;			smwabman enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwabman halt;			regtotmp;	rcssp ptr1;
routine c.smwabmbn 001011111010	enra halt;			regtoti;	rcssp imm2;
	;			smwabmbn enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwabmbn halt;			regtotmp;	rcssp ptr1;
routine c.smwabmabn 001011111110 	enra halt;		regtoti;	rcssp imm2;
	;			smwabmabn enrb halt;		regtoti;	rcssp ptr3;
        call csafin;            smwabmabn halt;			regtotmp;	rcssp ptr1;
|*
|*              Weitek Double Precision Multiply Instructions
|*
routine c.dmul 001010000011 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmul enrb loaddp halt;		regtoti;	rcslsw ptr3;
	;			dmul;				regtotmp;	rcslsw ptr1;
cdmfin:
	;			dnop halt;			;		ptr1;
	jtierr der1 cstat;	dnop tioe tilsw halt;		titoreg;	rcslsw ptr1;
	call idle1;		dnop tioe timsw halt;		titoreg;	rcsmsw ptr1;
routine c.dmwa 001010000111 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwa enrb loaddp halt;		regtoti;	rcslsw ptr3;
	call cdmfin;		dmwa;				regtotmp;	rcslsw ptr1;
routine c.dmwb 001010001011 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwb enrb loaddp halt;		regtoti;	rcslsw ptr3;
	call cdmfin;		dmwb ;				regtotmp;	rcslsw ptr1;
routine c.dmwab 001010001111 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwab enrb loaddp halt;		regtoti;	rcslsw ptr3;
	call cdmfin;		dmwab;				regtotmp;	rcslsw ptr1;
routine c.dmma 001010010011 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmma enrb loaddp halt;		regtoti;	rcslsw ptr3;
	call cdmfin;		dmma ;				regtotmp;	rcslsw ptr1;
routine c.dmmb 001010010111 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmmb enrb loaddp halt;		regtoti;	rcslsw ptr3;
	call cdmfin;		dmmb;				regtotmp;	rcslsw ptr1;
routine c.dmmab 001010011011 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmmab enrb loaddp halt;		regtoti;	rcslsw ptr3;
	call cdmfin;		dmmab;				regtotmp;	rcslsw ptr1;
routine c.dmn 001010011111 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmn enrb loaddp halt;		regtoti;	rcslsw ptr3;
	call cdmfin;		dmn;				regtotmp;	rcslsw ptr1;
routine c.dmwan 001010100011 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwan enrb loaddp halt;		regtoti;	rcslsw ptr3;
	call cdmfin;		dmwan;				regtotmp;	rcslsw ptr1;
routine c.dmwbn 001010100111 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwbn enrb loaddp halt;		regtoti;	rcslsw ptr3;
	call cdmfin;		dmwbn;				regtotmp;	rcslsw ptr1;
routine c.dmwabn 001010101011 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwabn enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwabn;				regtotmp;	rcslsw ptr1;
routine c.dmman 001010101111 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmman enrb loaddp halt;		regtoti;	rcslsw ptr3;
	call cdmfin;		dmman;				regtotmp;	rcslsw ptr1;
routine c.dmmbn 001010110011 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmmbn enrb loaddp halt;		regtoti;	rcslsw ptr3;
	call cdmfin;		dmmbn;				regtotmp;	rcslsw ptr1;
routine c.dmmabn 001010110111 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmmabn enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmmabn;				regtotmp;	rcslsw ptr1;
routine c.dmwama 001010111011 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwama enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwama;				regtotmp;	rcslsw ptr1;
routine c.dmwamb 001010111111 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwamb enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwamb;				regtotmp;	rcslsw ptr1;
routine c.dmwamab 001011000011 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwamab enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwamab;			regtotmp;	rcslsw ptr1;
routine c.dmwbma 001011000111 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwbma enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwbma;				regtotmp;	rcslsw ptr1;
routine c.dmwbmb 001011001011 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwbmb enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwbmb;				regtotmp;	rcslsw ptr1;
routine c.dmwbmab 001011001111 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwbmab enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwbmab;			regtotmp;	rcslsw ptr1;
routine c.dmwabma 001011010011 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwabma enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwabma;			regtotmp;	rcslsw ptr1;
routine c.dmwabmb 001011010111 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwabmb enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwabmb;			regtotmp;	rcslsw ptr1;
routine c.dmwabmab 001011011011	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwabmab  enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwabmab ;			regtotmp;	rcslsw ptr1;
routine c.dmwaman 001011011111 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwaman enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwaman;			regtotmp;	rcslsw ptr1;
routine c.dmwambn 001011100011 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwambn enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwambn;			regtotmp;	rcslsw ptr1;
routine c.dmwamabn 001011100111	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwamabn enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwamabn;			regtotmp;	rcslsw ptr1;
routine c.dmwbman 001011101011 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwbman enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwbman;			regtotmp;	rcslsw ptr1;
routine c.dmwbmbn 001011101111 	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwbmbn enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwbmbn;			regtotmp;	rcslsw ptr1;
routine c.dmwbmabn 001011110011	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwbmabn enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwbmabn;			regtotmp;	rcslsw ptr1;
routine c.dmwabman 001011110111 dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwabman enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwabman;			regtotmp;	rcslsw ptr1;
routine c.dmwabmbn 001011111011	dnop enra loaddp halt;		regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwabmbn enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwabmbn;			regtotmp;	rcslsw ptr1;
routine c.dmwabmabn 001011111111 	dnop enra loaddp halt;	regtoti;	rcsmsw imm2;
	;			dnop enra loaddp halt;		regtoti;	rcslsw imm2;
	;			dnop enrb loaddp halt;		regtoti;	rcsmsw ptr3;
	;			dmwabmabn  enrb loaddp halt;	regtoti;	rcslsw ptr3;
	call cdmfin;		dmwabmabn ;			regtotmp;	rcslsw ptr1;