usr/src/sys/tahoealign/Acvld.c

/*      Acvld.c 1.1     86/07/20        */

#include "../tahoealign/align.h"
cvld(infop)     process_info *infop;
/*
/*      Convert integer to double (into accumulator).
/*
/******************************************************/
{
        register        long    Register_12;    /* Has to be first reg ! */
        register        double  *Register_11;
        register        long    Register_10;

        Register_11 = (double *) &acc_high;
        Register_10 = operand(infop,0)->data;
        Register_12=psl;
        Set_psl(r12);   /* restore the user psl */
        asm ("  cvld    r10");          /* Don't change the order !! */
        asm ("  movpsl  r12");
        asm ("  std     (r11)");
        New_cc (Register_12);
}