NonStop S-Series Server Description Manual (G06.24+)
TNS Instruction Set Definition
HP NonStop S-Series Server Description Manual—520331-003
C-25
Instruction Definitions
0 0 0 3 0 0 EADD extended add
V:=0
t1:=exponent(E);
t2:=exponent(A);
if DCBA<>0 and HGFE<>0
and abs(t1-t2)<56 then
{sign1:=H.<0>;
sign2:=D.<0>;
H.<0>:=D.<0>:=1;
exponent(E):=0;
exponent(A):=0;
s:=t1-t2;
if s>=0 then
DCBA:=DCBA'>>'s;
else
{HGFE:=HGFE'>>'-s;
HGFE:=:DCBA;
t1:=t2}
if sign1=sign2 then
{HGFE:=HGFE'+'DCBA;
if carry then
{HGFE:=HGFE'>>'1;
t1:=t1+1;
H.<0>:=1}}
else
{HGFE:=HGFE'-'DCBA;
if not carry then
{HGFE:=-HGFE;
sign1:=~sign1}
if HGFE=0 then
t1:=sign1:=0
else
while H.<0>=0 do
{HGFE:=HGFE'<<'1;
t1:=t1-1}}
HGFE:=HGFE'+'%400;
if carry out then
t1:=t1+1;
if t1.<6>=1 then
call overflow;
H.<0>:=sign1;
exponent(E):=t1}
else
if HGFE=0 or t1-t2<=-56
then HGFE:=DCBA;
if no overflow then cc(HGFE); RP:=RP-4
0 0 0 3 0 1 ESUB extended subtract
if DCBA<>0 then
D.<0>:=~D.<0>;
goto EADD
Table C-2. Instruction Definitions (page15of38)