4.3BSD-Reno/src/sys/tahoealign/Aadwc.c
/* Aadwc.c 1.1 86/07/20 */
#include "../tahoealign/align.h"
adwc(infop) process_info *infop;
/*
/* Add with carry.
/* Note : the play with 'tmp' just before the 'asm' line makes
/* sure that when the adwc opcode is executed, the current
/* carry in psl is the same as the 'offending' process'.
/* Don't change unless you know exactly what you're doing.
/*
/*****************************/
{
register long Register_12; /* Has to be first reg ! */
register long Register_11;
register long Register_10;
register long tmp;
Register_12 = operand(infop,0)->data;
Register_11 = operand(infop,1)->data;
if (carry) /* If process' carry set */
tmp = -1;
else tmp = 0;
tmp++; /* 0 => carry set. 1 => carry clear */
Register_10=psl;
Set_psl(r10); /* restore the user psl */
asm(" adwc r11,r12");
asm(" movpsl r11");
New_cc (Register_11);
write_back(infop, Register_12, operand(infop,1) );
}