* Copyright (c) 1986 The Regents of the University of California.
* This code is derived from software contributed to Berkeley by
* %sccs.include.redist.c%
* @(#)Asuba.c 7.1 (Berkeley) %G%
suba(infop
) process_info
*infop
;
/****************************/
register int data0
, data1
, result
;
data0
= operand(infop
,0)->data
;
data1
= operand(infop
,1)->data
;
write_back (infop
,result
, operand(infop
,1));