/* Acvtlb.c 1.1 86/07/20 */
#include "../tahoealign/align.h"
cvtlb(infop
) process_info
*infop
;
/* Convert long to byte, checks overflow
/****************************************/
result
= operand(infop
,0)->data
;
if (result
< 0 ) negative_1
; else negative_0
;
if (result
== 0 ) zero_1
; else zero_0
;
if (result
> 0x7f || result
<= -0x80) overflow_1
;
write_back (infop
, result
, operand(infop
,1) );