xref: /original-bsd/sys/tahoe/align/Asuba.c (revision b65ab6e5)
1 /*-
2  * Copyright (c) 1986 The Regents of the University of California.
3  * All rights reserved.
4  *
5  * This code is derived from software contributed to Berkeley by
6  * Computer Consoles Inc.
7  *
8  * %sccs.include.redist.c%
9  *
10  *	@(#)Asuba.c	7.1 (Berkeley) 12/06/90
11  */
12 
13 #include "align.h"
suba(infop)14 suba(infop)	process_info *infop;
15 /*
16 /*	Subtract address.
17 /*
18 /****************************/
19 {
20 	register int data0, data1, result;
21 
22 	data0 = operand(infop,0)->data;
23 	data1 = operand(infop,1)->data;
24 	result = data1 - data0;
25 	write_back (infop,result, operand(infop,1));
26 }
27