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 * @(#)Amull2.c 7.1 (Berkeley) 12/06/90
11*45760Sbostic */
1229621Ssam
1345699Sbostic #include "align.h"
1429621Ssam int zzz1,zzz2,zzz3,zzz4,zzz5;
mull2(infop)1529621Ssam mull2(infop) process_info *infop;
1629621Ssam /*
1729621Ssam /* Multiply longwords, 2 operands.
1829621Ssam /*
1929621Ssam /*****************************************/
2029621Ssam {
2129621Ssam register long Register_12; /* Has to be first reg ! */
2229621Ssam register long result, data0, data1;
2329621Ssam
2429621Ssam data0 = operand(infop,0)->data;
2529621Ssam data1 = operand(infop,1)->data;
2629621Ssam Register_12=psl;
2729621Ssam Set_psl(r12); /* restore the user psl */
2829621Ssam result = data0 * data1;
2929621Ssam asm("movpsl r12");
3029621Ssam New_cc (Register_12);
3129621Ssam write_back (infop,result, operand(infop,1) );
3229621Ssam }
33