xref: /csrg-svn/sys/tahoe/align/Aclr.c (revision 45760) 
1*45760Sbostic /*-
2*45760Sbostic  * Copyright (c) 1986 The Regents of the University of California.
3*45760Sbostic  * All rights reserved.
4*45760Sbostic  *
5*45760Sbostic  * This code is derived from software contributed to Berkeley by
6*45760Sbostic  * Computer Consoles Inc.
7*45760Sbostic  *
8*45760Sbostic  * %sccs.include.redist.c%
9*45760Sbostic  *
10*45760Sbostic  *	@(#)Aclr.c	7.1 (Berkeley) 12/06/90
11*45760Sbostic  */
1229595Ssam 
1345699Sbostic #include "align.h"
clr(infop)1429595Ssam clr(infop)	process_info *infop;
1529595Ssam /*
1629595Ssam /*	Clear operand
1729595Ssam /*
1829595Ssam /*************************************/
1929595Ssam {
2029595Ssam 
2129595Ssam 	write_back(infop, 0, operand(infop,0));
2229595Ssam 	negative_0;
2329595Ssam 	zero_1;
2429595Ssam 	overflow_0;
2529595Ssam 	carry_1;
2629595Ssam }
27