BSD 4_3_Tahoe development

[unix-history] / usr / src / sys / tahoealign / Acvtlb.c

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


#include "../tahoealign/align.h"
cvtlb(infop)    process_info *infop;
/*
/*      Convert long to byte, checks overflow
/*
/****************************************/
{
       register long result;

       result = operand(infop,0)->data;
       if (result < 0 )  negative_1 ; else negative_0;
       if (result == 0 )  zero_1 ; else zero_0;
       carry_1; 
       if (result > 0x7f || result <= -0x80) overflow_1;
       else overflow_0;
       write_back (infop, result, operand(infop,1) );
}