/* Acmpd.c 1.1 86/07/20 */
#include "../tahoealign/align.h"
cmpd(infop
) process_info
*infop
;
/* Compare accumulator (double) with operand.
/****************************************************/
register float *Register_12
; /* Has to be first reg ! */
register float *Register_11
;
register long Register_10
;
Register_12
= (float *) &acc_high
;
Register_11
= (float *) &operand(infop
,0)->data
;
if ( reserved( *(long *)Register_11
) )
exception(infop
, ILL_OPRND
);
Set_psl(r10
); /* restore the user psl */